21:
22: FUNCTION client_purgeable(p_customer_trx_id IN NUMBER) RETURN BOOLEAN IS
23: cursor c1 is
24: select 'x'
25: from dual
26: where exists (
27: select 'x'
28: from pa_draft_invoices di
29: where di.system_reference = p_customer_trx_id