Linha Microsiga Protheus

Árvore de páginas

GFEA0664 - INCLUIR VALIDAÇÕES COMPLEMENTARES NA APROVAÇÃO MANUAL DO DOCUMENTO DE FRETE

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Supply Chain - Logística

Módulo:

SIGAGFE


Ponto de Entrada - GFE0664

Descrição:

Permitir incluir novas validações para impedir a aprovação manual do documento de frete

Localização:

GFEA066OK() - Função de validação e gravação da aprovação manual do documento de frete

Programa Fonte:

GFEA066 - Auditoria/Aprovação de Documento de Frete

Parâmetros:

NomeTipoDescriçãoObrigatório
GW3->GW3_FILIALCaractereFilial do documento de freteSim
GW3->GW3_CDESPCaractereCódigo da espécie do documento de freteSim
GW3->GW3_EMISDFCaractereCódigo do emissor do documento de freteSim
GW3->GW3_SERDFCaractereSérie do documento de freteSim
GW3->GW3_NRDFCaractereNúmero do documento de freteSim
GW3->GW3_DTEMISDataData de emissão do documento de freteSim

Retorno:

lRet - Indica se o documento pode ou não ser aprovado de forma manual

Observações:
  • A mensagem ao usuário é responsabilidade do ponto de entrada, o programa padrão é responsável apenas por não efetuar a aprovação quando o retorno do ponto for negativo;
  • Ponto de entrada oficial expedido na release 12.1.30.

 

Exemplo: GFEA0664
#INCLUDE "PROTHEUS.CH"
#INCLUDE "parmtype.ch"

User Function GFEA0664()
	Local lRet := .T.
   	
	Local cTmpFil 	:= PARAMIXB[1] //GW3->GW3_FILIAL
	Local cTmpCdEsp := PARAMIXB[2] //GW3->GW3_CDESP
	Local cTmpEmis 	:= PARAMIXB[3] //GW3->GW3_EMISDF
	Local cTmpSer 	:= PARAMIXB[4] //GW3->GW3_SERDF
	Local cTmpDcFrt := PARAMIXB[5] //GW3->GW3_NRDF
	Local dTmpDtEms := PARAMIXB[6] //GW3->GW3_DTEMIS

    // Incluir as validações necessárias referente ao documento de frete
    lRet := .F.
    
    MsgStop("Não é possível realizar a aprovação deste documento.")
Return lRet