Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Fabiane Schulze

Gravado em

comparado com

Nova versão 7

changes.mady.by.user Fabiane Schulze

Gravado em

Chave

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

GFEXWS16 - Funcionalidade Específica na Integração (Protheus x Progress) de Documento de Frete

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Supply Chain - Logística

Módulo:

SIGAGFE

Ponto de Entrada - GFEXWS16

Descrição:

Possibilitar o envio de outros campos para a integração com o módulo Fiscal

Localização:

Antes de realizar a integração da Documento de Frete com o módulo Fiscal.

Programa Fonte:

GFEXWSFUN - Serviço de integração do Frete Embarcador (SIGAGFE)

Parâmetro:

NomeTipoDescrição
PARAMIXB[1]CaractereFilial
PARAMIXB[2]CaractereEspécie
PARAMIXB[3]CaractereEmissor
PARAMIXB[4]CaractereSérie
PARAMIXB[5]CaractereNr Documento
PARAMIXB[6]CaractereDt Emissão (AAAA/MM/DD)
PARAMIXB[7]CaracterString com informações para integração

Retorno:

Nome

Tipo

Descrição

Obrigatório

cString

String

Contendo os novos campos que serão enviados do Protheus para o Progress. 

Sim

Bloco de código
languagedelphi
titleExemplo: GFEXWS16
linenumberstrue
#Include 'Protheus.ch'

User Function GFEXWS16()
	cFilDF     := PARAMIXB[1]
	cEspDF   := PARAMIXB[2]
	cEMISDF := PARAMIXB[3]
	cSerDF    := PARAMIXB[4]
	dtNrDF := PARAMIXB[5]
	dtEmisDF := PARAMIXB[6]
	cString := PARAMIXB[7]


        dbSelectArea("GW3")
		GW3->(dbSetOrder(1))
		If GW3->(dbSeek(cFilDF+cEspDF+cEMISDF+cSerDF+cNrDF+DTOS(dtEmisDF)))
					cRet := GW3->GW3_XFILIAL + "|" 					
		EndIf		
Return cRet