Ponto-de-Entrada: TM850VENC - Validar a data de Vencimento da Fatura
Abrangências: | Microsiga Protheus 10 |
Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) |
Descrição:
Ponto de entrada utlizado para validar o campo Vencto. da fatura exibido na janela de dialogo ao escolher a opção Selecionar na rotina Fatura por docto. (TMSA850).
Programa Fonte
TMSA850.PRW
Sintaxe
TM850VENC - Validar a data de Vencimento da Fatura ( [ cPar1 ], [ cPar2 ], [ dPar3 ], [ dPar4 ] ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cPar1 | Caracter | Cliente | |||||||||||||||
cPar2 | Caracter | Loja do Cliente | |||||||||||||||
dPar3 | Data | Data de Emissao da Fatura | |||||||||||||||
dPar4 | Data | Data de Vencimento da Fatura |
Retorno
-
lRet(logico)
- Caso o retorno seja verdadeiro, a data sera aceita.
Exemplos
#Include "Protheus.ch" User Function TM850VENC()Local cPar1 := PARAMIXB[1] //cCliente Local cPar2 := PARAMIXB[2] //cLojaLocal dPar3 := PARAMIXB[3] //dEmisFatLocal dPar4 := PARAMIXB[4] //dVencFatLocal lRet := .T.If Empty(dPar4) Alert("Teste P.E. TM850VENC - Data vencimento Vazia") lRet := .F.Else lRet := .T. EndIfReturn lRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas