Árvore de páginas

Versões comparadas

Chave

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

GFEA0655 - Alteração/Inclusão de campos na integração do Documento de Frete com o Fiscal do ERP Protheus

Características do Requisito

Linha de Produto:

Protheus

Segmento:

Distribuição e Logística

Módulo:

SIGAGFE

Ponto de Entrada -

 GFEA0654

 GFEA0655

Descrição:

Possibilitar a Alteração e/ou Inclusão de campos na integração do Documento de Frete com o Fiscal do ERP Protheus.

Localização:

Antes de realizar a integração do Documento de Frete com o ERP.

Programa Fonte:

GFEA065 - Documento de Frete

Parâmetros:

NomeTipoDescriçãoObrigatório
PARAMIXB[1]ArrayInformações do Documento de Frete
F1_DOC, F1_SERIE;
F1_FORNECE;
F1_LOJA;
F1_EMISSAO;
F1_COND;
F1_EST;
F1_RECBMTO;
F1_CHVNFE;
F1_TIPO;
F1_FORMUL;
F1_ESPECIE;
F1_ORIGEM
Sim
PARAMIXB[2]Array

Informações dos Itens
D1_DOC;
D1_SERIE;
D1_FORNECE;
D1_LOJA;
D1_EMISSAO;
D1_COD;
D1_UM;
D1_QUANT;
D1_VUNIT;
D1_TOTAL;
D1_BASECOF;
D1_ALQCOF;
D1_VALCOF;
D1_BASEPIS;
D1_ALQPIS;
D1_VALPIS;
D1_TES;

Dependendo do tipo de imposto, podem estar presentes os seguintes campos:

D1_VALICM;
D1_PICM;
D1_BASEICM;
D1_ICMSRET;
D1_VALISS;
D1_ALIQISS;
D1_BASEISS

Sim

Retorno:

Nome

Tipo

Descrição

Obrigatório

axRet1

Array

Informações do Documento de Frete modificadas e/ou incluídas 

Sim

axRet2

Array

Informações dos Itens modificados e/ou incluídas.

Sim

 

Bloco de código
languagedelphithemeMidnight
titleExemplo: GFEA0655
linenumberstrue
User Function GFEA0655()
	//Recebe os arrays enviados pelo MSEXECAUTO
	Local aDocFrete := ParamIXB[1]
	Local aItemDoc := ParamIXB[2]
	//Array de Retorno
	Local aRet := {}
	Local nPos
	Local cLoja
	//Trocando o valor de um valor que já existe no array.
	//aDocFrete [1] Nome do Campo integrado
	// [2] Valor que está sendo enviado
	// [3] Compatibilidade
	nPos := aScan( aDocFrete, {|x| x[1] == "F1_LOJA" } )
	If !Empty(nPos) .Or. nPos <> 0
		cLoja := aDocFrete[nPos][2]
		aDocFrete[nPos][2] := "29"
	EndIf
	//Adiciona um novo campo para integração dos itens
	Aadd(aItemDoc[1], {"D1_OPER" , "EN" , Nil} )
	//O retorno do ponto de entrada, aguarda um array com duas posições
	//A primeira contendo o array com as informações do Documento de Frete
	//E a segunda contendo o array com as informações dos Itens
	Aadd(aRet, {aDocFrete, aItemDoc})
Return aRet