[Home] [Help]
174:
175: -- Validate to make sure that the Serial Number table is not empty
176: l_sn_number := p_serial_number_tbl.COUNT;
177: IF l_sn_number = 0 THEN
178: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_SNQTY_GTR_ZRO' );
179: FND_MSG_PUB.add;
180: -- log the error
181: IF (l_log_error >= l_log_current_level) THEN
182: fnd_log.string
192: -- Get the Material Requirements details
193: OPEN get_mtl_req_dtls_csr(p_scheduled_material_id);
194: FETCH get_mtl_req_dtls_csr INTO l_mtl_req_dtls_rec;
195: IF get_mtl_req_dtls_csr%NOTFOUND THEN
196: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
197: FND_MSG_PUB.add;
198: -- log the error
199: IF (l_log_error >= l_log_current_level) THEN
200: fnd_log.string
213: -- Validate whether the sum of serial numbers to reserve + already issued + reserved quantities
214: -- is not more than the initially requested quantity
215: IF l_sn_number + l_mtl_req_dtls_rec.completed_quantity +
216: l_mtl_req_dtls_rec.reserved_quantity > l_mtl_req_dtls_rec.requested_quantity THEN
217: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_QTY_EXCDS_REQSTD' );
218: FND_MSG_PUB.add;
219: -- log the error
220: IF (l_log_error >= l_log_current_level) THEN
221: fnd_log.string
241: p_serial_number_tbl(i).serial_number,
242: l_mtl_req_dtls_rec.organization_id);
243: FETCH get_instance_dtls_csr INTO l_instance_details_rec;
244: IF get_instance_dtls_csr%NOTFOUND THEN
245: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_SL_NUM' );
246: FND_MESSAGE.Set_Token('SERIALNUMBER',p_serial_number_tbl(i).serial_number);
247: FND_MSG_PUB.add;
248: -- log the error
249: IF (l_log_error >= l_log_current_level) THEN
242: l_mtl_req_dtls_rec.organization_id);
243: FETCH get_instance_dtls_csr INTO l_instance_details_rec;
244: IF get_instance_dtls_csr%NOTFOUND THEN
245: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_SL_NUM' );
246: FND_MESSAGE.Set_Token('SERIALNUMBER',p_serial_number_tbl(i).serial_number);
247: FND_MSG_PUB.add;
248: -- log the error
249: IF (l_log_error >= l_log_current_level) THEN
250: fnd_log.string
578:
579:
580: -- Validate the schedule material id
581: IF p_scheduled_material_id IS NULL THEN
582: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
583: FND_MSG_PUB.add;
584: -- log the error
585: IF (l_log_error >= l_log_current_level) THEN
586: fnd_log.string
596: -- Validate the schedule material id
597: OPEN get_mtl_req_dtls_csr(p_scheduled_material_id);
598: FETCH get_mtl_req_dtls_csr INTO l_requested_date;
599: IF get_mtl_req_dtls_csr%NOTFOUND THEN
600: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
601: FND_MSG_PUB.add;
602: -- log the error
603: IF (l_log_error >= l_log_current_level) THEN
604: fnd_log.string
614: CLOSE get_mtl_req_dtls_csr;
615:
616: -- if the requested date is null, throw error
617: IF p_requested_date IS NULL THEN
618: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_REQ_DATE' );
619: FND_MSG_PUB.add;
620: -- log the error
621: IF (l_log_error >= l_log_current_level) THEN
622: fnd_log.string
909: END IF;
910:
911: -- Validate the schedule material id and p_sub_inventory_code
912: IF p_scheduled_material_id IS NULL THEN
913: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
914: FND_MSG_PUB.add;
915: RAISE FND_API.G_EXC_ERROR;
916: END IF;
917:
938: FROM ahl_schedule_materials
939: WHERE scheduled_material_id = p_scheduled_material_id;
940: EXCEPTION
941: WHEN NO_DATA_FOUND THEN
942: FND_MESSAGE.Set_Name('AHL','AHL_RSV_INVLD_MAT_REQ');
943: FND_MSG_PUB.ADD;
944: -- log the error
945: IF (l_log_error >= l_log_current_level) THEN
946: fnd_log.string
1297: END IF;
1298:
1299: -- Validate the schedule material id
1300: IF p_scheduled_material_id IS NULL THEN
1301: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
1302: FND_MSG_PUB.add;
1303: -- log the error
1304: IF (l_log_error >= l_log_current_level) THEN
1305: fnd_log.string
1316: OPEN get_mtl_req_dtls_csr(p_scheduled_material_id);
1317: FETCH get_mtl_req_dtls_csr INTO l_get_mtl_req_dtls_rec;
1318: -- If the details are not found then raise exception
1319: IF get_mtl_req_dtls_csr%NOTFOUND THEN
1320: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_MAT_REQ' );
1321: FND_MSG_PUB.add;
1322: CLOSE get_mtl_req_dtls_csr;
1323: RAISE FND_API.G_EXC_ERROR;
1324: END IF; -- IF get_mtl_req_dtls_csr%NOTFOUND
1325: CLOSE get_mtl_req_dtls_csr;
1326:
1327: -- Validate the Serial Number
1328: IF p_serial_number IS NULL THEN
1329: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_SL_NUM' );
1330: FND_MSG_PUB.add;
1331: IF (l_log_error>= l_log_current_level)THEN
1332: fnd_log.string
1333: (
1342: -- Get the details of the item instance
1343: OPEN get_instance_dtls_csr(l_get_mtl_req_dtls_rec.inventory_item_id,p_serial_number,l_get_mtl_req_dtls_rec.organization_id);
1344: FETCH get_instance_dtls_csr INTO l_get_instance_dtls_rec;
1345: IF get_instance_dtls_csr%NOTFOUND THEN
1346: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_INVLD_SL_NUM' );
1347: FND_MSG_PUB.add;
1348: CLOSE get_instance_dtls_csr;
1349: RAISE FND_API.G_EXC_ERROR;
1350: END IF; -- IF get_instance_dtls_csr%NOTFOUND
1970: -- For each material requirement id, get the schedule material id and the requested date
1971: OPEN get_mtl_req_id_csr(l_get_upd_rsv_rec.demand_source_header_id,l_get_upd_rsv_rec.demand_source_line_id,l_get_upd_rsv_rec.inventory_item_id);
1972: FETCH get_mtl_req_id_csr INTO l_get_mtl_req_id_rec;
1973: IF get_mtl_req_id_csr%NOTFOUND THEN
1974: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_UPD_VST_RSV_FAIL' );
1975: FND_MSG_PUB.add;
1976: -- log the error
1977: IF (l_log_error >= l_log_current_level) THEN
1978: fnd_log.string
2437: x_rsv_rec.demand_source_type_id := inv_reservation_global.g_source_type_inv;
2438: x_rsv_rec.demand_source_header_id := l_get_mtl_req_dtls_rec.Visit_Task_ID;
2439: x_rsv_rec.demand_source_line_id := l_get_mtl_req_dtls_rec.rt_oper_material_id;
2440: ELSE
2441: FND_MESSAGE.set_name( 'AHL', 'AHL_RSV_ONLY_PLN_SPF_TSK' );
2442: FND_MSG_PUB.ADD;
2443: --RAISE FND_API.G_EXC_ERROR;
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445: END IF; -- l_get_mtl_req_dtls_rec.task_status_code = 'RELEASED'