eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_DI_DOC_REVISION_PUB dependencies on FND_API

Line 42: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 45: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 47: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 49: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

57: /*---------------------------------------------------*/
58: PROCEDURE CREATE_REVISION
59: (
60: p_api_version IN NUMBER := 1.0 ,
61: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
62: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
63: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
64: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
65: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,

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

58: PROCEDURE CREATE_REVISION
59: (
60: p_api_version IN NUMBER := 1.0 ,
61: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
62: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
63: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
64: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
65: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
66: p_module_type IN VARCHAR2 ,

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

59: (
60: p_api_version IN NUMBER := 1.0 ,
61: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
62: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
63: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
64: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
65: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
66: p_module_type IN VARCHAR2 ,
67: x_return_status OUT NOCOPY VARCHAR2 ,

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

60: p_api_version IN NUMBER := 1.0 ,
61: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
62: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
63: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
64: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
65: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
66: p_module_type IN VARCHAR2 ,
67: x_return_status OUT NOCOPY VARCHAR2 ,
68: x_msg_count OUT NOCOPY NUMBER ,

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

137: l_revision_status_type VARCHAR2(30) := 'AHL_REVISION_STATUS_TYPE';
138: l_revision_type VARCHAR2(30) := 'AHL_REVISION_TYPE';
139: l_approved_by_party_id NUMBER;
140: l_revision_tbl AHL_DI_DOC_REVISION_PVT.revision_tbl;
141: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
142: l_sysdate DATE;
143:
144:
145: BEGIN

Line 161: IF FND_API.to_boolean(l_init_msg_list)

157:
158: END IF;
159: END IF;
160: -- Standard call to check for call compatibility.
161: IF FND_API.to_boolean(l_init_msg_list)
162: THEN
163: FND_MSG_PUB.initialize;
164: END IF;
165: -- Initialize API return status to success

Line 168: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

164: END IF;
165: -- Initialize API return status to success
166: x_return_status := 'S';
167: -- Initialize message list if p_init_msg_list is set to TRUE.
168: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
169: p_api_version,
170: l_api_name,G_PKG_NAME)
171: THEN
172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

168: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
169: p_api_version,
170: l_api_name,G_PKG_NAME)
171: THEN
172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
173: END IF;
174:
175: --Start of API Body
176: IF p_x_revision_tbl.COUNT > 0

Line 504: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

500: l_msg_count := FND_MSG_PUB.count_msg;
501:
502: IF l_msg_count > 0 THEN
503: X_msg_count := l_msg_count;
504: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
505: THEN
506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: ELSE

Line 506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

502: IF l_msg_count > 0 THEN
503: X_msg_count := l_msg_count;
504: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
505: THEN
506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: ELSE
509: X_return_status := FND_API.G_RET_STS_ERROR;
510: RAISE FND_API.G_EXC_ERROR;

Line 507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

503: X_msg_count := l_msg_count;
504: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
505: THEN
506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: ELSE
509: X_return_status := FND_API.G_RET_STS_ERROR;
510: RAISE FND_API.G_EXC_ERROR;
511: END IF;

Line 509: X_return_status := FND_API.G_RET_STS_ERROR;

505: THEN
506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: ELSE
509: X_return_status := FND_API.G_RET_STS_ERROR;
510: RAISE FND_API.G_EXC_ERROR;
511: END IF;
512: END IF;
513: END LOOP;

Line 510: RAISE FND_API.G_EXC_ERROR;

506: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: ELSE
509: X_return_status := FND_API.G_RET_STS_ERROR;
510: RAISE FND_API.G_EXC_ERROR;
511: END IF;
512: END IF;
513: END LOOP;
514: END IF;

Line 550: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

546:
547: END IF;
548:
549:
550: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
551: RAISE FND_API.G_EXC_ERROR;
552: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: END IF;

Line 551: RAISE FND_API.G_EXC_ERROR;

547: END IF;
548:
549:
550: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
551: RAISE FND_API.G_EXC_ERROR;
552: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: END IF;
555: END IF;

Line 552: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

548:
549:
550: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
551: RAISE FND_API.G_EXC_ERROR;
552: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: END IF;
555: END IF;
556:

Line 553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

549:
550: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
551: RAISE FND_API.G_EXC_ERROR;
552: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
554: END IF;
555: END IF;
556:
557: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',

Line 576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

572: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_VUHK.CREATE_REVISION_PRE');
573:
574: END IF;
575:
576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
577: RAISE FND_API.G_EXC_ERROR;
578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END IF;

Line 577: RAISE FND_API.G_EXC_ERROR;

573:
574: END IF;
575:
576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
577: RAISE FND_API.G_EXC_ERROR;
578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END IF;
581:

Line 578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

574: END IF;
575:
576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
577: RAISE FND_API.G_EXC_ERROR;
578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END IF;
581:
582:

Line 579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

575:
576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
577: RAISE FND_API.G_EXC_ERROR;
578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END IF;
581:
582:
583:

Line 612: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

608: l_msg_count := FND_MSG_PUB.count_msg;
609:
610: IF l_msg_count > 0 THEN
611: X_msg_count := l_msg_count;
612: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
613: THEN
614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: ELSE

Line 614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

610: IF l_msg_count > 0 THEN
611: X_msg_count := l_msg_count;
612: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
613: THEN
614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: ELSE
617: X_return_status := FND_API.G_RET_STS_ERROR;
618: RAISE FND_API.G_EXC_ERROR;

Line 615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

611: X_msg_count := l_msg_count;
612: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
613: THEN
614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: ELSE
617: X_return_status := FND_API.G_RET_STS_ERROR;
618: RAISE FND_API.G_EXC_ERROR;
619: END IF;

Line 617: X_return_status := FND_API.G_RET_STS_ERROR;

613: THEN
614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: ELSE
617: X_return_status := FND_API.G_RET_STS_ERROR;
618: RAISE FND_API.G_EXC_ERROR;
619: END IF;
620: ELSE
621: FOR i IN 1..l_revision_tbl.COUNT

Line 618: RAISE FND_API.G_EXC_ERROR;

614: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: ELSE
617: X_return_status := FND_API.G_RET_STS_ERROR;
618: RAISE FND_API.G_EXC_ERROR;
619: END IF;
620: ELSE
621: FOR i IN 1..l_revision_tbl.COUNT
622: LOOP

Line 657: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

653: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_VUHK.CREATE_REVISION_POST');
654:
655: END IF;
656:
657: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
658: RAISE FND_API.G_EXC_ERROR;
659: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
661: END IF;

Line 658: RAISE FND_API.G_EXC_ERROR;

654:
655: END IF;
656:
657: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
658: RAISE FND_API.G_EXC_ERROR;
659: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
661: END IF;
662:

Line 659: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

655: END IF;
656:
657: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
658: RAISE FND_API.G_EXC_ERROR;
659: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
661: END IF;
662:
663: END IF;

Line 660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

656:
657: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
658: RAISE FND_API.G_EXC_ERROR;
659: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
661: END IF;
662:
663: END IF;
664:

Line 685: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

681: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_CUHK.CREATE_REVISION_POST');
682:
683: END IF;
684:
685: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;

Line 686: RAISE FND_API.G_EXC_ERROR;

682:
683: END IF;
684:
685: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690:

Line 687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

683: END IF;
684:
685: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690:
691: END IF;

Line 688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

684:
685: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690:
691: END IF;
692:

Line 702: IF FND_API.TO_BOOLEAN(p_commit) THEN

698:
699:
700:
701: -- Standard check of p_commit.
702: IF FND_API.TO_BOOLEAN(p_commit) THEN
703: COMMIT;
704: END IF;
705: -- Debug info
706: IF G_DEBUG='Y' THEN

Line 718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

714: END IF;
715:
716: x_msg_data := 'tHIS IS A cHECK'||TO_CHAR(p_x_revision_tbl(1).approved_by_party_id);
717: EXCEPTION
718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
719: ROLLBACK TO create_revision;
720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
721: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
722: p_count => x_msg_count,

Line 720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

716: x_msg_data := 'tHIS IS A cHECK'||TO_CHAR(p_x_revision_tbl(1).approved_by_party_id);
717: EXCEPTION
718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
719: ROLLBACK TO create_revision;
720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
721: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
722: p_count => x_msg_count,
723: p_data => x_msg_data);
724: IF G_DEBUG='Y' THEN

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

717: EXCEPTION
718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
719: ROLLBACK TO create_revision;
720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
721: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
722: p_count => x_msg_count,
723: p_data => x_msg_data);
724: IF G_DEBUG='Y' THEN
725: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );

Line 734: WHEN FND_API.G_EXC_ERROR THEN

730: AHL_DEBUG_PUB.disable_debug;
731:
732: END IF;
733:
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO create_revision;
736: X_return_status := FND_API.G_RET_STS_ERROR;
737: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
738: p_count => x_msg_count,

Line 736: X_return_status := FND_API.G_RET_STS_ERROR;

732: END IF;
733:
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO create_revision;
736: X_return_status := FND_API.G_RET_STS_ERROR;
737: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
738: p_count => x_msg_count,
739: p_data => X_msg_data);
740: -- Debug info.

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

733:
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO create_revision;
736: X_return_status := FND_API.G_RET_STS_ERROR;
737: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
738: p_count => x_msg_count,
739: p_data => X_msg_data);
740: -- Debug info.
741: IF G_DEBUG='Y' THEN

Line 754: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

750:
751:
752: WHEN OTHERS THEN
753: ROLLBACK TO create_revision;
754: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
755: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
756: THEN
757: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',
758: p_procedure_name => 'CREATE_REVISION',

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

757: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',
758: p_procedure_name => 'CREATE_REVISION',
759: p_error_text => SUBSTR(SQLERRM,1,240));
760: END IF;
761: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
762: p_count => x_msg_count,
763: p_data => X_msg_data);
764: -- Debug info.
765: IF G_DEBUG='Y' THEN

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

780:
781: PROCEDURE MODIFY_REVISION
782: (
783: p_api_version IN NUMBER := 1.0 ,
784: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
785: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
786: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
787: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
788: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,

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

781: PROCEDURE MODIFY_REVISION
782: (
783: p_api_version IN NUMBER := 1.0 ,
784: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
785: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
786: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
787: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
788: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
789: p_module_type IN VARCHAR2,

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

782: (
783: p_api_version IN NUMBER := 1.0 ,
784: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
785: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
786: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
787: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
788: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
789: p_module_type IN VARCHAR2,
790: x_return_status OUT NOCOPY VARCHAR2 ,

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

783: p_api_version IN NUMBER := 1.0 ,
784: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
785: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
786: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
787: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
788: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
789: p_module_type IN VARCHAR2,
790: x_return_status OUT NOCOPY VARCHAR2 ,
791: x_msg_count OUT NOCOPY NUMBER ,

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

857: l_media_type_code VARCHAR2(30);
858: l_revision_status_code VARCHAR2(30);
859: l_approved_by_party_id NUMBER;
860: l_revision_tbl AHL_DI_DOC_REVISION_PVT.revision_tbl;
861: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
862: l_sysdate DATE;
863: l_current_revision_date DATE;
864:
865:

Line 882: IF FND_API.to_boolean(l_init_msg_list)

878:
879: END IF;
880: END IF;
881: -- Standard call to check for call compatibility.
882: IF FND_API.to_boolean(l_init_msg_list)
883: THEN
884: FND_MSG_PUB.initialize;
885: END IF;
886: -- Initialize API return status to success

Line 889: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

885: END IF;
886: -- Initialize API return status to success
887: x_return_status := 'S';
888: -- Initialize message list if p_init_msg_list is set to TRUE.
889: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
890: p_api_version,
891: l_api_name,G_PKG_NAME)
892: THEN
893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

889: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
890: p_api_version,
891: l_api_name,G_PKG_NAME)
892: THEN
893: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
894: END IF;
895: --Start API Body
896: IF p_x_revision_tbl.COUNT > 0
897: THEN

Line 1063: IF p_x_revision_tbl(i).revision_date IS NULL OR p_x_revision_tbl(i).revision_date = FND_API.G_MISS_DATE

1059: --validations put for enhancements
1060: -- Enhancement no #2027019: pbarman : April 2003
1061: --if rev date is null then rev date = sysdate.
1062:
1063: IF p_x_revision_tbl(i).revision_date IS NULL OR p_x_revision_tbl(i).revision_date = FND_API.G_MISS_DATE
1064: THEN
1065: FND_MESSAGE.SET_NAME('AHL','AHL_DI_REVDT_NULL');
1066: FND_MSG_PUB.ADD;
1067: ELSE

Line 1231: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

1227: l_msg_count := FND_MSG_PUB.count_msg;
1228:
1229: IF l_msg_count > 0 THEN
1230: X_msg_count := l_msg_count;
1231: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1232: THEN
1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: ELSE

Line 1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1229: IF l_msg_count > 0 THEN
1230: X_msg_count := l_msg_count;
1231: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1232: THEN
1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: ELSE
1236: X_return_status := FND_API.G_RET_STS_ERROR;
1237: RAISE FND_API.G_EXC_ERROR;

Line 1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1230: X_msg_count := l_msg_count;
1231: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1232: THEN
1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: ELSE
1236: X_return_status := FND_API.G_RET_STS_ERROR;
1237: RAISE FND_API.G_EXC_ERROR;
1238: END IF;

Line 1236: X_return_status := FND_API.G_RET_STS_ERROR;

1232: THEN
1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: ELSE
1236: X_return_status := FND_API.G_RET_STS_ERROR;
1237: RAISE FND_API.G_EXC_ERROR;
1238: END IF;
1239: END IF;
1240: END LOOP;

Line 1237: RAISE FND_API.G_EXC_ERROR;

1233: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1235: ELSE
1236: X_return_status := FND_API.G_RET_STS_ERROR;
1237: RAISE FND_API.G_EXC_ERROR;
1238: END IF;
1239: END IF;
1240: END LOOP;
1241: END IF;

Line 1275: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1271: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_CUHK.MODIFY_REVISION_PRE');
1272:
1273: END IF;
1274:
1275: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1276: RAISE FND_API.G_EXC_ERROR;
1277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;

Line 1276: RAISE FND_API.G_EXC_ERROR;

1272:
1273: END IF;
1274:
1275: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1276: RAISE FND_API.G_EXC_ERROR;
1277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;
1280: END IF;

Line 1277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1273: END IF;
1274:
1275: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1276: RAISE FND_API.G_EXC_ERROR;
1277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;
1280: END IF;
1281:

Line 1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1274:
1275: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1276: RAISE FND_API.G_EXC_ERROR;
1277: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;
1280: END IF;
1281:
1282: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',

Line 1297: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1293: X_MSG_COUNT => l_msg_count ,
1294: X_MSG_DATA => l_msg_data );
1295:
1296:
1297: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1298: RAISE FND_API.G_EXC_ERROR;
1299: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;

Line 1298: RAISE FND_API.G_EXC_ERROR;

1294: X_MSG_DATA => l_msg_data );
1295:
1296:
1297: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1298: RAISE FND_API.G_EXC_ERROR;
1299: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: IF G_DEBUG='Y' THEN

Line 1299: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1295:
1296:
1297: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1298: RAISE FND_API.G_EXC_ERROR;
1299: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: IF G_DEBUG='Y' THEN
1303: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_VUHK.MODIFY_REVISION_PRE');

Line 1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1296:
1297: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1298: RAISE FND_API.G_EXC_ERROR;
1299: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: IF G_DEBUG='Y' THEN
1303: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_VUHK.MODIFY_REVISION_PRE');
1304:

Line 1332: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

1328: l_msg_count := FND_MSG_PUB.count_msg;
1329:
1330: IF l_msg_count > 0 THEN
1331: X_msg_count := l_msg_count;
1332: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1333: THEN
1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSE

Line 1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1330: IF l_msg_count > 0 THEN
1331: X_msg_count := l_msg_count;
1332: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1333: THEN
1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSE
1337: X_return_status := FND_API.G_RET_STS_ERROR;
1338: RAISE FND_API.G_EXC_ERROR;

Line 1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1331: X_msg_count := l_msg_count;
1332: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
1333: THEN
1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSE
1337: X_return_status := FND_API.G_RET_STS_ERROR;
1338: RAISE FND_API.G_EXC_ERROR;
1339: END IF;

Line 1337: X_return_status := FND_API.G_RET_STS_ERROR;

1333: THEN
1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSE
1337: X_return_status := FND_API.G_RET_STS_ERROR;
1338: RAISE FND_API.G_EXC_ERROR;
1339: END IF;
1340: END IF;
1341:

Line 1338: RAISE FND_API.G_EXC_ERROR;

1334: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSE
1337: X_return_status := FND_API.G_RET_STS_ERROR;
1338: RAISE FND_API.G_EXC_ERROR;
1339: END IF;
1340: END IF;
1341:
1342:

Line 1373: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1369: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_VUHK.MODIFY_REVISION_POST');
1370:
1371: END IF;
1372:
1373: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1377: END IF;

Line 1374: RAISE FND_API.G_EXC_ERROR;

1370:
1371: END IF;
1372:
1373: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1377: END IF;
1378:

Line 1375: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1371: END IF;
1372:
1373: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1377: END IF;
1378:
1379:

Line 1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1372:
1373: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1377: END IF;
1378:
1379:
1380: END IF;

Line 1401: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1397: AHL_DEBUG_PUB.debug( 'End AHL_DI_DOC_REVISION_CUHK.MODIFY_REVISION_POST');
1398:
1399: END IF;
1400:
1401: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1405: END IF;

Line 1402: RAISE FND_API.G_EXC_ERROR;

1398:
1399: END IF;
1400:
1401: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1405: END IF;
1406:

Line 1403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1399: END IF;
1400:
1401: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1405: END IF;
1406:
1407: END IF;

Line 1404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1400:
1401: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1405: END IF;
1406:
1407: END IF;
1408:

Line 1417: IF FND_API.TO_BOOLEAN(p_commit) THEN

1413:
1414:
1415:
1416: -- Standard check of p_commit.
1417: IF FND_API.TO_BOOLEAN(p_commit) THEN
1418: COMMIT;
1419: END IF;
1420: -- Debug info
1421: IF G_DEBUG='Y' THEN

Line 1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1430:
1431: x_msg_data := 'tHIS IS A cHECK'||TO_CHAR(p_x_revision_tbl(1).approved_by_party_id);
1432:
1433: EXCEPTION
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: ROLLBACK TO modify_revision;
1436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1437: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1438: p_count => x_msg_count,

Line 1436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1432:
1433: EXCEPTION
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: ROLLBACK TO modify_revision;
1436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1437: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1438: p_count => x_msg_count,
1439: p_data => x_msg_data);
1440: IF G_DEBUG='Y' THEN

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

1433: EXCEPTION
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: ROLLBACK TO modify_revision;
1436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1437: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1438: p_count => x_msg_count,
1439: p_data => x_msg_data);
1440: IF G_DEBUG='Y' THEN
1441: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );

Line 1449: WHEN FND_API.G_EXC_ERROR THEN

1445: AHL_DEBUG_PUB.disable_debug;
1446:
1447: END IF;
1448:
1449: WHEN FND_API.G_EXC_ERROR THEN
1450: ROLLBACK TO modify_revision;
1451: X_return_status := FND_API.G_RET_STS_ERROR;
1452: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1453: p_count => x_msg_count,

Line 1451: X_return_status := FND_API.G_RET_STS_ERROR;

1447: END IF;
1448:
1449: WHEN FND_API.G_EXC_ERROR THEN
1450: ROLLBACK TO modify_revision;
1451: X_return_status := FND_API.G_RET_STS_ERROR;
1452: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1453: p_count => x_msg_count,
1454: p_data => X_msg_data);
1455: -- Debug info.

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

1448:
1449: WHEN FND_API.G_EXC_ERROR THEN
1450: ROLLBACK TO modify_revision;
1451: X_return_status := FND_API.G_RET_STS_ERROR;
1452: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1453: p_count => x_msg_count,
1454: p_data => X_msg_data);
1455: -- Debug info.
1456: IF G_DEBUG='Y' THEN

Line 1468: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1464: END IF;
1465:
1466: WHEN OTHERS THEN
1467: ROLLBACK TO modify_revision;
1468: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1469: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1470: THEN
1471: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',
1472: p_procedure_name => 'MODIFY_REVISION',

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

1471: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',
1472: p_procedure_name => 'MODIFY_REVISION',
1473: p_error_text => SUBSTR(SQLERRM,1,240));
1474: END IF;
1475: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1476: p_count => x_msg_count,
1477: p_data => X_msg_data);
1478:
1479: -- Debug info.