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