Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Fabiane Schulze

Gravado em

comparado com

Nova versão 5

changes.mady.by.user Fabiane Schulze

Gravado em

Chave

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

#Include 'Protheus.ch'

User Function GFEXWS06()

cCdRem := PARAMIXB[1]
cCdDes := PARAMIXB[2]
cRet := "|" + cCdRem + "|" + cCdDes

Return cRet

#Include 'Protheus.ch'

User Function GFEXWS06()

cCdRem := PARAMIXB[1]
cCdDes := PARAMIXB[2]
cRet := "|" + cCdRem + "|" + cCdDes

Return cRet

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]DataDt Emissã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]


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