Linha Microsiga Protheus

Árvore de páginas

Tempo aproximado para leitura: 1 minuto

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:Financeiro
Função:

FINA080 – Baixas Pagar Manual

02. DESCRIÇÃO

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.

03. PARÂMETROS      

Não se aplica.

04. RETORNO

Tipo
Descrição

Lógico

Indica se os dados de Vendor estão válidos.

05. EXEMPLO DE UTILIZAÇÃO


F080VDOK
#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