[Home] [Help]
171: END LOOP;
172: --
173: SELECT line_id
174: INTO v_InterfaceLineId
175: FROM rlm_interface_lines
176: WHERE header_id = x_Sched_rec.header_id
177: AND ship_from_org_id = x_Group_rec.ship_from_org_id
178: AND ship_to_address_id = x_Group_rec.ship_to_address_id
179: AND customer_item_id = x_Group_rec.customer_item_id
226: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
227: --
228: SELECT line_id
229: INTO v_InterfaceLineId
230: FROM rlm_interface_lines
231: WHERE header_id = x_Sched_rec.header_id
232: AND ship_from_org_id = x_Group_rec.ship_from_org_id
233: AND ship_to_address_id = x_Group_rec.ship_to_address_id
234: AND customer_item_id = x_Group_rec.customer_item_id
342: END IF;
343: --
344: SELECT line_id
345: INTO v_InterfaceLineId
346: FROM rlm_interface_lines
347: WHERE header_id = x_Sched_rec.header_id
348: AND ship_from_org_id = x_Group_rec.ship_from_org_id
349: AND ship_to_address_id = x_Group_rec.ship_to_address_id
350: AND customer_item_id = x_Group_rec.customer_item_id
463: ril.inventory_item_id,
464: ril.industry_attribute15,
465: ril.ship_to_customer_id
466: FROM rlm_interface_headers rih,
467: rlm_interface_lines_all ril
468: WHERE rih.header_id = x_Sched_rec.header_id
469: AND ril.header_id = rih.header_id
470: AND ril.industry_attribute15 = x_Group_rec.ship_from_org_id
471: AND ril.item_detail_type = k_MRP_FORECAST
679: x_progress VARCHAR2(3) := '010';
680:
681: CURSOR c IS
682: SELECT *
683: FROM rlm_interface_lines_all
684: WHERE header_id = x_header_id
685: AND ship_from_org_id = x_Group_rec.ship_from_org_id
686: AND ship_to_site_use_id = x_Group_rec.ship_to_site_use_id
687: AND bill_to_site_use_id = x_Group_rec.bill_to_site_use_id
693: BEGIN
694: --
695: IF (l_debug <> -1) THEN
696: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
697: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
698: END IF;
699: --
700: OPEN c;
701: --
763: END IF;
764: --
765: IF x_UpdateLevel <> 'GROUP' THEN
766: --
767: UPDATE rlm_interface_lines
768: SET process_status = x_Status
769: WHERE header_id = x_header_id
770: AND process_status = rlm_core_sv.k_PS_AVAILABLE
771: AND Item_detail_type = k_MRP_FORECAST;
790: AND inventory_item_id = x_Group_rec.inventory_item_id
791: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
792: rlm_core_sv.k_PS_ERROR)
793: AND line_id IN ( select schedule_line_id
794: from rlm_interface_lines
795: WHERE header_id = x_header_id
796: AND ship_from_org_id = x_Group_rec.ship_from_org_id
797: AND nvl(ship_to_site_use_id,k_NNULL)
798: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
806: IF (l_debug <> -1) THEN
807: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
808: END IF;
809: --
810: UPDATE rlm_interface_lines
811: SET process_status = x_Status
812: WHERE header_id = x_header_id
813: AND ship_from_org_id = x_Group_rec.ship_from_org_id
814: AND nvl(ship_to_site_use_id,k_NNULL)
920: ril.industry_attribute12 attribute12,
921: ril.industry_attribute13 attribute13,
922: ril.industry_attribute14 attribute14,
923: ril.industry_attribute15 attribute15
924: FROM rlm_interface_lines ril
925: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
926: AND ril.header_id = x_Sched_rec.header_id
927: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
928: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
959: ril.industry_attribute12 attribute12,
960: ril.industry_attribute13 attribute13,
961: ril.industry_attribute14 attribute14,
962: ril.industry_attribute15 attribute15
963: FROM rlm_interface_lines ril
964: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
965: AND ril.header_id = x_Sched_rec.header_id
966: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
967: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
996: ril.industry_attribute12 attribute12,
997: ril.industry_attribute13 attribute13,
998: ril.industry_attribute14 attribute14,
999: ril.industry_attribute15 attribute15
1000: FROM rlm_interface_lines ril
1001: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
1002: AND ril.header_id = x_Sched_rec.header_id
1003: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
1004: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
1035: ril.industry_attribute12 attribute12,
1036: ril.industry_attribute13 attribute13,
1037: ril.industry_attribute14 attribute14,
1038: ril.industry_attribute15 attribute15
1039: FROM rlm_interface_lines ril
1040: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
1041: AND ril.header_id = x_Sched_rec.header_id
1042: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
1043: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
1780: END IF;
1781: --
1782: SELECT line_id
1783: INTO v_InterfaceLineId
1784: FROM rlm_interface_lines
1785: WHERE header_id = x_Sched_rec.header_id
1786: AND ship_from_org_id = x_Group_rec.ship_from_org_id
1787: AND ship_to_address_id = x_Group_rec.ship_to_address_id
1788: AND customer_item_id = x_Group_rec.customer_item_id
1854: --
1855: IF x_Group_rec.bill_to_site_use_id IS NOT NULL THEN
1856: --
1857: select count(*) into v_mrp_count
1858: from rlm_interface_lines
1859: where header_id = x_Sched_rec.header_id
1860: and item_detail_type = k_MRP_FORECAST
1861: and process_status = 5
1862: and bill_to_site_use_id = x_Group_rec.bill_to_site_use_id
1866: --
1867: ELSE
1868: --
1869: select count(*) into v_mrp_count
1870: from rlm_interface_lines
1871: where header_id = x_Sched_rec.header_id
1872: and item_detail_type = k_MRP_FORECAST
1873: and process_status = 5
1874: and bill_to_site_use_id IS NULL