DBA Data[Home] [Help]

APPS.AHL_DI_DOC_REVISION_PVT dependencies on FND_API

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

354: /*------------------------------------------------------*/
355: PROCEDURE CREATE_REVISION
356: (
357: p_api_version IN NUMBER := 1.0 ,
358: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
359: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
360: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
361: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
362: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,

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

355: PROCEDURE CREATE_REVISION
356: (
357: p_api_version IN NUMBER := 1.0 ,
358: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
359: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
360: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
361: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
362: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
363: x_return_status OUT NOCOPY VARCHAR2 ,

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

356: (
357: p_api_version IN NUMBER := 1.0 ,
358: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
359: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
360: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
361: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
362: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
363: x_return_status OUT NOCOPY VARCHAR2 ,
364: x_msg_count OUT NOCOPY NUMBER ,

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

357: p_api_version IN NUMBER := 1.0 ,
358: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
359: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
360: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
361: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
362: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
363: x_return_status OUT NOCOPY VARCHAR2 ,
364: x_msg_count OUT NOCOPY NUMBER ,
365: x_msg_data OUT NOCOPY VARCHAR2

Line 394: IF FND_API.to_boolean(p_init_msg_list)

390:
391: END IF;
392: END IF;
393: -- Standard call to check for call compatibility.
394: IF FND_API.to_boolean(p_init_msg_list)
395: THEN
396: FND_MSG_PUB.initialize;
397: END IF;
398: -- Initialize API return status to success

Line 401: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

397: END IF;
398: -- Initialize API return status to success
399: x_return_status := 'S';
400: -- Initialize message list if p_init_msg_list is set to TRUE.
401: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
402: p_api_version,
403: l_api_name,G_PKG_NAME)
404: THEN
405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

401: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
402: p_api_version,
403: l_api_name,G_PKG_NAME)
404: THEN
405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
406: END IF;
407: --Start of API Body
408: IF p_x_revision_tbl.COUNT > 0
409: THEN

Line 438: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

434:
435:
436: IF l_msg_count > 0 THEN
437: X_msg_count := l_msg_count;
438: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: RAISE FND_API.G_EXC_ERROR;
440: END IF;
441: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
442: LOOP

Line 439: RAISE FND_API.G_EXC_ERROR;

435:
436: IF l_msg_count > 0 THEN
437: X_msg_count := l_msg_count;
438: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: RAISE FND_API.G_EXC_ERROR;
440: END IF;
441: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
442: LOOP
443: IF p_x_revision_tbl(i).doc_revision_id IS NULL

Line 529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

525: l_msg_count := FND_MSG_PUB.count_msg;
526:
527: IF l_msg_count > 0 THEN
528: X_msg_count := l_msg_count;
529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: END IF;
533: END LOOP;

Line 530: RAISE FND_API.G_EXC_ERROR;

526:
527: IF l_msg_count > 0 THEN
528: X_msg_count := l_msg_count;
529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: END IF;
533: END LOOP;
534: END IF;

Line 536: IF FND_API.TO_BOOLEAN(p_commit) THEN

532: END IF;
533: END LOOP;
534: END IF;
535: -- Standard check of p_commit.
536: IF FND_API.TO_BOOLEAN(p_commit) THEN
537: COMMIT;
538: END IF;
539: -- Debug info
540: IF G_DEBUG='Y' THEN

Line 551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

547:
548: END IF;
549:
550: EXCEPTION
551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
552: ROLLBACK TO create_revision;
553: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
555: p_count => x_msg_count,

Line 553: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

549:
550: EXCEPTION
551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
552: ROLLBACK TO create_revision;
553: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
555: p_count => x_msg_count,
556: p_data => x_msg_data);
557: --Debug Info

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

550: EXCEPTION
551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
552: ROLLBACK TO create_revision;
553: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
555: p_count => x_msg_count,
556: p_data => x_msg_data);
557: --Debug Info
558: IF G_DEBUG='Y' THEN

Line 568: WHEN FND_API.G_EXC_ERROR THEN

564: AHL_DEBUG_PUB.disable_debug;
565:
566: END IF;
567:
568: WHEN FND_API.G_EXC_ERROR THEN
569: ROLLBACK TO create_revision;
570: X_return_status := FND_API.G_RET_STS_ERROR;
571: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
572: p_count => x_msg_count,

Line 570: X_return_status := FND_API.G_RET_STS_ERROR;

566: END IF;
567:
568: WHEN FND_API.G_EXC_ERROR THEN
569: ROLLBACK TO create_revision;
570: X_return_status := FND_API.G_RET_STS_ERROR;
571: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
572: p_count => x_msg_count,
573: p_data => X_msg_data);
574: -- Debug info.

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

567:
568: WHEN FND_API.G_EXC_ERROR THEN
569: ROLLBACK TO create_revision;
570: X_return_status := FND_API.G_RET_STS_ERROR;
571: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
572: p_count => x_msg_count,
573: p_data => X_msg_data);
574: -- Debug info.
575: IF G_DEBUG='Y' THEN

Line 587: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

583: END IF;
584:
585: WHEN OTHERS THEN
586: ROLLBACK TO create_revision;
587: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
588: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
589: THEN
590: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
591: p_procedure_name => 'CREATE_REVISION',

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

590: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
591: p_procedure_name => 'CREATE_REVISION',
592: p_error_text => SUBSTR(SQLERRM,1,240));
593: END IF;
594: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
595: p_count => x_msg_count,
596: p_data => X_msg_data);
597: -- Debug info.
598: IF G_DEBUG='Y' THEN

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

614: /*------------------------------------------------------*/
615: PROCEDURE MODIFY_REVISION
616: (
617: p_api_version IN NUMBER := 1.0 ,
618: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
619: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
620: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
621: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
622: p_x_revision_tbl IN revision_tbl ,

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

615: PROCEDURE MODIFY_REVISION
616: (
617: p_api_version IN NUMBER := 1.0 ,
618: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
619: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
620: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
621: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
622: p_x_revision_tbl IN revision_tbl ,
623: x_return_status OUT NOCOPY VARCHAR2 ,

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

616: (
617: p_api_version IN NUMBER := 1.0 ,
618: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
619: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
620: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
621: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
622: p_x_revision_tbl IN revision_tbl ,
623: x_return_status OUT NOCOPY VARCHAR2 ,
624: x_msg_count OUT NOCOPY NUMBER ,

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

617: p_api_version IN NUMBER := 1.0 ,
618: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
619: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
620: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
621: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
622: p_x_revision_tbl IN revision_tbl ,
623: x_return_status OUT NOCOPY VARCHAR2 ,
624: x_msg_count OUT NOCOPY NUMBER ,
625: x_msg_data OUT NOCOPY VARCHAR2

Line 702: IF FND_API.to_boolean(p_init_msg_list)

698:
699: END IF;
700: END IF;
701: -- Standard call to check for call compatibility.
702: IF FND_API.to_boolean(p_init_msg_list)
703: THEN
704: FND_MSG_PUB.initialize;
705: END IF;
706: -- Initialize API return status to success

Line 709: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

705: END IF;
706: -- Initialize API return status to success
707: x_return_status := 'S';
708:
709: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
710: p_api_version,
711: l_api_name,G_PKG_NAME)
712: THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

709: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
710: p_api_version,
711: l_api_name,G_PKG_NAME)
712: THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715: --Start of API Body
716: IF p_x_revision_tbl.COUNT > 0
717: THEN

Line 745: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

741: -- Standard call to get message count
742: l_msg_count := FND_MSG_PUB.count_msg;
743: IF l_msg_count > 0 THEN
744: X_msg_count := l_msg_count;
745: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
746: RAISE FND_API.G_EXC_ERROR;
747: END IF;
748: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
749: LOOP

Line 746: RAISE FND_API.G_EXC_ERROR;

742: l_msg_count := FND_MSG_PUB.count_msg;
743: IF l_msg_count > 0 THEN
744: X_msg_count := l_msg_count;
745: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
746: RAISE FND_API.G_EXC_ERROR;
747: END IF;
748: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
749: LOOP
750: OPEN get_doc_revisions_b_rec_info(p_x_revision_tbl(i).doc_revision_id);

Line 764: RAISE FND_API.G_EXC_ERROR;

760: if (l_revision_info.object_version_number <>p_x_revision_tbl(i).object_version_number)
761: then
762: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
763: FND_MSG_PUB.ADD;
764: RAISE FND_API.G_EXC_ERROR;
765: end if;
766: -- The following conditions compare the new record value with old record
767: -- value, if its different then assign the new value else continue
768: IF p_x_revision_tbl(i).doc_revision_id IS NOT NULL

Line 850: p_init_msg_list => FND_API.G_TRUE ,

846:
847: THEN
848: DELETE_REVISION
849: (p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_TRUE ,
851: p_commit => FND_API.G_FALSE ,
852: p_validate_only => FND_API.G_TRUE ,
853: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
854: p_x_revision_tbl => p_x_revision_tbl ,

Line 851: p_commit => FND_API.G_FALSE ,

847: THEN
848: DELETE_REVISION
849: (p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_TRUE ,
851: p_commit => FND_API.G_FALSE ,
852: p_validate_only => FND_API.G_TRUE ,
853: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
854: p_x_revision_tbl => p_x_revision_tbl ,
855: x_return_status => x_return_status ,

Line 852: p_validate_only => FND_API.G_TRUE ,

848: DELETE_REVISION
849: (p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_TRUE ,
851: p_commit => FND_API.G_FALSE ,
852: p_validate_only => FND_API.G_TRUE ,
853: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
854: p_x_revision_tbl => p_x_revision_tbl ,
855: x_return_status => x_return_status ,
856: x_msg_count => x_msg_count ,

Line 853: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

849: (p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_TRUE ,
851: p_commit => FND_API.G_FALSE ,
852: p_validate_only => FND_API.G_TRUE ,
853: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
854: p_x_revision_tbl => p_x_revision_tbl ,
855: x_return_status => x_return_status ,
856: x_msg_count => x_msg_count ,
857: x_msg_data => x_msg_data

Line 863: IF FND_API.TO_BOOLEAN(p_commit) THEN

859: END IF;
860: END LOOP;
861: END IF;
862: -- Standard check of p_commit.
863: IF FND_API.TO_BOOLEAN(p_commit) THEN
864: COMMIT;
865: END IF;
866: -- Debug info
867: IF G_DEBUG='Y' THEN

Line 877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

873: AHL_DEBUG_PUB.disable_debug;
874:
875: END IF;
876: EXCEPTION
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878: ROLLBACK TO modify_revision;
879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
880: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
881: p_count => x_msg_count,

Line 879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

875: END IF;
876: EXCEPTION
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878: ROLLBACK TO modify_revision;
879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
880: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
881: p_count => x_msg_count,
882: p_data => x_msg_data);
883:

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

876: EXCEPTION
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878: ROLLBACK TO modify_revision;
879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
880: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
881: p_count => x_msg_count,
882: p_data => x_msg_data);
883:
884: IF G_DEBUG='Y' THEN

Line 894: WHEN FND_API.G_EXC_ERROR THEN

890: AHL_DEBUG_PUB.disable_debug;
891:
892: END IF;
893:
894: WHEN FND_API.G_EXC_ERROR THEN
895: ROLLBACK TO modify_revision;
896: X_return_status := FND_API.G_RET_STS_ERROR;
897: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
898: p_count => x_msg_count,

Line 896: X_return_status := FND_API.G_RET_STS_ERROR;

892: END IF;
893:
894: WHEN FND_API.G_EXC_ERROR THEN
895: ROLLBACK TO modify_revision;
896: X_return_status := FND_API.G_RET_STS_ERROR;
897: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
898: p_count => x_msg_count,
899: p_data => X_msg_data);
900: -- Debug info.

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

893:
894: WHEN FND_API.G_EXC_ERROR THEN
895: ROLLBACK TO modify_revision;
896: X_return_status := FND_API.G_RET_STS_ERROR;
897: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
898: p_count => x_msg_count,
899: p_data => X_msg_data);
900: -- Debug info.
901: IF G_DEBUG='Y' THEN

Line 913: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

909: END IF;
910:
911: WHEN OTHERS THEN
912: ROLLBACK TO modify_revision;
913: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
914: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
917: p_procedure_name => 'MODIFY_REVISION',

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

916: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
917: p_procedure_name => 'MODIFY_REVISION',
918: p_error_text => SUBSTR(SQLERRM,1,240));
919: END IF;
920: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
921: p_count => x_msg_count,
922: p_data => X_msg_data);
923:
924: -- Debug info.

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

936: --
937: PROCEDURE DELETE_REVISION
938: (
939: p_api_version IN NUMBER := 1.0 ,
940: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
941: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
942: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
943: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
944: p_x_revision_tbl IN revision_tbl ,

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

937: PROCEDURE DELETE_REVISION
938: (
939: p_api_version IN NUMBER := 1.0 ,
940: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
941: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
942: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
943: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
944: p_x_revision_tbl IN revision_tbl ,
945: x_return_status OUT NOCOPY VARCHAR2 ,

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

938: (
939: p_api_version IN NUMBER := 1.0 ,
940: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
941: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
942: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
943: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
944: p_x_revision_tbl IN revision_tbl ,
945: x_return_status OUT NOCOPY VARCHAR2 ,
946: x_msg_count OUT NOCOPY NUMBER ,

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

939: p_api_version IN NUMBER := 1.0 ,
940: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
941: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
942: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
943: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
944: p_x_revision_tbl IN revision_tbl ,
945: x_return_status OUT NOCOPY VARCHAR2 ,
946: x_msg_count OUT NOCOPY NUMBER ,
947: x_msg_data OUT NOCOPY VARCHAR2

Line 971: IF FND_API.to_boolean(p_init_msg_list)

967: BEGIN
968: -- Standard Start of API savepoint
969: SAVEPOINT delete_revision;
970: -- Standard call to check for call compatibility.
971: IF FND_API.to_boolean(p_init_msg_list)
972: THEN
973: FND_MSG_PUB.initialize;
974: END IF;
975: -- Initialize API return status to success

Line 978: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

974: END IF;
975: -- Initialize API return status to success
976: x_return_status := 'S';
977: -- Initialize message list if p_init_msg_list is set to TRUE.
978: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
979: p_api_version,
980: l_api_name,G_PKG_NAME)
981: THEN
982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

978: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
979: p_api_version,
980: l_api_name,G_PKG_NAME)
981: THEN
982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
983: END IF;
984: --Start of API Body
985: IF p_x_revision_tbl.COUNT > 0
986: THEN

Line 1025: IF FND_API.TO_BOOLEAN(p_commit) THEN

1021: WHERE ROWID = l_rowid;
1022: END LOOP;
1023: END IF;
1024: -- Standard check of p_commit.
1025: IF FND_API.TO_BOOLEAN(p_commit) THEN
1026: COMMIT;
1027: END IF;
1028:
1029: EXCEPTION

Line 1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1026: COMMIT;
1027: END IF;
1028:
1029: EXCEPTION
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: ROLLBACK TO delete_revision;
1032: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1033: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1034: p_count => x_msg_count,

Line 1032: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1028:
1029: EXCEPTION
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: ROLLBACK TO delete_revision;
1032: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1033: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1034: p_count => x_msg_count,
1035: p_data => x_msg_data);
1036:

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

1029: EXCEPTION
1030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1031: ROLLBACK TO delete_revision;
1032: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1033: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1034: p_count => x_msg_count,
1035: p_data => x_msg_data);
1036:
1037: WHEN FND_API.G_EXC_ERROR THEN

Line 1037: WHEN FND_API.G_EXC_ERROR THEN

1033: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1034: p_count => x_msg_count,
1035: p_data => x_msg_data);
1036:
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: ROLLBACK TO delete_revision;
1039: X_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1041: p_count => x_msg_count,

Line 1039: X_return_status := FND_API.G_RET_STS_ERROR;

1035: p_data => x_msg_data);
1036:
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: ROLLBACK TO delete_revision;
1039: X_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1041: p_count => x_msg_count,
1042: p_data => X_msg_data);
1043: WHEN OTHERS THEN

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

1036:
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: ROLLBACK TO delete_revision;
1039: X_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1041: p_count => x_msg_count,
1042: p_data => X_msg_data);
1043: WHEN OTHERS THEN
1044: ROLLBACK TO delete_revision;

Line 1045: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1041: p_count => x_msg_count,
1042: p_data => X_msg_data);
1043: WHEN OTHERS THEN
1044: ROLLBACK TO delete_revision;
1045: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1047: THEN
1048: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DOC_REVISIONS_PVT',
1049: p_procedure_name => 'DELETE_REVISION',

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

1048: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DOC_REVISIONS_PVT',
1049: p_procedure_name => 'DELETE_REVISION',
1050: p_error_text => SUBSTR(SQLERRM,1,240));
1051: END IF;
1052: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1053: p_count => x_msg_count,
1054: p_data => X_msg_data);
1055:
1056: END DELETE_REVISION;