[Home] [Help]
705: sd.inventory_item_id,
706: sd.supplier_id,
707: sd.supplier_site_id
708: from msc_sup_dem_entries sd,
709: msc_x_exception_details dt
710: where sd.plan_id = msc_x_netting_pkg.G_PLAN_ID
711: and sd.publisher_order_type = msc_x_netting_pkg.PURCHASE_ORDER
712: AND nvl(sd.last_refresh_number,-1) > nvl(p_refresh_number,-1)
713: and dt.plan_id = sd.plan_id
727: p_supplier_site_id in number,
728: p_item_id in number,
729: p_order_number in Varchar2) IS
730: SELECT ed.exception_detail_id
731: FROM msc_x_exception_details ed
732: WHERE ed.plan_id = msc_x_netting_pkg.G_PLAN_ID
733: AND ed.inventory_item_id = p_item_id
734: AND ed.company_id = p_supplier_id
735: AND ed.company_site_id = p_supplier_site_id
745: sd.inventory_item_id,
746: sd.supplier_id,
747: sd.supplier_site_id
748: from msc_sup_dem_entries sd,
749: msc_x_exception_details dt
750: where sd.plan_id = msc_x_netting_pkg.G_PLAN_ID
751: and sd.publisher_order_type = msc_x_netting_pkg.PURCHASE_ORDER
752: AND nvl(sd.last_refresh_number,-1) > nvl(p_refresh_number,-1)
753: and dt.plan_id = sd.plan_id
832: l_supplier_id Number;
833: l_supplier_site_id Number;
834: l_trx_id1 Number;
835: l_shipping_control Number;
836: l_exception_basis msc_x_exception_details.exception_basis%type;
837: l_inserted_record Number := 0;
838:
839: BEGIN
840:
934: | exception when the exception is viewed.
935: | Delete the exception if it is 1 months old (30 days).
936: ------------------------------------------------------------------*/
937: begin
938: delete msc_x_exception_details
939: where plan_id = msc_x_netting_pkg.G_PLAN_ID
940: and exception_type = 33
941: and exception_group = msc_x_netting_pkg.G_CHANGED_ORDER
942: and company_id = b_supplier_id(j)
1214:
1215: begin
1216: select number3
1217: into l_old_history_id
1218: from msc_x_exception_details
1219: where exception_detail_id = l_exception_detail_id;
1220: exception
1221: when others then
1222: l_old_history_id := 0;
1223: end;
1224:
1225: IF (l_old_history_id < b_history_id(j) ) THEN
1226: --fix to update the LAST_UPDATED_BY , check this in MSC_SCE_LOADS_PKG when trying to delete the record...
1227: update msc_x_exception_details
1228: set number3 = b_history_id(j),
1229: date1 = b_receipt_date(j),
1230: date2 = l_reschedule_date,
1231: number1 = b_po_qty(j),--updating the date entered by the user in the exception
1725: l_exception_group_name fnd_lookup_values.meaning%type;
1726: l_threshold1 Number := 0;
1727: l_threshold2 Number := 0;
1728: l_shipping_control Number;
1729: l_exception_basis msc_x_exception_details.exception_basis%type;
1730:
1731: l_posting_forecast Number;
1732: l_forecast Number;
1733: l_tp_forecast Number;
1775: ------------------------------------------------------------------
1776: -- archive the cpfr exceptions first before recompute
1777: ------------------------------------------------------------------
1778:
1779: delete msc_x_exception_details
1780: where plan_id = msc_x_netting_pkg.G_PLAN_ID
1781: and exception_type in (35,36);
1782:
1783: update msc_item_exceptions
2200: l_exception_group Number;
2201: l_exception_type_name fnd_lookup_values.meaning%type;
2202: l_exception_group_name fnd_lookup_values.meaning%type;
2203: l_shipping_control Number;
2204: l_exception_basis msc_x_exception_details.exception_basis%type;
2205:
2206: r_publisher_id msc_x_netting_pkg.number_arr;
2207: r_publisher_site_id msc_x_netting_pkg.number_arr;
2208: r_supplier_id msc_x_netting_pkg.number_arr;
2277: ------------------------------------------------------------------
2278: -- archive the cpfr exceptions first before recompute
2279: ------------------------------------------------------------------
2280:
2281: delete msc_x_exception_details
2282: where plan_id = msc_x_netting_pkg.G_PLAN_ID
2283: and exception_type in (39,40,43,44,45,46,47,48);
2284:
2285: update msc_item_exceptions