Histórico da Página
...
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 Onde efetua a entrega do primeiro trecho do documento de carga.romaneio |
Programa Fonte: | GFEA050 - Cadastro de Romaneios |
Parâmetros: | GWN→GWN_FILIAL |
Retorno: | A função retorna um valor lógico falso. |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" #INCLUDE "Topconn.ch" #INCLUDE "PARMTYPE.CH" UserUSER Function GFEA0504() ReturnFUNCTION GFEA0504() Local cNrFilial := AllTrim(PARAMIXB[1]) Local cNrRom := PARAMIXB[2] Local cNrTransp := AllTrim(GWN->GWN_CDTRP) Local cCodigo := "" 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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas