Salvar Data em Branco

Delphi

04/09/2012

Boa noite!

Preciso gravar data em branco no firebird com Delphi, estou tentando um exemplo mas deve ter algo errado pq não compila.

Ex:
try
F_DMdados2.sdsTempEmbVdas.ParamByName('TEMB_DATAFINAL').AsDateTime := StrToDate(mk_datafim.Text);
except
F_DMdados2.sdsTempEmbVdas.ParamByName('TEMB_DATAFINAL').DataType := FtDate;
end;

o erro de compilação :
[Error] U_ProdutoVdas.pas(1654): Undeclared identifier: 'FtDate'

Não sei como fazer.
Luiz Estevam

Luiz Estevam

Curtidas 0

Respostas

Joel Rodrigues

Joel Rodrigues

04/09/2012

Verifique se a unit DB está na cláusula uses do seu formulário.
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

04/09/2012

Olá Luis, você não poder uma atribuição para uma propriedade somente leitura

Ou seja, esta linha não vai funcionar não:
F_DMdados2.sdsTempEmbVdas.ParamByName('TEMB_DATAFINAL').DataType := FtDate;


No caso a propriedade DataType, é somente leitura, por isso não funciona :).
Basta remover esta linha toda.
Um abraço
GOSTEI 0
Luiz Estevam

Luiz Estevam

04/09/2012

Sim, se eu remover, blz funciona, mas salvar a da ta padrão do de 31/12/1899 e o que eu não que, tem que ficar em branco.
pq ex: um produto utiliza determinadas embalagens, para ser exato 3 tipo no mesmo produto, quando vende o sistema vai baixar do estoque as embalagens, ai em derrepente o cliente muda o tipo de uma dessas embalagens.
então o produto tem inicio e fim da utilização de determinada embalagens. assim fica bem facil caso o liente tenha de reprocessar as baixa de todas as vendas ou uma que naquela data utilizava determinada embalagens.
GOSTEI 0
Luiz Estevam

Luiz Estevam

04/09/2012

Boa Tarde!
Valeu pela dica Joel Rodrigues, o DB na unit o codigo fufo legal, agora ele coloca <null>, agora sim o sistema vai ficar chique rsrsrsrs.
abraço.
GOSTEI 0
Luiz Estevam

Luiz Estevam

04/09/2012

RESOLVIDO.
GOSTEI 0
Joel Rodrigues

Joel Rodrigues

04/09/2012

Obrigado pelo retorno, amigo.
Estou encerrando o tópico.
GOSTEI 0
POSTAR