Lekce 3.12
Metody DataTable pro Φtenφ a zßpis

p°edchozφ lekce (3.11) obsah kurzu nßsledujφcφ lekce (3.13)
Pro Φtenφ a zßpis dat se pou₧φvajφ op∞t obdobnΘ funkce jako pro databßze umφst∞nΘ v databßzovΘm okn∞. Pro ka₧d² typ dat se p°itom pou₧φvajφ r∙znΘ metody. Musφte proto znßt typ databßzovΘ polo₧ky, ze kterΘ budete Φφst, p°φpadn∞ do kterΘ budete data uklßdat. Pro Φtenφ se pou₧φvajφ metody DataTable.ReadDat, DataTable.ReadLog, DataTable.ReadNum a DataTable.ReadStr. V parametru se udßvß jmΘno polo₧ky databßze. Pokud polo₧ka zadanΘho jmΘna neexistuje, p°φpadn∞ je jinΘho typu, bude vrßcena nulovß, p°φpadn∞ prßzdnß hodnota. P°φklady Φtenφ polo₧ek databßze: 


Jazyk KLONDAIK:
d := DataTable.ReadDat('DATUM');
c := DataTable.ReadNum('CENA');
n := DataTable.ReadStr('NAZEV');
m := DataTable.ReadMem('POZNAMKA');


Jazyk BONANZA:
d = DataTable.ReadDat("DATUM")
c = DataTable.ReadNum("CENA")
n = DataTable.ReadStr("NAZEV")
m = DataTable.ReadMem("POZNAMKA")


Jazyk JUKON:
d = DataTable.ReadDat('DATUM');
c = DataTable.ReadNum('CENA');
n = DataTable.ReadStr('NAZEV');
m = DataTable.ReadMem('POZNAMKA');
Pro zßpis do datumov²ch polo₧ek se pou₧ije metoda DataTable.WriteDat, pro zßpis do logick²ch polo₧ek metoda DataTable.WriteLog, pro zßpis do numerick²ch polo₧ek se pou₧ije metoda DataTable.WriteNum a pro zßpis do °et∞zcov²ch polo₧ek se pou₧φvß metoda DataTable.WriteStr. P°i pou₧itφ metod pro zßpis do databßze se uvßdφ v prvnφm parametru nßzev polo₧ky databßze a v druhΘm parametru hodnoty pro ulo₧enφ. Pokud polo₧ka zadanΘho jmΘna neexistuje, p°φpadn∞ je jinΘho typu, neprovede se ₧ßdnß akce. P°φklad zßpisu do polo₧ek databßze: 


Jazyk KLONDAIK:
DataTable.WriteDat('DATUM', '24/12/1997');
DataTable.WriteDat('DATUM', DataTable.EvalStr('DTOC(DAY())'));
DataTable.WriteNum('CENA',  100);
DataTable.WriteNum('CENA',  DataTable.ReadNum('CENA')*1.1);
DataTable.WriteStr('NAZEV', 'KLONDAIK');


Jazyk BONANZA:
'Je mo₧nΘ pou₧φt dvojφho zp∙sobu:
DataTable.WriteDat "DATUM", "24/12/1997"
DataTable.WriteDat "DATUM", DataTable.EvalStr("DTOC(DAY())")
DataTable.WriteNum "CENA",  100
DataTable.WriteNum "CENA",  DataTable.ReadNum("CENA")*1.1
DataTable.WriteStr "NAZEV", "KLONDAIK"

Call DataTable.WriteDat("DATUM", "24/12/1997")
Call DataTable.WriteDat("DATUM", DataTable.EvalStr("DTOC(DAY())"))
Call DataTable.WriteNum("CENA",  100)
Call DataTable.WriteNum("CENA",  DataTable.ReadNum("CENA")*1.1)
Call DataTable.WriteStr("NAZEV", "KLONDAIK")


Jazyk JUKON:
DataTable.WriteDat('DATUM', '24/12/1997');
DataTable.WriteDat('DATUM', DataTable.EvalStr('DTOC(DAY())'));
DataTable.WriteNum('CENA',  100);
DataTable.WriteNum('CENA',  DataTable.ReadNum('CENA')*1.1);
DataTable.WriteStr('NAZEV', 'KLONDAIK');
Nov² zßznam m∙₧ete do databßze doplnit metodou DataTable.AppendBlank. Nov² prßzdn² zßznam potom m∙₧ete v²Üe popsan²m zp∙sobem naplnit hodnotami.

UPOZORN╠N═:
P°i zßpisu do databßze musφte dßvat pozor na to, ₧e ztratφte nenßvratn∞ p°edchozφ obsah polo₧ek a pokud pou₧ijete k experiment∙m p°φmo databßze pou₧φvanΘ nap°φklad vßmi pou₧φvan²m ekonomick²m programem, m∙₧ete ztratit i mnohem vφce. Nepou₧φvejte proto ve vlastnφm zßjmu databßze vyu₧φvanΘ jin²mi systΘmy.

p°edchozφ lekce (3.11) obsah kurzu nßsledujφcφ lekce (3.13)
OZOGAN, 1 Mßje 97, 460 01 Liberec
tel.,fax: (048) 52 28 338, e-mail: info@ozogan.cz