Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Marcos Wagner Junior

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Usuário desconhecido (josiane.borges)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

GFE116A1 -

Ponto de entrada para inclusão de consistências específicas.

VALIDAÇÕES COMPLEMENTARES DOS DOCUMENTOS DE FRETE VINCULADOS À FATURA

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Supply Chain - Logística

Módulo:

SIGAGFE

 

Ponto de Entrada - GFE116A1

Descrição:

Permitir a realização de consistências específicasvalidações complementares, referentes aos documentos de frete, relacionados à fatura.

Localização:

No processamento dos registros, momento da consistência das faturas de frete que estão sendo importadasprocessadas.

Programa Fonte:

GFEA116A - EDI - Importação de Fatura de Frete

Parâmetros:

NomeTipoDescriçãoObrigatório
PARAMIXB[1]NumberQuantidade de documentos de frete relacionados à fatura.Sim

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet

BooleanLógico

Booleano (.tT. ou .fF.)

Sim

 

Bloco de código
languagedelphi
titleExemplo: GFE116A1
linenumberstrue
#Include#INCLUDE 'ProtheusPROTHEUS.chCH'

User Function GFE116A1()
Local aOldArea := GetArea()
Local lRet := .t. Local nQtdSel := PARAMIXB[1]
 
	If nQtdSel > 10
   lRet := .f.
   		RecLock("GXI",.F.)
   		GFELog116:Add("**Quantidade de documentos de frete ultrapassa o limite informado! Limite máximo: 10 (PE GFE116A1)" )
   		GXI->GXI_EDIMSG := "Quantidade de documentos de frete ultrapassa o limite informado! Limite máximo: 10"  (PE GFE116A1)"
		GXI->GXI_EDISIT := '3' 
		GXI->(MsUnLock())
EndIf
 
RestArea(aOldArea)
 		Return .F.
	EndIf

Return lRet
.T.