DBA Data[Home] [Help]

APPS.AHL_DI_ASSO_DOC_ASO_PUB dependencies on FND_API

Line 43: x_return_status := FND_API.G_RET_STS_SUCCESS;

39: AND meaning = p_meaning
40: AND sysdate between start_date_active
41: AND nvl(end_date_active,sysdate);
42: END IF;
43: x_return_status := FND_API.G_RET_STS_SUCCESS;
44: EXCEPTION
45: WHEN no_data_found THEN
46: x_return_status := FND_API.G_RET_STS_ERROR;
47: WHEN too_many_rows THEN

Line 46: x_return_status := FND_API.G_RET_STS_ERROR;

42: END IF;
43: x_return_status := FND_API.G_RET_STS_SUCCESS;
44: EXCEPTION
45: WHEN no_data_found THEN
46: x_return_status := FND_API.G_RET_STS_ERROR;
47: WHEN too_many_rows THEN
48: x_return_status := FND_API.G_RET_STS_ERROR;
49: WHEN OTHERS THEN
50: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 48: x_return_status := FND_API.G_RET_STS_ERROR;

44: EXCEPTION
45: WHEN no_data_found THEN
46: x_return_status := FND_API.G_RET_STS_ERROR;
47: WHEN too_many_rows THEN
48: x_return_status := FND_API.G_RET_STS_ERROR;
49: WHEN OTHERS THEN
50: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
51: RAISE;
52: END;

Line 50: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

46: x_return_status := FND_API.G_RET_STS_ERROR;
47: WHEN too_many_rows THEN
48: x_return_status := FND_API.G_RET_STS_ERROR;
49: WHEN OTHERS THEN
50: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
51: RAISE;
52: END;
53: /*------------------------------------------------------*/
54: /* procedure name: create_association */

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

59:
60: PROCEDURE CREATE_ASSOCIATION
61: (
62: p_api_version IN NUMBER := 1.0 ,
63: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
64: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
65: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
66: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
67: p_x_association_tbl IN OUT NOCOPY association_tbl ,

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

60: PROCEDURE CREATE_ASSOCIATION
61: (
62: p_api_version IN NUMBER := 1.0 ,
63: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
64: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
65: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
66: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
67: p_x_association_tbl IN OUT NOCOPY association_tbl ,
68: p_module_type IN VARCHAR2 ,

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

61: (
62: p_api_version IN NUMBER := 1.0 ,
63: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
64: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
65: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
66: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
67: p_x_association_tbl IN OUT NOCOPY association_tbl ,
68: p_module_type IN VARCHAR2 ,
69: x_return_status OUT NOCOPY VARCHAR2 ,

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

62: p_api_version IN NUMBER := 1.0 ,
63: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
64: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
65: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
66: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
67: p_x_association_tbl IN OUT NOCOPY association_tbl ,
68: p_module_type IN VARCHAR2 ,
69: x_return_status OUT NOCOPY VARCHAR2 ,
70: x_msg_count OUT NOCOPY NUMBER ,

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

111: l_document_id NUMBER;
112: l_doc_revision_id NUMBER;
113: l_aso_object_type_code VARCHAR2(30);
114: l_association_tbl AHL_DI_ASSO_DOC_ASO_PVT.association_tbl;
115: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
116:
117: l_pre_V_msg_count NUMBER;
118: l_pre_V_msg_data VARCHAR2(2000);
119: l_pre_V_return_status VARCHAR2(1);

Line 152: IF FND_API.to_boolean(l_init_msg_list)

148:
149: END IF;
150: END IF;
151: -- Standard call to check for call compatibility.
152: IF FND_API.to_boolean(l_init_msg_list)
153: THEN
154: FND_MSG_PUB.initialize;
155: END IF;
156: -- Initialize API return status to success

Line 159: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

155: END IF;
156: -- Initialize API return status to success
157: x_return_status := 'S';
158: -- Initialize message list if p_init_msg_list is set to TRUE.
159: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
160: p_api_version,
161: l_api_name,G_PKG_NAME)
162: THEN
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

159: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
160: p_api_version,
161: l_api_name,G_PKG_NAME)
162: THEN
163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
164: END IF;
165: --Starts API Body
166: IF p_x_association_tbl.COUNT > 0
167: THEN

Line 178: (p_x_association_tbl(i).document_no = FND_API.G_MISS_CHAR)

174: END IF;
175:
176: --{{adharia-- bug #2450326 - added- 9/7/2002
177: IF (p_x_association_tbl(i).document_no IS NULL) OR
178: (p_x_association_tbl(i).document_no = FND_API.G_MISS_CHAR)
179: THEN
180: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOCUMENT_NO_NULL');
181: FND_MSG_PUB.ADD;
182: ELSE

Line 232: p_x_association_tbl(i).aso_object_desc <> FND_API.G_MISS_CHAR

228: END IF;
229: --}} adharia -- bug #2450326 - added- 9/7/2002
230: -- For Aso Object Type code, meaning presents
231: IF p_x_association_tbl(i).aso_object_desc IS NOT NULL AND
232: p_x_association_tbl(i).aso_object_desc <> FND_API.G_MISS_CHAR
233: THEN
234:
235: Check_lookup_name_Or_Id (
236: p_lookup_type => 'AHL_OBJECT_TYPE',

Line 251: p_x_association_tbl(i).aso_object_type_code <> FND_API.G_MISS_CHAR

247: END IF;
248: END IF;
249: -- If Type Code presents
250: IF p_x_association_tbl(i).aso_object_type_code IS NOT NULL AND
251: p_x_association_tbl(i).aso_object_type_code <> FND_API.G_MISS_CHAR
252: THEN
253: l_association_tbl(i).aso_object_type_code := p_x_association_tbl(i).aso_object_type_code;
254: --If both missing
255: ELSE

Line 291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

287: --Standard check to count messages
288: l_msg_count := FND_MSG_PUB.count_msg;
289: IF l_msg_count > 0 THEN
290: X_msg_count := l_msg_count;
291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
292: RAISE FND_API.G_EXC_ERROR;
293: END IF;
294: END LOOP;
295: END IF;

Line 292: RAISE FND_API.G_EXC_ERROR;

288: l_msg_count := FND_MSG_PUB.count_msg;
289: IF l_msg_count > 0 THEN
290: X_msg_count := l_msg_count;
291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
292: RAISE FND_API.G_EXC_ERROR;
293: END IF;
294: END LOOP;
295: END IF;
296:

Line 321: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN

317: AHL_DEBUG_PUB.debug( 'End of api Customer Create Association_Pre');
318:
319: END IF;
320:
321: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
322: RAISE FND_API.G_EXC_ERROR;
323: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;

Line 322: RAISE FND_API.G_EXC_ERROR;

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

Line 323: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

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

Line 324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

320:
321: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
322: RAISE FND_API.G_EXC_ERROR;
323: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;
326: END IF;
327:
328: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_ASSO_DOC_ASO_PUB','CREATE_ASSOCIATION',

Line 343: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN

339: IF G_DEBUG='Y' THEN
340: AHL_DEBUG_PUB.debug( 'End of api Vertical Create Association_Pre');
341:
342: END IF;
343: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
347: END IF;

Line 344: RAISE FND_API.G_EXC_ERROR;

340: AHL_DEBUG_PUB.debug( 'End of api Vertical Create Association_Pre');
341:
342: END IF;
343: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
347: END IF;
348: END IF;

Line 345: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

341:
342: END IF;
343: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
347: END IF;
348: END IF;
349: /*---------------------------------------------------------*/

Line 346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

342: END IF;
343: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
344: RAISE FND_API.G_EXC_ERROR;
345: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
347: END IF;
348: END IF;
349: /*---------------------------------------------------------*/
350: /* End ; Date : Dec 10 2001 */

Line 372: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

368: l_msg_count := FND_MSG_PUB.count_msg;
369:
370: IF l_msg_count > 0 THEN
371: X_msg_count := l_msg_count;
372: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
375:
376: --Assign values

Line 373: RAISE FND_API.G_EXC_ERROR;

369:
370: IF l_msg_count > 0 THEN
371: X_msg_count := l_msg_count;
372: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
375:
376: --Assign values
377: IF l_association_tbl.COUNT > 0

Line 407: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN

403: IF G_DEBUG='Y' THEN
404: AHL_DEBUG_PUB.debug( 'End of api Customer Create Association_Post');
405:
406: END IF;
407: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;

Line 408: RAISE FND_API.G_EXC_ERROR;

404: AHL_DEBUG_PUB.debug( 'End of api Customer Create Association_Post');
405:
406: END IF;
407: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412: END IF;

Line 409: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

405:
406: END IF;
407: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412: END IF;
413:

Line 410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

406: END IF;
407: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412: END IF;
413:
414: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_ASSO_DOC_ASO_PUB','CREATE_ASSOCIATION',

Line 429: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN

425: IF G_DEBUG='Y' THEN
426: AHL_DEBUG_PUB.debug( 'End of api Vertical Create Association_Post');
427:
428: END IF;
429: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
430: RAISE FND_API.G_EXC_ERROR;
431: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: END IF;

Line 430: RAISE FND_API.G_EXC_ERROR;

426: AHL_DEBUG_PUB.debug( 'End of api Vertical Create Association_Post');
427:
428: END IF;
429: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
430: RAISE FND_API.G_EXC_ERROR;
431: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: END IF;
434: END IF;

Line 431: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

427:
428: END IF;
429: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
430: RAISE FND_API.G_EXC_ERROR;
431: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: END IF;
434: END IF;
435:

Line 432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

428: END IF;
429: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
430: RAISE FND_API.G_EXC_ERROR;
431: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: END IF;
434: END IF;
435:
436: /*---------------------------------------------------------*/

Line 441: IF FND_API.TO_BOOLEAN(p_commit) THEN

437: /* End ; Date : Dec 10 2001 */
438: /*---------------------------------------------------------*/
439:
440: --Standard check for commit
441: IF FND_API.TO_BOOLEAN(p_commit) THEN
442: COMMIT;
443: END IF;
444: -- Debug info
445: IF G_DEBUG='Y' THEN

Line 456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

452:
453: END IF;
454:
455: EXCEPTION
456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
457: ROLLBACK TO create_association;
458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
459: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
460: p_count => x_msg_count,

Line 458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

454:
455: EXCEPTION
456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
457: ROLLBACK TO create_association;
458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
459: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
460: p_count => x_msg_count,
461: p_data => x_msg_data);
462: --Debug Info

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

455: EXCEPTION
456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
457: ROLLBACK TO create_association;
458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
459: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
460: p_count => x_msg_count,
461: p_data => x_msg_data);
462: --Debug Info
463: IF G_DEBUG='Y' THEN

Line 480: WHEN FND_API.G_EXC_ERROR THEN

476: AHL_DEBUG_PUB.disable_debug;
477:
478: END IF;
479:
480: WHEN FND_API.G_EXC_ERROR THEN
481: ROLLBACK TO create_association;
482: X_return_status := FND_API.G_RET_STS_ERROR;
483: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
484: p_count => l_msg_count,

Line 482: X_return_status := FND_API.G_RET_STS_ERROR;

478: END IF;
479:
480: WHEN FND_API.G_EXC_ERROR THEN
481: ROLLBACK TO create_association;
482: X_return_status := FND_API.G_RET_STS_ERROR;
483: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
484: p_count => l_msg_count,
485: p_data => X_msg_data);
486: x_msg_count := l_msg_count;

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

479:
480: WHEN FND_API.G_EXC_ERROR THEN
481: ROLLBACK TO create_association;
482: X_return_status := FND_API.G_RET_STS_ERROR;
483: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
484: p_count => l_msg_count,
485: p_data => X_msg_data);
486: x_msg_count := l_msg_count;
487:

Line 501: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

497:
498:
499: WHEN OTHERS THEN
500: ROLLBACK TO create_association;
501: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
503: THEN
504: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
505: p_procedure_name => 'CREATE_ASSOCIATION',

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

504: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
505: p_procedure_name => 'CREATE_ASSOCIATION',
506: p_error_text => SUBSTR(SQLERRM,1,240));
507: END IF;
508: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
509: p_count => l_msg_count,
510: p_data => X_msg_data);
511: x_msg_count := l_msg_count;
512: -- Debug info.

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

528: /*------------------------------------------------------*/
529: PROCEDURE MODIFY_ASSOCIATION
530: (
531: p_api_version IN NUMBER := 1.0 ,
532: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
533: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
534: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
535: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
536: p_x_association_tbl IN OUT NOCOPY association_tbl ,

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

529: PROCEDURE MODIFY_ASSOCIATION
530: (
531: p_api_version IN NUMBER := 1.0 ,
532: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
533: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
534: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
535: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
536: p_x_association_tbl IN OUT NOCOPY association_tbl ,
537: p_module_type IN VARCHAR2 ,

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

530: (
531: p_api_version IN NUMBER := 1.0 ,
532: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
533: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
534: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
535: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
536: p_x_association_tbl IN OUT NOCOPY association_tbl ,
537: p_module_type IN VARCHAR2 ,
538: x_return_status OUT NOCOPY VARCHAR2 ,

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

531: p_api_version IN NUMBER := 1.0 ,
532: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
533: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
534: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
535: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
536: p_x_association_tbl IN OUT NOCOPY association_tbl ,
537: p_module_type IN VARCHAR2 ,
538: x_return_status OUT NOCOPY VARCHAR2 ,
539: x_msg_count OUT NOCOPY NUMBER ,

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

580: l_aso_object_type_code VARCHAR2(30);
581: l_document_id NUMBER;
582: l_doc_revision_id NUMBER;
583: l_association_tbl AHL_DI_ASSO_DOC_ASO_PVT.association_tbl;
584: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
585:
586: l_pre_V_msg_count NUMBER;
587: l_pre_V_msg_data VARCHAR2(2000);
588: l_pre_V_return_status VARCHAR2(1);

Line 619: IF FND_API.to_boolean(l_init_msg_list)

615:
616: END IF;
617: END IF;
618: -- Standard call to check for call compatibility.
619: IF FND_API.to_boolean(l_init_msg_list)
620: THEN
621: FND_MSG_PUB.initialize;
622: END IF;
623: -- Initialize API return status to success

Line 626: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

622: END IF;
623: -- Initialize API return status to success
624: x_return_status := 'S';
625: -- Initialize message list if p_init_msg_list is set to TRUE.
626: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
627: p_api_version,
628: l_api_name,G_PKG_NAME)
629: THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

626: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
627: p_api_version,
628: l_api_name,G_PKG_NAME)
629: THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
632: --Starts API Body
633: IF p_x_association_tbl.COUNT > 0
634: THEN

Line 648: (p_x_association_tbl(i).document_no = FND_API.G_MISS_CHAR)

644: -- EDIT OPERATION ...START
645: IF (p_x_association_tbl(i).delete_flag <> 'Y')
646: THEN
647: IF (p_x_association_tbl(i).document_no IS NULL) OR
648: (p_x_association_tbl(i).document_no = FND_API.G_MISS_CHAR)
649: THEN
650: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOCUMENT_NO_NULL');
651: FND_MSG_PUB.ADD;
652: ELSE

Line 711: p_x_association_tbl(i).document_id = FND_API.G_MISS_NUM)

707: ELSIF (p_x_association_tbl(i).delete_flag = 'Y')
708: THEN
709: --For Document Id,
710: IF (p_x_association_tbl(i).document_id IS NULL OR
711: p_x_association_tbl(i).document_id = FND_API.G_MISS_NUM)
712: THEN
713:
714: -- If name is available
715: IF (p_x_association_tbl(i).document_no IS NOT NULL) AND

Line 716: (p_x_association_tbl(i).document_no <> FND_API.G_MISS_CHAR)

712: THEN
713:
714: -- If name is available
715: IF (p_x_association_tbl(i).document_no IS NOT NULL) AND
716: (p_x_association_tbl(i).document_no <> FND_API.G_MISS_CHAR)
717: THEN
718: OPEN get_doc_id_info(p_x_association_tbl(i).document_no);
719: FETCH get_doc_id_info INTO l_document_id;
720: IF get_doc_id_info%FOUND

Line 730: (p_x_association_tbl(i).document_id <> FND_API.G_MISS_NUM)

726: END IF;
727: CLOSE get_doc_id_info;
728: --If Document Id is present
729: ELSIF (p_x_association_tbl(i).document_id IS NOT NULL) AND
730: (p_x_association_tbl(i).document_id <> FND_API.G_MISS_NUM)
731: THEN
732: l_association_tbl(i).document_id := l_document_id;
733: ELSE
734: --Both Document Id and Name are missing

Line 742: p_x_association_tbl(i).doc_revision_id = FND_API.G_MISS_NUM

738:
739: --For Document Revision Id,
740: -- If Revision no is available
741: IF p_x_association_tbl(i).doc_revision_id IS NULL OR
742: p_x_association_tbl(i).doc_revision_id = FND_API.G_MISS_NUM
743: THEN
744: IF (p_x_association_tbl(i).revision_no IS NOT NULL) AND
745: (p_x_association_tbl(i).revision_no <> FND_API.G_MISS_CHAR)
746: THEN

Line 745: (p_x_association_tbl(i).revision_no <> FND_API.G_MISS_CHAR)

741: IF p_x_association_tbl(i).doc_revision_id IS NULL OR
742: p_x_association_tbl(i).doc_revision_id = FND_API.G_MISS_NUM
743: THEN
744: IF (p_x_association_tbl(i).revision_no IS NOT NULL) AND
745: (p_x_association_tbl(i).revision_no <> FND_API.G_MISS_CHAR)
746: THEN
747: OPEN get_doc_rev_id_info(p_x_association_tbl(i).revision_no,
748: l_document_id);
749: FETCH get_doc_rev_id_info INTO l_doc_revision_id;

Line 760: (p_x_association_tbl(i).doc_revision_id <> FND_API.G_MISS_NUM)

756: END IF;
757: CLOSE get_doc_rev_id_info;
758: --If Doc Revision Id is present
759: ELSIF (p_x_association_tbl(i).doc_revision_id IS NOT NULL) AND
760: (p_x_association_tbl(i).doc_revision_id <> FND_API.G_MISS_NUM)
761: THEN
762: l_association_tbl(i).doc_revision_id := l_doc_revision_id;
763: END IF;
764: END IF;

Line 770: p_x_association_tbl(i).aso_object_desc <> FND_API.G_MISS_CHAR

766: -- }}adharia -- bug #2450326 - added- 9/7/2002
767:
768: -- For Aso Object Type code, meaning presents
769: IF p_x_association_tbl(i).aso_object_desc IS NOT NULL AND
770: p_x_association_tbl(i).aso_object_desc <> FND_API.G_MISS_CHAR
771: THEN
772:
773: Check_lookup_name_Or_Id (
774: p_lookup_type => 'AHL_OBJECT_TYPE',

Line 789: p_x_association_tbl(i).aso_object_type_code <> FND_API.G_MISS_CHAR

785: END IF;
786: END IF;
787: -- If Type Code presents
788: IF p_x_association_tbl(i).aso_object_type_code IS NOT NULL AND
789: p_x_association_tbl(i).aso_object_type_code <> FND_API.G_MISS_CHAR
790: THEN
791: l_association_tbl(i).aso_object_type_code := p_x_association_tbl(i).aso_object_type_code;
792: --If both missing
793: ELSE

Line 831: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

827: l_msg_count := FND_MSG_PUB.count_msg;
828:
829: IF l_msg_count > 0 THEN
830: X_msg_count := l_msg_count;
831: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
832: RAISE FND_API.G_EXC_ERROR;
833: END IF;
834: END LOOP;
835: END IF;

Line 832: RAISE FND_API.G_EXC_ERROR;

828:
829: IF l_msg_count > 0 THEN
830: X_msg_count := l_msg_count;
831: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
832: RAISE FND_API.G_EXC_ERROR;
833: END IF;
834: END LOOP;
835: END IF;
836:

Line 857: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN

853: X_RETURN_STATUS => l_pre_C_return_status ,
854: X_MSG_COUNT => l_pre_C_msg_count ,
855: X_MSG_DATA => l_pre_C_msg_data );
856:
857: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
858: RAISE FND_API.G_EXC_ERROR;
859: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;

Line 858: RAISE FND_API.G_EXC_ERROR;

854: X_MSG_COUNT => l_pre_C_msg_count ,
855: X_MSG_DATA => l_pre_C_msg_data );
856:
857: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
858: RAISE FND_API.G_EXC_ERROR;
859: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862: END IF;

Line 859: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

855: X_MSG_DATA => l_pre_C_msg_data );
856:
857: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
858: RAISE FND_API.G_EXC_ERROR;
859: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862: END IF;
863:

Line 860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

856:
857: IF l_pre_C_return_status = FND_API.G_RET_STS_ERROR THEN
858: RAISE FND_API.G_EXC_ERROR;
859: ELSIF l_pre_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862: END IF;
863:
864: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_ASSO_DOC_ASO_PUB','MODIFY_ASSOCIATION',

Line 876: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN

872: X_RETURN_STATUS => l_pre_V_return_status ,
873: X_MSG_COUNT => l_pre_V_msg_count ,
874: X_MSG_DATA => l_pre_V_msg_data );
875:
876: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;

Line 877: RAISE FND_API.G_EXC_ERROR;

873: X_MSG_COUNT => l_pre_V_msg_count ,
874: X_MSG_DATA => l_pre_V_msg_data );
875:
876: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;

Line 878: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

874: X_MSG_DATA => l_pre_V_msg_data );
875:
876: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;
882:

Line 879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

875:
876: IF l_pre_V_return_status = FND_API.G_RET_STS_ERROR THEN
877: RAISE FND_API.G_EXC_ERROR;
878: ELSIF l_pre_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
880: END IF;
881: END IF;
882:
883: /*---------------------------------------------------------*/

Line 905: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

901: l_msg_count := FND_MSG_PUB.count_msg;
902:
903: IF l_msg_count > 0 THEN
904: X_msg_count := l_msg_count;
905: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
906: RAISE FND_API.G_EXC_ERROR;
907: END IF;
908:
909:

Line 906: RAISE FND_API.G_EXC_ERROR;

902:
903: IF l_msg_count > 0 THEN
904: X_msg_count := l_msg_count;
905: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
906: RAISE FND_API.G_EXC_ERROR;
907: END IF;
908:
909:
910: /*------------------------------------------------------------------------*/

Line 929: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN

925: X_RETURN_STATUS => l_post_C_return_status ,
926: X_MSG_COUNT => l_post_C_msg_count ,
927: X_MSG_DATA => l_post_C_msg_data );
928:
929: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
930: RAISE FND_API.G_EXC_ERROR;
931: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;

Line 930: RAISE FND_API.G_EXC_ERROR;

926: X_MSG_COUNT => l_post_C_msg_count ,
927: X_MSG_DATA => l_post_C_msg_data );
928:
929: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
930: RAISE FND_API.G_EXC_ERROR;
931: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934: END IF;

Line 931: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

927: X_MSG_DATA => l_post_C_msg_data );
928:
929: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
930: RAISE FND_API.G_EXC_ERROR;
931: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934: END IF;
935:

Line 932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

928:
929: IF l_post_C_return_status = FND_API.G_RET_STS_ERROR THEN
930: RAISE FND_API.G_EXC_ERROR;
931: ELSIF l_post_C_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934: END IF;
935:
936: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_ASSO_DOC_ASO_PUB','MODIFY_ASSOCIATION',

Line 948: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN

944: X_RETURN_STATUS => l_post_V_return_status ,
945: X_MSG_COUNT => l_post_V_msg_count ,
946: X_MSG_DATA => l_post_V_msg_data );
947:
948: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
949: RAISE FND_API.G_EXC_ERROR;
950: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
952: END IF;

Line 949: RAISE FND_API.G_EXC_ERROR;

945: X_MSG_COUNT => l_post_V_msg_count ,
946: X_MSG_DATA => l_post_V_msg_data );
947:
948: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
949: RAISE FND_API.G_EXC_ERROR;
950: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
952: END IF;
953: END IF;

Line 950: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

946: X_MSG_DATA => l_post_V_msg_data );
947:
948: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
949: RAISE FND_API.G_EXC_ERROR;
950: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
952: END IF;
953: END IF;
954:

Line 951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

947:
948: IF l_post_V_return_status = FND_API.G_RET_STS_ERROR THEN
949: RAISE FND_API.G_EXC_ERROR;
950: ELSIF l_post_V_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
951: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
952: END IF;
953: END IF;
954:
955: /*---------------------------------------------------------*/

Line 960: IF FND_API.TO_BOOLEAN(p_commit) THEN

956: /* End ; Date : Dec 10 2001 */
957: /*---------------------------------------------------------*/
958:
959: --Standard check for commit
960: IF FND_API.TO_BOOLEAN(p_commit) THEN
961: COMMIT;
962: END IF;
963: -- Debug info
964: IF G_DEBUG='Y' THEN

Line 975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

971:
972: END IF;
973:
974: EXCEPTION
975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
976: ROLLBACK TO modify_association;
977: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
978: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
979: p_count => x_msg_count,

Line 977: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

973:
974: EXCEPTION
975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
976: ROLLBACK TO modify_association;
977: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
978: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
979: p_count => x_msg_count,
980: p_data => x_msg_data);
981: --Debug Info

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

974: EXCEPTION
975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
976: ROLLBACK TO modify_association;
977: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
978: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
979: p_count => x_msg_count,
980: p_data => x_msg_data);
981: --Debug Info
982: IF G_DEBUG='Y' THEN

Line 991: WHEN FND_API.G_EXC_ERROR THEN

987: AHL_DEBUG_PUB.disable_debug;
988:
989: END IF;
990:
991: WHEN FND_API.G_EXC_ERROR THEN
992: ROLLBACK TO modify_association;
993: X_return_status := FND_API.G_RET_STS_ERROR;
994: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
995: p_count => x_msg_count,

Line 993: X_return_status := FND_API.G_RET_STS_ERROR;

989: END IF;
990:
991: WHEN FND_API.G_EXC_ERROR THEN
992: ROLLBACK TO modify_association;
993: X_return_status := FND_API.G_RET_STS_ERROR;
994: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
995: p_count => x_msg_count,
996: p_data => X_msg_data);
997: -- Debug info.

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

990:
991: WHEN FND_API.G_EXC_ERROR THEN
992: ROLLBACK TO modify_association;
993: X_return_status := FND_API.G_RET_STS_ERROR;
994: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
995: p_count => x_msg_count,
996: p_data => X_msg_data);
997: -- Debug info.
998: IF G_DEBUG='Y' THEN

Line 1009: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1005: END IF;
1006:
1007: WHEN OTHERS THEN
1008: ROLLBACK TO modify_association;
1009: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1010: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1011: THEN
1012: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
1013: p_procedure_name => 'MODIFY_ASSOCIATION',

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

1012: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
1013: p_procedure_name => 'MODIFY_ASSOCIATION',
1014: p_error_text => SUBSTR(SQLERRM,1,240));
1015: END IF;
1016: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1017: p_count => x_msg_count,
1018: p_data => X_msg_data);
1019:
1020: -- Debug info.

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

1031: ----------------------------PROCESS_ASSOCIATION------------------------------
1032: PROCEDURE PROCESS_ASSOCIATION
1033: (
1034: p_api_version IN NUMBER := 1.0 ,
1035: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1036: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1037: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1038: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1039: p_x_association_tblm IN OUT NOCOPY association_tbl ,

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

1032: PROCEDURE PROCESS_ASSOCIATION
1033: (
1034: p_api_version IN NUMBER := 1.0 ,
1035: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1036: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1037: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1038: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1039: p_x_association_tblm IN OUT NOCOPY association_tbl ,
1040: p_x_association_tblc IN OUT NOCOPY association_tbl ,

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

1033: (
1034: p_api_version IN NUMBER := 1.0 ,
1035: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1036: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1037: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1038: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1039: p_x_association_tblm IN OUT NOCOPY association_tbl ,
1040: p_x_association_tblc IN OUT NOCOPY association_tbl ,
1041: p_module_type IN VARCHAR2 ,

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

1034: p_api_version IN NUMBER := 1.0 ,
1035: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1036: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1037: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1038: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1039: p_x_association_tblm IN OUT NOCOPY association_tbl ,
1040: p_x_association_tblc IN OUT NOCOPY association_tbl ,
1041: p_module_type IN VARCHAR2 ,
1042: x_return_status OUT NOCOPY VARCHAR2 ,

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

1068: l_document_id NUMBER;
1069: l_doc_revision_id NUMBER;
1070: l_association_tbl AHL_DI_ASSO_DOC_ASO_PVT.association_tbl;
1071: l_association_tblc AHL_DI_ASSO_DOC_ASO_PVT.association_tbl;
1072: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
1073: l_pre_V_msg_count NUMBER;
1074: l_pre_V_msg_data VARCHAR2(2000);
1075: l_pre_V_return_status VARCHAR2(1);
1076: l_post_V_msg_count NUMBER;

Line 1101: IF FND_API.to_boolean(l_init_msg_list)

1097:
1098: END IF;
1099: END IF;
1100: -- Standard call to check for call compatibility.
1101: IF FND_API.to_boolean(l_init_msg_list)
1102: THEN
1103: FND_MSG_PUB.initialize;
1104: END IF;
1105: -- Initialize API return status to success

Line 1108: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

1104: END IF;
1105: -- Initialize API return status to success
1106: x_return_status := 'S';
1107: -- Initialize message list if p_init_msg_list is set to TRUE.
1108: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1109: p_api_version,
1110: l_api_name,G_PKG_NAME)
1111: THEN
1112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1108: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1109: p_api_version,
1110: l_api_name,G_PKG_NAME)
1111: THEN
1112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1113: END IF;
1114: --Starts API to modify Body
1115: IF p_x_association_tblm.COUNT > 0
1116: THEN

Line 1127: p_x_association_tblm(i).document_id <> FND_API.G_MISS_NUM)

1123: END IF;
1124:
1125: --For Document Id,
1126: IF (p_x_association_tblm(i).document_id IS NULL OR
1127: p_x_association_tblm(i).document_id <> FND_API.G_MISS_NUM)
1128: THEN
1129:
1130: -- If name is available
1131: IF (p_x_association_tblm(i).document_no IS NOT NULL) AND

Line 1132: (p_x_association_tblm(i).document_no <> FND_API.G_MISS_CHAR)

1128: THEN
1129:
1130: -- If name is available
1131: IF (p_x_association_tblm(i).document_no IS NOT NULL) AND
1132: (p_x_association_tblm(i).document_no <> FND_API.G_MISS_CHAR)
1133: THEN
1134: OPEN get_doc_id_info(p_x_association_tblm(i).document_no);
1135: FETCH get_doc_id_info INTO l_document_id;
1136: IF get_doc_id_info%FOUND

Line 1146: (p_x_association_tblm(i).document_id <> FND_API.G_MISS_NUM)

1142: END IF;
1143: CLOSE get_doc_id_info;
1144: --If Document Id is present
1145: ELSIF (p_x_association_tblm(i).document_id IS NOT NULL) AND
1146: (p_x_association_tblm(i).document_id <> FND_API.G_MISS_NUM)
1147: THEN
1148: l_association_tbl(i).document_id := l_document_id;
1149: ELSE
1150: --Both Document Id and Name are missing

Line 1157: p_x_association_tblm(i).doc_revision_id = FND_API.G_MISS_NUM

1153: END IF;
1154: --For Document Revision Id,
1155: -- If Revision no is available
1156: IF p_x_association_tblm(i).doc_revision_id IS NULL OR
1157: p_x_association_tblm(i).doc_revision_id = FND_API.G_MISS_NUM
1158: THEN
1159: IF (p_x_association_tblm(i).revision_no IS NOT NULL) AND
1160: (p_x_association_tblm(i).revision_no <> FND_API.G_MISS_CHAR)
1161: THEN

Line 1160: (p_x_association_tblm(i).revision_no <> FND_API.G_MISS_CHAR)

1156: IF p_x_association_tblm(i).doc_revision_id IS NULL OR
1157: p_x_association_tblm(i).doc_revision_id = FND_API.G_MISS_NUM
1158: THEN
1159: IF (p_x_association_tblm(i).revision_no IS NOT NULL) AND
1160: (p_x_association_tblm(i).revision_no <> FND_API.G_MISS_CHAR)
1161: THEN
1162: OPEN get_doc_rev_id_info(p_x_association_tblm(i).revision_no,
1163: l_document_id);
1164: FETCH get_doc_rev_id_info INTO l_doc_revision_id;

Line 1175: (p_x_association_tblm(i).doc_revision_id <> FND_API.G_MISS_NUM)

1171: END IF;
1172: CLOSE get_doc_rev_id_info;
1173: --If Doc Revision Id is present
1174: ELSIF (p_x_association_tblm(i).doc_revision_id IS NOT NULL) AND
1175: (p_x_association_tblm(i).doc_revision_id <> FND_API.G_MISS_NUM)
1176: THEN
1177: l_association_tbl(i).doc_revision_id := l_doc_revision_id;
1178: END IF;
1179: END IF;

Line 1182: p_x_association_tblm(i).aso_object_desc <> FND_API.G_MISS_CHAR

1178: END IF;
1179: END IF;
1180: -- For Aso Object Type code, meaning presents
1181: IF p_x_association_tblm(i).aso_object_desc IS NOT NULL AND
1182: p_x_association_tblm(i).aso_object_desc <> FND_API.G_MISS_CHAR
1183: THEN
1184:
1185: Check_lookup_name_Or_Id (
1186: p_lookup_type => 'AHL_OBJECT_TYPE',

Line 1201: p_x_association_tblm(i).aso_object_type_code <> FND_API.G_MISS_CHAR

1197: END IF;
1198: END IF;
1199: -- If Type Code presents
1200: IF p_x_association_tblm(i).aso_object_type_code IS NOT NULL AND
1201: p_x_association_tblm(i).aso_object_type_code <> FND_API.G_MISS_CHAR
1202: THEN
1203: l_association_tbl(i).aso_object_type_code := p_x_association_tblm(i).aso_object_type_code;
1204: --If both missing
1205: ELSE

Line 1210: p_x_association_tblm(i).source_ref_mean <> FND_API.G_MISS_CHAR

1206: l_association_tbl(i).aso_object_type_code := p_x_association_tblm(i).aso_object_type_code;
1207: END IF;
1208: -- For Source Ref Code, meaning presents
1209: IF p_x_association_tblm(i).source_ref_mean IS NOT NULL AND
1210: p_x_association_tblm(i).source_ref_mean <> FND_API.G_MISS_CHAR
1211: THEN
1212:
1213: Check_lookup_name_Or_Id (
1214: p_lookup_type => 'AHL_DI_SOURCE_REF',

Line 1230: p_x_association_tblm(i).source_ref_code <> FND_API.G_MISS_CHAR

1226: END IF;
1227:
1228: -- If Type Code presents
1229: IF p_x_association_tblm(i).source_ref_code IS NOT NULL AND
1230: p_x_association_tblm(i).source_ref_code <> FND_API.G_MISS_CHAR
1231: THEN
1232: l_association_tbl(i).source_ref_code := p_x_association_tblm(i).source_ref_code;
1233: --If both missing
1234: ELSE

Line 1273: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1269: l_msg_count := FND_MSG_PUB.count_msg;
1270:
1271: IF l_msg_count > 0 THEN
1272: X_msg_count := l_msg_count;
1273: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1274: RAISE FND_API.G_EXC_ERROR;
1275: END IF;
1276: END LOOP;
1277: END IF;

Line 1274: RAISE FND_API.G_EXC_ERROR;

1270:
1271: IF l_msg_count > 0 THEN
1272: X_msg_count := l_msg_count;
1273: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1274: RAISE FND_API.G_EXC_ERROR;
1275: END IF;
1276: END LOOP;
1277: END IF;
1278: IF G_DEBUG='Y' THEN

Line 1306: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1302: l_msg_count := FND_MSG_PUB.count_msg;
1303:
1304: IF l_msg_count > 0 THEN
1305: X_msg_count := l_msg_count;
1306: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1307: RAISE FND_API.G_EXC_ERROR;
1308: END IF;
1309: END IF;
1310: ---------------------------------CREATE PART OF CODE---------------------

Line 1307: RAISE FND_API.G_EXC_ERROR;

1303:
1304: IF l_msg_count > 0 THEN
1305: X_msg_count := l_msg_count;
1306: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1307: RAISE FND_API.G_EXC_ERROR;
1308: END IF;
1309: END IF;
1310: ---------------------------------CREATE PART OF CODE---------------------
1311: IF p_x_association_tblc.COUNT > 0

Line 1323: p_x_association_tblc(i).document_id = FND_API.G_MISS_NUM)

1319: END IF;
1320:
1321:
1322: IF (p_x_association_tblc(i).document_id IS NULL OR
1323: p_x_association_tblc(i).document_id = FND_API.G_MISS_NUM)
1324: THEN
1325:
1326: -- For Document Id, If docuemnt no is passed
1327: IF (p_x_association_tblc(i).document_no IS NOT NULL) AND

Line 1328: (p_x_association_tblc(i).document_no <> FND_API.G_MISS_CHAR)

1324: THEN
1325:
1326: -- For Document Id, If docuemnt no is passed
1327: IF (p_x_association_tblc(i).document_no IS NOT NULL) AND
1328: (p_x_association_tblc(i).document_no <> FND_API.G_MISS_CHAR)
1329: THEN
1330: OPEN get_doc_id_info(p_x_association_tblc(i).document_no);
1331: FETCH get_doc_id_info INTO l_document_id;
1332: IF get_doc_id_info%FOUND

Line 1347: (p_x_association_tblc(i).document_id <> FND_API.G_MISS_NUM)

1343: END IF;
1344:
1345: --If Document Id is present
1346: ELSIF (p_x_association_tblc(i).document_id IS NOT NULL) AND
1347: (p_x_association_tblc(i).document_id <> FND_API.G_MISS_NUM)
1348: THEN
1349: l_association_tblc(i).document_id := p_x_association_tblc(i).document_id;
1350: ELSE
1351: --Both Document Id and Name are missing

Line 1357: p_x_association_tblc(i).doc_revision_id = FND_API.G_MISS_NUM)

1353: FND_MSG_PUB.ADD;
1354: END IF;
1355: -- For Document Revision Id
1356: IF (p_x_association_tblc(i).doc_revision_id IS NULL OR
1357: p_x_association_tblc(i).doc_revision_id = FND_API.G_MISS_NUM)
1358: THEN
1359:
1360: -- If Revision No is available
1361: IF (p_x_association_tblc(i).revision_no IS NOT NULL) AND

Line 1362: (p_x_association_tblc(i).revision_no <> FND_API.G_MISS_CHAR)

1358: THEN
1359:
1360: -- If Revision No is available
1361: IF (p_x_association_tblc(i).revision_no IS NOT NULL) AND
1362: (p_x_association_tblc(i).revision_no <> FND_API.G_MISS_CHAR)
1363: THEN
1364:
1365: OPEN get_doc_rev_id_info(p_x_association_tblc(i).revision_no,
1366: l_document_id);

Line 1381: (p_x_association_tblc(i).doc_revision_id <> FND_API.G_MISS_NUM)

1377: l_association_tblc(i).doc_revision_id := p_x_association_tblc(i).doc_revision_id;
1378: END IF;
1379: --If Revision Id is present
1380: ELSIF (p_x_association_tblc(i).doc_revision_id IS NOT NULL) AND
1381: (p_x_association_tblc(i).doc_revision_id <> FND_API.G_MISS_NUM)
1382: THEN
1383: l_association_tblc(i).doc_revision_id := p_x_association_tblc(i).doc_revision_id;
1384: ELSE
1385: l_association_tblc(i).doc_revision_id := p_x_association_tblc(i).doc_revision_id;

Line 1390: p_x_association_tblc(i).aso_object_desc <> FND_API.G_MISS_CHAR

1386: END IF;
1387:
1388: -- For Aso Object Type code, meaning presents
1389: IF p_x_association_tblc(i).aso_object_desc IS NOT NULL AND
1390: p_x_association_tblc(i).aso_object_desc <> FND_API.G_MISS_CHAR
1391: THEN
1392:
1393: Check_lookup_name_Or_Id (
1394: p_lookup_type => 'AHL_OBJECT_TYPE',

Line 1409: p_x_association_tblc(i).aso_object_type_code <> FND_API.G_MISS_CHAR

1405: END IF;
1406: END IF;
1407: -- If Type Code presents
1408: IF p_x_association_tblc(i).aso_object_type_code IS NOT NULL AND
1409: p_x_association_tblc(i).aso_object_type_code <> FND_API.G_MISS_CHAR
1410: THEN
1411: l_association_tblc(i).aso_object_type_code := p_x_association_tblc(i).aso_object_type_code;
1412: --If both missing
1413: ELSE

Line 1419: p_x_association_tblc(i).source_ref_mean <> FND_API.G_MISS_CHAR

1415: FND_MSG_PUB.ADD;
1416: END IF;
1417: -- For Source Ref Code, meaning presents
1418: /* IF p_x_association_tblc(i).source_ref_mean IS NOT NULL AND
1419: p_x_association_tblc(i).source_ref_mean <> FND_API.G_MISS_CHAR
1420: THEN
1421:
1422: Check_lookup_name_Or_Id (
1423: p_lookup_type => 'AHL_DI_SOURCE_REF',

Line 1445: p_x_association_tblc(i).source_ref_code <> FND_API.G_MISS_CHAR

1441: END IF;
1442:
1443: -- If Type Code presents
1444: IF p_x_association_tblc(i).source_ref_code IS NOT NULL AND
1445: p_x_association_tblc(i).source_ref_code <> FND_API.G_MISS_CHAR
1446: THEN
1447: l_association_tbl(i).source_ref_code := p_x_association_tblc(i).source_ref_code;
1448: --If both missing
1449: ELSE

Line 1486: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1482: --Standard check to count messages
1483: l_msg_count := FND_MSG_PUB.count_msg;
1484: IF l_msg_count > 0 THEN
1485: X_msg_count := l_msg_count;
1486: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1487: RAISE FND_API.G_EXC_ERROR;
1488: END IF;
1489: END LOOP;
1490: END IF;

Line 1487: RAISE FND_API.G_EXC_ERROR;

1483: l_msg_count := FND_MSG_PUB.count_msg;
1484: IF l_msg_count > 0 THEN
1485: X_msg_count := l_msg_count;
1486: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1487: RAISE FND_API.G_EXC_ERROR;
1488: END IF;
1489: END LOOP;
1490: END IF;
1491:

Line 1522: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1518: l_msg_count := FND_MSG_PUB.count_msg;
1519:
1520: IF l_msg_count > 0 THEN
1521: X_msg_count := l_msg_count;
1522: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: RAISE FND_API.G_EXC_ERROR;
1524: END IF;
1525:
1526: --Assign values

Line 1523: RAISE FND_API.G_EXC_ERROR;

1519:
1520: IF l_msg_count > 0 THEN
1521: X_msg_count := l_msg_count;
1522: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: RAISE FND_API.G_EXC_ERROR;
1524: END IF;
1525:
1526: --Assign values
1527: IF l_association_tblc.COUNT > 0

Line 1537: IF FND_API.TO_BOOLEAN(p_commit) THEN

1533: END IF;
1534: END IF;
1535: --
1536: --Standard check for commit
1537: IF FND_API.TO_BOOLEAN(p_commit) THEN
1538: COMMIT;
1539: END IF;
1540: -- Debug info
1541: IF G_DEBUG='Y' THEN

Line 1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1548:
1549: END IF;
1550:
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: ROLLBACK TO PROCESS_association;
1554: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1555: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1556: p_count => x_msg_count,

Line 1554: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1550:
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: ROLLBACK TO PROCESS_association;
1554: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1555: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1556: p_count => x_msg_count,
1557: p_data => x_msg_data);
1558: --Debug Info

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

1551: EXCEPTION
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: ROLLBACK TO PROCESS_association;
1554: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1555: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1556: p_count => x_msg_count,
1557: p_data => x_msg_data);
1558: --Debug Info
1559: IF G_DEBUG='Y' THEN

Line 1570: WHEN FND_API.G_EXC_ERROR THEN

1566: END IF;
1567:
1568:
1569:
1570: WHEN FND_API.G_EXC_ERROR THEN
1571: ROLLBACK TO PROCESS_association;
1572: X_return_status := FND_API.G_RET_STS_ERROR;
1573: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1574: p_count => x_msg_count,

Line 1572: X_return_status := FND_API.G_RET_STS_ERROR;

1568:
1569:
1570: WHEN FND_API.G_EXC_ERROR THEN
1571: ROLLBACK TO PROCESS_association;
1572: X_return_status := FND_API.G_RET_STS_ERROR;
1573: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1574: p_count => x_msg_count,
1575: p_data => X_msg_data);
1576: -- Debug info.

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

1569:
1570: WHEN FND_API.G_EXC_ERROR THEN
1571: ROLLBACK TO PROCESS_association;
1572: X_return_status := FND_API.G_RET_STS_ERROR;
1573: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1574: p_count => x_msg_count,
1575: p_data => X_msg_data);
1576: -- Debug info.
1577: IF G_DEBUG='Y' THEN

Line 1588: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1584: END IF;
1585:
1586: WHEN OTHERS THEN
1587: ROLLBACK TO PROCESS_association;
1588: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1589: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1590: THEN
1591: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
1592: p_procedure_name => 'PROCESS_ASSOCIATION',

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

1591: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_ASO_PUB',
1592: p_procedure_name => 'PROCESS_ASSOCIATION',
1593: p_error_text => SUBSTR(SQLERRM,1,240));
1594: END IF;
1595: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1596: p_count => x_msg_count,
1597: p_data => X_msg_data);
1598:
1599: -- Debug info.