371: BEGIN
372: x_ap_clearing_ccid:=NULL;
373: SELECT GL_ID_DED_CLEARING
374: INTO x_ap_clearing_ccid
375: FROM ozf_claims_all oca,
376: ozf_claim_types_all_b oct
377: where oca.org_id=p_org_id
378: and oct.org_id=p_org_id
379: and oca.claim_id=p_claim_id
402: BEGIN
403: x_ar_clearing_ccid:=NULL;
404: SELECT GL_ID_DED_ADJ_CLEARING
405: INTO x_ar_clearing_ccid
406: FROM ozf_claims_all oca,
407: ozf_claim_types_all_b oct
408: where oca.org_id=p_org_id
409: and oct.org_id=p_org_id
410: and oca.claim_id=p_claim_id