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