Histórico da Página

#Include 'Protheus.ch'
#include "fwmvcdef.ch"  

User Function AG615BNF()   
	Local  cCodFdi	:= PARAMIXB[1]
	Local  cCodEtq	:= PARAMIXB[2]
	Local  cCodFda	:= PARAMIXB[3]
	Local  cProdBN	:= PARAMIXB[4]
	Local  cPrensa	:= PARAMIXB[5]
	Local  cSafra	:= PARAMIXB[6]
	Local  cProdutor	:= PARAMIXB[7]
	Local  cLjPro	:= PARAMIXB[8]
	Local  cCodFaz	:= PARAMIXB[9]
	
	Local cTexto	:= ""
	
	cTexto := "Teste passando pelo ponto de entrada AG615BNF: " + CRLF
	cTexto += "Param1 código fardinho = " + cCodFdi + CRLF
	cTexto += "Param2 código etiqueta = " + cCodEtq + CRLF
	cTexto += "Param3 código fardão = " + cCodFda + CRLF
	cTexto += "Param4 código produto beneficiado = " + cProdBN + CRLF
	cTexto += "Param5 código prensa = " + cPrensa + CRLF
	cTexto += "Param6 código safra = " + cSafra + CRLF
	cTexto += "Param7 codigo produtor = " + cProdutor + CRLF
	cTexto += "Param8 loja produtor = " + cLjPro + CRLF
	cTexto += "Param9 código fazenda = " + cCodFaz
	
	MsgAlert(cTexto)
Return nil