Fórum Insert com data em branco #357097
14/04/2008
0
Um cliente me pediu para colocar na data de nascimento no cadastro de clientes, a possibilidade de deixar em branco.
Através do update, consigo colocar a data como nula ´DATANASCIMENTO=null´, mas não consegui inserir com INSERT já com a data nula.
Utilizo Delphi 7 com Fire 2.
Uso da seguinte forma:
insert into clientes (codcli,nomcli,datanas) values (:codcli,:nomcli,:datanas) parambyname(´codcli´).asinteger := editcodcli.value; parambyname(´nomcli´).asstring := editnomi.text; parambyname(´datanas´).asdate := editdatanas.date;
Quando ´editdatanas´ está vazio ocorre o erro.
Já tentei ´parambyname(´datanas´).clear´.
Já tentei ´parambyname(´datanas´).asdate := StrToDate(´ / / ´)´
Vc teria alguma sugestão para o caso?
att
Mario
Aldus
Curtir tópico
+ 0Posts
14/04/2008
Pestana_
se você estivesse utilizando um edit ficaria mais facil, ex.:
na sua estrutura no banco: se o campo data não estiver definido como [b:f840c231be]not null[/b:f840c231be], então você poderia fazer assim:
insert into clientes (codcli,nomcli,datanas) values (:codcli,:nomcli,:datanas) parambyname(´codcli´).asinteger := editcodcli.value; parambyname(´nomcli´).asstring := editnomi.text; if editdatanas.text = ´ / / ´ then parambyname(´datanas´).value := null else parambyname(´datanas´).asdate := StrToDate(editdatanas.text);
isso é só uma dica!
flw.
Gostei + 0
14/04/2008
Aldus
Utilizo o componente DateEdit
Gostei + 0
14/04/2008
Pestana_
que componente é esse é nativo do Delphi?, poste o seu código.
flw.
Gostei + 0
14/04/2008
Aldus
Gostei + 0
14/04/2008
Pestana_
essa fico te devendo porque não conheço este componente, espero que alguem do forum possa te ajudar.
flw.
Gostei + 0
15/04/2008
Douglass
Espero que ajude.
:roll:
Gostei + 0
15/04/2008
Edilcimar
Gostei + 0
15/04/2008
Pestana_
porque não funcionou? :roll: aparece algum erro?
flw.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)