[Home] [Help]
154: END LOOP;
155: --
156: SELECT line_id
157: INTO v_InterfaceLineId
158: FROM rlm_interface_lines
159: WHERE header_id = x_Sched_rec.header_id
160: AND ship_from_org_id = x_Group_rec.ship_from_org_id
161: AND ship_to_address_id = x_Group_rec.ship_to_address_id
162: AND customer_item_id = x_Group_rec.customer_item_id
209: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
210: --
211: SELECT line_id
212: INTO v_InterfaceLineId
213: FROM rlm_interface_lines
214: WHERE header_id = x_Sched_rec.header_id
215: AND ship_from_org_id = x_Group_rec.ship_from_org_id
216: AND ship_to_address_id = x_Group_rec.ship_to_address_id
217: AND customer_item_id = x_Group_rec.customer_item_id
325: END IF;
326: --
327: SELECT line_id
328: INTO v_InterfaceLineId
329: FROM rlm_interface_lines
330: WHERE header_id = x_Sched_rec.header_id
331: AND ship_from_org_id = x_Group_rec.ship_from_org_id
332: AND ship_to_address_id = x_Group_rec.ship_to_address_id
333: AND customer_item_id = x_Group_rec.customer_item_id
446: ril.inventory_item_id,
447: ril.industry_attribute15,
448: ril.ship_to_customer_id
449: FROM rlm_interface_headers rih,
450: rlm_interface_lines_all ril
451: WHERE rih.header_id = x_Sched_rec.header_id
452: AND ril.header_id = rih.header_id
453: AND ril.industry_attribute15 = x_Group_rec.ship_from_org_id
454: AND ril.item_detail_type = k_MRP_FORECAST
662: x_progress VARCHAR2(3) := '010';
663:
664: CURSOR c IS
665: SELECT *
666: FROM rlm_interface_lines_all
667: WHERE header_id = x_header_id
668: AND ship_from_org_id = x_Group_rec.ship_from_org_id
669: AND ship_to_site_use_id = x_Group_rec.ship_to_site_use_id
670: AND bill_to_site_use_id = x_Group_rec.bill_to_site_use_id
676: BEGIN
677: --
678: IF (l_debug <> -1) THEN
679: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
680: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
681: END IF;
682: --
683: OPEN c;
684: --
746: END IF;
747: --
748: IF x_UpdateLevel <> 'GROUP' THEN
749: --
750: UPDATE rlm_interface_lines
751: SET process_status = x_Status
752: WHERE header_id = x_header_id
753: AND process_status = rlm_core_sv.k_PS_AVAILABLE
754: AND Item_detail_type = k_MRP_FORECAST;
773: AND inventory_item_id = x_Group_rec.inventory_item_id
774: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
775: rlm_core_sv.k_PS_ERROR)
776: AND line_id IN ( select schedule_line_id
777: from rlm_interface_lines
778: WHERE header_id = x_header_id
779: AND ship_from_org_id = x_Group_rec.ship_from_org_id
780: AND nvl(ship_to_site_use_id,k_NNULL)
781: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
789: IF (l_debug <> -1) THEN
790: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
791: END IF;
792: --
793: UPDATE rlm_interface_lines
794: SET process_status = x_Status
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)
903: ril.industry_attribute12 attribute12,
904: ril.industry_attribute13 attribute13,
905: ril.industry_attribute14 attribute14,
906: ril.industry_attribute15 attribute15
907: FROM rlm_interface_lines ril
908: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
909: AND ril.header_id = x_Sched_rec.header_id
910: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
911: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
942: ril.industry_attribute12 attribute12,
943: ril.industry_attribute13 attribute13,
944: ril.industry_attribute14 attribute14,
945: ril.industry_attribute15 attribute15
946: FROM rlm_interface_lines ril
947: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
948: AND ril.header_id = x_Sched_rec.header_id
949: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
950: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
978: ril.industry_attribute12 attribute12,
979: ril.industry_attribute13 attribute13,
980: ril.industry_attribute14 attribute14,
981: ril.industry_attribute15 attribute15
982: FROM rlm_interface_lines ril
983: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
984: AND ril.header_id = x_Sched_rec.header_id
985: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
986: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
1017: ril.industry_attribute12 attribute12,
1018: ril.industry_attribute13 attribute13,
1019: ril.industry_attribute14 attribute14,
1020: ril.industry_attribute15 attribute15
1021: FROM rlm_interface_lines ril
1022: WHERE ril.ship_from_org_id = x_Group_rec.ship_from_org_id
1023: AND ril.header_id = x_Sched_rec.header_id
1024: AND nvl(ril.ship_to_site_use_id ,k_NNULL)
1025: = nvl(x_Group_rec.ship_to_site_use_id,k_NNULL)
1745: END IF;
1746: --
1747: SELECT line_id
1748: INTO v_InterfaceLineId
1749: FROM rlm_interface_lines
1750: WHERE header_id = x_Sched_rec.header_id
1751: AND ship_from_org_id = x_Group_rec.ship_from_org_id
1752: AND ship_to_address_id = x_Group_rec.ship_to_address_id
1753: AND customer_item_id = x_Group_rec.customer_item_id
1819: --
1820: IF x_Group_rec.bill_to_site_use_id IS NOT NULL THEN
1821: --
1822: select count(*) into v_mrp_count
1823: from rlm_interface_lines
1824: where header_id = x_Sched_rec.header_id
1825: and item_detail_type = k_MRP_FORECAST
1826: and process_status = 5
1827: and bill_to_site_use_id = x_Group_rec.bill_to_site_use_id
1831: --
1832: ELSE
1833: --
1834: select count(*) into v_mrp_count
1835: from rlm_interface_lines
1836: where header_id = x_Sched_rec.header_id
1837: and item_detail_type = k_MRP_FORECAST
1838: and process_status = 5
1839: and bill_to_site_use_id IS NULL