34:
35: Cursor ProductCode_cur(P_pm_product_code VARCHAR2)
36: Is
37: select 1
38: from pa_lookups
39: where lookup_type ='PM_PRODUCT_CODE'
40: and lookup_code=P_pm_product_code;
41:
42: l_product_code NUMBER:=NULL;
3435:
3436: Cursor ProductCode_cur(P_pm_product_code VARCHAR2)
3437: Is
3438: select 1
3439: from pa_lookups
3440: where lookup_type ='PM_PRODUCT_CODE'
3441: and lookup_code=P_pm_product_code;
3442:
3443: Cursor unique_evnt_ref_curs(P_pm_product_code VARCHAR2