XTR Intercompany - Interest Settlement

select P.PARTY_CODE   PTY_CODE,
           P.SHORT_NAME   PTY_NAME
from XTR_PARTIES_V P 		
where  (CROSS_REF_TO_OTHER_PARTY = nvl(:p_company,P.CROSS_REF_TO_OTHER_PARTY)
and internal_pty = 'Y')
and ( exists (select 1 from  XTR_BANK_BALANCES_V 	B
                      where B.BALANCE_DATE >= Nvl(:P_From,B.Balance_Date)
                      and     B.BALANCE_DATE <= Nvl(:P_To,B.Balance_Date)
                      and    nvl(b.interest_settled,0) != 0
                      and   	B.COMPANY_CODE =  P.PARTY_CODE)
          or
          exists (select 1 from  XTR_INTERGROUP_TRANSFERS_V T
                       where 	Nvl(T.INTEREST_SETTLED,0) != 0
                       and   	T.TRANSFER_DATE >= Nvl(:P_From,T.Transfer_Date)
                       and        T.TRANSFER_DATE <= Nvl(:P_To,T.Transfer_Date)
                       and   	T.PARTY_CODE = P.PARTY_CODE) )