[Home] [Help]
27: x_return_status => l_return_status,
28: x_msg_count => l_msg_count,
29: x_msg_data => l_msg_data
30: );
31: if L_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
32: RAISE NO_BATCH_FOUND_ERR;
33: end if;
34:
35: open is_enhanced_pi;
122: X_RETURN_STATUS => l_return_status,
123: X_RESERVATIONS_TBL => l_reservation_tbl
124: );
125:
126: if L_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
127: RAISE MATERIAL_RESERVATION_ERR;
128: end if;
129:
130: --Bug 4609365: start
272: X_RETURN_STATUS => l_return_status,
273: X_EXCEPTION_TBL => l_exception_tbl
274: );
275:
276: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
277: RAISE BATCH_SHORTAGE_ERR;
278: end if;
279:
280: X_UNAVAL_MATERIAL_ID := new FND_TABLE_OF_VARCHAR2_255();
309: end if;
310:
311: X_MATERIAL_AVAILABLE := l_material_available;
312:
313: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
314: EXCEPTION
315: WHEN BATCH_SHORTAGE_ERR THEN
316: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
317:
312:
313: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
314: EXCEPTION
315: WHEN BATCH_SHORTAGE_ERR THEN
316: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
317:
318: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_STEP_MAT_AVBL_ERR');
319: FND_MESSAGE.SET_TOKEN('BATCHSTEP_ID',P_BATCHSTEP_ID);
320: FND_MESSAGE.SET_TOKEN('MATERIAL_AVAILABLE',l_material_available);
327: end if;
328:
329: WHEN OTHERS THEN
330:
331: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
332: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
333: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
334: FND_MESSAGE.SET_TOKEN('ERROR_CODE',SQLCODE);
335: FND_MSG_PUB.ADD;
400: FND_MESSAGE.SET_TOKEN('REQUEST','LOCK');
401: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.lock_step', FALSE);
402: end if;
403:
404: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
405:
406: EXCEPTION
407: WHEN STEP_ALREADY_LOCKED_ERR THEN
408: rollback;
405:
406: EXCEPTION
407: WHEN STEP_ALREADY_LOCKED_ERR THEN
408: rollback;
409: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
410: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_LOCK_ERR');
411: FND_MSG_PUB.ADD;
412: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
413: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
414: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.lock_step', FALSE);
415: end if;
416: WHEN NO_BATCH_FOUND_ERR THEN
417: rollback;
418: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
419: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
420: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','OPERATION');
421: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_BATCHSTEP_ID);
422: FND_MSG_PUB.ADD;
425: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_pvt.lock_step', FALSE);
426: end if;
427: WHEN OTHERS THEN
428: rollback;
429: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
430: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
431: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
432: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
433: FND_MSG_PUB.ADD;
487: end loop;
488:
489: commit;
490:
491: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
492:
493: EXCEPTION
494: WHEN STEP_ALREADY_LOCKED_ERR THEN
495: rollback;
492:
493: EXCEPTION
494: WHEN STEP_ALREADY_LOCKED_ERR THEN
495: rollback;
496: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
497: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_LOCK_ERR');
498: FND_MSG_PUB.ADD;
499: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
500: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
501: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.lock_step', FALSE);
502: end if;
503: WHEN NO_BATCH_FOUND_ERR THEN
504: rollback;
505: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
506: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
507: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','OPERATION');
508: FND_MESSAGE.SET_TOKEN('ENTITY_KEY', l_batchstep_id);
509: FND_MSG_PUB.ADD;
512: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_pvt.lock_step', FALSE);
513: end if;
514: WHEN OTHERS THEN
515: rollback;
516: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
517: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
518: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
519: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
520: FND_MSG_PUB.ADD;
570: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.unlock_step', FALSE);
571: end if;
572:
573:
574: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
575:
576: EXCEPTION
577: WHEN STEP_NOT_LOCKED_ERR THEN
578: rollback;
575:
576: EXCEPTION
577: WHEN STEP_NOT_LOCKED_ERR THEN
578: rollback;
579: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
580: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNLOCK_ERR');
581: FND_MSG_PUB.ADD;
582: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
583: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
584: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.unlock_step', FALSE);
585: end if;
586: WHEN OTHERS THEN
587: rollback;
588: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
589: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
590: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
591: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
592: FND_MSG_PUB.ADD;
650: end loop;
651:
652: commit;
653:
654: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
655:
656: EXCEPTION
657: WHEN STEP_NOT_LOCKED_ERR THEN
658: rollback;
655:
656: EXCEPTION
657: WHEN STEP_NOT_LOCKED_ERR THEN
658: rollback;
659: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
660: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNLOCK_ERR');
661: FND_MSG_PUB.ADD;
662: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
663: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
664: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.unlock_step', FALSE);
665: end if;
666: WHEN OTHERS THEN
667: rollback;
668: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
669: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
670: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
671: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
672: FND_MSG_PUB.ADD;
731: FND_MESSAGE.SET_TOKEN('BATCH_ID',l_batch_id);
732: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.get_batch_id_for_entity', FALSE);
733: end if;
734:
735: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
736: X_BATCH_ID := l_batch_id;
737:
738: EXCEPTION
739: WHEN NO_BATCH_FOUND_ERR THEN
736: X_BATCH_ID := l_batch_id;
737:
738: EXCEPTION
739: WHEN NO_BATCH_FOUND_ERR THEN
740: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
741: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY_OPRN');
742: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
743: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
744: FND_MESSAGE.SET_TOKEN('OPRN','GET_BATCH_ID');
747: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
748: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_batch_id_for_entity', FALSE);
749: end if;
750: WHEN GMO_INVALID_ENTITY_ERR THEN
751: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
752: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
753: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
754: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
755: FND_MSG_PUB.ADD;
757: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
758: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_batch_id_for_entity', FALSE);
759: end if;
760: WHEN OTHERS THEN
761: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
762: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
763: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
764: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
765: FND_MSG_PUB.ADD;
819: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.get_batchstep_id_for_entity', FALSE);
820: end if;
821:
822:
823: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
824: X_BATCHSTEP_ID := l_batchstep_id;
825:
826: EXCEPTION
827: WHEN NO_BATCHSTEP_FOUND_ERR THEN
824: X_BATCHSTEP_ID := l_batchstep_id;
825:
826: EXCEPTION
827: WHEN NO_BATCHSTEP_FOUND_ERR THEN
828: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
829: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY_OPRN');
830: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
831: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
832: FND_MESSAGE.SET_TOKEN('OPRN','GET_BATCHSTEP_ID');
835: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
836: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_batchstep_id_for_entity', FALSE);
837: end if;
838: WHEN GMO_INVALID_ENTITY_ERR THEN
839: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
840: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
841: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
842: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
843: FND_MSG_PUB.ADD;
845: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
846: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_batchstep_id_for_entity', FALSE);
847: end if;
848: WHEN OTHERS THEN
849: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
850: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
851: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
852: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
853: FND_MSG_PUB.ADD;
1232: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1233: X_INSTRUCTION_SET_ID => l_instruction_set_id
1234: );
1235:
1236: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1237: RAISE instruction_create_err;
1238: end if;
1239: update_task_attribute
1240: (
1284: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1285: X_INSTRUCTION_SET_ID => l_instruction_set_id
1286: );
1287:
1288: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1289: RAISE instruction_create_err;
1290: end if;
1291:
1292: update_task_attribute
1337: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1338: X_INSTRUCTION_SET_ID => l_instruction_set_id
1339: );
1340:
1341: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1342: RAISE instruction_create_err;
1343: end if;
1344:
1345: update_task_attribute
1390: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1391: X_INSTRUCTION_SET_ID => l_instruction_set_id
1392: );
1393:
1394: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1395: RAISE instruction_create_err;
1396: end if;
1397:
1398: update_task_attribute
1431: end if;
1432:
1433: end if;
1434:
1435: x_return_status := FND_API.G_RET_STS_SUCCESS;
1436:
1437: EXCEPTION
1438: WHEN instruction_create_err then
1439: x_return_status := FND_API.G_RET_STS_ERROR;
1435: x_return_status := FND_API.G_RET_STS_SUCCESS;
1436:
1437: EXCEPTION
1438: WHEN instruction_create_err then
1439: x_return_status := FND_API.G_RET_STS_ERROR;
1440: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1441: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1442: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1443: end if;
1441: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1442: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1443: end if;
1444: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
1445: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1446: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
1447: FND_MSG_PUB.ADD;
1448: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1449: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1449: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1450: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1451: end if;
1452: WHEN GMO_INVALID_RECIPE_ERR THEN
1453: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1454: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_RECIPE');
1455: FND_MSG_PUB.ADD;
1456: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1457: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1457: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1458: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1459: end if;
1460: WHEN GMO_DISABLED_ERR THEN
1461: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1462: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_DISABLED_ERR');
1463: FND_MSG_PUB.ADD;
1464: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1465: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1465: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1466: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1467: end if;
1468: WHEN GMO_INVALID_ENTITY_ERR THEN
1469: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
1470: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
1471: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
1472: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
1473: FND_MSG_PUB.ADD;
1475: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1476: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1477: end if;
1478: WHEN INVALID_ATTRIBUTE_ASSOC_ERR THEN
1479: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
1480: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ATTR_ASSOC');
1481: FND_MSG_PUB.ADD;
1482: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1483: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1483: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1484: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.instantiate_advanced_pi', FALSE);
1485: end if;
1486: WHEN OTHERS THEN
1487: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
1488: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
1489: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
1490: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
1491: FND_MSG_PUB.ADD;
1611: X_ATTRIBUTE_VALUE => l_vbatch_mode
1612: );
1613:
1614:
1615: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1616: RAISE gmo_instr_task_param_err;
1617: end if;
1618:
1619: end if;
1907: x_return_status => l_return_status,
1908: x_msg_count => l_msg_count,
1909: x_msg_data => l_msg_data
1910: );
1911: if L_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1912: RAISE NO_BATCH_FOUND_ERR;
1913: end if;
1914: end if;
1915:
1964: l_context_params_rec_type.VALUE := l_line_no;
1965: X_CONTEXT_PARAMS_TBL(11) := l_context_params_rec_type;
1966: --Bug 4893056: end
1967:
1968: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1969:
1970: EXCEPTION
1971: WHEN GMO_DISABLED_ERR THEN
1972: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1968: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1969:
1970: EXCEPTION
1971: WHEN GMO_DISABLED_ERR THEN
1972: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1973: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_DISABLED_ERR');
1974: FND_MSG_PUB.ADD;
1975: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1976: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1976: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1977: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
1978: end if;
1979: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
1980: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1981: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1982: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
1983: FND_MSG_PUB.ADD;
1984: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1986: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
1987: end if;
1988:
1989: WHEN GMO_INVALID_MODULE_ERR THEN
1990: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
1991: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_MODULE');
1992: FND_MSG_PUB.ADD;
1993: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
1994: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1995: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
1996: end if;
1997:
1998: WHEN GMO_INSTR_TASK_PARAM_ERR THEN
1999: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2000: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INSTR_PARAM_ERR');
2001: FND_MSG_PUB.ADD;
2002: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2003: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2004: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
2005: end if;
2006:
2007: WHEN GMO_INVALID_TASK_ERR THEN
2008: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2009: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_TASK');
2010: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
2011: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
2012: FND_MESSAGE.SET_TOKEN('TASK',P_TASK);
2015: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2016: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
2017: end if;
2018: WHEN GMO_INVALID_ENTITY_ERR THEN
2019: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2020: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
2021: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
2022: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
2023: FND_MSG_PUB.ADD;
2025: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2026: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
2027: end if;
2028: WHEN OTHERS THEN
2029: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
2030: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
2031: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2032: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
2033: FND_MSG_PUB.ADD;
2122: P_ENTITY_KEY => l_batchstep_id,
2123: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2124: );
2125:
2126: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2127: RAISE instruction_nullify_err;
2128: end if;
2129:
2130: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2140: P_TARGET_ENTITY_KEY => l_batchstep_id,
2141: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2142: X_INSTRUCTION_SET_ID => l_instruction_set_id
2143: );
2144: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2145: RAISE instruction_create_err;
2146: end if;
2147: end if;
2148: end loop;
2162: P_ENTITY_KEY => l_batchstep_activity_id,
2163: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2164: );
2165:
2166: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2167: RAISE instruction_nullify_err;
2168: end if;
2169:
2170: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2178: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2179: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2180: X_INSTRUCTION_SET_ID => l_instruction_set_id
2181: );
2182: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2183: RAISE instruction_create_err;
2184: end if;
2185: end if;
2186:
2201: P_ENTITY_KEY => l_batchstep_resource_id,
2202: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2203: );
2204:
2205: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2206: RAISE instruction_nullify_err;
2207: end if;
2208:
2209: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2217: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2218: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2219: X_INSTRUCTION_SET_ID => l_instruction_set_id
2220: );
2221: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2222: RAISE instruction_create_err;
2223: end if;
2224: end if;
2225:
2240: P_ENTITY_KEY => l_material_detail_id,
2241: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2242: );
2243:
2244: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2245: RAISE instruction_nullify_err;
2246: end if;
2247:
2248: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2256: P_TARGET_ENTITY_KEY => l_material_detail_id,
2257: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2258: X_INSTRUCTION_SET_ID => l_instruction_set_id
2259: );
2260: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2261: RAISE instruction_create_err;
2262: end if;
2263: end if;
2264: end loop;
2276: P_ENTITY_KEY => l_material_detail_id,
2277: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2278: );
2279:
2280: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2281: RAISE instruction_nullify_err;
2282: end if;
2283:
2284: END IF; -- end IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2297: P_ENTITY_KEY => l_batchstep_id,
2298: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2299: );
2300:
2301: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2302: RAISE instruction_nullify_err;
2303: end if;
2304:
2305: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2315: P_TARGET_ENTITY_KEY => l_batchstep_id,
2316: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2317: X_INSTRUCTION_SET_ID => l_instruction_set_id
2318: );
2319: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2320: RAISE instruction_create_err;
2321: end if;
2322: end if;
2323:
2336: P_ENTITY_KEY => l_material_detail_id,
2337: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2338: );
2339:
2340: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2341: RAISE instruction_nullify_err;
2342: end if;
2343:
2344: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2352: P_TARGET_ENTITY_KEY => l_material_detail_id,
2353: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2354: X_INSTRUCTION_SET_ID => l_instruction_set_id
2355: );
2356: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2357: RAISE instruction_create_err;
2358: end if;
2359: end if;
2360:
2376: P_ENTITY_KEY => l_batchstep_activity_id,
2377: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2378: );
2379:
2380: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2381: RAISE instruction_nullify_err;
2382: end if;
2383:
2384: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2392: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2393: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2394: X_INSTRUCTION_SET_ID => l_instruction_set_id
2395: );
2396: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2397: RAISE instruction_create_err;
2398: end if;
2399: end if;
2400:
2415: P_ENTITY_KEY => l_batchstep_resource_id,
2416: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2417: );
2418:
2419: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2420: RAISE instruction_nullify_err;
2421: end if;
2422:
2423: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2431: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2432: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2433: X_INSTRUCTION_SET_ID => l_instruction_set_id
2434: );
2435: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2436: RAISE instruction_create_err;
2437: end if;
2438: end if;
2439:
2452: P_ENTITY_KEY => l_batchstep_activity_id,
2453: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2454: );
2455:
2456: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2457: RAISE instruction_nullify_err;
2458: end if;
2459:
2460: open c_get_activity_resources;
2471: P_ENTITY_KEY => l_batchstep_resource_id,
2472: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2473: );
2474:
2475: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2476: RAISE instruction_nullify_err;
2477: end if;
2478:
2479: end loop;
2491: P_ENTITY_KEY => l_batchstep_resource_id,
2492: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2493: );
2494:
2495: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2496: RAISE instruction_nullify_err;
2497: end if;
2498:
2499: ELSIF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_MATERIAL) THEN
2508: P_ENTITY_KEY => l_material_detail_id,
2509: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2510: );
2511:
2512: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2513: RAISE instruction_nullify_err;
2514: end if;
2515: END IF;
2516:
2516:
2517:
2518: END IF;
2519:
2520: x_return_status := FND_API.G_RET_STS_SUCCESS;
2521:
2522: EXCEPTION
2523: WHEN GMO_DISABLED_ERR THEN
2524: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2520: x_return_status := FND_API.G_RET_STS_SUCCESS;
2521:
2522: EXCEPTION
2523: WHEN GMO_DISABLED_ERR THEN
2524: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2525: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_DISABLED_ERR');
2526: FND_MSG_PUB.ADD;
2527: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2528: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2528: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2529: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2530: end if;
2531: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2532: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2533: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
2534: FND_MSG_PUB.ADD;
2535: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2536: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2536: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2537: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2538: end if;
2539: WHEN instruction_nullify_err then
2540: x_return_status := FND_API.G_RET_STS_ERROR;
2541: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2542: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2543: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2544: end if;
2542: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2543: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2544: end if;
2545: WHEN instruction_create_err then
2546: x_return_status := FND_API.G_RET_STS_ERROR;
2547: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2548: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2549: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2550: end if;
2548: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2549: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2550: end if;
2551: WHEN GMO_INVALID_ENTITY_ERR THEN
2552: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2553: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
2554: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
2555: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
2556: FND_MSG_PUB.ADD;
2558: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2559: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2560: end if;
2561: WHEN OTHERS THEN
2562: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
2563: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
2564: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2565: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
2566: FND_MSG_PUB.ADD;
2632: P_DISABLE_TASK => GMO_CONSTANTS_GRP.DISABLE_TASK_NO
2633: );
2634:
2635:
2636: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2637: RAISE task_Acknowledgement_err;
2638: end if;
2639:
2640: END IF;
2638: end if;
2639:
2640: END IF;
2641:
2642: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2643:
2644: EXCEPTION
2645: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2646: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2642: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2643:
2644: EXCEPTION
2645: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2646: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2647: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
2648: FND_MSG_PUB.ADD;
2649: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2650: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2650: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2651: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_save', FALSE);
2652: end if;
2653: WHEN task_Acknowledgement_err then
2654: x_return_status := FND_API.G_RET_STS_ERROR;
2655: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2656: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2657: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_save', FALSE);
2658: end if;
2656: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2657: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_save', FALSE);
2658: end if;
2659: WHEN GMO_DISABLED_ERR THEN
2660: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2661: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_DISABLED_ERR');
2662: FND_MSG_PUB.ADD;
2663: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2664: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2664: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2665: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_save', FALSE);
2666: end if;
2667: WHEN OTHERS THEN
2668: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
2669: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
2670: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2671: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
2672: FND_MSG_PUB.ADD;
2778: FND_MESSAGE.SET_TOKEN('LOCK_ALLOWED',X_LOCK_ALLOWED);
2779: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.get_entity_lock_status', FALSE);
2780: end if;
2781:
2782: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2783:
2784: EXCEPTION
2785: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2786: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2782: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2783:
2784: EXCEPTION
2785: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2786: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2787: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
2788: FND_MSG_PUB.ADD;
2789: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2790: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2790: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2791: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_entity_lock_status', FALSE);
2792: end if;
2793: WHEN GMO_DISABLED_ERR THEN
2794: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2795: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_DISABLED_ERR');
2796: FND_MSG_PUB.ADD;
2797: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2798: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2798: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2799: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_entity_lock_status', FALSE);
2800: end if;
2801: WHEN NO_STEP_FOUND_ERR THEN
2802: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2803: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
2804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
2805: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
2806: FND_MSG_PUB.ADD;
2808: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2809: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_entity_lock_status', FALSE);
2810: end if;
2811: WHEN GMO_INVALID_ENTITY_ERR THEN
2812: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2813: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_INVALID_ENTITY');
2814: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',P_ENTITY_NAME);
2815: FND_MESSAGE.SET_TOKEN('ENTITY_KEY',P_ENTITY_KEY);
2816: FND_MSG_PUB.ADD;
2818: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2819: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.get_entity_lock_status', FALSE);
2820: end if;
2821: WHEN OTHERS THEN
2822: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
2823: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_UNEXPECTED_DB_ERR');
2824: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2825: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
2826: FND_MSG_PUB.ADD;
2995: x_entity_level(l_counter) := t_entity_level(i);
2996:
2997: end loop;
2998:
2999: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3000:
3001: EXCEPTION
3002: WHEN OTHERS THEN
3003: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
2999: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3000:
3001: EXCEPTION
3002: WHEN OTHERS THEN
3003: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
3004: FND_MESSAGE.SET_NAME('GMO','GET_BATCHSTEP_NODES');
3005: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
3006: FND_MESSAGE.SET_TOKEN('ERROR_CODE', SQLCODE);
3007: FND_MSG_PUB.ADD;
3104: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3105: X_INSTRUCTION_SET_ID => l_instruction_set_id
3106: );
3107:
3108: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3109: RAISE instruction_create_err;
3110: end if;
3111: update_task_attribute
3112: (
3156: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3157: X_INSTRUCTION_SET_ID => l_instruction_set_id
3158: );
3159:
3160: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3161: RAISE instruction_create_err;
3162: end if;
3163:
3164: update_task_attribute
3209: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3210: X_INSTRUCTION_SET_ID => l_instruction_set_id
3211: );
3212:
3213: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3214: RAISE instruction_create_err;
3215: end if;
3216:
3217: update_task_attribute
3248: if (l_invalid_entity_master.count > 0) then
3249: RAISE INVALID_ATTRIBUTE_ASSOC_ERR;
3250: end if;
3251:
3252: x_return_status := FND_API.G_RET_STS_SUCCESS;
3253:
3254: END INSTANTIATE_INSTR_FOR_LCF;
3255:
3256: