179: BEGIN
180: SELECT 1
181: INTO v_flag
182: FROM JL_ZZ_AP_AWT_TYPES awt,
183: JL_ZZ_AP_SUPP_AWT_TYPES swt
184: WHERE swt.vendor_id = c_supp_rec(i_supp).SUPPLIER_ID
185: AND swt.awt_type_code = awt.awt_type_code
186: AND awt.simplified_regime_flag = 'Y'
187: AND swt.wh_subject_flag = 'Y'
534: AND ROWNUM = 1;
535:
536: SELECT count(*)
537: INTO v_flag
538: FROM JL_ZZ_AP_SUPP_AWT_TYPES
539: WHERE awt_type_code = c_rec.awt_type_code
540: AND vendor_id = P_Supplier_Id;
541:
542: IF v_flag = 0 THEN
539: WHERE awt_type_code = c_rec.awt_type_code
540: AND vendor_id = P_Supplier_Id;
541:
542: IF v_flag = 0 THEN
543: SELECT jl_zz_ap_supp_awt_types_s.nextval
544: INTO v_supp_awt_type_id
545: FROM dual;
546: SELECT jl_zz_ap_sup_awt_cd_s.nextval
547: INTO v_supp_awt_code_id
547: INTO v_supp_awt_code_id
548: FROM dual;
549:
550: ---- Inserting into Supplier Applicability table
551: INSERT INTO JL_ZZ_AP_SUPP_AWT_TYPES (SUPP_AWT_TYPE_ID,
552: VENDOR_ID,
553: AWT_TYPE_CODE,
554: WH_SUBJECT_FLAG,
555: CREATED_BY,
598: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);
599: END IF;
600:
601: ELSE
602: UPDATE JL_ZZ_AP_SUPP_AWT_TYPES SET WH_SUBJECT_FLAG = 'Y'
603: WHERE awt_type_code = c_rec.awt_type_code
604: AND vendor_id = P_Supplier_Id;
605:
606: SELECT SUPP_AWT_TYPE_ID INTO v_temp1
603: WHERE awt_type_code = c_rec.awt_type_code
604: AND vendor_id = P_Supplier_Id;
605:
606: SELECT SUPP_AWT_TYPE_ID INTO v_temp1
607: FROM JL_ZZ_AP_SUPP_AWT_TYPES
608: WHERE awt_type_code = c_rec.awt_type_code
609: AND vendor_id = P_Supplier_Id
610: AND ROWNUM = 1;
611:
730: ) IS
731: ---------------------------------------------------------------------
732: -- Cursor Supplier Withholding Types.
733: ---------------------------------------------------------------------
734: CURSOR Supp_Wh_Types(C_Vendor_Id jl_zz_ap_supp_awt_types.vendor_id%TYPE) Is
735: SELECT swt.supp_awt_type_id ,
736: swt.awt_type_code,
737: swc.supp_awt_code_id,
738: swc.org_id,
740: tca.global_attribute7, -- Zone
741: awt.jurisdiction_type,
742: awt.province_code,
743: awt.city_code
744: FROM jl_zz_ap_supp_awt_types swt,
745: jl_zz_ap_sup_awt_cd swc,
746: ap_tax_codes tca,
747: jl_zz_ap_awt_types awt
748: WHERE swt.vendor_id = C_vendor_id -- Select only for this Supplier