DBA Data[Home] [Help]

APPS.AHL_LTP_RESRC_LEVL_PUB dependencies on FND_API

Line 33: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

29: -- NOTES
30: --------------------------------------------------------------------
31: PROCEDURE Derive_Resource_Capacity (
32: p_api_version IN NUMBER,
33: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
34: p_commit IN VARCHAR2 := FND_API.g_false,
35: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
36: p_module_type IN VARCHAR2 := 'JSP',
37: p_req_resources IN Req_Resources_Rec,

Line 34: p_commit IN VARCHAR2 := FND_API.g_false,

30: --------------------------------------------------------------------
31: PROCEDURE Derive_Resource_Capacity (
32: p_api_version IN NUMBER,
33: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
34: p_commit IN VARCHAR2 := FND_API.g_false,
35: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
36: p_module_type IN VARCHAR2 := 'JSP',
37: p_req_resources IN Req_Resources_Rec,
38: x_aval_resources_tbl OUT NOCOPY Aval_Resources_Tbl,

Line 35: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

31: PROCEDURE Derive_Resource_Capacity (
32: p_api_version IN NUMBER,
33: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
34: p_commit IN VARCHAR2 := FND_API.g_false,
35: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
36: p_module_type IN VARCHAR2 := 'JSP',
37: p_req_resources IN Req_Resources_Rec,
38: x_aval_resources_tbl OUT NOCOPY Aval_Resources_Tbl,
39: x_return_status OUT NOCOPY VARCHAR2,

Line 67: IF FND_API.to_boolean(p_init_msg_list)

63: IF G_DEBUG='Y' THEN
64: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_resrc_levl_pub. derive resource capacity','+RESLG+');
65: END IF;
66: -- Standard call to check for call compatibility.
67: IF FND_API.to_boolean(p_init_msg_list)
68: THEN
69: FND_MSG_PUB.initialize;
70: END IF;
71: -- Initialize API return status to success

Line 72: x_return_status := FND_API.G_RET_STS_SUCCESS;

68: THEN
69: FND_MSG_PUB.initialize;
70: END IF;
71: -- Initialize API return status to success
72: x_return_status := FND_API.G_RET_STS_SUCCESS;
73: -- Initialize message list if p_init_msg_list is set to TRUE.
74: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
75: p_api_version,
76: l_api_name,G_PKG_NAME)

Line 74: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

70: END IF;
71: -- Initialize API return status to success
72: x_return_status := FND_API.G_RET_STS_SUCCESS;
73: -- Initialize message list if p_init_msg_list is set to TRUE.
74: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
75: p_api_version,
76: l_api_name,G_PKG_NAME)
77: THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

74: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
75: p_api_version,
76: l_api_name,G_PKG_NAME)
77: THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80: --------------------Start of API Body-----------------------------------
81: /*
82: IF (p_x_req_resources.org_name IS NOT NULL AND

Line 83: p_x_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN

79: END IF;
80: --------------------Start of API Body-----------------------------------
81: /*
82: IF (p_x_req_resources.org_name IS NOT NULL AND
83: p_x_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN
84: --
85: IF (p_x_req_resources.dept_name IS NOT NULL AND
86: p_x_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN
87: --

Line 86: p_x_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN

82: IF (p_x_req_resources.org_name IS NOT NULL AND
83: p_x_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN
84: --
85: IF (p_x_req_resources.dept_name IS NOT NULL AND
86: p_x_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN
87: --
88: SELECT department_id INTO l_department_id
89: FROM BOM_DEPARTMENTS A, HR_ALL_ORGANIZATION_UNITS B
90: WHERE A.ORGANIZATION_ID = B.ORGANIZATION_ID

Line 97: RAISE Fnd_Api.G_EXC_ERROR;

93: --
94: IF l_department_id IS NULL THEN
95: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INVALID');
96: Fnd_Msg_Pub.ADD;
97: RAISE Fnd_Api.G_EXC_ERROR;
98: END IF;
99: ELSE
100: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_NULL');
101: Fnd_Msg_Pub.ADD;

Line 102: RAISE Fnd_Api.G_EXC_ERROR;

98: END IF;
99: ELSE
100: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_NULL');
101: Fnd_Msg_Pub.ADD;
102: RAISE Fnd_Api.G_EXC_ERROR;
103: END IF;
104: --
105: */
106: AHL_LTP_RESRC_LEVL_PVT.Get_Rsrc_Req_By_Period

Line 159: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

155: l_msg_count := Fnd_Msg_Pub.count_msg;
156:
157: IF l_msg_count > 0 THEN
158: X_msg_count := l_msg_count;
159: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
160: RAISE Fnd_Api.G_EXC_ERROR;
161: END IF;
162:
163: --Standard check for commit

Line 160: RAISE Fnd_Api.G_EXC_ERROR;

156:
157: IF l_msg_count > 0 THEN
158: X_msg_count := l_msg_count;
159: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
160: RAISE Fnd_Api.G_EXC_ERROR;
161: END IF;
162:
163: --Standard check for commit
164: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 164: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

160: RAISE Fnd_Api.G_EXC_ERROR;
161: END IF;
162:
163: --Standard check for commit
164: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
165: COMMIT;
166: END IF;
167: -- Debug info
168: IF G_DEBUG='Y' THEN

Line 175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

171: Ahl_Debug_Pub.disable_debug;
172: --
173: END IF;
174: EXCEPTION
175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
176: ROLLBACK TO derive_resource_capacity;
177: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
179: p_count => x_msg_count,

Line 177: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

173: END IF;
174: EXCEPTION
175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
176: ROLLBACK TO derive_resource_capacity;
177: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
179: p_count => x_msg_count,
180: p_data => x_msg_data);
181: IF G_DEBUG='Y' THEN

Line 178: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

174: EXCEPTION
175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
176: ROLLBACK TO derive_resource_capacity;
177: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
179: p_count => x_msg_count,
180: p_data => x_msg_data);
181: IF G_DEBUG='Y' THEN
182:

Line 189: WHEN FND_API.G_EXC_ERROR THEN

185: AHL_DEBUG_PUB.debug( 'ahl_ltp_resrc_levl_pub. Derive Resource Capacity','+RSRLG+');
186: -- Check if API is called in debug mode. If yes, disable debug.
187: AHL_DEBUG_PUB.disable_debug;
188: END IF;
189: WHEN FND_API.G_EXC_ERROR THEN
190: ROLLBACK TO derive_resource_capacity;
191: X_return_status := FND_API.G_RET_STS_ERROR;
192: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
193: p_count => x_msg_count,

Line 191: X_return_status := FND_API.G_RET_STS_ERROR;

187: AHL_DEBUG_PUB.disable_debug;
188: END IF;
189: WHEN FND_API.G_EXC_ERROR THEN
190: ROLLBACK TO derive_resource_capacity;
191: X_return_status := FND_API.G_RET_STS_ERROR;
192: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
193: p_count => x_msg_count,
194: p_data => X_msg_data);
195: IF G_DEBUG='Y' THEN

Line 192: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

188: END IF;
189: WHEN FND_API.G_EXC_ERROR THEN
190: ROLLBACK TO derive_resource_capacity;
191: X_return_status := FND_API.G_RET_STS_ERROR;
192: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
193: p_count => x_msg_count,
194: p_data => X_msg_data);
195: IF G_DEBUG='Y' THEN
196:

Line 206: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

202: AHL_DEBUG_PUB.disable_debug;
203: END IF;
204: WHEN OTHERS THEN
205: ROLLBACK TO derive_resource_capacity;
206: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
207: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
208: THEN
209: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_RESRC_LEVL_PUB',
210: p_procedure_name => 'DERIVE_RESOURCE_CAPACITY',

Line 213: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

209: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_RESRC_LEVL_PUB',
210: p_procedure_name => 'DERIVE_RESOURCE_CAPACITY',
211: p_error_text => SUBSTR(SQLERRM,1,240));
212: END IF;
213: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
214: p_count => x_msg_count,
215: p_data => X_msg_data);
216: IF G_DEBUG='Y' THEN
217:

Line 243: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

239: -- NOTES
240: --------------------------------------------------------------------
241: PROCEDURE Derive_Resource_Consum (
242: p_api_version IN NUMBER,
243: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
244: p_commit IN VARCHAR2 := FND_API.g_false,
245: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
246: p_module_type IN VARCHAR2 := 'JSP',
247: p_req_resources IN Req_Resources_Rec,

Line 244: p_commit IN VARCHAR2 := FND_API.g_false,

240: --------------------------------------------------------------------
241: PROCEDURE Derive_Resource_Consum (
242: p_api_version IN NUMBER,
243: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
244: p_commit IN VARCHAR2 := FND_API.g_false,
245: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
246: p_module_type IN VARCHAR2 := 'JSP',
247: p_req_resources IN Req_Resources_Rec,
248: x_resource_con_tbl OUT NOCOPY Resource_Con_Tbl,

Line 245: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

241: PROCEDURE Derive_Resource_Consum (
242: p_api_version IN NUMBER,
243: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
244: p_commit IN VARCHAR2 := FND_API.g_false,
245: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
246: p_module_type IN VARCHAR2 := 'JSP',
247: p_req_resources IN Req_Resources_Rec,
248: x_resource_con_tbl OUT NOCOPY Resource_Con_Tbl,
249: x_return_status OUT NOCOPY VARCHAR2,

Line 276: IF FND_API.to_boolean(p_init_msg_list)

272: IF G_DEBUG='Y' THEN
273: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_resrc_levl_pub. derive resource consum','+RESLG+');
274: END IF;
275: -- Standard call to check for call compatibility.
276: IF FND_API.to_boolean(p_init_msg_list)
277: THEN
278: FND_MSG_PUB.initialize;
279: END IF;
280: -- Initialize API return status to success

Line 281: x_return_status := FND_API.G_RET_STS_SUCCESS;

277: THEN
278: FND_MSG_PUB.initialize;
279: END IF;
280: -- Initialize API return status to success
281: x_return_status := FND_API.G_RET_STS_SUCCESS;
282: -- Initialize message list if p_init_msg_list is set to TRUE.
283: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)

Line 283: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

279: END IF;
280: -- Initialize API return status to success
281: x_return_status := FND_API.G_RET_STS_SUCCESS;
282: -- Initialize message list if p_init_msg_list is set to TRUE.
283: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)
286: THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

283: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)
286: THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
288: END IF;
289: --------------------Start of API Body-----------------------------------
290:
291: IF (p_req_resources.org_name IS NOT NULL AND

Line 292: p_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN

288: END IF;
289: --------------------Start of API Body-----------------------------------
290:
291: IF (p_req_resources.org_name IS NOT NULL AND
292: p_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN
293: --
294: IF (p_req_resources.dept_name IS NOT NULL AND
295: p_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN
296: --

Line 295: p_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN

291: IF (p_req_resources.org_name IS NOT NULL AND
292: p_req_resources.org_name <> FND_API.G_MISS_CHAR) THEN
293: --
294: IF (p_req_resources.dept_name IS NOT NULL AND
295: p_req_resources.dept_name <> FND_API.G_MISS_CHAR) THEN
296: --
297: SELECT department_id INTO l_department_id
298: FROM BOM_DEPARTMENTS A, HR_ALL_ORGANIZATION_UNITS B
299: WHERE A.ORGANIZATION_ID = B.ORGANIZATION_ID

Line 306: RAISE Fnd_Api.G_EXC_ERROR;

302: --
303: IF l_department_id IS NULL THEN
304: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INVALID');
305: Fnd_Msg_Pub.ADD;
306: RAISE Fnd_Api.G_EXC_ERROR;
307: END IF;
308: ELSE
309: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_ID_NOT_EXIST');
310: Fnd_Msg_Pub.ADD;

Line 311: RAISE Fnd_Api.G_EXC_ERROR;

307: END IF;
308: ELSE
309: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_ID_NOT_EXIST');
310: Fnd_Msg_Pub.ADD;
311: RAISE Fnd_Api.G_EXC_ERROR;
312: END IF;
313: IF G_DEBUG='Y' THEN
314: AHL_DEBUG_PUB.debug( 'before public CallRID:'||p_req_resources.resource_id);
315: AHL_DEBUG_PUB.debug( 'before public CallRTY:'||p_req_resources.resource_type_meaning);

Line 379: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

375: l_msg_count := Fnd_Msg_Pub.count_msg;
376:
377: IF l_msg_count > 0 THEN
378: X_msg_count := l_msg_count;
379: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
380: RAISE Fnd_Api.G_EXC_ERROR;
381: END IF;
382:
383: --Standard check for commit

Line 380: RAISE Fnd_Api.G_EXC_ERROR;

376:
377: IF l_msg_count > 0 THEN
378: X_msg_count := l_msg_count;
379: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
380: RAISE Fnd_Api.G_EXC_ERROR;
381: END IF;
382:
383: --Standard check for commit
384: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 384: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

380: RAISE Fnd_Api.G_EXC_ERROR;
381: END IF;
382:
383: --Standard check for commit
384: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
385: COMMIT;
386: END IF;
387: -- Debug info
388: IF G_DEBUG='Y' THEN

Line 395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

391: Ahl_Debug_Pub.disable_debug;
392: END IF;
393:
394: EXCEPTION
395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
396: ROLLBACK TO derive_resource_consum;
397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
398: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
399: p_count => x_msg_count,

Line 397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

393:
394: EXCEPTION
395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
396: ROLLBACK TO derive_resource_consum;
397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
398: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
399: p_count => x_msg_count,
400: p_data => x_msg_data);
401: IF G_DEBUG='Y' THEN

Line 398: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

394: EXCEPTION
395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
396: ROLLBACK TO derive_resource_consum;
397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
398: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
399: p_count => x_msg_count,
400: p_data => x_msg_data);
401: IF G_DEBUG='Y' THEN
402:

Line 410: WHEN FND_API.G_EXC_ERROR THEN

406: -- Check if API is called in debug mode. If yes, disable debug.
407: AHL_DEBUG_PUB.disable_debug;
408: END IF;
409:
410: WHEN FND_API.G_EXC_ERROR THEN
411: ROLLBACK TO derive_resource_consum;
412: X_return_status := FND_API.G_RET_STS_ERROR;
413: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
414: p_count => x_msg_count,

Line 412: X_return_status := FND_API.G_RET_STS_ERROR;

408: END IF;
409:
410: WHEN FND_API.G_EXC_ERROR THEN
411: ROLLBACK TO derive_resource_consum;
412: X_return_status := FND_API.G_RET_STS_ERROR;
413: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
414: p_count => x_msg_count,
415: p_data => X_msg_data);
416: IF G_DEBUG='Y' THEN

Line 413: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

409:
410: WHEN FND_API.G_EXC_ERROR THEN
411: ROLLBACK TO derive_resource_consum;
412: X_return_status := FND_API.G_RET_STS_ERROR;
413: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
414: p_count => x_msg_count,
415: p_data => X_msg_data);
416: IF G_DEBUG='Y' THEN
417:

Line 428: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

424: END IF;
425:
426: WHEN OTHERS THEN
427: ROLLBACK TO derive_resource_consum;
428: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
429: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_RESRC_LEVL_PUB',
432: p_procedure_name => 'DERIVE_RESOURCE_CAPACITY',

Line 435: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

431: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_RESRC_LEVL_PUB',
432: p_procedure_name => 'DERIVE_RESOURCE_CAPACITY',
433: p_error_text => SUBSTR(SQLERRM,1,240));
434: END IF;
435: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
436: p_count => x_msg_count,
437: p_data => X_msg_data);
438: IF G_DEBUG='Y' THEN
439: