1: PACKAGE BODY GMO_VBATCH_GRP AS
2: /* $Header: GMOGVBTB.pls 120.2 2005/10/26 05:49 rahugupt noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMO_VBATCH_GRP';
5:
1: PACKAGE BODY GMO_VBATCH_GRP AS
2: /* $Header: GMOGVBTB.pls 120.2 2005/10/26 05:49 rahugupt noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMO_VBATCH_GRP';
5:
6: --This procdeure would instantiate the process instructions for the batch.
7: procedure INSTANTIATE_ADVANCED_PI (P_API_VERSION IN NUMBER,
8: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
61: ROLLBACK TO INSTANTIATE_ADVANCED_PI_GRP;
62: x_return_status := FND_API.G_RET_STS_ERROR;
63: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
64: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
65: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_grp.instantiate_advanced_pi', FALSE);
66: end if;
67: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
68: ROLLBACK TO INSTANTIATE_ADVANCED_PI_GRP;
69: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
68: ROLLBACK TO INSTANTIATE_ADVANCED_PI_GRP;
69: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
70: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
71: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
72: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.instantiate_advanced_pi', FALSE);
73: end if;
74: WHEN OTHERS THEN
75: ROLLBACK TO INSTANTIATE_ADVANCED_PI_GRP;
76: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
78: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
79: END IF;
80: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
81: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
82: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.instantiate_advanced_pi', FALSE);
83: end if;
84: END INSTANTIATE_ADVANCED_PI;
85:
86:
164: WHEN FND_API.G_EXC_ERROR THEN
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
167: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
168: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_grp.on_task_load', FALSE);
169: end if;
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
172: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
172: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
173: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
174: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_load', FALSE);
175: end if;
176: WHEN OTHERS THEN
177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
178: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
179: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
180: END IF;
181: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
182: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
183: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_load', FALSE);
184: end if;
185:
186: END ON_TASK_LOAD;
187:
248: WHEN FND_API.G_EXC_ERROR THEN
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
251: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
252: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_grp.on_task_action', FALSE);
253: end if;
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
256: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
256: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
257: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
258: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_action', FALSE);
259: end if;
260: WHEN OTHERS THEN
261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
262: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
263: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
264: END IF;
265: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
266: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
267: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_action', FALSE);
268: end if;
269:
270: END ON_TASK_ACTION;
271:
364: WHEN FND_API.G_EXC_ERROR THEN
365: x_return_status := FND_API.G_RET_STS_ERROR;
366: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
367: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
368: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_grp.on_task_save', FALSE);
369: end if;
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
372: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
372: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
373: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
374: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_save', FALSE);
375: end if;
376: WHEN OTHERS THEN
377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
378: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
379: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
380: END IF;
381: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
382: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
383: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.on_task_save', FALSE);
384: end if;
385:
386: END ON_TASK_SAVE;
387:
448: WHEN FND_API.G_EXC_ERROR THEN
449: x_return_status := FND_API.G_RET_STS_ERROR;
450: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
451: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
452: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_grp.get_entity_lock_status', FALSE);
453: end if;
454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
456: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
456: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
457: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
458: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.get_entity_lock_status', FALSE);
459: end if;
460: WHEN OTHERS THEN
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
462: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
463: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
464: END IF;
465: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
466: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
467: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,'gmo.plsql.gmo_vbatch_grp.get_entity_lock_status', FALSE);
468: end if;
469:
470: END GET_ENTITY_LOCK_STATUS;
471:
475: /*
476: procedure LOAD_VBATCH
477: */
478:
479: END GMO_VBATCH_GRP;