DBA Data[Home] [Help]

APPS.AHL_DI_DOC_REVISION_PVT dependencies on FND_API

Line 408: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN

404: p_lookup_meaning => p_x_enigma_model_meaning,
405: p_x_lookup_code => p_x_enigma_model_code
406: );
407:
408: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
409:
410: IF ( l_msg_data = 'AHL_COM_INVALID_LOOKUP' ) THEN
411: FND_MESSAGE.set_name( 'AHL', 'AHL_CM_INVALID_MODEL' );
412: ELSIF ( l_msg_data = 'AHL_COM_TOO_MANY_LOOKUPS' ) THEN

Line 419: p_x_enigma_model_meaning = FND_API.G_MISS_CHAR ) THEN

415: FND_MESSAGE.set_name( 'AHL', l_msg_data );
416: END IF;
417:
418: IF ( p_x_enigma_model_meaning IS NULL OR
419: p_x_enigma_model_meaning = FND_API.G_MISS_CHAR ) THEN
420: FND_MESSAGE.set_token( 'FIELD', p_x_enigma_model_code );
421: ELSE
422: FND_MESSAGE.set_token( 'FIELD', p_x_enigma_model_meaning );
423: END IF;

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

638: /*------------------------------------------------------*/
639: PROCEDURE CREATE_REVISION
640: (
641: p_api_version IN NUMBER := 1.0 ,
642: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
643: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
644: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
645: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
646: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,

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

639: PROCEDURE CREATE_REVISION
640: (
641: p_api_version IN NUMBER := 1.0 ,
642: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
643: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
644: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
645: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
646: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
647: x_return_status OUT NOCOPY VARCHAR2 ,

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

640: (
641: p_api_version IN NUMBER := 1.0 ,
642: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
643: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
644: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
645: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
646: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
647: x_return_status OUT NOCOPY VARCHAR2 ,
648: x_msg_count OUT NOCOPY NUMBER ,

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

641: p_api_version IN NUMBER := 1.0 ,
642: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
643: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
644: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
645: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
646: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
647: x_return_status OUT NOCOPY VARCHAR2 ,
648: x_msg_count OUT NOCOPY NUMBER ,
649: x_msg_data OUT NOCOPY VARCHAR2

Line 678: IF FND_API.to_boolean(p_init_msg_list)

674:
675: END IF;
676: END IF;
677: -- Standard call to check for call compatibility.
678: IF FND_API.to_boolean(p_init_msg_list)
679: THEN
680: FND_MSG_PUB.initialize;
681: END IF;
682: -- Initialize API return status to success

Line 685: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

681: END IF;
682: -- Initialize API return status to success
683: x_return_status := 'S';
684: -- Initialize message list if p_init_msg_list is set to TRUE.
685: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
686: p_api_version,
687: l_api_name,G_PKG_NAME)
688: THEN
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

685: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
686: p_api_version,
687: l_api_name,G_PKG_NAME)
688: THEN
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: END IF;
691: --Start of API Body
692: IF p_x_revision_tbl.COUNT > 0
693: THEN

Line 727: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

723:
724:
725: IF l_msg_count > 0 THEN
726: X_msg_count := l_msg_count;
727: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;
730: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
731: LOOP

Line 728: RAISE FND_API.G_EXC_ERROR;

724:
725: IF l_msg_count > 0 THEN
726: X_msg_count := l_msg_count;
727: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;
730: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
731: LOOP
732: IF p_x_revision_tbl(i).doc_revision_id IS NULL

Line 755: IF(p_x_revision_tbl(i).attribute_category = FND_API.G_MISS_CHAR) THEN

751: l_revision_info.issue_number := p_x_revision_tbl(i).issue_number;
752: l_revision_info.comments := p_x_revision_tbl(i).comments;
753: --snarkhed::Added this as part of bug fix for Bug #9532118
754:
755: IF(p_x_revision_tbl(i).attribute_category = FND_API.G_MISS_CHAR) THEN
756: l_revision_info.attribute_category := NULL;
757: ELSE
758: l_revision_info.attribute_category := p_x_revision_tbl(i).attribute_category;
759: END IF;

Line 762: IF(p_x_revision_tbl(i).attribute1 = FND_API.G_MISS_CHAR) THEN

758: l_revision_info.attribute_category := p_x_revision_tbl(i).attribute_category;
759: END IF;
760:
761:
762: IF(p_x_revision_tbl(i).attribute1 = FND_API.G_MISS_CHAR) THEN
763: l_revision_info.attribute1 := NULL;
764: ELSE
765: l_revision_info.attribute1 := p_x_revision_tbl(i).attribute1;
766: END IF;

Line 768: IF(p_x_revision_tbl(i).attribute2 = FND_API.G_MISS_CHAR) THEN

764: ELSE
765: l_revision_info.attribute1 := p_x_revision_tbl(i).attribute1;
766: END IF;
767:
768: IF(p_x_revision_tbl(i).attribute2 = FND_API.G_MISS_CHAR) THEN
769: l_revision_info.attribute2 := NULL;
770: ELSE
771: l_revision_info.attribute2 := p_x_revision_tbl(i).attribute2;
772: END IF;

Line 774: IF(p_x_revision_tbl(i).attribute3 = FND_API.G_MISS_CHAR) THEN

770: ELSE
771: l_revision_info.attribute2 := p_x_revision_tbl(i).attribute2;
772: END IF;
773:
774: IF(p_x_revision_tbl(i).attribute3 = FND_API.G_MISS_CHAR) THEN
775: l_revision_info.attribute3 := NULL;
776: ELSE
777: l_revision_info.attribute3 := p_x_revision_tbl(i).attribute3;
778: END IF;

Line 780: IF(p_x_revision_tbl(i).attribute4 = FND_API.G_MISS_CHAR) THEN

776: ELSE
777: l_revision_info.attribute3 := p_x_revision_tbl(i).attribute3;
778: END IF;
779:
780: IF(p_x_revision_tbl(i).attribute4 = FND_API.G_MISS_CHAR) THEN
781: l_revision_info.attribute4 := NULL;
782: ELSE
783: l_revision_info.attribute4 := p_x_revision_tbl(i).attribute4;
784: END IF;

Line 786: IF(p_x_revision_tbl(i).attribute5 = FND_API.G_MISS_CHAR) THEN

782: ELSE
783: l_revision_info.attribute4 := p_x_revision_tbl(i).attribute4;
784: END IF;
785:
786: IF(p_x_revision_tbl(i).attribute5 = FND_API.G_MISS_CHAR) THEN
787: l_revision_info.attribute5 := NULL;
788: ELSE
789: l_revision_info.attribute5 := p_x_revision_tbl(i).attribute5;
790: END IF;

Line 792: IF(p_x_revision_tbl(i).attribute6 = FND_API.G_MISS_CHAR) THEN

788: ELSE
789: l_revision_info.attribute5 := p_x_revision_tbl(i).attribute5;
790: END IF;
791:
792: IF(p_x_revision_tbl(i).attribute6 = FND_API.G_MISS_CHAR) THEN
793: l_revision_info.attribute6 := NULL;
794: ELSE
795: l_revision_info.attribute6 := p_x_revision_tbl(i).attribute6;
796: END IF;

Line 798: IF(p_x_revision_tbl(i).attribute7 = FND_API.G_MISS_CHAR) THEN

794: ELSE
795: l_revision_info.attribute6 := p_x_revision_tbl(i).attribute6;
796: END IF;
797:
798: IF(p_x_revision_tbl(i).attribute7 = FND_API.G_MISS_CHAR) THEN
799: l_revision_info.attribute7 := NULL;
800: ELSE
801: l_revision_info.attribute7 := p_x_revision_tbl(i).attribute7;
802: END IF;

Line 804: IF(p_x_revision_tbl(i).attribute8 = FND_API.G_MISS_CHAR) THEN

800: ELSE
801: l_revision_info.attribute7 := p_x_revision_tbl(i).attribute7;
802: END IF;
803:
804: IF(p_x_revision_tbl(i).attribute8 = FND_API.G_MISS_CHAR) THEN
805: l_revision_info.attribute8 := NULL;
806: ELSE
807: l_revision_info.attribute8 := p_x_revision_tbl(i).attribute8;
808: END IF;

Line 810: IF(p_x_revision_tbl(i).attribute9 = FND_API.G_MISS_CHAR) THEN

806: ELSE
807: l_revision_info.attribute8 := p_x_revision_tbl(i).attribute8;
808: END IF;
809:
810: IF(p_x_revision_tbl(i).attribute9 = FND_API.G_MISS_CHAR) THEN
811: l_revision_info.attribute9 := NULL;
812: ELSE
813: l_revision_info.attribute9 := p_x_revision_tbl(i).attribute9;
814: END IF;

Line 816: IF(p_x_revision_tbl(i).attribute10 = FND_API.G_MISS_CHAR) THEN

812: ELSE
813: l_revision_info.attribute9 := p_x_revision_tbl(i).attribute9;
814: END IF;
815:
816: IF(p_x_revision_tbl(i).attribute10 = FND_API.G_MISS_CHAR) THEN
817: l_revision_info.attribute10 := NULL;
818: ELSE
819: l_revision_info.attribute10 := p_x_revision_tbl(i).attribute10;
820: END IF;

Line 822: IF(p_x_revision_tbl(i).attribute11 = FND_API.G_MISS_CHAR) THEN

818: ELSE
819: l_revision_info.attribute10 := p_x_revision_tbl(i).attribute10;
820: END IF;
821:
822: IF(p_x_revision_tbl(i).attribute11 = FND_API.G_MISS_CHAR) THEN
823: l_revision_info.attribute11:= NULL;
824: ELSE
825: l_revision_info.attribute11 := p_x_revision_tbl(i).attribute11;
826: END IF;

Line 828: IF(p_x_revision_tbl(i).attribute12 = FND_API.G_MISS_CHAR) THEN

824: ELSE
825: l_revision_info.attribute11 := p_x_revision_tbl(i).attribute11;
826: END IF;
827:
828: IF(p_x_revision_tbl(i).attribute12 = FND_API.G_MISS_CHAR) THEN
829: l_revision_info.attribute12 := NULL;
830: ELSE
831: l_revision_info.attribute12 := p_x_revision_tbl(i).attribute12;
832: END IF;

Line 834: IF(p_x_revision_tbl(i).attribute13 = FND_API.G_MISS_CHAR) THEN

830: ELSE
831: l_revision_info.attribute12 := p_x_revision_tbl(i).attribute12;
832: END IF;
833:
834: IF(p_x_revision_tbl(i).attribute13 = FND_API.G_MISS_CHAR) THEN
835: l_revision_info.attribute13 := NULL;
836: ELSE
837: l_revision_info.attribute13 := p_x_revision_tbl(i).attribute13;
838: END IF;

Line 840: IF(p_x_revision_tbl(i).attribute14 = FND_API.G_MISS_CHAR) THEN

836: ELSE
837: l_revision_info.attribute13 := p_x_revision_tbl(i).attribute13;
838: END IF;
839:
840: IF(p_x_revision_tbl(i).attribute14 = FND_API.G_MISS_CHAR) THEN
841: l_revision_info.attribute14 := NULL;
842: ELSE
843: l_revision_info.attribute14 := p_x_revision_tbl(i).attribute14;
844: END IF;

Line 846: IF(p_x_revision_tbl(i).attribute15 = FND_API.G_MISS_CHAR) THEN

842: ELSE
843: l_revision_info.attribute14 := p_x_revision_tbl(i).attribute14;
844: END IF;
845:
846: IF(p_x_revision_tbl(i).attribute15 = FND_API.G_MISS_CHAR) THEN
847: l_revision_info.attribute15 := NULL;
848: ELSE
849: l_revision_info.attribute15 := p_x_revision_tbl(i).attribute15;
850: END IF;

Line 932: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

928: l_msg_count := FND_MSG_PUB.count_msg;
929:
930: IF l_msg_count > 0 THEN
931: X_msg_count := l_msg_count;
932: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
933: RAISE FND_API.G_EXC_ERROR;
934: END IF;
935: END IF;
936: END LOOP;

Line 933: RAISE FND_API.G_EXC_ERROR;

929:
930: IF l_msg_count > 0 THEN
931: X_msg_count := l_msg_count;
932: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
933: RAISE FND_API.G_EXC_ERROR;
934: END IF;
935: END IF;
936: END LOOP;
937: END IF;

Line 939: IF FND_API.TO_BOOLEAN(p_commit) THEN

935: END IF;
936: END LOOP;
937: END IF;
938: -- Standard check of p_commit.
939: IF FND_API.TO_BOOLEAN(p_commit) THEN
940: COMMIT;
941: END IF;
942: -- Debug info
943: IF G_DEBUG='Y' THEN

Line 954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

950:
951: END IF;
952:
953: EXCEPTION
954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
955: ROLLBACK TO create_revision;
956: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
958: p_count => x_msg_count,

Line 956: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

952:
953: EXCEPTION
954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
955: ROLLBACK TO create_revision;
956: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
958: p_count => x_msg_count,
959: p_data => x_msg_data);
960: --Debug Info

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

953: EXCEPTION
954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
955: ROLLBACK TO create_revision;
956: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
958: p_count => x_msg_count,
959: p_data => x_msg_data);
960: --Debug Info
961: IF G_DEBUG='Y' THEN

Line 971: WHEN FND_API.G_EXC_ERROR THEN

967: AHL_DEBUG_PUB.disable_debug;
968:
969: END IF;
970:
971: WHEN FND_API.G_EXC_ERROR THEN
972: ROLLBACK TO create_revision;
973: X_return_status := FND_API.G_RET_STS_ERROR;
974: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
975: p_count => x_msg_count,

Line 973: X_return_status := FND_API.G_RET_STS_ERROR;

969: END IF;
970:
971: WHEN FND_API.G_EXC_ERROR THEN
972: ROLLBACK TO create_revision;
973: X_return_status := FND_API.G_RET_STS_ERROR;
974: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
975: p_count => x_msg_count,
976: p_data => X_msg_data);
977: -- Debug info.

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

970:
971: WHEN FND_API.G_EXC_ERROR THEN
972: ROLLBACK TO create_revision;
973: X_return_status := FND_API.G_RET_STS_ERROR;
974: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
975: p_count => x_msg_count,
976: p_data => X_msg_data);
977: -- Debug info.
978: IF G_DEBUG='Y' THEN

Line 990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

986: END IF;
987:
988: WHEN OTHERS THEN
989: ROLLBACK TO create_revision;
990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
991: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
992: THEN
993: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
994: p_procedure_name => 'CREATE_REVISION',

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

993: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
994: p_procedure_name => 'CREATE_REVISION',
995: p_error_text => SUBSTR(SQLERRM,1,240));
996: END IF;
997: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
998: p_count => x_msg_count,
999: p_data => X_msg_data);
1000: -- Debug info.
1001: IF G_DEBUG='Y' THEN

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

1017: /*------------------------------------------------------*/
1018: PROCEDURE MODIFY_REVISION
1019: (
1020: p_api_version IN NUMBER := 1.0 ,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1023: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1024: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1025: --pekambar changed in enigma phase -2

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

1018: PROCEDURE MODIFY_REVISION
1019: (
1020: p_api_version IN NUMBER := 1.0 ,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1023: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1024: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1025: --pekambar changed in enigma phase -2
1026: --p_x_revision_tbl IN revision_tbl ,

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

1019: (
1020: p_api_version IN NUMBER := 1.0 ,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1023: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1024: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1025: --pekambar changed in enigma phase -2
1026: --p_x_revision_tbl IN revision_tbl ,
1027: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,

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

1020: p_api_version IN NUMBER := 1.0 ,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1023: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1024: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1025: --pekambar changed in enigma phase -2
1026: --p_x_revision_tbl IN revision_tbl ,
1027: p_x_revision_tbl IN OUT NOCOPY revision_tbl ,
1028: x_return_status OUT NOCOPY VARCHAR2 ,

Line 1117: IF FND_API.to_boolean(p_init_msg_list)

1113:
1114: END IF;
1115: END IF;
1116: -- Standard call to check for call compatibility.
1117: IF FND_API.to_boolean(p_init_msg_list)
1118: THEN
1119: FND_MSG_PUB.initialize;
1120: END IF;
1121: -- Initialize API return status to success

Line 1124: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

1120: END IF;
1121: -- Initialize API return status to success
1122: x_return_status := 'S';
1123:
1124: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1125: p_api_version,
1126: l_api_name,G_PKG_NAME)
1127: THEN
1128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1124: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1125: p_api_version,
1126: l_api_name,G_PKG_NAME)
1127: THEN
1128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1129: END IF;
1130: --Start of API Body
1131: IF p_x_revision_tbl.COUNT > 0
1132: THEN

Line 1165: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1161: -- Standard call to get message count
1162: l_msg_count := FND_MSG_PUB.count_msg;
1163: IF l_msg_count > 0 THEN
1164: X_msg_count := l_msg_count;
1165: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
1169: LOOP

Line 1166: RAISE FND_API.G_EXC_ERROR;

1162: l_msg_count := FND_MSG_PUB.count_msg;
1163: IF l_msg_count > 0 THEN
1164: X_msg_count := l_msg_count;
1165: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168: FOR i IN p_x_revision_tbl.FIRST..p_x_revision_tbl.LAST
1169: LOOP
1170: OPEN get_doc_revisions_b_rec_info(p_x_revision_tbl(i).doc_revision_id);

Line 1184: RAISE FND_API.G_EXC_ERROR;

1180: if (l_revision_info.object_version_number <>p_x_revision_tbl(i).object_version_number)
1181: then
1182: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1183: FND_MSG_PUB.ADD;
1184: RAISE FND_API.G_EXC_ERROR;
1185: end if;
1186: -- The following conditions compare the new record value with old record
1187: -- value, if its different then assign the new value else continue
1188: IF p_x_revision_tbl(i).doc_revision_id IS NOT NULL

Line 1225: IF(p_x_revision_tbl(i).attribute_category = FND_API.G_MISS_CHAR) THEN

1221: l_revision_info.issue_number := p_x_revision_tbl(i).issue_number;
1222: l_comments := p_x_revision_tbl(i).comments;
1223: --snarkhed::Added this as part of bug fix for Bug #9532118
1224:
1225: IF(p_x_revision_tbl(i).attribute_category = FND_API.G_MISS_CHAR) THEN
1226: l_revision_info.attribute_category := NULL;
1227: ELSIF(p_x_revision_tbl(i).attribute_category IS NOT NULL) THEN
1228: l_revision_info.attribute_category := p_x_revision_tbl(i).attribute_category;
1229: END IF;

Line 1232: IF(p_x_revision_tbl(i).attribute1 = FND_API.G_MISS_CHAR) THEN

1228: l_revision_info.attribute_category := p_x_revision_tbl(i).attribute_category;
1229: END IF;
1230:
1231:
1232: IF(p_x_revision_tbl(i).attribute1 = FND_API.G_MISS_CHAR) THEN
1233: l_revision_info.attribute1 := NULL;
1234: ELSIF(p_x_revision_tbl(i).attribute1 IS NOT NULL) THEN
1235: l_revision_info.attribute1 := p_x_revision_tbl(i).attribute1;
1236: END IF;

Line 1238: IF(p_x_revision_tbl(i).attribute2 = FND_API.G_MISS_CHAR) THEN

1234: ELSIF(p_x_revision_tbl(i).attribute1 IS NOT NULL) THEN
1235: l_revision_info.attribute1 := p_x_revision_tbl(i).attribute1;
1236: END IF;
1237:
1238: IF(p_x_revision_tbl(i).attribute2 = FND_API.G_MISS_CHAR) THEN
1239: l_revision_info.attribute2 := NULL;
1240: ELSIF(p_x_revision_tbl(i).attribute2 IS NOT NULL) THEN
1241: l_revision_info.attribute2 := p_x_revision_tbl(i).attribute2;
1242: END IF;

Line 1244: IF(p_x_revision_tbl(i).attribute3 = FND_API.G_MISS_CHAR) THEN

1240: ELSIF(p_x_revision_tbl(i).attribute2 IS NOT NULL) THEN
1241: l_revision_info.attribute2 := p_x_revision_tbl(i).attribute2;
1242: END IF;
1243:
1244: IF(p_x_revision_tbl(i).attribute3 = FND_API.G_MISS_CHAR) THEN
1245: l_revision_info.attribute3 := NULL;
1246: ELSIF(p_x_revision_tbl(i).attribute3 IS NOT NULL) THEN
1247: l_revision_info.attribute3 := p_x_revision_tbl(i).attribute3;
1248: END IF;

Line 1250: IF(p_x_revision_tbl(i).attribute4 = FND_API.G_MISS_CHAR) THEN

1246: ELSIF(p_x_revision_tbl(i).attribute3 IS NOT NULL) THEN
1247: l_revision_info.attribute3 := p_x_revision_tbl(i).attribute3;
1248: END IF;
1249:
1250: IF(p_x_revision_tbl(i).attribute4 = FND_API.G_MISS_CHAR) THEN
1251: l_revision_info.attribute4 := NULL;
1252: ELSIF(p_x_revision_tbl(i).attribute4 IS NOT NULL) THEN
1253: l_revision_info.attribute4 := p_x_revision_tbl(i).attribute4;
1254: END IF;

Line 1256: IF(p_x_revision_tbl(i).attribute5 = FND_API.G_MISS_CHAR) THEN

1252: ELSIF(p_x_revision_tbl(i).attribute4 IS NOT NULL) THEN
1253: l_revision_info.attribute4 := p_x_revision_tbl(i).attribute4;
1254: END IF;
1255:
1256: IF(p_x_revision_tbl(i).attribute5 = FND_API.G_MISS_CHAR) THEN
1257: l_revision_info.attribute5 := NULL;
1258: ELSIF(p_x_revision_tbl(i).attribute5 IS NOT NULL) THEN
1259: l_revision_info.attribute5 := p_x_revision_tbl(i).attribute5;
1260: END IF;

Line 1262: IF(p_x_revision_tbl(i).attribute6 = FND_API.G_MISS_CHAR) THEN

1258: ELSIF(p_x_revision_tbl(i).attribute5 IS NOT NULL) THEN
1259: l_revision_info.attribute5 := p_x_revision_tbl(i).attribute5;
1260: END IF;
1261:
1262: IF(p_x_revision_tbl(i).attribute6 = FND_API.G_MISS_CHAR) THEN
1263: l_revision_info.attribute6 := NULL;
1264: ELSIF(p_x_revision_tbl(i).attribute6 IS NOT NULL) THEN
1265: l_revision_info.attribute6 := p_x_revision_tbl(i).attribute6;
1266: END IF;

Line 1268: IF(p_x_revision_tbl(i).attribute7 = FND_API.G_MISS_CHAR) THEN

1264: ELSIF(p_x_revision_tbl(i).attribute6 IS NOT NULL) THEN
1265: l_revision_info.attribute6 := p_x_revision_tbl(i).attribute6;
1266: END IF;
1267:
1268: IF(p_x_revision_tbl(i).attribute7 = FND_API.G_MISS_CHAR) THEN
1269: l_revision_info.attribute7 := NULL;
1270: ELSIF(p_x_revision_tbl(i).attribute7 IS NOT NULL) THEN
1271: l_revision_info.attribute7 := p_x_revision_tbl(i).attribute7;
1272: END IF;

Line 1274: IF(p_x_revision_tbl(i).attribute8 = FND_API.G_MISS_CHAR) THEN

1270: ELSIF(p_x_revision_tbl(i).attribute7 IS NOT NULL) THEN
1271: l_revision_info.attribute7 := p_x_revision_tbl(i).attribute7;
1272: END IF;
1273:
1274: IF(p_x_revision_tbl(i).attribute8 = FND_API.G_MISS_CHAR) THEN
1275: l_revision_info.attribute8 := NULL;
1276: ELSIF(p_x_revision_tbl(i).attribute8 IS NOT NULL) THEN
1277: l_revision_info.attribute8 := p_x_revision_tbl(i).attribute8;
1278: END IF;

Line 1280: IF(p_x_revision_tbl(i).attribute9 = FND_API.G_MISS_CHAR) THEN

1276: ELSIF(p_x_revision_tbl(i).attribute8 IS NOT NULL) THEN
1277: l_revision_info.attribute8 := p_x_revision_tbl(i).attribute8;
1278: END IF;
1279:
1280: IF(p_x_revision_tbl(i).attribute9 = FND_API.G_MISS_CHAR) THEN
1281: l_revision_info.attribute9 := NULL;
1282: ELSIF(p_x_revision_tbl(i).attribute9 IS NOT NULL) THEN
1283: l_revision_info.attribute9 := p_x_revision_tbl(i).attribute9;
1284: END IF;

Line 1286: IF(p_x_revision_tbl(i).attribute10 = FND_API.G_MISS_CHAR) THEN

1282: ELSIF(p_x_revision_tbl(i).attribute9 IS NOT NULL) THEN
1283: l_revision_info.attribute9 := p_x_revision_tbl(i).attribute9;
1284: END IF;
1285:
1286: IF(p_x_revision_tbl(i).attribute10 = FND_API.G_MISS_CHAR) THEN
1287: l_revision_info.attribute10 := NULL;
1288: ELSIF(p_x_revision_tbl(i).attribute10 IS NOT NULL) THEN
1289: l_revision_info.attribute10 := p_x_revision_tbl(i).attribute10;
1290: END IF;

Line 1292: IF(p_x_revision_tbl(i).attribute11 = FND_API.G_MISS_CHAR) THEN

1288: ELSIF(p_x_revision_tbl(i).attribute10 IS NOT NULL) THEN
1289: l_revision_info.attribute10 := p_x_revision_tbl(i).attribute10;
1290: END IF;
1291:
1292: IF(p_x_revision_tbl(i).attribute11 = FND_API.G_MISS_CHAR) THEN
1293: l_revision_info.attribute11:= NULL;
1294: ELSIF(p_x_revision_tbl(i).attribute11 IS NOT NULL) THEN
1295: l_revision_info.attribute11 := p_x_revision_tbl(i).attribute11;
1296: END IF;

Line 1298: IF(p_x_revision_tbl(i).attribute12 = FND_API.G_MISS_CHAR) THEN

1294: ELSIF(p_x_revision_tbl(i).attribute11 IS NOT NULL) THEN
1295: l_revision_info.attribute11 := p_x_revision_tbl(i).attribute11;
1296: END IF;
1297:
1298: IF(p_x_revision_tbl(i).attribute12 = FND_API.G_MISS_CHAR) THEN
1299: l_revision_info.attribute12 := NULL;
1300: ELSIF(p_x_revision_tbl(i).attribute12 IS NOT NULL) THEN
1301: l_revision_info.attribute12 := p_x_revision_tbl(i).attribute12;
1302: END IF;

Line 1304: IF(p_x_revision_tbl(i).attribute13 = FND_API.G_MISS_CHAR) THEN

1300: ELSIF(p_x_revision_tbl(i).attribute12 IS NOT NULL) THEN
1301: l_revision_info.attribute12 := p_x_revision_tbl(i).attribute12;
1302: END IF;
1303:
1304: IF(p_x_revision_tbl(i).attribute13 = FND_API.G_MISS_CHAR) THEN
1305: l_revision_info.attribute13 := NULL;
1306: ELSIF(p_x_revision_tbl(i).attribute13 IS NOT NULL) THEN
1307: l_revision_info.attribute13 := p_x_revision_tbl(i).attribute13;
1308: END IF;

Line 1310: IF(p_x_revision_tbl(i).attribute14 = FND_API.G_MISS_CHAR) THEN

1306: ELSIF(p_x_revision_tbl(i).attribute13 IS NOT NULL) THEN
1307: l_revision_info.attribute13 := p_x_revision_tbl(i).attribute13;
1308: END IF;
1309:
1310: IF(p_x_revision_tbl(i).attribute14 = FND_API.G_MISS_CHAR) THEN
1311: l_revision_info.attribute14 := NULL;
1312: ELSIF(p_x_revision_tbl(i).attribute14 IS NOT NULL) THEN
1313: l_revision_info.attribute14 := p_x_revision_tbl(i).attribute14;
1314: END IF;

Line 1316: IF(p_x_revision_tbl(i).attribute15 = FND_API.G_MISS_CHAR) THEN

1312: ELSIF(p_x_revision_tbl(i).attribute14 IS NOT NULL) THEN
1313: l_revision_info.attribute14 := p_x_revision_tbl(i).attribute14;
1314: END IF;
1315:
1316: IF(p_x_revision_tbl(i).attribute15 = FND_API.G_MISS_CHAR) THEN
1317: l_revision_info.attribute15 := NULL;
1318: ELSIF(p_x_revision_tbl(i).attribute15 IS NOT NULL) THEN
1319: l_revision_info.attribute15 := p_x_revision_tbl(i).attribute15;
1320: END IF;

Line 1396: p_init_msg_list => FND_API.G_TRUE ,

1392:
1393: THEN
1394: DELETE_REVISION
1395: (p_api_version => 1.0 ,
1396: p_init_msg_list => FND_API.G_TRUE ,
1397: p_commit => FND_API.G_FALSE ,
1398: p_validate_only => FND_API.G_TRUE ,
1399: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1400: p_x_revision_tbl => p_x_revision_tbl ,

Line 1397: p_commit => FND_API.G_FALSE ,

1393: THEN
1394: DELETE_REVISION
1395: (p_api_version => 1.0 ,
1396: p_init_msg_list => FND_API.G_TRUE ,
1397: p_commit => FND_API.G_FALSE ,
1398: p_validate_only => FND_API.G_TRUE ,
1399: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1400: p_x_revision_tbl => p_x_revision_tbl ,
1401: x_return_status => x_return_status ,

Line 1398: p_validate_only => FND_API.G_TRUE ,

1394: DELETE_REVISION
1395: (p_api_version => 1.0 ,
1396: p_init_msg_list => FND_API.G_TRUE ,
1397: p_commit => FND_API.G_FALSE ,
1398: p_validate_only => FND_API.G_TRUE ,
1399: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1400: p_x_revision_tbl => p_x_revision_tbl ,
1401: x_return_status => x_return_status ,
1402: x_msg_count => x_msg_count ,

Line 1399: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1395: (p_api_version => 1.0 ,
1396: p_init_msg_list => FND_API.G_TRUE ,
1397: p_commit => FND_API.G_FALSE ,
1398: p_validate_only => FND_API.G_TRUE ,
1399: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1400: p_x_revision_tbl => p_x_revision_tbl ,
1401: x_return_status => x_return_status ,
1402: x_msg_count => x_msg_count ,
1403: x_msg_data => x_msg_data

Line 1409: IF FND_API.TO_BOOLEAN(p_commit) THEN

1405: END IF;
1406: END LOOP;
1407: END IF;
1408: -- Standard check of p_commit.
1409: IF FND_API.TO_BOOLEAN(p_commit) THEN
1410: COMMIT;
1411: END IF;
1412: -- Debug info
1413: IF G_DEBUG='Y' THEN

Line 1423: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1419: AHL_DEBUG_PUB.disable_debug;
1420:
1421: END IF;
1422: EXCEPTION
1423: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1424: ROLLBACK TO modify_revision;
1425: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1426: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1427: p_count => x_msg_count,

Line 1425: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1421: END IF;
1422: EXCEPTION
1423: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1424: ROLLBACK TO modify_revision;
1425: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1426: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1427: p_count => x_msg_count,
1428: p_data => x_msg_data);
1429:

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

1422: EXCEPTION
1423: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1424: ROLLBACK TO modify_revision;
1425: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1426: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1427: p_count => x_msg_count,
1428: p_data => x_msg_data);
1429:
1430: IF G_DEBUG='Y' THEN

Line 1440: WHEN FND_API.G_EXC_ERROR THEN

1436: AHL_DEBUG_PUB.disable_debug;
1437:
1438: END IF;
1439:
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO modify_revision;
1442: X_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,

Line 1442: X_return_status := FND_API.G_RET_STS_ERROR;

1438: END IF;
1439:
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO modify_revision;
1442: X_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => X_msg_data);
1446: -- Debug info.

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

1439:
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO modify_revision;
1442: X_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => X_msg_data);
1446: -- Debug info.
1447: IF G_DEBUG='Y' THEN

Line 1459: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1455: END IF;
1456:
1457: WHEN OTHERS THEN
1458: ROLLBACK TO modify_revision;
1459: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1460: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1461: THEN
1462: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
1463: p_procedure_name => 'MODIFY_REVISION',

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

1462: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PVT',
1463: p_procedure_name => 'MODIFY_REVISION',
1464: p_error_text => SUBSTR(SQLERRM,1,240));
1465: END IF;
1466: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1467: p_count => x_msg_count,
1468: p_data => X_msg_data);
1469:
1470: -- Debug info.

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

1482: --
1483: PROCEDURE DELETE_REVISION
1484: (
1485: p_api_version IN NUMBER := 1.0 ,
1486: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1487: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1488: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1489: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1490: p_x_revision_tbl IN revision_tbl ,

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

1483: PROCEDURE DELETE_REVISION
1484: (
1485: p_api_version IN NUMBER := 1.0 ,
1486: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1487: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1488: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1489: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1490: p_x_revision_tbl IN revision_tbl ,
1491: x_return_status OUT NOCOPY VARCHAR2 ,

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

1484: (
1485: p_api_version IN NUMBER := 1.0 ,
1486: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1487: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1488: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1489: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1490: p_x_revision_tbl IN revision_tbl ,
1491: x_return_status OUT NOCOPY VARCHAR2 ,
1492: x_msg_count OUT NOCOPY NUMBER ,

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

1485: p_api_version IN NUMBER := 1.0 ,
1486: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1487: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1488: p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
1489: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1490: p_x_revision_tbl IN revision_tbl ,
1491: x_return_status OUT NOCOPY VARCHAR2 ,
1492: x_msg_count OUT NOCOPY NUMBER ,
1493: x_msg_data OUT NOCOPY VARCHAR2

Line 1517: IF FND_API.to_boolean(p_init_msg_list)

1513: BEGIN
1514: -- Standard Start of API savepoint
1515: SAVEPOINT delete_revision;
1516: -- Standard call to check for call compatibility.
1517: IF FND_API.to_boolean(p_init_msg_list)
1518: THEN
1519: FND_MSG_PUB.initialize;
1520: END IF;
1521: -- Initialize API return status to success

Line 1524: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

1520: END IF;
1521: -- Initialize API return status to success
1522: x_return_status := 'S';
1523: -- Initialize message list if p_init_msg_list is set to TRUE.
1524: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1525: p_api_version,
1526: l_api_name,G_PKG_NAME)
1527: THEN
1528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1524: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1525: p_api_version,
1526: l_api_name,G_PKG_NAME)
1527: THEN
1528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1529: END IF;
1530: --Start of API Body
1531: IF p_x_revision_tbl.COUNT > 0
1532: THEN

Line 1571: IF FND_API.TO_BOOLEAN(p_commit) THEN

1567: WHERE ROWID = l_rowid;
1568: END LOOP;
1569: END IF;
1570: -- Standard check of p_commit.
1571: IF FND_API.TO_BOOLEAN(p_commit) THEN
1572: COMMIT;
1573: END IF;
1574:
1575: EXCEPTION

Line 1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1572: COMMIT;
1573: END IF;
1574:
1575: EXCEPTION
1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1577: ROLLBACK TO delete_revision;
1578: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1580: p_count => x_msg_count,

Line 1578: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1574:
1575: EXCEPTION
1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1577: ROLLBACK TO delete_revision;
1578: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1580: p_count => x_msg_count,
1581: p_data => x_msg_data);
1582:

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

1575: EXCEPTION
1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1577: ROLLBACK TO delete_revision;
1578: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1580: p_count => x_msg_count,
1581: p_data => x_msg_data);
1582:
1583: WHEN FND_API.G_EXC_ERROR THEN

Line 1583: WHEN FND_API.G_EXC_ERROR THEN

1579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1580: p_count => x_msg_count,
1581: p_data => x_msg_data);
1582:
1583: WHEN FND_API.G_EXC_ERROR THEN
1584: ROLLBACK TO delete_revision;
1585: X_return_status := FND_API.G_RET_STS_ERROR;
1586: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1587: p_count => x_msg_count,

Line 1585: X_return_status := FND_API.G_RET_STS_ERROR;

1581: p_data => x_msg_data);
1582:
1583: WHEN FND_API.G_EXC_ERROR THEN
1584: ROLLBACK TO delete_revision;
1585: X_return_status := FND_API.G_RET_STS_ERROR;
1586: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1587: p_count => x_msg_count,
1588: p_data => X_msg_data);
1589: WHEN OTHERS THEN

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

1582:
1583: WHEN FND_API.G_EXC_ERROR THEN
1584: ROLLBACK TO delete_revision;
1585: X_return_status := FND_API.G_RET_STS_ERROR;
1586: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1587: p_count => x_msg_count,
1588: p_data => X_msg_data);
1589: WHEN OTHERS THEN
1590: ROLLBACK TO delete_revision;

Line 1591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1587: p_count => x_msg_count,
1588: p_data => X_msg_data);
1589: WHEN OTHERS THEN
1590: ROLLBACK TO delete_revision;
1591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1592: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1593: THEN
1594: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DOC_REVISIONS_PVT',
1595: p_procedure_name => 'DELETE_REVISION',

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

1594: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DOC_REVISIONS_PVT',
1595: p_procedure_name => 'DELETE_REVISION',
1596: p_error_text => SUBSTR(SQLERRM,1,240));
1597: END IF;
1598: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1599: p_count => x_msg_count,
1600: p_data => X_msg_data);
1601:
1602: END DELETE_REVISION;

Line 1626: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)

1622: l_document_no VARCHAR2(100);
1623:
1624: BEGIN
1625: FND_MSG_PUB.Initialize;
1626: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1627: THEN
1628: retcode := 2;
1629: errbuf := FND_MSG_PUB.Get;
1630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1626: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1627: THEN
1628: retcode := 2;
1629: errbuf := FND_MSG_PUB.Get;
1630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1631: END IF;
1632: -- To change the status of the documents obsoleted using future obsolete date to 'obsolete' status.
1633: update ahl_doc_revisions_b
1634: set revision_status_code ='OBSOLETE'