1: PACKAGE BODY MSC_X_CVMI_REPLENISH AS
2: /* $Header: MSCXCFVB.pls 120.3 2005/12/12 23:03:07 shwmathu ship $ */
3:
4: g_msc_cp_debug VARCHAR2(10) := NVL(FND_PROFILE.VALUE('MSC_CP_DEBUG'), '0');
5: SUPPLIER_IS_OEM number := 1;
684: l_prev_transaction_id NUMBER := -1;
685: l_prev_repl_row_found NUMBER := SYS_NO;
686:
687:
688: t_item_id msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
685: l_prev_repl_row_found NUMBER := SYS_NO;
686:
687:
688: t_item_id msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
686:
687:
688: t_item_id msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
687:
688: t_item_id msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
688: t_item_id msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
689: t_organization_id msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
690: t_sr_instance_id msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
691: t_customer_id msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
692: t_customer_site_id msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
693: t_pub_order_type msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
694: t_alloc_oh_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
695: t_unalloc_oh_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
696: t_asn_qty msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
697: t_so_qty msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
698: t_int_so_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
699: t_int_req_qty msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
700: t_repl_qty msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
701: t_consigned_flag msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
709: t_rounding_control_type msc_x_cvmi_replenish.number_arr;
702: t_minimum_qty msc_x_cvmi_replenish.number_arr;
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
709: t_rounding_control_type msc_x_cvmi_replenish.number_arr;
710: t_order_num ordernumList := ordernumList();
703: t_maximum_qty msc_x_cvmi_replenish.number_arr;
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
709: t_rounding_control_type msc_x_cvmi_replenish.number_arr;
710: t_order_num ordernumList := ordernumList();
711: t_release_num releasenumList := releasenumList();
704: t_minimum_days msc_x_cvmi_replenish.number_arr;
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
709: t_rounding_control_type msc_x_cvmi_replenish.number_arr;
710: t_order_num ordernumList := ordernumList();
711: t_release_num releasenumList := releasenumList();
712: t_line_num linenumList := linenumList();
705: t_maximum_days msc_x_cvmi_replenish.number_arr;
706: t_fixed_order_qty msc_x_cvmi_replenish.number_arr;
707: t_average_daily_demand msc_x_cvmi_replenish.number_arr;
708: t_fixed_lot_multiplier msc_x_cvmi_replenish.number_arr;
709: t_rounding_control_type msc_x_cvmi_replenish.number_arr;
710: t_order_num ordernumList := ordernumList();
711: t_release_num releasenumList := releasenumList();
712: t_line_num linenumList := linenumList();
713: t_oem_company_name companynameList := companynameList();
718: t_uom_code uomcodeList := uomcodeList();
719: t_primary_uom uomcodeList := uomcodeList();
720: t_key_date date_arr := date_arr();
721: t_receipt_date date_arr := date_arr();
722: t_asn_exp_flag msc_x_cvmi_replenish.number_arr;
723: t_source_org_id msc_x_cvmi_replenish.number_arr;
724: t_so_auth_flag msc_x_cvmi_replenish.number_arr;
725: -- t_supplier_contact suppliercontactList := suppliercontactList();
726: t_planner_code plannerCodeList := plannerCodeList();
719: t_primary_uom uomcodeList := uomcodeList();
720: t_key_date date_arr := date_arr();
721: t_receipt_date date_arr := date_arr();
722: t_asn_exp_flag msc_x_cvmi_replenish.number_arr;
723: t_source_org_id msc_x_cvmi_replenish.number_arr;
724: t_so_auth_flag msc_x_cvmi_replenish.number_arr;
725: -- t_supplier_contact suppliercontactList := suppliercontactList();
726: t_planner_code plannerCodeList := plannerCodeList();
727: -- t_customer_contact customercontactList := customercontactList();
720: t_key_date date_arr := date_arr();
721: t_receipt_date date_arr := date_arr();
722: t_asn_exp_flag msc_x_cvmi_replenish.number_arr;
723: t_source_org_id msc_x_cvmi_replenish.number_arr;
724: t_so_auth_flag msc_x_cvmi_replenish.number_arr;
725: -- t_supplier_contact suppliercontactList := suppliercontactList();
726: t_planner_code plannerCodeList := plannerCodeList();
727: -- t_customer_contact customercontactList := customercontactList();
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
724: t_so_auth_flag msc_x_cvmi_replenish.number_arr;
725: -- t_supplier_contact suppliercontactList := suppliercontactList();
726: t_planner_code plannerCodeList := plannerCodeList();
727: -- t_customer_contact customercontactList := customercontactList();
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
725: -- t_supplier_contact suppliercontactList := suppliercontactList();
726: t_planner_code plannerCodeList := plannerCodeList();
727: -- t_customer_contact customercontactList := customercontactList();
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
726: t_planner_code plannerCodeList := plannerCodeList();
727: -- t_customer_contact customercontactList := customercontactList();
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
727: -- t_customer_contact customercontactList := customercontactList();
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
735: t_transaction_id msc_x_cvmi_replenish.number_arr;
728: t_sr_inventory_item_id msc_x_cvmi_replenish.number_arr;
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
735: t_transaction_id msc_x_cvmi_replenish.number_arr;
736:
729: t_aps_customer_id msc_x_cvmi_replenish.number_arr;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
735: t_transaction_id msc_x_cvmi_replenish.number_arr;
736:
737: l_session_id number;
730: t_aps_customer_site_id msc_x_cvmi_replenish.number_arr;
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
735: t_transaction_id msc_x_cvmi_replenish.number_arr;
736:
737: l_session_id number;
738: l_return_status VARCHAR2(1);
731: t_full_lead_time msc_x_cvmi_replenish.number_arr;
732: t_preproc_lead_time msc_x_cvmi_replenish.number_arr;
733: t_postproc_lead_time msc_x_cvmi_replenish.number_arr;
734: l_test msc_x_cvmi_replenish.number_arr;
735: t_transaction_id msc_x_cvmi_replenish.number_arr;
736:
737: l_session_id number;
738: l_return_status VARCHAR2(1);
739: l_ship_method varchar2(30);
1488:
1489: EXCEPTION
1490: WHEN others THEN
1491: print_user_info(' Error during replenish process = ' || sqlerrm);
1492: /* wf_core.context('MSC_X_CVMI_REPLENISH', 'vmi_replenish', itemtype, itemkey, actid, funcmode);
1493: RAISE; */
1494: END vmi_replenish;
1495:
1496: PROCEDURE vmi_reject
2964: WHEN OTHERS THEN
2965: RAISE;
2966: END print_debug_info;
2967:
2968: END MSC_X_CVMI_REPLENISH;