Imprimi Página | Fechar janela |
VALIDAÇÃO C5_EMISSAO Impresso de: Helpfacil - Portal do conhecimento Nome do Forum: ADVPL Descrição do Forum: Dúvidas sobre a programação em ADVPL URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=44020 Data da Impressão: quinta-feira, 28 de março de 2024 at 20:18 Topico: VALIDAÇÃO C5_EMISSAO Postado por: MAURO_CARD Assunto: VALIDAÇÃO C5_EMISSAO Data Postagem: segunda-feira, 1 de agosto de 2022 at 16:18 Ola! Preciso que o campo c5_emissao nao permita colocar data menor que a database do sistema , alguem poderia me auxiliar nesse caso? Respostas: Postado Por: RUBEM_MN2 Data Postagem: quinta-feira, 4 de agosto de 2022 at 08:42 User Function ValidaEmissaoPedidoVenda() as logical Local lRet := .t. as logical Local dDAteAtual := Date() as Date Local dEmissaoPEdido := GetMemVar("C5_EMISSAO") As Date If dEmissaoPEdido < dDAteAtual lRet := .t. FWAlertError(‘Mensagem de erro‘,‘Título FWAlertError‘) Endif Return lRet Mauro, salva em .tlpp compilar, e chamar no X3_VALID do C5_EMISSAO u_ValidaEmissaoPedidoVenda() Postado Por: EMERSON.EN Data Postagem: quinta-feira, 4 de agosto de 2022 at 11:51 basta acrescentar M->C5_EMISSAO >= DDATABASE na validação do campo (validação do usuário). não requer programação. |
Imprimir Página | Fechar Janela |