4: G_OBJECT_TYPE VARCHAR2(30):='RM_NTF';
5: G_PM_INSTALL VARCHAR2(30):=ahl_util_pkg.is_pm_installed;
6:
7: -- Local Api
8: G_DEBUG VARCHAR2(1):=AHL_DEBUG_PUB.is_log_enabled;
9: PROCEDURE NOTIFY_TERMINATION
10: (
11: x_return_status OUT NOCOPY VARCHAR2,
12: x_msg_count OUT NOCOPY NUMBER,
91: BEGIN
92: SAVEPOINT NOTIFY_TERMINATION;
93:
94: IF G_DEBUG='Y' THEN
95: AHL_DEBUG_PUB.enable_debug;
96: AHL_DEBUG_PUB.debug( 'Enter Notifications','+RM_NOTIFY+');
97: END IF;
98:
99: IF p_prim_object_type='RM'
92: SAVEPOINT NOTIFY_TERMINATION;
93:
94: IF G_DEBUG='Y' THEN
95: AHL_DEBUG_PUB.enable_debug;
96: AHL_DEBUG_PUB.debug( 'Enter Notifications','+RM_NOTIFY+');
97: END IF;
98:
99: IF p_prim_object_type='RM'
100: THEN
303:
304: -- Check if API is called in debug mode. If yes, enable debug.
305:
306: IF G_DEBUG='Y' THEN
307: AHL_DEBUG_PUB.enable_debug;
308: AHL_DEBUG_PUB.debug( 'Enter Initiate OPERATION Approval..','+HEADERS+');
309: END IF;
310:
311: -- Standard call to check for call compatibility.
304: -- Check if API is called in debug mode. If yes, enable debug.
305:
306: IF G_DEBUG='Y' THEN
307: AHL_DEBUG_PUB.enable_debug;
308: AHL_DEBUG_PUB.debug( 'Enter Initiate OPERATION Approval..','+HEADERS+');
309: END IF;
310:
311: -- Standard call to check for call compatibility.
312:
379: FND_MESSAGE.SET_NAME('AHL',l_msg);
380: FND_MESSAGE.set_token('FIELD',l_start_Date);
381: FND_MSG_PUB.ADD;
382: IF G_DEBUG='Y' THEN
383: AHL_DEBUG_PUB.debug( 'AHL_rm_util.Validate_rt_oper_start_date','+OPER+');
384: END IF;
385: ELSIF TRUNC(l_oper_rec.START_DATE_ACTIVE)
387: FND_MESSAGE.SET_NAME('AHL','AHL_RM_INVALID_ST_DATE');
527: );
528:
529: IF G_DEBUG='Y'
530: THEN
531: AHL_DEBUG_PUB.debug( 'After CompleteOperRevision');
532: END IF;
533: END IF ;
534:
535:
625:
626: -- Check if API is called in debug mode. If yes, enable debug.
627:
628: IF G_DEBUG='Y' THEN
629: AHL_DEBUG_PUB.enable_debug;
630: AHL_DEBUG_PUB.debug( 'Enter Initiate Route Approval','+ROUTES+');
631: AHL_DEBUG_PUB.debug( 'p_approval_type'||p_apprvl_type,'+ROUTES+');
632: END IF;
633:
626: -- Check if API is called in debug mode. If yes, enable debug.
627:
628: IF G_DEBUG='Y' THEN
629: AHL_DEBUG_PUB.enable_debug;
630: AHL_DEBUG_PUB.debug( 'Enter Initiate Route Approval','+ROUTES+');
631: AHL_DEBUG_PUB.debug( 'p_approval_type'||p_apprvl_type,'+ROUTES+');
632: END IF;
633:
634: -- Standard call to check for call compatibility.
627:
628: IF G_DEBUG='Y' THEN
629: AHL_DEBUG_PUB.enable_debug;
630: AHL_DEBUG_PUB.debug( 'Enter Initiate Route Approval','+ROUTES+');
631: AHL_DEBUG_PUB.debug( 'p_approval_type'||p_apprvl_type,'+ROUTES+');
632: END IF;
633:
634: -- Standard call to check for call compatibility.
635:
715: FND_MESSAGE.SET_NAME('AHL',l_msg);
716: FND_MESSAGE.set_token('FIELD',l_start_Date);
717: FND_MSG_PUB.ADD;
718: IF G_DEBUG='Y' THEN
719: AHL_DEBUG_PUB.debug('AHL_rm_util.Validate_rt_oper_start_date','+ROUTE+');
720: END IF;
721: ELSIF TRUNC(l_route_rec.START_DATE_ACTIVE)
723: FND_MESSAGE.SET_NAME('AHL','AHL_RM_INVALID_ST_DATE');
911: p_approver_note =>null
912: );
913: IF G_DEBUG='Y'
914: THEN
915: AHL_DEBUG_PUB.debug( 'After CompleteRouteRevision');
916: END IF;
917: END IF ;
918:
919: l_msg_count := FND_MSG_PUB.count_msg;
1039:
1040: SAVEPOINT COMPLETE_ROUTE_REVISION;
1041:
1042: IF G_DEBUG='Y' THEN
1043: AHL_DEBUG_PUB.enable_debug;
1044: END IF;
1045:
1046: SELECT REVISION_STATUS_CODE INTO l_curr_status
1047: FROM AHL_ROUTES_APP_V WHERE ROUTE_ID=p_route_id;
1063: IF p_route_id is not null or p_route_id<>fnd_api.g_miss_num
1064: THEN
1065: IF G_DEBUG='Y'
1066: THEN
1067: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1068: END IF;
1069: OPEN GetRouteDet(p_route_id);
1070:
1071: FETCH GetRouteDet INTO l_route_rec;
1141:
1142: l_check_flag2:='Y';
1143: IF G_DEBUG='Y'
1144: THEN
1145: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1146: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1147: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1148: END IF;
1149: Elsif l_check_flag='Y' and l_route_rec.revision_number>1 and
1142: l_check_flag2:='Y';
1143: IF G_DEBUG='Y'
1144: THEN
1145: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1146: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1147: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1148: END IF;
1149: Elsif l_check_flag='Y' and l_route_rec.revision_number>1 and
1150: l_curr_status='APPROVAL_PENDING' AND p_appr_status='APPROVED'
1143: IF G_DEBUG='Y'
1144: THEN
1145: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1146: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1147: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1148: END IF;
1149: Elsif l_check_flag='Y' and l_route_rec.revision_number>1 and
1150: l_curr_status='APPROVAL_PENDING' AND p_appr_status='APPROVED'
1151: THEN
1150: l_curr_status='APPROVAL_PENDING' AND p_appr_status='APPROVED'
1151: THEN
1152: IF G_DEBUG='Y'
1153: THEN
1154: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1155: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1156: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1157: END IF;
1158: OPEN GetPrevRouteDet(l_route_rec.revision_number,l_route_rec.route_no);
1151: THEN
1152: IF G_DEBUG='Y'
1153: THEN
1154: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1155: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1156: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1157: END IF;
1158: OPEN GetPrevRouteDet(l_route_rec.revision_number,l_route_rec.route_no);
1159:
1152: IF G_DEBUG='Y'
1153: THEN
1154: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:p_route_id'||p_route_id);
1155: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_status'||l_status);
1156: AHL_DEBUG_PUB.debug( 'Inside CompleteRouteRevision:l_route_rec.revision_number'||l_route_rec.revision_number);
1157: END IF;
1158: OPEN GetPrevRouteDet(l_route_rec.revision_number,l_route_rec.route_no);
1159:
1160: FETCH GetPrevRouteDet INTO l_prev_route_rec;
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1334:
1335: IF G_DEBUG='Y' THEN
1336: AHL_DEBUG_PUB.debug( 'Before commit Complete_route_revision Status----->'||p_appr_status,'+DEBUG_RELATIONS+');
1337: END IF;
1338:
1339: IF FND_API.TO_BOOLEAN(p_commit) THEN
1340: COMMIT;
1431: BEGIN
1432: SAVEPOINT COMPLETE_OPER_REVISION;
1433:
1434: IF G_DEBUG='Y' THEN
1435: AHL_DEBUG_PUB.enable_debug;
1436: AHL_DEBUG_PUB.debug( 'Complete_mr_revision Status----->'||p_appr_status,'+DEBUG_RELATIONS+');
1437: END IF;
1438:
1439: SELECT REVISION_STATUS_CODE INTO l_curr_status
1432: SAVEPOINT COMPLETE_OPER_REVISION;
1433:
1434: IF G_DEBUG='Y' THEN
1435: AHL_DEBUG_PUB.enable_debug;
1436: AHL_DEBUG_PUB.debug( 'Complete_mr_revision Status----->'||p_appr_status,'+DEBUG_RELATIONS+');
1437: END IF;
1438:
1439: SELECT REVISION_STATUS_CODE INTO l_curr_status
1440: FROM AHL_OPERATIONS_B_KFV WHERE OPERATION_ID=p_operation_id;
1452: l_check_flag3:='N';
1453: END IF;
1454:
1455: IF G_DEBUG='Y' THEN
1456: AHL_DEBUG_PUB.debug( 'Complete_operation_revision Status2----->'||L_status,'+DEBUG_REVISION+');
1457: AHL_DEBUG_PUB.debug( 'Complete_mr_revision Status2----->'||L_status,'+DEBUG_REVISION+');
1458: END IF;
1459:
1460: IF p_operation_id is not null or p_operation_id<>fnd_api.g_miss_num
1453: END IF;
1454:
1455: IF G_DEBUG='Y' THEN
1456: AHL_DEBUG_PUB.debug( 'Complete_operation_revision Status2----->'||L_status,'+DEBUG_REVISION+');
1457: AHL_DEBUG_PUB.debug( 'Complete_mr_revision Status2----->'||L_status,'+DEBUG_REVISION+');
1458: END IF;
1459:
1460: IF p_operation_id is not null or p_operation_id<>fnd_api.g_miss_num
1461: THEN
1590: END IF;
1591: END IF;
1592: ELSE
1593: IF G_DEBUG='Y' THEN
1594: AHL_DEBUG_PUB.debug( 'INVALID P_MR_HEADER_ID','+COMPLETE_OPERATION_REVISION+');
1595: ROLLBACK;
1596: END IF;
1597: END IF;
1598:
1603: RAISE FND_API.G_EXC_ERROR;
1604: END IF;
1605:
1606: IF G_DEBUG='Y' THEN
1607: AHL_DEBUG_PUB.debug( 'Before commit Complete_mr_revision Status----->'||p_appr_status,'+DEBUG_RELATIONS+');
1608: END IF;
1609:
1610: IF FND_API.TO_BOOLEAN(p_commit) THEN
1611: COMMIT;