DBA Data[Home] [Help]

APPS.AHL_DI_DOC_REVISION_PUB dependencies on AHL_DI_DOC_REVISION_PUB

Line 1: PACKAGE BODY AHL_DI_DOC_REVISION_PUB AS

1: PACKAGE BODY AHL_DI_DOC_REVISION_PUB AS
2: /* $Header: AHLPDORB.pls 120.0.12000000.2 2007/08/10 11:37:05 viagrawa ship $ */
3: --
4: G_PKG_NAME VARCHAR2(30) := 'AHL_DI_DOC_REVISION_PUB';
5: /*-----------------------------------------------------------*/

Line 4: G_PKG_NAME VARCHAR2(30) := 'AHL_DI_DOC_REVISION_PUB';

1: PACKAGE BODY AHL_DI_DOC_REVISION_PUB AS
2: /* $Header: AHLPDORB.pls 120.0.12000000.2 2007/08/10 11:37:05 viagrawa ship $ */
3: --
4: G_PKG_NAME VARCHAR2(30) := 'AHL_DI_DOC_REVISION_PUB';
5: /*-----------------------------------------------------------*/
6: /* procedure name: Check_lookup_name_Or_Id(private procedure)*/
7: /* description : used to retrieve lookup code */
8: /* */

Line 156: AHL_DEBUG_PUB.debug( 'enter ahl_di_doc_revision_pub.Create Revision','+REV+');

152: END IF;
153: -- Debug info.
154: IF G_DEBUG='Y' THEN
155: IF G_DEBUG='Y' THEN
156: AHL_DEBUG_PUB.debug( 'enter ahl_di_doc_revision_pub.Create Revision','+REV+');
157:
158: END IF;
159: END IF;
160: -- Standard call to check for call compatibility.

Line 525: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',

521: /* Date : Dec 27 2001 */
522: /*----------------------------------------------------------------- */
523:
524:
525: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',
526: 'B', 'C' ) then
527:
528:
529: IF G_DEBUG='Y' THEN

Line 557: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',

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',
558: 'B', 'V' ) then
559: IF G_DEBUG='Y' THEN
560: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_VUHK.CREATE_REVISION_PRE');
561:

Line 638: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',

634: /* Date : Dec 27 2001 */
635: /*------------------------------------------------------------------------------*/
636:
637:
638: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',
639: 'A', 'V' ) then
640:
641: IF G_DEBUG='Y' THEN
642: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_VUHK.CREATE_REVISION_POST');

Line 665: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',

661: END IF;
662:
663: END IF;
664:
665: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','CREATE_REVISION',
666: 'A', 'C' ) then
667:
668: IF G_DEBUG='Y' THEN
669: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_CUHK.CREATE_REVISION_POST');

Line 726: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');

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' );
726: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');
727:
728:
729: -- Check if API is called in debug mode. If yes, disable debug.
730: AHL_DEBUG_PUB.disable_debug;

Line 743: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');

739: p_data => X_msg_data);
740: -- Debug info.
741: IF G_DEBUG='Y' THEN
742: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
743: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');
744:
745:
746: -- Check if API is called in debug mode. If yes, disable debug.
747: AHL_DEBUG_PUB.disable_debug;

Line 757: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',

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',
759: p_error_text => SUBSTR(SQLERRM,1,240));
760: END IF;
761: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 767: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');

763: p_data => X_msg_data);
764: -- Debug info.
765: IF G_DEBUG='Y' THEN
766: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'SQL ERROR' );
767: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Create Revision','+REV+');
768:
769: -- Check if API is called in debug mode. If yes, disable debug.
770: AHL_DEBUG_PUB.disable_debug;
771:

Line 877: AHL_DEBUG_PUB.debug( 'enter ahl_di_doc_revision_pub.Modify Revision','+REV+');

873: END IF;
874: -- Debug info.
875: IF G_DEBUG='Y' THEN
876: IF G_DEBUG='Y' THEN
877: AHL_DEBUG_PUB.debug( 'enter ahl_di_doc_revision_pub.Modify Revision','+REV+');
878:
879: END IF;
880: END IF;
881: -- Standard call to check for call compatibility.

Line 1253: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',

1249: /* Date : Dec 27 2001 */
1250: /*---------------------------------------------------------------*/
1251:
1252:
1253: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',
1254: 'B', 'C' ) then
1255: IF G_DEBUG='Y' THEN
1256: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_CUHK.MODIFY_REVISION_PRE');
1257:

Line 1282: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',

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',
1283: 'B', 'V' ) then
1284: IF G_DEBUG='Y' THEN
1285: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_VUHK.MODIFY_REVISION_PRE');
1286:

Line 1354: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',

1350: /*------------------------------------------------------------------------------*/
1351:
1352:
1353:
1354: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',
1355: 'A', 'V' ) then
1356: IF G_DEBUG='Y' THEN
1357: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_VUHK.MODIFY_REVISION_POST');
1358:

Line 1382: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',

1378:
1379:
1380: END IF;
1381:
1382: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_DOC_REVISION_PUB','MODIFY_REVISION',
1383: 'A', 'C' ) then
1384: IF G_DEBUG='Y' THEN
1385: AHL_DEBUG_PUB.debug( 'Start AHL_DI_DOC_REVISION_CUHK.MODIFY_REVISION_POST');
1386:

Line 1442: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');

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' );
1442: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');
1443:
1444: -- Check if API is called in debug mode. If yes, disable debug.
1445: AHL_DEBUG_PUB.disable_debug;
1446:

Line 1458: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');

1454: p_data => X_msg_data);
1455: -- Debug info.
1456: IF G_DEBUG='Y' THEN
1457: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
1458: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');
1459:
1460:
1461: -- Check if API is called in debug mode. If yes, disable debug.
1462: AHL_DEBUG_PUB.disable_debug;

Line 1471: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_DOC_REVISION_PUB',

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',
1473: p_error_text => SUBSTR(SQLERRM,1,240));
1474: END IF;
1475: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1482: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');

1478:
1479: -- Debug info.
1480: IF G_DEBUG='Y' THEN
1481: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'SQL ERROR' );
1482: AHL_DEBUG_PUB.debug( 'ahl_di_doc_revision_pub.Modify Revision','+REV+');
1483:
1484:
1485: -- Check if API is called in debug mode. If yes, disable debug.
1486: AHL_DEBUG_PUB.disable_debug;

Line 1491: END AHL_DI_DOC_REVISION_PUB;

1487:
1488: END IF;
1489:
1490: END MODIFY_REVISION;
1491: END AHL_DI_DOC_REVISION_PUB;