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: | Permite realizar validação adicional aos romaneios | |||||||||
Localização: | Botão de efetuar entrega, quando grava antes de gravar a data do primeiro trecho do documento de carga | |||||||||
Programa Fonte: | GFEA050 - Cadastro de Romaneios | |||||||||
Parâmetros: |
| |||||||||
Retorno: | Não há. |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" #INCLUDE "Topconn.ch" #INCLUDE "PARMTYPE.CH" USER FUNCTION GFEA0504() Local cNrFilial cFilial := AllTrim(PARAMIXB[1]) Local cNrRom := PARAMIXB[2] Local cNrTransp := AllTrim(GWN->GWN_CDTRP) 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