eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_MC_RULE_PVT dependencies on FND_MESSAGE

Line 79: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');

75: OPEN ahl_rule_stmt_csr(p_rule_id);
76: FETCH ahl_rule_stmt_csr INTO l_rule_stmt_id;
77:
78: IF (ahl_rule_stmt_csr%NOTFOUND) THEN
79: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');
80: FND_MESSAGE.Set_Token('RULE_STMT_ID',l_rule_stmt_id);
81: FND_MSG_PUB.ADD;
82: CLOSE ahl_rule_stmt_csr;
83: RAISE FND_API.G_EXC_ERROR;

Line 80: FND_MESSAGE.Set_Token('RULE_STMT_ID',l_rule_stmt_id);

76: FETCH ahl_rule_stmt_csr INTO l_rule_stmt_id;
77:
78: IF (ahl_rule_stmt_csr%NOTFOUND) THEN
79: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');
80: FND_MESSAGE.Set_Token('RULE_STMT_ID',l_rule_stmt_id);
81: FND_MSG_PUB.ADD;
82: CLOSE ahl_rule_stmt_csr;
83: RAISE FND_API.G_EXC_ERROR;
84: END IF;

Line 229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');

225: l_object_id, l_oper_meaning, l_obj_ver_num;
226:
227: --The rule statement has to exist
228: IF (check_rule_operator_csr%NOTFOUND) THEN
229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');
230: FND_MESSAGE.Set_Token('RULE_STMT_ID',p_rule_stmt_id);
231: FND_MSG_PUB.ADD;
232: CLOSE check_rule_operator_csr;
233: RAISE FND_API.G_EXC_ERROR;

Line 230: FND_MESSAGE.Set_Token('RULE_STMT_ID',p_rule_stmt_id);

226:
227: --The rule statement has to exist
228: IF (check_rule_operator_csr%NOTFOUND) THEN
229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_ID_INV');
230: FND_MESSAGE.Set_Token('RULE_STMT_ID',p_rule_stmt_id);
231: FND_MSG_PUB.ADD;
232: CLOSE check_rule_operator_csr;
233: RAISE FND_API.G_EXC_ERROR;
234: ELSE

Line 382: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_NULL');

378: l_msg_count NUMBER;
379: --
380: BEGIN
381: IF (p_rule_stmt_tbl.COUNT<1) THEN
382: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_NULL');
383: FND_MSG_PUB.ADD;
384: RAISE FND_API.G_EXC_ERROR;
385: END IF;
386:

Line 396: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_INV');

392:
393: --Check that the parens are only valid characters
394: IF (ltrim(l_ui_stmt_rec.left_paren, '(' ) IS NOT NULL OR
395: ltrim(l_ui_stmt_rec.right_paren, ')' ) IS NOT NULL) THEN
396: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_INV');
397: FND_MSG_PUB.ADD;
398: END IF;
399:
400: --Check that the left parens>0 and right_paren>0 is an error

Line 403: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_DUP');

399:
400: --Check that the left parens>0 and right_paren>0 is an error
401: IF (length(l_ui_stmt_rec.left_paren) > 0 AND
402: length(l_ui_stmt_rec.right_paren) > 0 ) THEN
403: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_DUP');
404: FND_MSG_PUB.ADD;
405: END IF;
406:
407: --Calculate the depth and assign to statement

Line 414: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_UNMATCH');

410: l_depth_count:=l_depth_count-nvl(length(l_ui_stmt_rec.right_paren),0);
411: l_ui_stmt_rec.rule_oper_stmt_depth := l_depth_count;
412:
413: IF (l_depth_count < 0 ) THEN
414: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_UNMATCH');
415: FND_MSG_PUB.ADD;
416: END IF;
417:
418: l_ui_stmt_tbl(i) := l_ui_stmt_rec;

Line 424: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_UNMATCH');

420:
421:
422: --Check that the left parens>1 and right_paren>1
423: IF (l_depth_count <>0) THEN
424: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_PAREN_UNMATCH');
425: FND_MSG_PUB.ADD;
426: END IF;
427:
428: -- Check Error Message stack.

Line 563: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_MIN_INV');

559: END LOOP;
560:
561: --If we did not find the min depth, then throw an error.
562: IF (l_min_depth_index = -1) THEN
563: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_MIN_INV');
564: FND_MSG_PUB.ADD;
565: RAISE FND_API.G_EXC_ERROR;
566: END IF;
567:

Line 585: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_OPER_NULL');

581: END IF;
582:
583: --If the operator is null, then throw error.
584: IF (l_operator IS NULL) THEN
585: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_OPER_NULL');
586: FND_MSG_PUB.ADD;
587: RAISE FND_API.G_EXC_ERROR;
588: END IF;
589:

Line 737: FND_MESSAGE.Set_Name('AHL','AHL_MC_HEADER_ID_INVALID');

733: --Check Status of MC allows for editing
734: OPEN check_mc_status_csr(p_x_rule_rec.mc_header_id);
735: FETCH check_mc_status_csr INTO l_status_code, l_status;
736: IF (check_mc_status_csr%NOTFOUND) THEN
737: FND_MESSAGE.Set_Name('AHL','AHL_MC_HEADER_ID_INVALID');
738: FND_MESSAGE.Set_Token('NAME','');
739: FND_MESSAGE.Set_Token('MC_HEADER_ID',p_x_rule_rec.mc_header_id);
740: FND_MSG_PUB.ADD;
741: CLOSE check_mc_status_csr;

Line 738: FND_MESSAGE.Set_Token('NAME','');

734: OPEN check_mc_status_csr(p_x_rule_rec.mc_header_id);
735: FETCH check_mc_status_csr INTO l_status_code, l_status;
736: IF (check_mc_status_csr%NOTFOUND) THEN
737: FND_MESSAGE.Set_Name('AHL','AHL_MC_HEADER_ID_INVALID');
738: FND_MESSAGE.Set_Token('NAME','');
739: FND_MESSAGE.Set_Token('MC_HEADER_ID',p_x_rule_rec.mc_header_id);
740: FND_MSG_PUB.ADD;
741: CLOSE check_mc_status_csr;
742: RAISE FND_API.G_EXC_ERROR;

Line 739: FND_MESSAGE.Set_Token('MC_HEADER_ID',p_x_rule_rec.mc_header_id);

735: FETCH check_mc_status_csr INTO l_status_code, l_status;
736: IF (check_mc_status_csr%NOTFOUND) THEN
737: FND_MESSAGE.Set_Name('AHL','AHL_MC_HEADER_ID_INVALID');
738: FND_MESSAGE.Set_Token('NAME','');
739: FND_MESSAGE.Set_Token('MC_HEADER_ID',p_x_rule_rec.mc_header_id);
740: FND_MSG_PUB.ADD;
741: CLOSE check_mc_status_csr;
742: RAISE FND_API.G_EXC_ERROR;
743: ELSIF ( l_status_code <> 'DRAFT' AND

Line 745: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');

741: CLOSE check_mc_status_csr;
742: RAISE FND_API.G_EXC_ERROR;
743: ELSIF ( l_status_code <> 'DRAFT' AND
744: l_status_code <> 'APPROVAL_REJECTED') THEN
745: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
746: FND_MESSAGE.Set_Token('STATUS', l_status);
747: FND_MSG_PUB.ADD;
748: CLOSE check_mc_status_csr;
749: RAISE FND_API.G_EXC_ERROR;

Line 746: FND_MESSAGE.Set_Token('STATUS', l_status);

742: RAISE FND_API.G_EXC_ERROR;
743: ELSIF ( l_status_code <> 'DRAFT' AND
744: l_status_code <> 'APPROVAL_REJECTED') THEN
745: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
746: FND_MESSAGE.Set_Token('STATUS', l_status);
747: FND_MSG_PUB.ADD;
748: CLOSE check_mc_status_csr;
749: RAISE FND_API.G_EXC_ERROR;
750: END IF;

Line 825: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_NULL');

821: END IF;
822:
823: --Check Rule Name is not null
824: IF (p_x_rule_rec.rule_name IS NULL) THEN
825: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_NULL');
826: FND_MSG_PUB.ADD;
827: END IF;
828:
829: --Check Rule Type is valid

Line 833: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');

829: --Check Rule Type is valid
830: OPEN check_rule_type_csr(p_x_rule_rec.rule_type_code);
831: FETCH check_rule_type_csr INTO l_junk;
832: IF (check_rule_type_csr%NOTFOUND) THEN
833: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');
834: FND_MESSAGE.Set_Token('RULE_TYPE',p_x_rule_rec.rule_type_code);
835: FND_MSG_PUB.ADD;
836: END IF;
837: CLOSE check_rule_type_csr;

Line 834: FND_MESSAGE.Set_Token('RULE_TYPE',p_x_rule_rec.rule_type_code);

830: OPEN check_rule_type_csr(p_x_rule_rec.rule_type_code);
831: FETCH check_rule_type_csr INTO l_junk;
832: IF (check_rule_type_csr%NOTFOUND) THEN
833: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');
834: FND_MESSAGE.Set_Token('RULE_TYPE',p_x_rule_rec.rule_type_code);
835: FND_MSG_PUB.ADD;
836: END IF;
837: CLOSE check_rule_type_csr;
838:

Line 843: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');

839: --Check start date is less than end date
840: IF (p_x_rule_rec.active_start_date IS NOT NULL AND
841: p_x_rule_rec.active_end_date IS NOT NULL AND
842: p_x_rule_rec.active_start_date >= p_x_rule_rec.active_end_date) THEN
843: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
844: FND_MESSAGE.Set_Token('SDATE',p_x_rule_rec.active_start_date);
845: FND_MESSAGE.Set_Token('EDATE',p_x_rule_rec.active_end_date);
846: FND_MSG_PUB.ADD;
847: END IF;

Line 844: FND_MESSAGE.Set_Token('SDATE',p_x_rule_rec.active_start_date);

840: IF (p_x_rule_rec.active_start_date IS NOT NULL AND
841: p_x_rule_rec.active_end_date IS NOT NULL AND
842: p_x_rule_rec.active_start_date >= p_x_rule_rec.active_end_date) THEN
843: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
844: FND_MESSAGE.Set_Token('SDATE',p_x_rule_rec.active_start_date);
845: FND_MESSAGE.Set_Token('EDATE',p_x_rule_rec.active_end_date);
846: FND_MSG_PUB.ADD;
847: END IF;
848:

Line 845: FND_MESSAGE.Set_Token('EDATE',p_x_rule_rec.active_end_date);

841: p_x_rule_rec.active_end_date IS NOT NULL AND
842: p_x_rule_rec.active_start_date >= p_x_rule_rec.active_end_date) THEN
843: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
844: FND_MESSAGE.Set_Token('SDATE',p_x_rule_rec.active_start_date);
845: FND_MESSAGE.Set_Token('EDATE',p_x_rule_rec.active_end_date);
846: FND_MSG_PUB.ADD;
847: END IF;
848:
849: --Check Rule name is unique

Line 853: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');

849: --Check Rule name is unique
850: OPEN check_rule_name_csr(p_x_rule_rec.rule_name, p_x_rule_rec.mc_header_id);
851: FETCH check_rule_name_csr INTO l_junk;
852: IF (check_rule_name_csr%FOUND) THEN
853: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');
854: FND_MESSAGE.Set_Token('RULE_NAME', p_x_rule_rec.rule_name);
855: FND_MSG_PUB.ADD;
856: END IF;
857: CLOSE check_rule_name_csr;

Line 854: FND_MESSAGE.Set_Token('RULE_NAME', p_x_rule_rec.rule_name);

850: OPEN check_rule_name_csr(p_x_rule_rec.rule_name, p_x_rule_rec.mc_header_id);
851: FETCH check_rule_name_csr INTO l_junk;
852: IF (check_rule_name_csr%FOUND) THEN
853: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');
854: FND_MESSAGE.Set_Token('RULE_NAME', p_x_rule_rec.rule_name);
855: FND_MSG_PUB.ADD;
856: END IF;
857: CLOSE check_rule_name_csr;
858:

Line 1059: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');

1055: --Check Status of MC allows for editing
1056: OPEN check_mc_status_csr(p_rule_rec.rule_id);
1057: FETCH check_mc_status_csr INTO l_status_code, l_status;
1058: IF (check_mc_status_csr%NOTFOUND) THEN
1059: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1060: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);
1061: FND_MSG_PUB.ADD;
1062: CLOSE check_mc_status_csr;
1063: RAISE FND_API.G_EXC_ERROR;

Line 1060: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);

1056: OPEN check_mc_status_csr(p_rule_rec.rule_id);
1057: FETCH check_mc_status_csr INTO l_status_code, l_status;
1058: IF (check_mc_status_csr%NOTFOUND) THEN
1059: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1060: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);
1061: FND_MSG_PUB.ADD;
1062: CLOSE check_mc_status_csr;
1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSIF ( l_status_code <> 'DRAFT' AND

Line 1066: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');

1062: CLOSE check_mc_status_csr;
1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSIF ( l_status_code <> 'DRAFT' AND
1065: l_status_code <> 'APPROVAL_REJECTED') THEN
1066: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
1067: FND_MESSAGE.Set_Token('STATUS', l_status);
1068: FND_MSG_PUB.ADD;
1069: CLOSE check_mc_status_csr;
1070: RAISE FND_API.G_EXC_ERROR;

Line 1067: FND_MESSAGE.Set_Token('STATUS', l_status);

1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSIF ( l_status_code <> 'DRAFT' AND
1065: l_status_code <> 'APPROVAL_REJECTED') THEN
1066: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
1067: FND_MESSAGE.Set_Token('STATUS', l_status);
1068: FND_MSG_PUB.ADD;
1069: CLOSE check_mc_status_csr;
1070: RAISE FND_API.G_EXC_ERROR;
1071: END IF;

Line 1079: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');

1075: --Check Rule ID is valid
1076: OPEN get_rule_rec_csr(p_rule_rec.rule_id);
1077: FETCH get_rule_rec_csr INTO l_old_rule_rec;
1078: IF (get_rule_rec_csr%NOTFOUND) THEN
1079: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1080: FND_MESSAGE.Set_Token('RULE_ID', p_rule_rec.rule_id);
1081: FND_MSG_PUB.ADD;
1082: END IF;
1083: CLOSE get_rule_rec_csr;

Line 1080: FND_MESSAGE.Set_Token('RULE_ID', p_rule_rec.rule_id);

1076: OPEN get_rule_rec_csr(p_rule_rec.rule_id);
1077: FETCH get_rule_rec_csr INTO l_old_rule_rec;
1078: IF (get_rule_rec_csr%NOTFOUND) THEN
1079: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1080: FND_MESSAGE.Set_Token('RULE_ID', p_rule_rec.rule_id);
1081: FND_MSG_PUB.ADD;
1082: END IF;
1083: CLOSE get_rule_rec_csr;
1084:

Line 1091: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');

1087: -- Check Object version number.
1088: IF (l_rule_rec.object_version_number IS NOT NULL AND
1089: l_old_rule_rec.object_version_number<>l_rule_rec.object_version_number)
1090: THEN
1091: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
1092: FND_MSG_PUB.ADD;
1093: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1094: END IF;
1095:

Line 1209: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_NULL');

1205:
1206:
1207: --Check Rule Name is not null
1208: IF (l_rule_rec.rule_name IS NULL) THEN
1209: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_NULL');
1210: FND_MSG_PUB.ADD;
1211: END IF;
1212:
1213: --Check Rule Type is valid

Line 1217: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');

1213: --Check Rule Type is valid
1214: OPEN check_rule_type_csr(l_rule_rec.rule_type_code);
1215: FETCH check_rule_type_csr INTO l_junk;
1216: IF (check_rule_type_csr%NOTFOUND) THEN
1217: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');
1218: FND_MESSAGE.Set_Token('RULE_TYPE',l_rule_rec.rule_type_code);
1219: FND_MSG_PUB.ADD;
1220: END IF;
1221: CLOSE check_rule_type_csr;

Line 1218: FND_MESSAGE.Set_Token('RULE_TYPE',l_rule_rec.rule_type_code);

1214: OPEN check_rule_type_csr(l_rule_rec.rule_type_code);
1215: FETCH check_rule_type_csr INTO l_junk;
1216: IF (check_rule_type_csr%NOTFOUND) THEN
1217: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_STMT_TYPE_INV');
1218: FND_MESSAGE.Set_Token('RULE_TYPE',l_rule_rec.rule_type_code);
1219: FND_MSG_PUB.ADD;
1220: END IF;
1221: CLOSE check_rule_type_csr;
1222:

Line 1229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');

1225: l_rule_rec.mc_header_id,
1226: l_rule_rec.rule_id);
1227: FETCH check_rule_name_csr INTO l_junk;
1228: IF (check_rule_name_csr%FOUND) THEN
1229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');
1230: FND_MESSAGE.Set_Token('RULE_NAME',l_rule_rec.rule_name);
1231: FND_MSG_PUB.ADD;
1232: END IF;
1233: CLOSE check_rule_name_csr;

Line 1230: FND_MESSAGE.Set_Token('RULE_NAME',l_rule_rec.rule_name);

1226: l_rule_rec.rule_id);
1227: FETCH check_rule_name_csr INTO l_junk;
1228: IF (check_rule_name_csr%FOUND) THEN
1229: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_NAME_INV');
1230: FND_MESSAGE.Set_Token('RULE_NAME',l_rule_rec.rule_name);
1231: FND_MSG_PUB.ADD;
1232: END IF;
1233: CLOSE check_rule_name_csr;
1234:

Line 1239: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');

1235: --Check start date is less than end date
1236: IF (l_rule_rec.active_start_date IS NOT NULL AND
1237: l_rule_rec.active_end_date IS NOT NULL AND
1238: l_rule_rec.active_start_date >= l_rule_rec.active_end_date) THEN
1239: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
1240: FND_MESSAGE.Set_Token('SDATE',l_rule_rec.active_start_date);
1241: FND_MESSAGE.Set_Token('EDATE',l_rule_rec.active_end_date);
1242: FND_MSG_PUB.ADD;
1243: END IF;

Line 1240: FND_MESSAGE.Set_Token('SDATE',l_rule_rec.active_start_date);

1236: IF (l_rule_rec.active_start_date IS NOT NULL AND
1237: l_rule_rec.active_end_date IS NOT NULL AND
1238: l_rule_rec.active_start_date >= l_rule_rec.active_end_date) THEN
1239: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
1240: FND_MESSAGE.Set_Token('SDATE',l_rule_rec.active_start_date);
1241: FND_MESSAGE.Set_Token('EDATE',l_rule_rec.active_end_date);
1242: FND_MSG_PUB.ADD;
1243: END IF;
1244:

Line 1241: FND_MESSAGE.Set_Token('EDATE',l_rule_rec.active_end_date);

1237: l_rule_rec.active_end_date IS NOT NULL AND
1238: l_rule_rec.active_start_date >= l_rule_rec.active_end_date) THEN
1239: FND_MESSAGE.Set_Name('AHL','AHL_MC_DATE_INVALID');
1240: FND_MESSAGE.Set_Token('SDATE',l_rule_rec.active_start_date);
1241: FND_MESSAGE.Set_Token('EDATE',l_rule_rec.active_end_date);
1242: FND_MSG_PUB.ADD;
1243: END IF;
1244:
1245: -- Check Error Message stack.

Line 1445: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');

1441: OPEN check_obj_ver_csr(p_rule_rec.rule_id, p_rule_rec.object_version_number);
1442: FETCH check_obj_ver_csr INTO l_junk;
1443: IF (check_obj_ver_csr%NOTFOUND) THEN
1444: CLOSE check_obj_ver_csr;
1445: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
1446: FND_MSG_PUB.ADD;
1447: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1448: END IF;
1449: CLOSE check_obj_ver_csr;

Line 1455: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');

1451: --Check Status of MC allows for editing
1452: OPEN check_mc_status_csr(p_rule_rec.rule_id);
1453: FETCH check_mc_status_csr INTO l_status_code, l_status, l_mc_header_id;
1454: IF (check_mc_status_csr%NOTFOUND) THEN
1455: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1456: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);
1457: FND_MSG_PUB.ADD;
1458: CLOSE check_mc_status_csr;
1459: RAISE FND_API.G_EXC_ERROR;

Line 1456: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);

1452: OPEN check_mc_status_csr(p_rule_rec.rule_id);
1453: FETCH check_mc_status_csr INTO l_status_code, l_status, l_mc_header_id;
1454: IF (check_mc_status_csr%NOTFOUND) THEN
1455: FND_MESSAGE.Set_Name('AHL','AHL_MC_RULE_ID_INV');
1456: FND_MESSAGE.Set_Token('RULE_ID',p_rule_rec.rule_id);
1457: FND_MSG_PUB.ADD;
1458: CLOSE check_mc_status_csr;
1459: RAISE FND_API.G_EXC_ERROR;
1460: ELSIF ( l_status_code <> 'DRAFT' AND

Line 1462: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');

1458: CLOSE check_mc_status_csr;
1459: RAISE FND_API.G_EXC_ERROR;
1460: ELSIF ( l_status_code <> 'DRAFT' AND
1461: l_status_code <> 'APPROVAL_REJECTED') THEN
1462: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
1463: FND_MESSAGE.Set_Token('STATUS', l_status);
1464: FND_MSG_PUB.ADD;
1465: CLOSE check_mc_status_csr;
1466: RAISE FND_API.G_EXC_ERROR;

Line 1463: FND_MESSAGE.Set_Token('STATUS', l_status);

1459: RAISE FND_API.G_EXC_ERROR;
1460: ELSIF ( l_status_code <> 'DRAFT' AND
1461: l_status_code <> 'APPROVAL_REJECTED') THEN
1462: FND_MESSAGE.Set_Name('AHL','AHL_MC_EDIT_INV_MC');
1463: FND_MESSAGE.Set_Token('STATUS', l_status);
1464: FND_MSG_PUB.ADD;
1465: CLOSE check_mc_status_csr;
1466: RAISE FND_API.G_EXC_ERROR;
1467: END IF;