Histórico da Página
GFEA0504 -
...
Permite realizar validação adicional dos Romaneios
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Supply Chain - Logística |
Módulo: | SIGAGFE |
...
| Ponto de Entrada: | GFEA0504 | |||||||||
Descrição:XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX | Permite realizar validação adicional aos romaneios | |||||||||
Localização: | Encontra-se dentro da função GFEA050ENT(), onde grava a data de entrega Botão de efetuar entrega, antes de gravar a data do primeiro trecho do documento de carga. | |||||||||
Programa Fonte: | GFEA050 - Cadastro de Romaneios | |||||||||
Parâmetros:GWN→GWN_FILIAL |
| |||||||||
Retorno: | A função retorna um valor lógico falsoNão há. |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" #INCLUDE "Topconn.ch" #INCLUDE "PARMTYPE.CH" USER FUNCTION GFEA0504() Local cNrFilial := AllTrim(PARAMIXB[1]) Local cNrRom := PARAMIXB[2] Local cNrTransp := AllTrim(GWN->GWN_CDTRP) User Function GFEA0504() Return Local cCodigo := "" //EXEMPLO IF cNrFilial == "D MG 01" .OR. cNrFilial == "D MG 02" cNrFilial := "D MG 03" MsgAlert("Filial inválida. Foi alterado para " + cNrFilial) ENDIF cCodigo := cNrRom + cNrTransp RETURN cCodigo |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas