Histórico da Página
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: |
| ||||||||||||||||||
Retorno: |
|
| Bloco de código | ||||
|---|---|---|---|---|
|
...
|
| ||
#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. |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas