DBA Data[Home] [Help]

APPS.AHL_DI_SUBSCRIPTION_PUB dependencies on AHL_DI_SUBSCRIPTION_PUB

Line 1: PACKAGE BODY AHL_DI_SUBSCRIPTION_PUB AS

1: PACKAGE BODY AHL_DI_SUBSCRIPTION_PUB AS
2: /* $Header: AHLPSUBB.pls 115.35 2004/04/29 06:45:14 adharia noship $ */
3: --
4: G_PKG_NAME VARCHAR2(30) := 'AHL_DI_SUBSCRIPTION_PUB';
5:

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

1: PACKAGE BODY AHL_DI_SUBSCRIPTION_PUB AS
2: /* $Header: AHLPSUBB.pls 115.35 2004/04/29 06:45:14 adharia noship $ */
3: --
4: G_PKG_NAME VARCHAR2(30) := 'AHL_DI_SUBSCRIPTION_PUB';
5:
6: /*-----------------------------------------------------------*/
7: /* procedure name: Check_lookup_name_Or_Id(private procedure)*/
8: /* description : used to retrieve lookup code */

Line 160: AHL_DEBUG_PUB.debug( 'enter ahl_di_subscription_pub.Create Subscription','+SUB+');

156: END IF;
157: -- Debug info.
158: IF G_DEBUG='Y' THEN
159: IF G_DEBUG='Y' THEN
160: AHL_DEBUG_PUB.debug( 'enter ahl_di_subscription_pub.Create Subscription','+SUB+');
161:
162: END IF;
163: END IF;
164: -- Standard call to check for call compatibility.

Line 445: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',

441: /* description : Added by siddhartha to call User Hooks */
442: /* Date : Dec 20 2001 */
443: /*------------------------------------------------------------------------*/
444:
445: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',
446: 'B', 'C' ) then
447:
448: IF G_DEBUG='Y' THEN
449: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_CUHK.CREATE_SUBSCRIPTION_Pre');

Line 471: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',

467: END IF;
468: END IF;
469:
470:
471: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',
472: 'B', 'V' ) then
473: IF G_DEBUG='Y' THEN
474: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_VUHK.CREATE_SUBSCRIPTION_Pre');
475:

Line 558: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',

554: /* Date : Dec 20 2001 */
555: /*------------------------------------------------------------------------*/
556:
557:
558: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',
559: 'A', 'V' ) then
560:
561: IF G_DEBUG='Y' THEN
562: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_VUHK.CREATE_SUBSCRIPTION_Post');

Line 585: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',

581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583: END IF;
584:
585: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','CREATE_SUBSCRIPTION',
586: 'A', 'C' ) then
587: IF G_DEBUG='Y' THEN
588: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_CUHK.CREATE_SUBSCRIPTION_Post');
589:

Line 640: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');

636: p_count => x_msg_count,
637: p_data => x_msg_data);
638: IF G_DEBUG='Y' THEN
639: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );
640: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');
641:
642:
643: -- Check if API is called in debug mode. If yes, disable debug.
644: AHL_DEBUG_PUB.disable_debug;

Line 657: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');

653: p_data => X_msg_data);
654: -- Debug info.
655: IF G_DEBUG='Y' THEN
656: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
657: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');
658:
659:
660: -- Check if API is called in debug mode. If yes, disable debug.
661: AHL_DEBUG_PUB.disable_debug;

Line 670: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PUB',

666: ROLLBACK TO create_subscription;
667: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
668: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
669: THEN
670: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PUB',
671: p_procedure_name => 'CREATE_SUBSCRIPTION',
672: p_error_text => SUBSTR(SQLERRM,1,240));
673: END IF;
674: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 681: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');

677:
678: -- Debug info.
679: IF G_DEBUG='Y' THEN
680: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'SQL ERROR' );
681: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Create Subscription','+SUB+');
682:
683:
684: -- Check if API is called in debug mode. If yes, disable debug.
685: AHL_DEBUG_PUB.disable_debug;

Line 810: AHL_DEBUG_PUB.debug( 'enter ahl_di_subscription_pub.Modify Subscription','+SUB+');

806: END IF;
807: -- Debug info.
808: IF G_DEBUG='Y' THEN
809: IF G_DEBUG='Y' THEN
810: AHL_DEBUG_PUB.debug( 'enter ahl_di_subscription_pub.Modify Subscription','+SUB+');
811:
812: END IF;
813: END IF;
814: -- Standard call to check for call compatibility.

Line 1112: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',

1108: /* description : Added by siddhartha to call User Hooks */
1109: /* Date : Dec 20 2001 */
1110: /*------------------------------------------------------------------------*/
1111:
1112: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',
1113: 'B', 'C' ) then
1114: IF G_DEBUG='Y' THEN
1115: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_CUHK.MODIFY_SUBSCRIPTION_Pre');
1116:

Line 1137: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',

1133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1134: END IF;
1135: END IF;
1136:
1137: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',
1138: 'B', 'V' ) then
1139: IF G_DEBUG='Y' THEN
1140: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_VUHK.MODIFY_SUBSCRIPTION_Pre');
1141:

Line 1221: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',

1217: /* Date : Dec 20 2001 */
1218: /*------------------------------------------------------------------------*/
1219:
1220:
1221: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',
1222: 'A', 'V' ) then
1223: IF G_DEBUG='Y' THEN
1224: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_VUHK.MODIFY_SUBSCRIPTION_Post');
1225:

Line 1246: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',

1242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1243: END IF;
1244: END IF;
1245:
1246: IF JTF_USR_HKS.Ok_to_Execute( 'AHL_DI_SUBSCRIPTION_PUB','MODIFY_SUBSCRIPTION',
1247: 'A', 'C' ) then
1248: IF G_DEBUG='Y' THEN
1249: AHL_DEBUG_PUB.debug( 'Start AHL_DI_SUBSCRIPTION_CUHK.MODIFY_SUBSCRIPTION_Post');
1250:

Line 1302: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');

1298: p_count => x_msg_count,
1299: p_data => x_msg_data);
1300: IF G_DEBUG='Y' THEN
1301: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );
1302: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');
1303:
1304:
1305: -- Check if API is called in debug mode. If yes, disable debug.
1306: AHL_DEBUG_PUB.disable_debug;

Line 1319: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');

1315: p_data => X_msg_data);
1316: -- Debug info.
1317: IF G_DEBUG='Y' THEN
1318: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
1319: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');
1320:
1321:
1322: -- Check if API is called in debug mode. If yes, disable debug.
1323: AHL_DEBUG_PUB.disable_debug;

Line 1332: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PUB',

1328: ROLLBACK TO modify_subscription;
1329: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1330: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1331: THEN
1332: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PUB',
1333: p_procedure_name => 'MODIFY_SUBSCRIPTION',
1334: p_error_text => SUBSTR(SQLERRM,1,240));
1335: END IF;
1336: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1343: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');

1339:
1340: -- Debug info.
1341: IF G_DEBUG='Y' THEN
1342: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'SQL ERROR' );
1343: AHL_DEBUG_PUB.debug( 'ahl_di_subscription_pub.Modify Subscription','+SUB+');
1344:
1345:
1346: -- Check if API is called in debug mode. If yes, disable debug.
1347: AHL_DEBUG_PUB.disable_debug;

Line 1353: END AHL_DI_SUBSCRIPTION_PUB;

1349: END IF;
1350:
1351: END MODIFY_SUBSCRIPTION;
1352: --
1353: END AHL_DI_SUBSCRIPTION_PUB;