DBA Data[Home] [Help]

APPS.AHL_SIMULATION_PVT dependencies on STANDARD

Line 48: --Standard local variables

44: SELECT 1
45: FROM AHL_FLEET_UNIT_ASSOCS
46: WHERE simulation_plan_id = p_simulation_plan_id FOR UPDATE;
47:
48: --Standard local variables
49: L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Simulation_Plan';
50: L_API_VERSION CONSTANT NUMBER := 1.0;
51: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
52: l_msg_data VARCHAR2(2000);

Line 61: -- Standard start of API savepoint

57: ---------------------------------------- Start of the procedure Delete_Simulation_Plan ----------------------------------------------------------------------
58: BEGIN
59: -- initialize return status.
60: x_return_status := FND_API.G_RET_STS_SUCCESS;
61: -- Standard start of API savepoint
62: SAVEPOINT Delete_Simulation_Plan;
63: -- Initialize message list if p_init_msg_list is set to TRUE
64: IF FND_API.To_Boolean(p_init_msg_list) THEN
65: FND_MSG_PUB.Initialize;

Line 67: -- Standard call to check for call compatibility.

63: -- Initialize message list if p_init_msg_list is set to TRUE
64: IF FND_API.To_Boolean(p_init_msg_list) THEN
65: FND_MSG_PUB.Initialize;
66: END IF;
67: -- Standard call to check for call compatibility.
68: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name,G_PKG_NAME) THEN
69: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
70: END IF;
71:

Line 173: -- Standard check of p_commit

169: FND_MSG_PUB.ADD;
170: RAISE FND_API.G_EXC_ERROR;
171: END IF;
172:
173: -- Standard check of p_commit
174: IF FND_API.TO_BOOLEAN(p_commit) THEN
175: COMMIT;
176: END IF;
177:

Line 263: --Standard local variables

259: AND ahl_util_uc_pkg.get_uc_status_code(unit_config_header_id) <>'EXPIRED';
260:
261: -- End of changes for bug 13869885
262:
263: --Standard local variables
264: L_API_NAME CONSTANT VARCHAR2(30) := 'Implement_Simulation_Plan';
265: L_API_VERSION CONSTANT NUMBER := 1.0;
266: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
267: l_msg_data VARCHAR2(2000);

Line 289: -- Standard start of API savepoint

285: ------------------------------------------- Start of the procedure Implement_Simulation_Plan -------------------------------------------------------
286: BEGIN
287: -- initialize return status.
288: x_return_status := FND_API.G_RET_STS_SUCCESS;
289: -- Standard start of API savepoint
290: SAVEPOINT Implement_Simulation_Plan;
291: -- Initialize message list if p_init_msg_list is set to TRUE
292: IF FND_API.To_Boolean(p_init_msg_list) THEN
293: FND_MSG_PUB.Initialize;

Line 295: -- Standard call to check for call compatibility.

291: -- Initialize message list if p_init_msg_list is set to TRUE
292: IF FND_API.To_Boolean(p_init_msg_list) THEN
293: FND_MSG_PUB.Initialize;
294: END IF;
295: -- Standard call to check for call compatibility.
296: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name,G_PKG_NAME) THEN
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;
299:

Line 500: -- Standard check of p_commit

496: END IF;
497: END IF;
498: -- End of processing UE rows
499:
500: -- Standard check of p_commit
501: IF FND_API.TO_BOOLEAN(p_commit) THEN
502: COMMIT;
503: SAVEPOINT Implement_Simulation_Plan;
504: --Logging

Line 597: --Standard local variables

593: FROM AHL_FLEET_UNIT_ASSOCS
594: WHERE simulation_plan_id = p_simulation_plan_id
595: AND unit_config_header_id = p_unit_header_id FOR UPDATE;
596:
597: --Standard local variables
598: L_API_NAME CONSTANT VARCHAR2(30) := 'Remove_Unit_From_Plan';
599: L_API_VERSION CONSTANT NUMBER := 1.0;
600: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
601: l_msg_data VARCHAR2(2000);

Line 614: -- Standard start of API savepoint

610: --------------------------------------------------- Start of procedure Remove_Unit_From_Plan ------------------------------------------------------------------
611: BEGIN
612: -- initialize return status.
613: x_return_status := FND_API.G_RET_STS_SUCCESS;
614: -- Standard start of API savepoint
615: SAVEPOINT Remove_Unit_From_Plan;
616: -- Initialize message list if p_init_msg_list is set to TRUE
617: IF FND_API.To_Boolean(p_init_msg_list) THEN
618: FND_MSG_PUB.Initialize;

Line 620: -- Standard call to check for call compatibility.

616: -- Initialize message list if p_init_msg_list is set to TRUE
617: IF FND_API.To_Boolean(p_init_msg_list) THEN
618: FND_MSG_PUB.Initialize;
619: END IF;
620: -- Standard call to check for call compatibility.
621: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name,G_PKG_NAME) THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:

Line 735: -- Standard check of p_commit

731: RAISE FND_API.G_EXC_ERROR;
732: END IF;
733: -- End of processing for ue records
734:
735: -- Standard check of p_commit
736: IF FND_API.TO_BOOLEAN(p_commit) THEN
737: IF (l_log_procedure >= l_log_current_level) THEN
738: fnd_log.string ( l_log_procedure,L_DEBUG_KEY,'Committing changes');
739: END IF;