DBA Data[Home] [Help]

APPS.AHL_DI_PRO_TYPE_ASO_PUB dependencies on FND_API

Line 17: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,

13: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
14: PROCEDURE CREATE_DOC_TYPE_ASSOC
15: (
16: p_api_version IN NUMBER := 1.0 ,
17: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
18: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
19: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,

Line 18: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

14: PROCEDURE CREATE_DOC_TYPE_ASSOC
15: (
16: p_api_version IN NUMBER := 1.0 ,
17: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
18: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
19: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
22: p_module_type IN VARCHAR2 ,

Line 19: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,

15: (
16: p_api_version IN NUMBER := 1.0 ,
17: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
18: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
19: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
22: p_module_type IN VARCHAR2 ,
23: x_return_status OUT NOCOPY VARCHAR2 ,

Line 20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

16: p_api_version IN NUMBER := 1.0 ,
17: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
18: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
19: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
22: p_module_type IN VARCHAR2 ,
23: x_return_status OUT NOCOPY VARCHAR2 ,
24: x_msg_count OUT NOCOPY NUMBER ,

Line 59: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;

55: l_doc_sub_type_code VARCHAR2(30);
56: l_doc_type VARCHAR2(30) := 'AHL_DOC_TYPE';
57: l_sub_type VARCHAR2(30) := 'AHL_DOC_SUB_TYPE';
58: l_doc_type_assoc_tbl AHL_DI_PRO_TYPE_ASO_PVT.doc_type_assoc_tbl;
59: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
60:
61:
62:
63: BEGIN

Line 79: IF FND_API.to_boolean(l_init_msg_list)

75:
76: END IF;
77: END IF;
78: -- Standard call to check for call compatibility.
79: IF FND_API.to_boolean(l_init_msg_list)
80: THEN
81: FND_MSG_PUB.initialize;
82: END IF;
83: -- Initialize API return status to success

Line 86: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

82: END IF;
83: -- Initialize API return status to success
84: x_return_status := 'S';
85: -- Initialize message list if p_init_msg_list is set to TRUE.
86: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
87: p_api_version,
88: l_api_name,G_PKG_NAME)
89: THEN
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

86: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
87: p_api_version,
88: l_api_name,G_PKG_NAME)
89: THEN
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92: --Start of API Body
93: IF p_x_doc_type_assoc_tbl.count > 0
94: THEN

Line 176: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

172: l_msg_count := FND_MSG_PUB.count_msg;
173:
174: IF l_msg_count > 0 THEN
175: X_msg_count := l_msg_count;
176: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: ELSE

Line 178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

174: IF l_msg_count > 0 THEN
175: X_msg_count := l_msg_count;
176: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: ELSE
181: X_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;

Line 179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

175: X_msg_count := l_msg_count;
176: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: ELSE
181: X_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;
183: END IF;

Line 181: X_return_status := FND_API.G_RET_STS_ERROR;

177: THEN
178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: ELSE
181: X_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;
183: END IF;
184: END IF;
185: END LOOP;

Line 182: RAISE FND_API.G_EXC_ERROR;

178: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: ELSE
181: X_return_status := FND_API.G_RET_STS_ERROR;
182: RAISE FND_API.G_EXC_ERROR;
183: END IF;
184: END IF;
185: END LOOP;
186: END IF;

Line 217: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

213: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_CUHK.Create_Doc_Type_Assoc_PRE');
214:
215: END IF;
216:
217: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
218: RAISE FND_API.G_EXC_ERROR;
219: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;

Line 218: RAISE FND_API.G_EXC_ERROR;

214:
215: END IF;
216:
217: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
218: RAISE FND_API.G_EXC_ERROR;
219: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222: END IF;

Line 219: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

215: END IF;
216:
217: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
218: RAISE FND_API.G_EXC_ERROR;
219: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222: END IF;
223:

Line 220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

216:
217: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
218: RAISE FND_API.G_EXC_ERROR;
219: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222: END IF;
223:
224: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_PRO_TYPE_ASO_PUB','CREATE_DOC_TYPE_ASSOC',

Line 242: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

238: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_VUHK.Create_Doc_Type_Assoc_PRE');
239:
240: END IF;
241:
242: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
243: RAISE FND_API.G_EXC_ERROR;
244: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
245: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
246: END IF;

Line 243: RAISE FND_API.G_EXC_ERROR;

239:
240: END IF;
241:
242: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
243: RAISE FND_API.G_EXC_ERROR;
244: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
245: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
246: END IF;
247:

Line 244: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

240: END IF;
241:
242: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
243: RAISE FND_API.G_EXC_ERROR;
244: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
245: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
246: END IF;
247:
248: END IF;

Line 245: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

241:
242: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
243: RAISE FND_API.G_EXC_ERROR;
244: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
245: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
246: END IF;
247:
248: END IF;
249:

Line 275: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

271: l_msg_count := FND_MSG_PUB.count_msg;
272:
273: IF l_msg_count > 0 THEN
274: X_msg_count := l_msg_count;
275: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
276: THEN
277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: ELSE

Line 277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

273: IF l_msg_count > 0 THEN
274: X_msg_count := l_msg_count;
275: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
276: THEN
277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: ELSE
280: X_return_status := FND_API.G_RET_STS_ERROR;
281: RAISE FND_API.G_EXC_ERROR;

Line 278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

274: X_msg_count := l_msg_count;
275: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
276: THEN
277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: ELSE
280: X_return_status := FND_API.G_RET_STS_ERROR;
281: RAISE FND_API.G_EXC_ERROR;
282: END IF;

Line 280: X_return_status := FND_API.G_RET_STS_ERROR;

276: THEN
277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: ELSE
280: X_return_status := FND_API.G_RET_STS_ERROR;
281: RAISE FND_API.G_EXC_ERROR;
282: END IF;
283: ELSE
284: FOR i IN 1..l_doc_type_assoc_tbl.COUNT

Line 281: RAISE FND_API.G_EXC_ERROR;

277: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: ELSE
280: X_return_status := FND_API.G_RET_STS_ERROR;
281: RAISE FND_API.G_EXC_ERROR;
282: END IF;
283: ELSE
284: FOR i IN 1..l_doc_type_assoc_tbl.COUNT
285: LOOP

Line 319: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

315: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_VUHK.Create_Doc_Type_Assoc_POST');
316:
317: END IF;
318:
319: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
320: RAISE FND_API.G_EXC_ERROR;
321: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
323: END IF;

Line 320: RAISE FND_API.G_EXC_ERROR;

316:
317: END IF;
318:
319: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
320: RAISE FND_API.G_EXC_ERROR;
321: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
323: END IF;
324:

Line 321: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

317: END IF;
318:
319: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
320: RAISE FND_API.G_EXC_ERROR;
321: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
323: END IF;
324:
325:

Line 322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

318:
319: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
320: RAISE FND_API.G_EXC_ERROR;
321: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
323: END IF;
324:
325:
326: END IF;

Line 347: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

343: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_CUHK.Create_Doc_Type_Assoc_POST');
344:
345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
348: RAISE FND_API.G_EXC_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
350: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
351: END IF;

Line 348: RAISE FND_API.G_EXC_ERROR;

344:
345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
348: RAISE FND_API.G_EXC_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
350: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
351: END IF;
352:

Line 349: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

345: END IF;
346:
347: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
348: RAISE FND_API.G_EXC_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
350: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
351: END IF;
352:
353: END IF;

Line 350: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

346:
347: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
348: RAISE FND_API.G_EXC_ERROR;
349: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
350: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
351: END IF;
352:
353: END IF;
354:

Line 361: IF FND_API.TO_BOOLEAN(p_commit) THEN

357: /*---------------------------------------------------------*/
358:
359:
360: --Standard check for commit
361: IF FND_API.TO_BOOLEAN(p_commit) THEN
362: COMMIT;
363: END IF;
364: -- Debug info
365: IF G_DEBUG='Y' THEN

Line 376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

372:
373: END IF;
374:
375: EXCEPTION
376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
377: ROLLBACK TO create_doc_type_assoc;
378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
379: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
380: p_count => x_msg_count,

Line 378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

374:
375: EXCEPTION
376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
377: ROLLBACK TO create_doc_type_assoc;
378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
379: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
380: p_count => x_msg_count,
381: p_data => x_msg_data);
382: IF G_DEBUG='Y' THEN

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

375: EXCEPTION
376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
377: ROLLBACK TO create_doc_type_assoc;
378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
379: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
380: p_count => x_msg_count,
381: p_data => x_msg_data);
382: IF G_DEBUG='Y' THEN
383: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );

Line 392: WHEN FND_API.G_EXC_ERROR THEN

388: AHL_DEBUG_PUB.disable_debug;
389:
390: END IF;
391:
392: WHEN FND_API.G_EXC_ERROR THEN
393: ROLLBACK TO create_doc_type_assoc;
394: X_return_status := FND_API.G_RET_STS_ERROR;
395: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
396: p_count => x_msg_count,

Line 394: X_return_status := FND_API.G_RET_STS_ERROR;

390: END IF;
391:
392: WHEN FND_API.G_EXC_ERROR THEN
393: ROLLBACK TO create_doc_type_assoc;
394: X_return_status := FND_API.G_RET_STS_ERROR;
395: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
396: p_count => x_msg_count,
397: p_data => X_msg_data);
398: -- Debug info.

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

391:
392: WHEN FND_API.G_EXC_ERROR THEN
393: ROLLBACK TO create_doc_type_assoc;
394: X_return_status := FND_API.G_RET_STS_ERROR;
395: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
396: p_count => x_msg_count,
397: p_data => X_msg_data);
398: -- Debug info.
399: IF G_DEBUG='Y' THEN

Line 410: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

406: END IF;
407:
408: WHEN OTHERS THEN
409: ROLLBACK TO create_doc_type_assoc;
410: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
411: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
412: THEN
413: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_PRO_TYPE_ASO_PUB',
414: p_procedure_name => 'CREATE_DOC_TYPE_ASSOC',

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

413: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_PRO_TYPE_ASO_PUB',
414: p_procedure_name => 'CREATE_DOC_TYPE_ASSOC',
415: p_error_text => SUBSTR(SQLERRM,1,240));
416: END IF;
417: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
418: p_count => x_msg_count,
419: p_data => X_msg_data);
420:
421: -- Debug info.

Line 443: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,

439: /*---------------------------------------------------*/
440: PROCEDURE MODIFY_DOC_TYPE_ASSOC
441: (
442: p_api_version IN NUMBER := 1.0 ,
443: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
444: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
445: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
446: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
447: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,

Line 444: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

440: PROCEDURE MODIFY_DOC_TYPE_ASSOC
441: (
442: p_api_version IN NUMBER := 1.0 ,
443: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
444: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
445: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
446: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
447: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
448: p_module_type IN VARCHAR2 ,

Line 445: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,

441: (
442: p_api_version IN NUMBER := 1.0 ,
443: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
444: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
445: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
446: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
447: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
448: p_module_type IN VARCHAR2 ,
449: x_return_status OUT NOCOPY VARCHAR2 ,

Line 446: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

442: p_api_version IN NUMBER := 1.0 ,
443: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
444: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
445: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
446: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
447: p_x_doc_type_assoc_tbl IN OUT NOCOPY doc_type_assoc_tbl ,
448: p_module_type IN VARCHAR2 ,
449: x_return_status OUT NOCOPY VARCHAR2 ,
450: x_msg_count OUT NOCOPY NUMBER ,

Line 485: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;

481: l_doc_sub_type_code VARCHAR2(30);
482: l_doc_type VARCHAR2(30) := 'AHL_DOC_TYPE';
483: l_sub_type VARCHAR2(30) := 'AHL_DOC_SUB_TYPE';
484: l_doc_type_assoc_tbl AHL_DI_PRO_TYPE_ASO_PVT.doc_type_assoc_tbl;
485: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
486:
487:
488:
489: BEGIN

Line 505: IF FND_API.to_boolean(l_init_msg_list)

501:
502: END IF;
503: END IF;
504: -- Standard call to check for call compatibility.
505: IF FND_API.to_boolean(l_init_msg_list)
506: THEN
507: FND_MSG_PUB.initialize;
508: END IF;
509: -- Initialize API return status to success

Line 512: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

508: END IF;
509: -- Initialize API return status to success
510: x_return_status := 'S';
511: -- Initialize message list if p_init_msg_list is set to TRUE.
512: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
513: p_api_version,
514: l_api_name,G_PKG_NAME)
515: THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

512: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
513: p_api_version,
514: l_api_name,G_PKG_NAME)
515: THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518: --Start of API Body
519: IF p_x_doc_type_assoc_tbl.count > 0
520: THEN

Line 595: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

591: l_msg_count := FND_MSG_PUB.count_msg;
592:
593: IF l_msg_count > 0 THEN
594: X_msg_count := l_msg_count;
595: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
596: THEN
597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
599: ELSE

Line 597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

593: IF l_msg_count > 0 THEN
594: X_msg_count := l_msg_count;
595: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
596: THEN
597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
599: ELSE
600: X_return_status := FND_API.G_RET_STS_ERROR;
601: RAISE FND_API.G_EXC_ERROR;

Line 598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

594: X_msg_count := l_msg_count;
595: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
596: THEN
597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
599: ELSE
600: X_return_status := FND_API.G_RET_STS_ERROR;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;

Line 600: X_return_status := FND_API.G_RET_STS_ERROR;

596: THEN
597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
599: ELSE
600: X_return_status := FND_API.G_RET_STS_ERROR;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603: END IF;
604: END LOOP;

Line 601: RAISE FND_API.G_EXC_ERROR;

597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
598: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
599: ELSE
600: X_return_status := FND_API.G_RET_STS_ERROR;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603: END IF;
604: END LOOP;
605: END IF;

Line 636: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

632: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_CUHK.MODIFY_DOC_TYPE_ASSOC_PRE');
633:
634: END IF;
635:
636: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
637: RAISE FND_API.G_EXC_ERROR;
638: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;

Line 637: RAISE FND_API.G_EXC_ERROR;

633:
634: END IF;
635:
636: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
637: RAISE FND_API.G_EXC_ERROR;
638: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641:

Line 638: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

634: END IF;
635:
636: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
637: RAISE FND_API.G_EXC_ERROR;
638: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641:
642:

Line 639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

635:
636: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
637: RAISE FND_API.G_EXC_ERROR;
638: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641:
642:
643:

Line 664: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

660: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_VUHK.MODIFY_DOC_TYPE_ASSOC_PRE');
661:
662: END IF;
663:
664: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
665: RAISE FND_API.G_EXC_ERROR;
666: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;

Line 665: RAISE FND_API.G_EXC_ERROR;

661:
662: END IF;
663:
664: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
665: RAISE FND_API.G_EXC_ERROR;
666: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669: END IF;

Line 666: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

662: END IF;
663:
664: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
665: RAISE FND_API.G_EXC_ERROR;
666: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669: END IF;
670:

Line 667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

663:
664: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
665: RAISE FND_API.G_EXC_ERROR;
666: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669: END IF;
670:
671: /*---------------------------------------------------------*/

Line 695: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

691: l_msg_count := FND_MSG_PUB.count_msg;
692:
693: IF l_msg_count > 0 THEN
694: X_msg_count := l_msg_count;
695: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
696: THEN
697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: ELSE

Line 697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

693: IF l_msg_count > 0 THEN
694: X_msg_count := l_msg_count;
695: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
696: THEN
697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: ELSE
700: X_return_status := FND_API.G_RET_STS_ERROR;
701: RAISE FND_API.G_EXC_ERROR;

Line 698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

694: X_msg_count := l_msg_count;
695: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
696: THEN
697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: ELSE
700: X_return_status := FND_API.G_RET_STS_ERROR;
701: RAISE FND_API.G_EXC_ERROR;
702: END IF;

Line 700: X_return_status := FND_API.G_RET_STS_ERROR;

696: THEN
697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: ELSE
700: X_return_status := FND_API.G_RET_STS_ERROR;
701: RAISE FND_API.G_EXC_ERROR;
702: END IF;
703: END IF;
704:

Line 701: RAISE FND_API.G_EXC_ERROR;

697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: ELSE
700: X_return_status := FND_API.G_RET_STS_ERROR;
701: RAISE FND_API.G_EXC_ERROR;
702: END IF;
703: END IF;
704:
705:

Line 733: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

729: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_VUHK.MODIFY_DOC_TYPE_ASSOC_POST');
730:
731: END IF;
732:
733: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
734: RAISE FND_API.G_EXC_ERROR;
735: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;

Line 734: RAISE FND_API.G_EXC_ERROR;

730:
731: END IF;
732:
733: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
734: RAISE FND_API.G_EXC_ERROR;
735: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738:

Line 735: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

731: END IF;
732:
733: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
734: RAISE FND_API.G_EXC_ERROR;
735: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738:
739: END IF;

Line 736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

732:
733: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
734: RAISE FND_API.G_EXC_ERROR;
735: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738:
739: END IF;
740:

Line 759: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

755: AHL_DEBUG_PUB.debug( 'End AHL_DI_PRO_TYPE_ASO_CUHK.MODIFY_DOC_TYPE_ASSOC_POST');
756:
757: END IF;
758:
759: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
760: RAISE FND_API.G_EXC_ERROR;
761: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
763: END IF;

Line 760: RAISE FND_API.G_EXC_ERROR;

756:
757: END IF;
758:
759: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
760: RAISE FND_API.G_EXC_ERROR;
761: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
763: END IF;
764:

Line 761: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

757: END IF;
758:
759: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
760: RAISE FND_API.G_EXC_ERROR;
761: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
763: END IF;
764:
765:

Line 762: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

758:
759: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
760: RAISE FND_API.G_EXC_ERROR;
761: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
763: END IF;
764:
765:
766: END IF;

Line 777: IF FND_API.TO_BOOLEAN(p_commit) THEN

773:
774:
775:
776: --Standard check for commit
777: IF FND_API.TO_BOOLEAN(p_commit) THEN
778: COMMIT;
779: END IF;
780: -- Debug info
781: IF G_DEBUG='Y' THEN

Line 792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

788:
789: END IF;
790:
791: EXCEPTION
792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
793: ROLLBACK TO modify_doc_type_assoc;
794: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
796: p_count => x_msg_count,

Line 794: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

790:
791: EXCEPTION
792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
793: ROLLBACK TO modify_doc_type_assoc;
794: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
796: p_count => x_msg_count,
797: p_data => x_msg_data);
798: IF G_DEBUG='Y' THEN

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

791: EXCEPTION
792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
793: ROLLBACK TO modify_doc_type_assoc;
794: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
796: p_count => x_msg_count,
797: p_data => x_msg_data);
798: IF G_DEBUG='Y' THEN
799: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );

Line 808: WHEN FND_API.G_EXC_ERROR THEN

804: AHL_DEBUG_PUB.disable_debug;
805:
806: END IF;
807:
808: WHEN FND_API.G_EXC_ERROR THEN
809: ROLLBACK TO modify_doc_type_assoc;
810: X_return_status := FND_API.G_RET_STS_ERROR;
811: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
812: p_count => x_msg_count,

Line 810: X_return_status := FND_API.G_RET_STS_ERROR;

806: END IF;
807:
808: WHEN FND_API.G_EXC_ERROR THEN
809: ROLLBACK TO modify_doc_type_assoc;
810: X_return_status := FND_API.G_RET_STS_ERROR;
811: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
812: p_count => x_msg_count,
813: p_data => X_msg_data);
814: -- Debug info.

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

807:
808: WHEN FND_API.G_EXC_ERROR THEN
809: ROLLBACK TO modify_doc_type_assoc;
810: X_return_status := FND_API.G_RET_STS_ERROR;
811: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
812: p_count => x_msg_count,
813: p_data => X_msg_data);
814: -- Debug info.
815: IF G_DEBUG='Y' THEN

Line 827: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

823: END IF;
824:
825: WHEN OTHERS THEN
826: ROLLBACK TO modify_doc_type_assoc;
827: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
828: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
829: THEN
830: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_PRO_TYPE_ASO_PUB',
831: p_procedure_name => 'MODIFY_DOC_TYPE_ASSOC',

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

830: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_PRO_TYPE_ASO_PUB',
831: p_procedure_name => 'MODIFY_DOC_TYPE_ASSOC',
832: p_error_text => SUBSTR(SQLERRM,1,240));
833: END IF;
834: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
835: p_count => x_msg_count,
836: p_data => X_msg_data);
837:
838: -- Debug info.