---

	for	(	select x(x : acc)
			in	::[AC_FIN]
				, (::[AGR_FACTOR] all : ag)
				, (::[HOZ_OP_ACC] all : hoa)
				all
			where ag = p_rAgrFactor
			and ag.[ARRAY_DOG_ACC] = hoa%collection
			and hoa.[NAME_ACCOUNT] in (p_rTipAcc1
									  ,p_rTipAcc2
									  ,p_rTipAcc3
									  )
			and	hoa.[ACCOUNT_DOG].[1].[2] = x
		)
	loop