Histórico da Página

#include "protheus.ch"

User Function CT281LOOP()
	Local cConta  		:=  "1010100"
    Local aEntidades	 cCusto        := ParamIXB[1]
	Local cConta  		 "100100"
    Local cClasse       :=  "TX001|TX002|TX003"
	
	//aEntidades cada posição de 0 a 3


	While !$ cConta 
		
	EndDo

Return200300"
    Local cItem         :=  "300200"
	Local lRet			:=	.T.

    If TRBCJ->CONTA <> cConta .AND. TRBCJ->CUSTO <> cCusto .AND. TRBCJ->CLVL <> cClasse .AND. TRBCJ->ITEM <> cItem 
        lRet:= .F.
    Endif

Return lRet