[ salvaric @ 19.05.2014. 14:16 ] @
Pozdrav, upis i izmenu podataka radim kroz sql upit, problem mi se javlja kad se upisuje u polje datuma null. kod: Code: With sql_cekovi do begin SQL.Clear; // upis čeka bazu SQL.Add('INSERT INTO tab_cekovi'+ '( D_REALIZACIJE, ID_BANKE, ID_OBJEKTA, SER_BR, D_PRIJEMA, D_DOSPECA, TEKUCI_RN, IZNOS, NAPOMENA, ID_KORISNIKA)'+ 'values(:D_REALIZACIJE,:ID_BANKE,:ID_OBJEKTA,:SER_BR,:D_PRIJEMA,:D_DOSPECA,:TEKUCI_RN,:IZNOS,:NAPOMENA,:ID_KORISNIKA)'); Params.ParamByName('D_REALIZACIJE').Value :=cekovi_edit.ZVDateTimePicker1.Date; Params.ParamByName('ID_BANKE').Value :=cekovi_edit.cek_banka.KeyValue; Params.ParamByName('ID_OBJEKTA').Value :=cekovi_edit.cek_objekat.KeyValue; Params.ParamByName('SER_BR').Value :=cekovi_edit.cek_ser_br.Text; Params.ParamByName('D_PRIJEMA').Value :=cekovi_edit.cek_d_prijema.Date; Params.ParamByName('D_DOSPECA').Value :=cekovi_edit.cek_d_pustanja.Date; Params.ParamByName('TEKUCI_RN').Value :=cekovi_edit.cek_racun.Text; Params.ParamByName('IZNOS').Value :=cekovi_edit.cek_iznos.Text; Params.ParamByName('NAPOMENA').Value :=cekovi_edit.cek_napomena.Text; Params.ParamByName('ID_KORISNIKA').Value :=Korisnik.ID; ExecSQL; end; datume uzima iz standardnih Lazarus-ovih kompenenti, izvrši se upis u bazu al mi u polja za datume upisuje datum "30.12.1899" na mestima gde nije izabran datum (prazno polje). Dal se neko susreo sa ovakvim problemom? I kod update-a će biti isti slučaj, umesto praznih polja u tabelu će dodavati "30.12.1899". Baza je Access, ODBC konekcija. |