DBA Data[Home] [Help]

APPS.AHL_UMP_FORECAST_REQ_PVT dependencies on AHL_SCHEDULE_MATERIALS

Line 71: -- Insert these material requirements into AHL_SCHEDULE_MATERIALS for ASCP/DP to pick up and plan the

67: -- Start of Comments --
68: -- Procedure name : Process_Mrl_Req_Forecast
69: -- Type : Private
70: -- Function : Private API to collect the material requirements for unit effectivities of a given set of item instances.
71: -- Insert these material requirements into AHL_SCHEDULE_MATERIALS for ASCP/DP to pick up and plan the
72: -- forecasted material requirements.
73: -- If a unit effectivity does not have due date, the material forecast is not done.
74: -- Pre-reqs :
75: -- Parameters :

Line 111: /* Delete orphan forecast record in AHL_SCHEDULE_MATERIALS table for

107: ) IS
108:
109: l_Route_Mtl_Req_Tbl AHL_LTP_MTL_REQ_PVT.Route_Mtl_Req_Tbl_Type;
110:
111: /* Delete orphan forecast record in AHL_SCHEDULE_MATERIALS table for
112: * deleted unit effectivities
113: * unit effectivities where due date is null after the re-calculation
114: */
115: /*CURSOR delete_schedule_mtl_csr IS

Line 116: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM

112: * deleted unit effectivities
113: * unit effectivities where due date is null after the re-calculation
114: */
115: /*CURSOR delete_schedule_mtl_csr IS
116: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM
117: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
118: AND SM.unit_effectivity_id IS NOT NULL
119: AND NOT EXISTS(SELECT 'x' FROM AHL_UNIT_EFFECTIVITIES_APP_V UE WHERE UE.unit_effectivity_id = SM.unit_effectivity_id)
120: UNION ALL

Line 121: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM, AHL_UNIT_EFFECTIVITIES_APP_V UE

117: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
118: AND SM.unit_effectivity_id IS NOT NULL
119: AND NOT EXISTS(SELECT 'x' FROM AHL_UNIT_EFFECTIVITIES_APP_V UE WHERE UE.unit_effectivity_id = SM.unit_effectivity_id)
120: UNION ALL
121: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM, AHL_UNIT_EFFECTIVITIES_APP_V UE
122: WHERE (UE.status_code IS NULL OR UE.status_code = 'INIT-DUE')
123: AND UE.due_date IS NULL
124: AND SM.unit_effectivity_id IS NOT NULL
125: AND SM.material_request_type = G_REQ_TYPE_FORECAST

Line 149: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM

145: /*
146: * Find out the schedule material records for expired routes
147: */
148: CURSOR del_exp_route_schedule_mtl_csr(p_unit_effectivity_id IN NUMBER, p_mr_route_id IN NUMBER) IS
149: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM
150: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
151: AND SM.mr_route_id = p_mr_route_id
152: AND SM.unit_effectivity_id IS NOT NULL
153: AND SM.unit_effectivity_id = p_unit_effectivity_id;

Line 156: * in AHL_SCHEDULE_MATERIALS table

152: AND SM.unit_effectivity_id IS NOT NULL
153: AND SM.unit_effectivity_id = p_unit_effectivity_id;
154:
155: /* Validates whether a forecast record with unique key combination exisits
156: * in AHL_SCHEDULE_MATERIALS table
157: * output record used for DML update operation
158: */
159: CURSOR schedule_mtl_exists_csr(p_unit_effectivity_id IN NUMBER, p_mr_route_id IN NUMBER, p_inventory_item_id IN NUMBER, p_rt_oper_material_id IN NUMBER) IS
160: SELECT * FROM AHL_SCHEDULE_MATERIALS SM

Line 160: SELECT * FROM AHL_SCHEDULE_MATERIALS SM

156: * in AHL_SCHEDULE_MATERIALS table
157: * output record used for DML update operation
158: */
159: CURSOR schedule_mtl_exists_csr(p_unit_effectivity_id IN NUMBER, p_mr_route_id IN NUMBER, p_inventory_item_id IN NUMBER, p_rt_oper_material_id IN NUMBER) IS
160: SELECT * FROM AHL_SCHEDULE_MATERIALS SM
161: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
162: AND NVL(SM.rt_oper_material_id,-1) = NVL(p_rt_oper_material_id,-1)
163: AND SM.inventory_item_id = p_inventory_item_id
164: AND SM.mr_route_id = p_mr_route_id

Line 168: l_Schedule_Mtl_Req_rec AHL_SCHEDULE_MATERIALS%ROWTYPE;

164: AND SM.mr_route_id = p_mr_route_id
165: AND SM.unit_effectivity_id = p_unit_effectivity_id
166: FOR UPDATE OF REQUESTED_DATE NOWAIT;
167:
168: l_Schedule_Mtl_Req_rec AHL_SCHEDULE_MATERIALS%ROWTYPE;
169:
170: l_requirement_date DATE;
171: l_previous_route_id NUMBER;
172: l_previous_req_date DATE;

Line 200: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => delete_mtl_forecast_rec.scheduled_material_id);

196:
197: -- perform orphan forcast delete. Which ones? refer to comments for cursor.
198: -- delete operation transferred to due date calculation API
199: /*FOR delete_mtl_forecast_rec IN delete_schedule_mtl_csr LOOP
200: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => delete_mtl_forecast_rec.scheduled_material_id);
201: END LOOP;*/
202:
203: IF (G_DEBUG_STMT >= G_DEBUG_LEVEL)THEN
204: fnd_log.string

Line 251: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => del_exp_route_rec.scheduled_material_id);

247: || ue_mr_routes_rec.route_id || ':' || ue_mr_routes_rec.mr_route_id
248: );
249: END IF;
250: FOR del_exp_route_rec IN del_exp_route_schedule_mtl_csr(ue_mr_routes_rec.unit_effectivity_id, ue_mr_routes_rec.mr_route_id) LOOP
251: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => del_exp_route_rec.scheduled_material_id);
252: END LOOP;
253: ELSE
254: -- route is valid and proceed to forecast
255: IF(TRUNC(ue_mr_routes_rec.due_date) < TRUNC(SYSDATE))THEN

Line 314: 'Inserting record in AHL_SCHEDULE_MATERIALS '

310: fnd_log.string
311: (
312: G_DEBUG_STMT,
313: 'ahl.plsql.AHL_UMP_FORECAST_REQ_PVT.Process_Mrl_Req_Forecast',
314: 'Inserting record in AHL_SCHEDULE_MATERIALS '
315: );
316: fnd_log.string
317: (
318: G_DEBUG_STMT,

Line 353: AHL_SCHEDULE_MATERIALS_PKG.INSERT_ROW

349: 'ahl.plsql.AHL_UMP_FORECAST_REQ_PVT.Process_Mrl_Req_Forecast',
350: 'uom : ' || l_Route_Mtl_Req_Tbl(j).uom_code
351: );
352: END IF;
353: AHL_SCHEDULE_MATERIALS_PKG.INSERT_ROW
354: (
355: X_SCHEDULED_MATERIAL_ID => NULL,
356: X_OBJECT_VERSION_NUMBER => 1,
357: X_LAST_UPDATE_DATE => SYSDATE,

Line 414: 'Updating record in AHL_SCHEDULE_MATERIALS '

410: fnd_log.string
411: (
412: G_DEBUG_STMT,
413: 'ahl.plsql.AHL_UMP_FORECAST_REQ_PVT.Process_Mrl_Req_Forecast',
414: 'Updating record in AHL_SCHEDULE_MATERIALS '
415: );
416: fnd_log.string
417: (
418: G_DEBUG_STMT,

Line 453: AHL_SCHEDULE_MATERIALS_PKG.UPDATE_ROW

449: 'ahl.plsql.AHL_UMP_FORECAST_REQ_PVT.Process_Mrl_Req_Forecast',
450: 'uom : ' || l_Route_Mtl_Req_Tbl(j).uom_code
451: );
452: END IF;
453: AHL_SCHEDULE_MATERIALS_PKG.UPDATE_ROW
454: (
455: X_SCHEDULED_MATERIAL_ID => l_Schedule_Mtl_Req_rec.SCHEDULED_MATERIAL_ID,
456: X_OBJECT_VERSION_NUMBER => l_Schedule_Mtl_Req_rec.OBJECT_VERSION_NUMBER,--Update Column
457: X_LAST_UPDATE_DATE => SYSDATE,

Line 1019: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM

1015: IS
1016:
1017: -- Find out the schedule material records for expired routes
1018: CURSOR del_exp_route_schedule_mtl_csr(p_unit_effectivity_id IN NUMBER, p_mr_route_id IN NUMBER) IS
1019: SELECT scheduled_material_id FROM AHL_SCHEDULE_MATERIALS SM
1020: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
1021: AND SM.mr_route_id = p_mr_route_id
1022: AND SM.unit_effectivity_id IS NOT NULL
1023: AND SM.unit_effectivity_id = p_unit_effectivity_id;

Line 1026: -- in AHL_SCHEDULE_MATERIALS table

1022: AND SM.unit_effectivity_id IS NOT NULL
1023: AND SM.unit_effectivity_id = p_unit_effectivity_id;
1024:
1025: -- Validates whether a forecast record with unique key combination exisits
1026: -- in AHL_SCHEDULE_MATERIALS table
1027: -- output record used for DML update operation
1028: CURSOR schedule_mtl_exists_csr(p_unit_effectivity_id IN NUMBER,
1029: p_mr_route_id IN NUMBER,
1030: p_inventory_item_id IN NUMBER,

Line 1032: SELECT * FROM AHL_SCHEDULE_MATERIALS SM

1028: CURSOR schedule_mtl_exists_csr(p_unit_effectivity_id IN NUMBER,
1029: p_mr_route_id IN NUMBER,
1030: p_inventory_item_id IN NUMBER,
1031: p_rt_oper_material_id IN NUMBER) IS
1032: SELECT * FROM AHL_SCHEDULE_MATERIALS SM
1033: WHERE SM.material_request_type = G_REQ_TYPE_FORECAST
1034: AND NVL(SM.rt_oper_material_id,-1) = NVL(p_rt_oper_material_id,-1)
1035: AND SM.inventory_item_id = p_inventory_item_id
1036: AND SM.mr_route_id = p_mr_route_id

Line 1041: l_Schedule_Mtl_Req_rec AHL_SCHEDULE_MATERIALS%ROWTYPE;

1037: AND SM.unit_effectivity_id = p_unit_effectivity_id
1038: FOR UPDATE OF REQUESTED_DATE NOWAIT;
1039:
1040: l_debug_module VARCHAR2(1000) := 'ahl.plsql.AHL_UMP_FORECAST_REQ_PVT.Process_Material_Req';
1041: l_Schedule_Mtl_Req_rec AHL_SCHEDULE_MATERIALS%ROWTYPE;
1042: l_requirement_date DATE;
1043: l_Route_Mtl_Req_Tbl AHL_LTP_MTL_REQ_PVT.Route_Mtl_Req_Tbl_Type;
1044:
1045: l_msg_data VARCHAR2(2000);

Line 1071: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => del_exp_route_rec.scheduled_material_id);

1067: 'p_route_id :p_mr_route_id : ' || p_route_id || ':' || p_mr_route_id);
1068: END IF;
1069:
1070: FOR del_exp_route_rec IN del_exp_route_schedule_mtl_csr(p_unit_effectivity_id,p_mr_route_id) LOOP
1071: AHL_SCHEDULE_MATERIALS_PKG.delete_row(x_scheduled_material_id => del_exp_route_rec.scheduled_material_id);
1072: END LOOP;
1073:
1074: ELSE
1075: -- route is valid and proceed to forecast

Line 1130: 'Inserting record in AHL_SCHEDULE_MATERIALS ');

1126: FETCH schedule_mtl_exists_csr INTO l_Schedule_Mtl_Req_rec;
1127: IF(schedule_mtl_exists_csr%NOTFOUND)THEN
1128: IF (G_DEBUG_STMT >= G_DEBUG_LEVEL)THEN
1129: fnd_log.string (G_DEBUG_STMT, l_debug_module,
1130: 'Inserting record in AHL_SCHEDULE_MATERIALS ');
1131: fnd_log.string (G_DEBUG_STMT,l_debug_module,
1132: 'unit_effectivity_id : ' || p_unit_effectivity_id);
1133: fnd_log.string (G_DEBUG_STMT,l_debug_module,
1134: 'requested_date : ' || p_due_date);

Line 1144: AHL_SCHEDULE_MATERIALS_PKG.INSERT_ROW

1140: 'quantity : ' || l_Route_Mtl_Req_Tbl(j).quantity);
1141: fnd_log.string ( G_DEBUG_STMT,l_debug_module,
1142: 'uom : ' || l_Route_Mtl_Req_Tbl(j).uom_code);
1143: END IF;
1144: AHL_SCHEDULE_MATERIALS_PKG.INSERT_ROW
1145: (
1146: X_SCHEDULED_MATERIAL_ID => NULL,
1147: X_OBJECT_VERSION_NUMBER => 1,
1148: X_LAST_UPDATE_DATE => SYSDATE,

Line 1202: 'Updating record in AHL_SCHEDULE_MATERIALS ');

1198: );
1199: ELSE -- schedule_mtl_exists
1200: IF (G_DEBUG_STMT >= G_DEBUG_LEVEL)THEN
1201: fnd_log.string ( G_DEBUG_STMT, l_debug_module,
1202: 'Updating record in AHL_SCHEDULE_MATERIALS ');
1203: fnd_log.string ( G_DEBUG_STMT, l_debug_module,
1204: 'unit_effectivity_id : ' || p_unit_effectivity_id);
1205: fnd_log.string ( G_DEBUG_STMT, l_debug_module,
1206: 'requested_date : ' || p_due_date);

Line 1218: AHL_SCHEDULE_MATERIALS_PKG.UPDATE_ROW

1214: 'uom : ' || l_Route_Mtl_Req_Tbl(j).uom_code);
1215: fnd_log.string ( G_DEBUG_STMT, l_debug_module,
1216: 'SCHEDULED_MATERIAL_ID:' || l_Schedule_Mtl_Req_rec.SCHEDULED_MATERIAL_ID);
1217: END IF;
1218: AHL_SCHEDULE_MATERIALS_PKG.UPDATE_ROW
1219: (
1220: X_SCHEDULED_MATERIAL_ID => l_Schedule_Mtl_Req_rec.SCHEDULED_MATERIAL_ID,
1221: X_OBJECT_VERSION_NUMBER => l_Schedule_Mtl_Req_rec.OBJECT_VERSION_NUMBER,--Update Column
1222: X_LAST_UPDATE_DATE => SYSDATE,