Histórico da Página

#include 'Protheus.ch'

User function F241aRec()

	Local aRecnoSE2 := aClone(ParamIxb[1])
	Local cAliasQRY := ParamIxb[2]

	AAdd( aRecnosSE2,{ (cAliasQRY)->RECNO,;//1
	.F.,;//2
	Str((cAliasQRY)->E2_SALDO,17,2),;//3
	"Z",;//4
	(cAliasQRY)->E2_DTBORDE,;//5
	(cAliasQRY)->E2_NUMBOR,;//6
	DTOS((cAliasQRY)->E2_VENCREA),;//7
	STRZERO((cAliasQRY)->RECNO,17),;//8
	(cAliasQRY)->(E2_PREFIXO+E2_NUM+E2_PARCELA+E2_TIPO+E2_FORNECE+E2_LOJA) ,;//9
	AllTrim((cAliasQRY)->E2_MEUCAMP) } )//10

Return aRecnosSE2