Árvore de páginas

Versões comparadas

Chave

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

GFEA0503 -

...

 Validação Adicional dos Documentos de Carga Que Pertencerão ao Romaneio

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Logística

Módulo:

SIGAGFE

 

Ponto de Entrada - GFEA0503

Descrição:

...

Permite realizar a validação adicional dos documentos de carga que pertencerão ao romaneio.

Localização:

Botão de

...

vinculação do documento de carga ao romaneio.

Programa Fonte:

GFEA050A - Vínculo entre o Documento de Carga e um Romaneio.

Parâmetros:

NomeTipoDescrição

...

PARAMIXB[1]

...

CaractereNúmero do

...

romaneio

...

Sim 

PARAMIXB[2]

...

CaractereTipo do documento de carga

...

PARAMIXB[3]

...

CaractereEmissor do documento de carga

...

PARAMIXB[4]

...

CaractereSérie do documento de carga

...

PARAMIXB[5]

...

CaractereNúmero do documento de carga

...

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet

...

Boolean

Lógico

Indica

...

se o documento de carga selecionado

...

fará ou não

...

parte do romaneio

Sim

 

Exemplo: GFEA0503

 

...

1
2
3
4
5
6
7
8
9
10
11

User Function GFEA0503()

...

Bloco de código
languagedelphi
titleExemplo: GFEA0503
linenumberstrue
#INCLUDE "PROTHEUS.CH"
User Function GFEA0503()
Local cTpDc   := PARAMIXB[2]
Local cCdEmis := PARAMIXB[3]
Local cSerie  := PARAMIXB[4]
Local cNrDc   := PARAMIXB[5]
	GWU->( dbSetOrder(1) )
	If GWU->( 

...

dbSeek(xFilial("GWU") +

...

 cTpDc + cCdEmis + cSerie + cNrDc ))
		// Se transportador da nota diferente do romaneio
		If GWU->GWU_CDTRP <> GWN->GWN_CDTRP

...


			MsgInfo("Transportador do Documento de Carga difere do transportador do Romaneio ")

...


			Return .F.

...


		EndIf
	EndIf
Return .T.