Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Andre Luis Wisnheski

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Usuário desconhecido (josiane.borges)

Gravado em

Chave

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

GFE11006 -

Alterar o emitente usado para dados do embarcador

ALTERAR O EMITENTE USADO PARA DADOS DO EMBARCADOR

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Distribuição e Supply Chain - Logística

Módulo:

SIGAGFE

 

Ponto de Entrada - GFE11006

Descrição:

Alterar o emitente usado para dados do embarcador.

Localização:

Ao montar a linha 311 do arquivo

Programa Fonte:

GFEA110 - Exportar Notas Fiscais

Parâmetros:

NomeTipoDescriçãoObrigatório
PARAMIXB[1]AlfanuméricoVersão do EDI. Atualmente está funcionando apenas para versão 3.1Sim
PARAMIXB[2]NuméricoRECNO da tabela GW1 (Documento de Carga)Sim

Retorno:

NomeTipoDescriçãoObrigatório
cCodigoAlfanuméricoCódigo do EmitenteSim

 

Bloco de código
languagedelphi
titleExemplo: GFEA11006GFE11006
linenumberstrue
User Function GFE11006()
Local cVerEdi := PARAMIXB[1]
Local nRecGW1 := PARAMIXB[2]
Local aAreaGW1 := GW1->(GetArea())
Local cEmisDc
   If nRecGW1 != GW1->(RecNo())
      GW1->(dbGoTo(nRecGW1))
   EndIf
   If cVerEdi == '3.1'
      cEmisDc := GW1->GW1_EMISDC
   EndIf
   RestArea(aAreaGW1)
Return cEmisDc