[Resolvido]Preencher Data Automática

Bom Dia Abençoado a Todos,

Gostaria de agradecer a todos pelo apoio, e trago mais um Dúvida,

Tenho um relatório que mede o tempo de permanencia de um componente dentro da empresa.

Exemplos.

Campos:
DataChegada
DataDesmontagem

Campo:
TempoDesmontagem: ([DataDesmontagem])-([DataChegada]), mediante essa formula terei a quantidade de dias que correu entre a data de chegada e a data da desmontagem do componente.

As datas são informadas conforme vão ocorrendo a Desmontagem, e muitas vezez preciso gerar o relatório e essas datas não ocorreram ainda, nessa ocasião queria que o campo (DataDesmontagem) que ainda está vazio, assuma a data atual, ao ser gerado relatório, só para visualizar no relatório, sem comprometer o preenchimento futuro na consulta.

Estou anexando o Banco de Dados para velhor visualização

Olá Jairo,

Faltou o anexo, mas será algo assim na linha de código antes de chamar o reporte:

Código:

if len([DataDesmontagem] &"") = 0 then [DataDesmontagem] = date()

A "olho", não testado.
Abraço

Boa Tarde!

Não compreendi bem em que lugar inserir o codigo.

É pra inserir código na propriendade do campo DataDesmontagem?

abraços

Olá JAiro,

O código seria para o botão do relatório, no seguimento de ...

... nessa ocasião queria que o campo (DataDesmontagem) que ainda está vazio, assuma a data atual, ao ser gerado relatório ...

Caso a duvida se mantenha, partilhe mais dados e a sua base de dados, veja como fazer:
https://www.maximoaccess.com/t28813-como-adicionar-arquivo-ficheiro-a-mensagem-no-forum

Abraço

Boa Noite,

Obrigado pelas dicas, mas ainda não consegui ativa,

estou postando baco de dados com relatório, a ideia e que todos os capos cuja esteja vazio,ou seja, que não foram alimentados com datas, assumam a data atual ao gerar o relatório.

gratos

abraços

Olá Jairo,

Assim ficou mais fácil para compreender e poder ajudar.

Veja no relatório o que apresenta a vermelho (Data da Aprovação), utilizei o código sugerido na mensagem nº 2, apenas alterando para um IIF, veja:

Código:

=Ise(Compr([Dt Aprovação] & "")=0;Data();[Dt Aprovação])

O que está a verde (Dt.Pedido Peças), também obtemos o mesmo resultado com o seguinte código:

Código:

=Ise(ÉNulo([PedidoPeças]);Data();[PedidoPeças])

Segue o meu teste:
cld.pt/dl/download/296b4be1-c108-420c-9c20-efb2773579a1/Relatorio.zip

Abraço

Boa Noite!

Tudo certo, Muito obrigado,

Tinha colocado código no lugar errado,

Abraços