| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA080 – Baixas Pagar Manual |
O ponto de entrada F080VDOK permite realizar validações nos dados preenchidos na tela Baixa por Vendor (motivo da baixa = vendor) na rotina de baixa a pagar manual.
Não se aplica.
| Tipo | Descrição |
|---|---|
Lógico | Indica se os dados de Vendor estão válidos. |
#INCLUDE "TOTVS.CH"
User Function F080VDOK() as logical
Local lPERet := .F. as logical
FWAlertInfo("Ponto de entrada F080VDOK")
If Empty(cContrato)
lPERet := .F.
ElseIf Empty(cBancoV)
lPERet := .F.
ElseIf Empty(cAgenciaV)
lPERet := .F.
ElseIf Empty(cPrefV)
lPERet := .F.
ElseIf Empty(cNumV)
lPERet := .F.
ElseIf Empty(cParcV)
lPERet := .F.
ElseIf Empty(cTipV)
lPERet := .F.
ElseIf Empty(dDataVencV)
lPERet := .F.
ElseIf Empty(nTxAcresV)
lPERet := .F.
ElseIf Empty(cNaturV)
lPERet := .F.
ElseIf Empty(nValtitV)
lPERet := .F.
EndIf
Return lPERet |