XGFE070A - Permitir realizar alteração/verificação antes do vínculo dos conhecimentos à fatura

Descrição

XGFE070A - Permitir realizar alteração/verificação antes do vínculo dos conhecimentos à fatura.

Exemplos

User Function XGFE070A()

Local cFilial := PARAMIXB1

Local cEmiFat := PARAMIXB2

Local cSerFat := PARAMIXB3

Local cNrFat := PARAMIXB4

Local cDtEmis := PARAMIXB5

local aRotina := .T.

dbSelectArea("GW6")

GW6->( dbSetOrder(1) )

If GW6->(dbSeek(cFilial + cEsp + cEmisDf + cSerie + cNrDc + DTOS(dDtEmis)))

 // Se documento não está aprovado no ECM não permite vincular na fatura

aRotina := .F.

EndIf

Return aRotina

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

PARAMIXB1: cFilial
PARAMIXB2: cEmisFat
PARAMIXB3: cSerie
PARAMIXB4: cNrDc
PARAMIXB5: dDtEmis

Retorno

Lógico

Programa Fonte

GFEA070A