APPS.AHL_APPROVALS_PVT dependencies on FND_MSG_PUB

Line 185: Fnd_Msg_Pub.initialize;

181: Ahl_Debug_Pub.debug( l_full_name ||':Start');
182: END IF;
183:
184: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
185: Fnd_Msg_Pub.initialize;
186: END IF;
187:
188: IF NOT Fnd_Api.compatible_api_call (
189: L_API_VERSION,

Line 294: Fnd_Msg_Pub.count_and_get(

290: -- Standard check of p_commit.
291: IF Fnd_Api.To_Boolean (p_commit) THEN
292: COMMIT WORK;
293: END IF;
294: Fnd_Msg_Pub.count_and_get(
295: p_encoded => Fnd_Api.g_false,
296: p_count => x_msg_count,
297: p_data => x_msg_data
298: );

Line 311: Fnd_Msg_Pub.count_and_get(

307: EXCEPTION
308: WHEN Fnd_Api.g_exc_error THEN
309: ROLLBACK TO Process_Approvals;
310: x_return_status := Fnd_Api.g_ret_sts_error;
311: Fnd_Msg_Pub.count_and_get(
312: p_encoded => Fnd_Api.g_false,
313: p_count => x_msg_count,
314: p_data => x_msg_data
315: );

Line 319: Fnd_Msg_Pub.count_and_get (

315: );
316: WHEN Fnd_Api.g_exc_unexpected_error THEN
317: ROLLBACK TO Process_Approvals;
318: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
319: Fnd_Msg_Pub.count_and_get (
320: p_encoded => Fnd_Api.g_false,
321: p_count => x_msg_count,
322: p_data => x_msg_data
323: );

Line 327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN

323: );
324: WHEN OTHERS THEN
325: ROLLBACK TO Process_Approvals;
326: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
328: Fnd_Msg_Pub.add_exc_msg (g_pkg_name, l_api_name);
329: END IF;
330: Fnd_Msg_Pub.count_and_get (
331: p_encoded => Fnd_Api.g_false,

Line 328: Fnd_Msg_Pub.add_exc_msg (g_pkg_name, l_api_name);

324: WHEN OTHERS THEN
325: ROLLBACK TO Process_Approvals;
326: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
328: Fnd_Msg_Pub.add_exc_msg (g_pkg_name, l_api_name);
329: END IF;
330: Fnd_Msg_Pub.count_and_get (
331: p_encoded => Fnd_Api.g_false,
332: p_count => x_msg_count,

Line 330: Fnd_Msg_Pub.count_and_get (

326: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
328: Fnd_Msg_Pub.add_exc_msg (g_pkg_name, l_api_name);
329: END IF;
330: Fnd_Msg_Pub.count_and_get (
331: p_encoded => Fnd_Api.g_false,
332: p_count => x_msg_count,
333: p_data => x_msg_data
334: );

Line 397: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN

393:
394: IF l_eq_pos = 0 AND l_not_pos = 0 AND l_like_pos = 0 THEN
395: -- Could not find either an = or an <>
396: -- operator.
397: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
398: Fnd_Message.set_name('AHL', 'AHL_UTIL_NO_WHERE_OPERATOR');
399: Fnd_Msg_Pub.ADD;
400: RAISE Fnd_Api.g_exc_unexpected_error;
401: END IF;

Line 399: Fnd_Msg_Pub.ADD;

395: -- Could not find either an = or an <>
396: -- operator.
397: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
398: Fnd_Message.set_name('AHL', 'AHL_UTIL_NO_WHERE_OPERATOR');
399: Fnd_Msg_Pub.ADD;
400: RAISE Fnd_Api.g_exc_unexpected_error;
401: END IF;
402: ELSIF l_eq_pos > 0 AND l_not_pos = 0 THEN
403: l_curr_pos := l_eq_pos;

Line 622: Fnd_Msg_Pub.initialize;

618: Ahl_Debug_Pub.debug( l_full_name ||':Start');
619: END IF;
620:
621: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
622: Fnd_Msg_Pub.initialize;
623: END IF;
624: IF NOT Fnd_Api.compatible_api_call (
625: L_API_VERSION,
626: p_api_version,

Line 716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

712: ELSE
713: OPEN c_appl_usg;
714: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;
715: IF c_appl_usg%NOTFOUND THEN
716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
717: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
718: Fnd_Msg_Pub.ADD;
719: END IF;
720: RAISE Fnd_Api.g_exc_unexpected_error;

Line 718: Fnd_Msg_Pub.ADD;

714: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;
715: IF c_appl_usg%NOTFOUND THEN
716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
717: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
718: Fnd_Msg_Pub.ADD;
719: END IF;
720: RAISE Fnd_Api.g_exc_unexpected_error;
721: END IF;
722: END IF;

Line 781: Fnd_Msg_Pub.count_and_get(

777: -- Standard check of p_commit.
778: IF Fnd_Api.To_Boolean ( p_commit ) THEN
779: COMMIT WORK;
780: END IF;
781: Fnd_Msg_Pub.count_and_get(
782: p_encoded => Fnd_Api.g_false,
783: p_count => x_msg_count,
784: p_data => x_msg_data
785: );

Line 798: Fnd_Msg_Pub.count_and_get(

794: EXCEPTION
795: WHEN Fnd_Api.g_exc_error THEN
796: ROLLBACK TO Create_Approval_Rules;
797: x_return_status := Fnd_Api.g_ret_sts_error;
798: Fnd_Msg_Pub.count_and_get(
799: p_encoded => Fnd_Api.g_false,
800: p_count => x_msg_count,
801: p_data => x_msg_data
802: );

Line 806: Fnd_Msg_Pub.count_and_get (

802: );
803: WHEN Fnd_Api.g_exc_unexpected_error THEN
804: ROLLBACK TO Create_Approval_Rules;
805: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
806: Fnd_Msg_Pub.count_and_get (
807: p_encoded => Fnd_Api.g_false,
808: p_count => x_msg_count,
809: p_data => x_msg_data
810: );

Line 814: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

810: );
811: WHEN OTHERS THEN
812: ROLLBACK TO Create_Approval_Rules;
813: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
814: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
815: THEN
816: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
817: END IF;
818: Fnd_Msg_Pub.count_and_get (

Line 816: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

812: ROLLBACK TO Create_Approval_Rules;
813: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
814: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
815: THEN
816: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
817: END IF;
818: Fnd_Msg_Pub.count_and_get (
819: p_encoded => Fnd_Api.g_false,
820: p_count => x_msg_count,

Line 818: Fnd_Msg_Pub.count_and_get (

814: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
815: THEN
816: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
817: END IF;
818: Fnd_Msg_Pub.count_and_get (
819: p_encoded => Fnd_Api.g_false,
820: p_count => x_msg_count,
821: p_data => x_msg_data
822: );

Line 884: Fnd_Msg_Pub.initialize;

880: IF G_DEBUG='Y' THEN
881: Ahl_Debug_Pub.debug( l_full_name ||':Start');
882: END IF;
883: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
884: Fnd_Msg_Pub.initialize;
885: END IF;
886: IF NOT Fnd_Api.compatible_api_call(
887: l_api_version,
888: p_api_version,

Line 949: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

945: ELSE
946: OPEN c_appl_usg;
947: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;
948: IF c_appl_usg%NOTFOUND THEN
949: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
950: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
951: Fnd_Msg_Pub.ADD;
952: END IF;
953: RAISE Fnd_Api.g_exc_unexpected_error;

Line 951: Fnd_Msg_Pub.ADD;

947: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;
948: IF c_appl_usg%NOTFOUND THEN
949: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
950: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
951: Fnd_Msg_Pub.ADD;
952: END IF;
953: RAISE Fnd_Api.g_exc_unexpected_error;
954: END IF;
955: END IF;

Line 1101: Fnd_Msg_Pub.count_and_get (

1097: -------------------- finish --------------------------
1098: IF Fnd_Api.to_boolean (p_commit) THEN
1099: COMMIT;
1100: END IF;
1101: Fnd_Msg_Pub.count_and_get (
1102: p_encoded => Fnd_Api.g_false,
1103: p_count => x_msg_count,
1104: p_data => x_msg_data
1105: );

Line 1119: Fnd_Msg_Pub.count_and_get (

1115: EXCEPTION
1116: WHEN Fnd_Api.g_exc_error THEN
1117: ROLLBACK TO Update_Approval_Rules;
1118: x_return_status := Fnd_Api.g_ret_sts_error;
1119: Fnd_Msg_Pub.count_and_get (
1120: p_encoded => Fnd_Api.g_false,
1121: p_count => x_msg_count,
1122: p_data => x_msg_data
1123: );

Line 1127: Fnd_Msg_Pub.count_and_get (

1123: );
1124: WHEN Fnd_Api.g_exc_unexpected_error THEN
1125: ROLLBACK TO Update_Approval_Rules;
1126: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1127: Fnd_Msg_Pub.count_and_get (
1128: p_encoded => Fnd_Api.g_false,
1129: p_count => x_msg_count,
1130: p_data => x_msg_data
1131: );

Line 1135: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

1131: );
1132: WHEN OTHERS THEN
1133: ROLLBACK TO update_Approval_Rules;
1134: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1135: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1136: THEN
1137: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1138: END IF;
1139: Fnd_Msg_Pub.count_and_get (

Line 1137: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

1133: ROLLBACK TO update_Approval_Rules;
1134: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1135: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1136: THEN
1137: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1138: END IF;
1139: Fnd_Msg_Pub.count_and_get (
1140: p_encoded => Fnd_Api.g_false,
1141: p_count => x_msg_count,

Line 1139: Fnd_Msg_Pub.count_and_get (

1135: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1136: THEN
1137: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1138: END IF;
1139: Fnd_Msg_Pub.count_and_get (
1140: p_encoded => Fnd_Api.g_false,
1141: p_count => x_msg_count,
1142: p_data => x_msg_data
1143: );

Line 1180: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1176: FETCH check_approver1 INTO l_count;
1177:
1178: IF check_approver1%NOTFOUND THEN
1179: CLOSE check_approver1;
1180: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1181: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1182: Fnd_Msg_Pub.ADD;
1183: END IF;
1184: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1182: Fnd_Msg_Pub.ADD;

1178: IF check_approver1%NOTFOUND THEN
1179: CLOSE check_approver1;
1180: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1181: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1182: Fnd_Msg_Pub.ADD;
1183: END IF;
1184: x_return_status := Fnd_Api.g_ret_sts_error;
1185: RETURN;
1186: ELSE

Line 1194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1190: Open check_approver2;
1191: Fetch check_approver2 into l_count;
1192: IF check_approver2%notfound THEN
1193: Close check_approver1;
1194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1195: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1196: Fnd_Msg_Pub.ADD;
1197: END IF;
1198: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1196: Fnd_Msg_Pub.ADD;

1192: IF check_approver2%notfound THEN
1193: Close check_approver1;
1194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1195: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1196: Fnd_Msg_Pub.ADD;
1197: END IF;
1198: x_return_status := Fnd_Api.g_ret_sts_error;
1199: RETURN;
1200: ELSE

Line 1208: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1204: Open check_approver3;
1205: Fetch check_approver3 into l_count;
1206: IF check_approver3%notfound THEN
1207: Close check_approver3;
1208: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1209: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1210: Fnd_Msg_Pub.ADD;
1211: END IF;
1212: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1210: Fnd_Msg_Pub.ADD;

1206: IF check_approver3%notfound THEN
1207: Close check_approver3;
1208: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1209: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1210: Fnd_Msg_Pub.ADD;
1211: END IF;
1212: x_return_status := Fnd_Api.g_ret_sts_error;
1213: RETURN;
1214: ELSE

Line 1222: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1218: Open check_approver4;
1219: Fetch check_approver4 into l_count;
1220: IF check_approver4%notfound THEN
1221: Close check_approver4;
1222: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1223: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1224: Fnd_Msg_Pub.ADD;
1225: END IF;
1226: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1224: Fnd_Msg_Pub.ADD;

1220: IF check_approver4%notfound THEN
1221: Close check_approver4;
1222: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1223: Fnd_Message.set_name ('AHL', 'AHL_APPR_STATUS_NOT_TO_ACTIVE');
1224: Fnd_Msg_Pub.ADD;
1225: END IF;
1226: x_return_status := Fnd_Api.g_ret_sts_error;
1227: RETURN;
1228: ELSE

Line 1313: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1309: OPEN check_active1;
1310: FETCH check_active1 INTO l_count1;
1311: IF check_active1%FOUND THEN
1312: CLOSE check_active1;
1313: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1314: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1315: Fnd_Msg_Pub.ADD;
1316: END IF;
1317: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1315: Fnd_Msg_Pub.ADD;

1311: IF check_active1%FOUND THEN
1312: CLOSE check_active1;
1313: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1314: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1315: Fnd_Msg_Pub.ADD;
1316: END IF;
1317: x_return_status := Fnd_Api.g_ret_sts_error;
1318: RETURN;
1319: ELSE

Line 1327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1323: OPEN check_active2;
1324: FETCH check_active2 INTO l_count2;
1325: IF check_active2%FOUND THEN
1326: CLOSE check_active2;
1327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1328: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1329: Fnd_Msg_Pub.ADD;
1330: END IF;
1331: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1329: Fnd_Msg_Pub.ADD;

1325: IF check_active2%FOUND THEN
1326: CLOSE check_active2;
1327: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1328: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1329: Fnd_Msg_Pub.ADD;
1330: END IF;
1331: x_return_status := Fnd_Api.g_ret_sts_error;
1332: RETURN;
1333: ELSE

Line 1341: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1337: OPEN check_active3;
1338: FETCH check_active3 INTO l_count3;
1339: IF check_active3%FOUND THEN
1340: CLOSE check_active3;
1341: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1342: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1343: Fnd_Msg_Pub.ADD;
1344: END IF;
1345: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1343: Fnd_Msg_Pub.ADD;

1339: IF check_active3%FOUND THEN
1340: CLOSE check_active3;
1341: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1342: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1343: Fnd_Msg_Pub.ADD;
1344: END IF;
1345: x_return_status := Fnd_Api.g_ret_sts_error;
1346: RETURN;
1347: ELSE

Line 1355: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1351: OPEN check_active4;
1352: FETCH check_active4 INTO l_count4;
1353: IF check_active4%FOUND THEN
1354: CLOSE check_active4;
1355: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1356: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1357: Fnd_Msg_Pub.ADD;
1358: END IF;
1359: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1357: Fnd_Msg_Pub.ADD;

1353: IF check_active4%FOUND THEN
1354: CLOSE check_active4;
1355: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1356: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1357: Fnd_Msg_Pub.ADD;
1358: END IF;
1359: x_return_status := Fnd_Api.g_ret_sts_error;
1360: RETURN;
1361: ELSE

Line 1369: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1365: OPEN check_active5;
1366: FETCH check_active5 INTO l_count5;
1367: IF check_active5%FOUND THEN
1368: CLOSE check_active5;
1369: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1370: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1371: Fnd_Msg_Pub.ADD;
1372: END IF;
1373: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1371: Fnd_Msg_Pub.ADD;

1367: IF check_active5%FOUND THEN
1368: CLOSE check_active5;
1369: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1370: Fnd_Message.set_name ('AHL', 'AHL_APPR_QUALIFIER_ACTIVE');
1371: Fnd_Msg_Pub.ADD;
1372: END IF;
1373: x_return_status := Fnd_Api.g_ret_sts_error;
1374: RETURN;
1375: ELSE

Line 1404: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1400: OPEN chk_op_name;
1401: FETCH chk_op_name INTO l_count;
1402: IF chk_op_name%NOTFOUND THEN
1403: CLOSE chk_op_name;
1404: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1405: Fnd_Message.set_name ('AHL', 'AHL_APPR_NO_OPERATING_NAME');
1406: Fnd_Msg_Pub.ADD;
1407: END IF;
1408: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1406: Fnd_Msg_Pub.ADD;

1402: IF chk_op_name%NOTFOUND THEN
1403: CLOSE chk_op_name;
1404: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1405: Fnd_Message.set_name ('AHL', 'AHL_APPR_NO_OPERATING_NAME');
1406: Fnd_Msg_Pub.ADD;
1407: END IF;
1408: x_return_status := Fnd_Api.g_ret_sts_error;
1409: RETURN;
1410: ELSE

Line 1437: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1433: OPEN chk_appl_usg_code;
1434: FETCH chk_appl_usg_code INTO l_count;
1435: IF chk_appl_usg_code%NOTFOUND THEN
1436: CLOSE chk_appl_usg_code;
1437: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1438: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
1439: Fnd_Msg_Pub.ADD;
1440: END IF;
1441: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1439: Fnd_Msg_Pub.ADD;

1435: IF chk_appl_usg_code%NOTFOUND THEN
1436: CLOSE chk_appl_usg_code;
1437: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1438: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
1439: Fnd_Msg_Pub.ADD;
1440: END IF;
1441: x_return_status := Fnd_Api.g_ret_sts_error;
1442: RETURN;
1443: ELSE

Line 1482: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1478: OPEN check_status;
1479: FETCH check_status INTO l_count;
1480: IF check_status%NOTFOUND THEN
1481: CLOSE check_status;
1482: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1483: Fnd_Message.set_name ('AHL', 'AHL_APPR_INVALID_STATUS');
1484: Fnd_Msg_Pub.ADD;
1485: END IF;
1486: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1484: Fnd_Msg_Pub.ADD;

1480: IF check_status%NOTFOUND THEN
1481: CLOSE check_status;
1482: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1483: Fnd_Message.set_name ('AHL', 'AHL_APPR_INVALID_STATUS');
1484: Fnd_Msg_Pub.ADD;
1485: END IF;
1486: x_return_status := Fnd_Api.g_ret_sts_error;
1487: RETURN;
1488: ELSE

Line 1539: Fnd_Msg_Pub.initialize;

1535: IF G_DEBUG='Y' THEN
1536: Ahl_Debug_Pub.debug( l_full_name ||':Start');
1537: END IF;
1538: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1539: Fnd_Msg_Pub.initialize;
1540: END IF;
1541: IF NOT Fnd_Api.compatible_api_call (
1542: l_api_version,
1543: p_api_version,

Line 1560: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN

1556: OPEN c_Approval_Rules;
1557: FETCH c_Approval_Rules INTO l_Approval_Rules_rec;
1558: IF c_Approval_Rules%NOTFOUND THEN
1559: CLOSE c_Approval_Rules;
1560: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
1561: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
1562: Fnd_Msg_Pub.ADD;
1563: END IF;
1564: RAISE Fnd_Api.g_exc_error;

Line 1562: Fnd_Msg_Pub.ADD;

1558: IF c_Approval_Rules%NOTFOUND THEN
1559: CLOSE c_Approval_Rules;
1560: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
1561: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
1562: Fnd_Msg_Pub.ADD;
1563: END IF;
1564: RAISE Fnd_Api.g_exc_error;
1565: END IF;
1566: CLOSE c_Approval_Rules;

Line 1572: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)

1568:
1569: /*DELETE FROM Ahl_Approval_Rules_tl
1570: WHERE Approval_Rule_id = p_Approval_Rule_id;
1571: IF (SQL%NOTFOUND) THEN
1572: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)
1573: THEN
1574: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
1575: Fnd_Msg_Pub.ADD;
1576: END IF;

Line 1575: Fnd_Msg_Pub.ADD;

1571: IF (SQL%NOTFOUND) THEN
1572: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)
1573: THEN
1574: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
1575: Fnd_Msg_Pub.ADD;
1576: END IF;
1577: RAISE Fnd_Api.g_exc_error;
1578: END IF;
1579:

Line 1587: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)

1583: UPDATE Ahl_Approval_Rules_B
1584: SET Status_Code = 'OBSOLETE'
1585: WHERE Approval_Rule_id = p_Approval_Rule_id;
1586: IF (SQL%NOTFOUND) THEN
1587: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)
1588: THEN
1589: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
1590: Fnd_Msg_Pub.ADD;
1591: END IF;

Line 1590: Fnd_Msg_Pub.ADD;

1586: IF (SQL%NOTFOUND) THEN
1587: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error)
1588: THEN
1589: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
1590: Fnd_Msg_Pub.ADD;
1591: END IF;
1592: RAISE Fnd_Api.g_exc_error;
1593: END IF;
1594:

Line 1599: Fnd_Msg_Pub.count_and_get (

1595: -------------------- finish --------------------------
1596: IF Fnd_Api.to_boolean (p_commit) THEN
1597: COMMIT;
1598: END IF;
1599: Fnd_Msg_Pub.count_and_get (
1600: p_encoded => Fnd_Api.g_false,
1601: p_count => x_msg_count,
1602: p_data => x_msg_data
1603: );

Line 1615: Fnd_Msg_Pub.count_and_get (

1611: EXCEPTION
1612: WHEN Fnd_Api.g_exc_error THEN
1613: ROLLBACK TO Delete_Approval_Rules;
1614: x_return_status := Fnd_Api.g_ret_sts_error;
1615: Fnd_Msg_Pub.count_and_get (
1616: p_encoded => Fnd_Api.g_false,
1617: p_count => x_msg_count,
1618: p_data => x_msg_data
1619: );

Line 1623: Fnd_Msg_Pub.count_and_get (

1619: );
1620: WHEN Fnd_Api.g_exc_unexpected_error THEN
1621: ROLLBACK TO Delete_Approval_Rules;
1622: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1623: Fnd_Msg_Pub.count_and_get (
1624: p_encoded => Fnd_Api.g_false,
1625: p_count => x_msg_count,
1626: p_data => x_msg_data
1627: );

Line 1631: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

1627: );
1628: WHEN OTHERS THEN
1629: ROLLBACK TO Delete_Approval_Rules;
1630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1631: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1632: THEN
1633: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1634: END IF;
1635: Fnd_Msg_Pub.count_and_get (

Line 1633: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

1629: ROLLBACK TO Delete_Approval_Rules;
1630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1631: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1632: THEN
1633: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1634: END IF;
1635: Fnd_Msg_Pub.count_and_get (
1636: p_encoded => Fnd_Api.g_false,
1637: p_count => x_msg_count,

Line 1635: Fnd_Msg_Pub.count_and_get (

1631: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1632: THEN
1633: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1634: END IF;
1635: Fnd_Msg_Pub.count_and_get (
1636: p_encoded => Fnd_Api.g_false,
1637: p_count => x_msg_count,
1638: p_data => x_msg_data
1639: );

Line 1673: Fnd_Msg_Pub.initialize;

1669: IF G_DEBUG='Y' THEN
1670: Ahl_Debug_Pub.debug( l_full_name ||':Start');
1671: END IF;
1672: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1673: Fnd_Msg_Pub.initialize;
1674: END IF;
1675: IF NOT Fnd_Api.compatible_api_call (
1676: l_api_version,
1677: p_api_version,

Line 1717: Fnd_Msg_Pub.count_and_get (

1713: RAISE Fnd_Api.g_exc_error;
1714: END IF;
1715: END IF;
1716: -------------------- finish --------------------------
1717: Fnd_Msg_Pub.count_and_get (
1718: p_encoded => Fnd_Api.g_false,
1719: p_count => x_msg_count,
1720: p_data => x_msg_data
1721: );

Line 1732: Fnd_Msg_Pub.count_and_get (

1728: END IF;
1729: EXCEPTION
1730: WHEN Fnd_Api.g_exc_error THEN
1731: x_return_status := Fnd_Api.g_ret_sts_error;
1732: Fnd_Msg_Pub.count_and_get (
1733: p_encoded => Fnd_Api.g_false,
1734: p_count => x_msg_count,
1735: p_data => x_msg_data
1736: );

Line 1739: Fnd_Msg_Pub.count_and_get (

1735: p_data => x_msg_data
1736: );
1737: WHEN Fnd_Api.g_exc_unexpected_error THEN
1738: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1739: Fnd_Msg_Pub.count_and_get (
1740: p_encoded => Fnd_Api.g_false,
1741: p_count => x_msg_count,
1742: p_data => x_msg_data
1743: );

Line 1746: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

1742: p_data => x_msg_data
1743: );
1744: WHEN OTHERS THEN
1745: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1746: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1747: THEN
1748: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1749: END IF;
1750: Fnd_Msg_Pub.count_and_get (

Line 1748: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

1744: WHEN OTHERS THEN
1745: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1746: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1747: THEN
1748: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1749: END IF;
1750: Fnd_Msg_Pub.count_and_get (
1751: p_encoded => Fnd_Api.g_false,
1752: p_count => x_msg_count,

Line 1750: Fnd_Msg_Pub.count_and_get (

1746: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1747: THEN
1748: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1749: END IF;
1750: Fnd_Msg_Pub.count_and_get (
1751: p_encoded => Fnd_Api.g_false,
1752: p_count => x_msg_count,
1753: p_data => x_msg_data
1754: );

Line 1838: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1834: --
1835: -- Validate the active dates.
1836: IF l_active_start_date IS NOT NULL AND l_active_end_date IS NOT NULL THEN
1837: IF l_active_start_date > l_active_end_date THEN
1838: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1839: Fnd_Message.set_name ('AHL', 'AHL_APPR_FROMDT_GTR_TODT');
1840: Fnd_Msg_Pub.ADD;
1841: END IF;
1842: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1840: Fnd_Msg_Pub.ADD;

1836: IF l_active_start_date IS NOT NULL AND l_active_end_date IS NOT NULL THEN
1837: IF l_active_start_date > l_active_end_date THEN
1838: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1839: Fnd_Message.set_name ('AHL', 'AHL_APPR_FROMDT_GTR_TODT');
1840: Fnd_Msg_Pub.ADD;
1841: END IF;
1842: x_return_status := Fnd_Api.g_ret_sts_error;
1843: RETURN;
1844: END IF;

Line 1847: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

1843: RETURN;
1844: END IF;
1845:
1846: IF l_active_start_date = l_active_end_date THEN
1847: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1848: Fnd_Message.set_name ('AHL', 'AHL_APPR_FROMDT_EQU_TODT');
1849: Fnd_Msg_Pub.ADD;
1850: END IF;
1851: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1849: Fnd_Msg_Pub.ADD;

1845:
1846: IF l_active_start_date = l_active_end_date THEN
1847: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1848: Fnd_Message.set_name ('AHL', 'AHL_APPR_FROMDT_EQU_TODT');
1849: Fnd_Msg_Pub.ADD;
1850: END IF;
1851: x_return_status := Fnd_Api.g_ret_sts_error;
1852: RETURN;
1853: END IF;

Line 1930: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN

1926: OPEN c_Approval_Rules;
1927: FETCH c_Approval_Rules INTO l_Approval_Rules_rec;
1928: IF c_Approval_Rules%NOTFOUND THEN
1929: CLOSE c_Approval_Rules;
1930: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
1931: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
1932: Fnd_Msg_Pub.ADD;
1933: END IF;
1934: RAISE Fnd_Api.g_exc_error;

Line 1932: Fnd_Msg_Pub.ADD;

1928: IF c_Approval_Rules%NOTFOUND THEN
1929: CLOSE c_Approval_Rules;
1930: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
1931: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
1932: Fnd_Msg_Pub.ADD;
1933: END IF;
1934: RAISE Fnd_Api.g_exc_error;
1935: END IF;
1936: CLOSE c_Approval_Rules;

Line 2047: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2043: IS
2044: BEGIN
2045: -- APPROVAL RULE NAME
2046: IF p_Approval_Rules_rec.Approval_Rule_Name IS NULL THEN
2047: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2048: Fnd_Message.set_name ('AHL', 'AHL_APPR_RULE_NAME_MISSING');
2049: Fnd_Msg_Pub.ADD;
2050: END IF;
2051: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2049: Fnd_Msg_Pub.ADD;

2045: -- APPROVAL RULE NAME
2046: IF p_Approval_Rules_rec.Approval_Rule_Name IS NULL THEN
2047: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2048: Fnd_Message.set_name ('AHL', 'AHL_APPR_RULE_NAME_MISSING');
2049: Fnd_Msg_Pub.ADD;
2050: END IF;
2051: x_return_status := Fnd_Api.g_ret_sts_error;
2052: RETURN;
2053: END IF;

Line 2059: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2055: IF p_Approval_Rules_rec.Approval_Rule_Id is null OR p_Approval_Rules_rec.Approval_Rule_Id = Fnd_Api.g_miss_num THEN
2056:
2057: -- APPROVAL OBJECT CODE
2058: IF p_Approval_Rules_rec.Approval_object_code IS NULL THEN
2059: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2060: Fnd_Message.set_name ('AHL', 'AHL_APPR_OBJECT_CODE_MISSING');
2061: Fnd_Msg_Pub.ADD;
2062: END IF;
2063: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2061: Fnd_Msg_Pub.ADD;

2057: -- APPROVAL OBJECT CODE
2058: IF p_Approval_Rules_rec.Approval_object_code IS NULL THEN
2059: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2060: Fnd_Message.set_name ('AHL', 'AHL_APPR_OBJECT_CODE_MISSING');
2061: Fnd_Msg_Pub.ADD;
2062: END IF;
2063: x_return_status := Fnd_Api.g_ret_sts_error;
2064: RETURN;
2065: END IF;

Line 2069: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2065: END IF;
2066:
2067: -- APPLICATION USAGE
2068: IF p_Approval_Rules_rec.application_usg_code IS NULL THEN
2069: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2070: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_ISNULL');
2071: Fnd_Msg_Pub.ADD;
2072: END IF;
2073: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2071: Fnd_Msg_Pub.ADD;

2067: -- APPLICATION USAGE
2068: IF p_Approval_Rules_rec.application_usg_code IS NULL THEN
2069: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2070: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_ISNULL');
2071: Fnd_Msg_Pub.ADD;
2072: END IF;
2073: x_return_status := Fnd_Api.g_ret_sts_error;
2074: RETURN;
2075: END IF;

Line 2079: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2075: END IF;
2076:
2077: -- TYPE CODE
2078: /*IF p_Approval_Rules_rec.approval_type_code IS NULL THEN
2079: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2080: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_CODE_MISSING');
2081: Fnd_Msg_Pub.ADD;
2082: END IF;
2083: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2081: Fnd_Msg_Pub.ADD;

2077: -- TYPE CODE
2078: /*IF p_Approval_Rules_rec.approval_type_code IS NULL THEN
2079: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2080: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_CODE_MISSING');
2081: Fnd_Msg_Pub.ADD;
2082: END IF;
2083: x_return_status := Fnd_Api.g_ret_sts_error;
2084: RETURN;
2085: END IF;

Line 2092: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2088: END IF;
2089:
2090: -- START DATE
2091: IF p_Approval_Rules_rec.active_start_date IS NULL THEN
2092: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2093: Fnd_Message.set_name ('AHL', 'AHL_APPR_ST_DATE_MISSING');
2094: Fnd_Msg_Pub.ADD;
2095: END IF;
2096: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2094: Fnd_Msg_Pub.ADD;

2090: -- START DATE
2091: IF p_Approval_Rules_rec.active_start_date IS NULL THEN
2092: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2093: Fnd_Message.set_name ('AHL', 'AHL_APPR_ST_DATE_MISSING');
2094: Fnd_Msg_Pub.ADD;
2095: END IF;
2096: x_return_status := Fnd_Api.g_ret_sts_error;
2097: RETURN;
2098: END IF;

Line 2102: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2098: END IF;
2099:
2100: /*-- PROIRITY CODE
2101: IF p_Approval_Rules_rec.approval_priority_code IS NULL THEN
2102: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2103: Fnd_Message.set_name ('AHL', 'AHL_APPR_PROIRITY_CODE_MISSING');
2104: Fnd_Msg_Pub.ADD;
2105: END IF;
2106: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2104: Fnd_Msg_Pub.ADD;

2100: /*-- PROIRITY CODE
2101: IF p_Approval_Rules_rec.approval_priority_code IS NULL THEN
2102: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2103: Fnd_Message.set_name ('AHL', 'AHL_APPR_PROIRITY_CODE_MISSING');
2104: Fnd_Msg_Pub.ADD;
2105: END IF;
2106: x_return_status := Fnd_Api.g_ret_sts_error;
2107: RETURN;
2108: END IF;*/

Line 2112: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2108: END IF;*/
2109:
2110: /* -- OPERATING UNIT CODE
2111: IF p_Approval_Rules_rec.OPERATING_UNIT_ID IS NULL THEN
2112: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2113: Fnd_Message.set_name ('AHL', 'AHL_APPR_OP_UNIT_CODE_MISSING');
2114: Fnd_Msg_Pub.ADD;
2115: END IF;
2116: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2114: Fnd_Msg_Pub.ADD;

2110: /* -- OPERATING UNIT CODE
2111: IF p_Approval_Rules_rec.OPERATING_UNIT_ID IS NULL THEN
2112: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2113: Fnd_Message.set_name ('AHL', 'AHL_APPR_OP_UNIT_CODE_MISSING');
2114: Fnd_Msg_Pub.ADD;
2115: END IF;
2116: x_return_status := Fnd_Api.g_ret_sts_error;
2117: RETURN;
2118: END IF; */

Line 2168: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2164: 'Ahl_Approval_Rules_v',
2165: 'Approval_Rule_Id = ' || p_Approval_Rules_rec.Approval_Rule_id
2166: ) = Fnd_Api.g_false
2167: THEN
2168: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2169: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_ID');
2170: Fnd_Msg_Pub.ADD;
2171: END IF;
2172: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2170: Fnd_Msg_Pub.ADD;

2166: ) = Fnd_Api.g_false
2167: THEN
2168: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2169: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_ID');
2170: Fnd_Msg_Pub.ADD;
2171: END IF;
2172: x_return_status := Fnd_Api.g_ret_sts_error;
2173: RETURN;
2174: END IF;

Line 2194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2190: );
2191: END IF;
2192:
2193: IF l_valid_flag = Fnd_Api.g_false THEN
2194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2195: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_NAME');
2196: Fnd_Msg_Pub.ADD;
2197: END IF;
2198: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2196: Fnd_Msg_Pub.ADD;

2192:
2193: IF l_valid_flag = Fnd_Api.g_false THEN
2194: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2195: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_NAME');
2196: Fnd_Msg_Pub.ADD;
2197: END IF;
2198: x_return_status := Fnd_Api.g_ret_sts_error;
2199: RETURN;
2200: END IF;

Line 2320: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2316: );
2317: END IF;
2318: END IF;
2319: IF l_valid_flag = Fnd_Api.g_false THEN
2320: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2321: Fnd_Message.set_name ('AHL', 'AHL_APPR_RULE_NOT_UNIQUE');
2322: Fnd_Msg_Pub.ADD;
2323: END IF;
2324: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2322: Fnd_Msg_Pub.ADD;

2318: END IF;
2319: IF l_valid_flag = Fnd_Api.g_false THEN
2320: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2321: Fnd_Message.set_name ('AHL', 'AHL_APPR_RULE_NOT_UNIQUE');
2322: Fnd_Msg_Pub.ADD;
2323: END IF;
2324: x_return_status := Fnd_Api.g_ret_sts_error;
2325: RETURN;
2326: END IF;

Line 2386: Fnd_Msg_Pub.initialize;

2382: Ahl_Debug_Pub.debug( l_full_name ||':Start');
2383: END IF;
2384:
2385: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
2386: Fnd_Msg_Pub.initialize;
2387: END IF;
2388: IF NOT Fnd_Api.compatible_api_call (
2389: L_API_VERSION,
2390: p_api_version,

Line 2528: Fnd_Msg_Pub.count_and_get(

2524: -- Standard check of p_commit.
2525: IF Fnd_Api.To_Boolean ( p_commit ) THEN
2526: COMMIT WORK;
2527: END IF;
2528: Fnd_Msg_Pub.count_and_get(
2529: p_encoded => Fnd_Api.g_false,
2530: p_count => x_msg_count,
2531: p_data => x_msg_data
2532: );

Line 2545: Fnd_Msg_Pub.count_and_get(

2541: EXCEPTION
2542: WHEN Fnd_Api.g_exc_error THEN
2543: ROLLBACK TO Create_Approvers;
2544: x_return_status := Fnd_Api.g_ret_sts_error;
2545: Fnd_Msg_Pub.count_and_get(
2546: p_encoded => Fnd_Api.g_false,
2547: p_count => x_msg_count,
2548: p_data => x_msg_data
2549: );

Line 2553: Fnd_Msg_Pub.count_and_get (

2549: );
2550: WHEN Fnd_Api.g_exc_unexpected_error THEN
2551: ROLLBACK TO Create_Approvers;
2552: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2553: Fnd_Msg_Pub.count_and_get (
2554: p_encoded => Fnd_Api.g_false,
2555: p_count => x_msg_count,
2556: p_data => x_msg_data
2557: );

Line 2561: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN

2557: );
2558: WHEN OTHERS THEN
2559: ROLLBACK TO Create_Approvers;
2560: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2561: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
2562: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2563: END IF;
2564: Fnd_Msg_Pub.count_and_get (
2565: p_encoded => Fnd_Api.g_false,

Line 2562: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

2558: WHEN OTHERS THEN
2559: ROLLBACK TO Create_Approvers;
2560: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2561: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
2562: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2563: END IF;
2564: Fnd_Msg_Pub.count_and_get (
2565: p_encoded => Fnd_Api.g_false,
2566: p_count => x_msg_count,

Line 2564: Fnd_Msg_Pub.count_and_get (

2560: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2561: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
2562: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2563: END IF;
2564: Fnd_Msg_Pub.count_and_get (
2565: p_encoded => Fnd_Api.g_false,
2566: p_count => x_msg_count,
2567: p_data => x_msg_data
2568: );

Line 2609: Fnd_Msg_Pub.initialize;

2605: IF G_DEBUG='Y' THEN
2606: Ahl_Debug_Pub.debug( l_full_name ||':Start');
2607: END IF;
2608: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
2609: Fnd_Msg_Pub.initialize;
2610: END IF;
2611: IF NOT Fnd_Api.compatible_api_call(
2612: l_api_version,
2613: p_api_version,

Line 2701: Fnd_Msg_Pub.count_and_get (

2697: -- dbms_output.put_line('test7');
2698: IF Fnd_Api.to_boolean (p_commit) THEN
2699: COMMIT;
2700: END IF;
2701: Fnd_Msg_Pub.count_and_get (
2702: p_encoded => Fnd_Api.g_false,
2703: p_count => x_msg_count,
2704: p_data => x_msg_data
2705: );

Line 2717: Fnd_Msg_Pub.count_and_get (

2713: EXCEPTION
2714: WHEN Fnd_Api.g_exc_error THEN
2715: ROLLBACK TO Update_Approvers;
2716: x_return_status := Fnd_Api.g_ret_sts_error;
2717: Fnd_Msg_Pub.count_and_get (
2718: p_encoded => Fnd_Api.g_false,
2719: p_count => x_msg_count,
2720: p_data => x_msg_data
2721: );

Line 2725: Fnd_Msg_Pub.count_and_get (

2721: );
2722: WHEN Fnd_Api.g_exc_unexpected_error THEN
2723: ROLLBACK TO Update_Approvers;
2724: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2725: Fnd_Msg_Pub.count_and_get (
2726: p_encoded => Fnd_Api.g_false,
2727: p_count => x_msg_count,
2728: p_data => x_msg_data
2729: );

Line 2733: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

2729: );
2730: WHEN OTHERS THEN
2731: ROLLBACK TO Update_Approvers;
2732: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2733: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2734: THEN
2735: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2736: END IF;
2737: Fnd_Msg_Pub.count_and_get (

Line 2735: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

2731: ROLLBACK TO Update_Approvers;
2732: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2733: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2734: THEN
2735: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2736: END IF;
2737: Fnd_Msg_Pub.count_and_get (
2738: p_encoded => Fnd_Api.g_false,
2739: p_count => x_msg_count,

Line 2737: Fnd_Msg_Pub.count_and_get (

2733: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2734: THEN
2735: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2736: END IF;
2737: Fnd_Msg_Pub.count_and_get (
2738: p_encoded => Fnd_Api.g_false,
2739: p_count => x_msg_count,
2740: p_data => x_msg_data
2741: );

Line 2761: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2757: BEGIN
2758: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2759: IF p_Approvers_rec.approver_sequence IS NOT NULL THEN
2760: IF p_Approvers_rec.approver_sequence = 0 OR p_Approvers_rec.approver_sequence < 0 THEN
2761: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2762: Fnd_Message.set_name ('AHL', 'AHL_APPR_ORDER_INVALID_JSP');
2763: Fnd_Msg_Pub.ADD;
2764: END IF;
2765: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2763: Fnd_Msg_Pub.ADD;

2759: IF p_Approvers_rec.approver_sequence IS NOT NULL THEN
2760: IF p_Approvers_rec.approver_sequence = 0 OR p_Approvers_rec.approver_sequence < 0 THEN
2761: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2762: Fnd_Message.set_name ('AHL', 'AHL_APPR_ORDER_INVALID_JSP');
2763: Fnd_Msg_Pub.ADD;
2764: END IF;
2765: x_return_status := Fnd_Api.g_ret_sts_error;
2766: RETURN;
2767: END IF;

Line 2787: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2783: BEGIN
2784: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2785: IF p_Approvers_rec.APPROVER_NAME IS NULL THEN
2786: IF UPPER(p_Approvers_rec.approver_type_code) = 'USER' THEN
2787: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2788: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_NOT_USER');
2789: Fnd_Msg_Pub.ADD;
2790: END IF;
2791: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2789: Fnd_Msg_Pub.ADD;

2785: IF p_Approvers_rec.APPROVER_NAME IS NULL THEN
2786: IF UPPER(p_Approvers_rec.approver_type_code) = 'USER' THEN
2787: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2788: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_NOT_USER');
2789: Fnd_Msg_Pub.ADD;
2790: END IF;
2791: x_return_status := Fnd_Api.g_ret_sts_error;
2792: RETURN;
2793: END IF;

Line 2855: Fnd_Msg_Pub.initialize;

2851: IF G_DEBUG='Y' THEN
2852: Ahl_Debug_Pub.debug( l_full_name ||':Start');
2853: END IF;
2854: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
2855: Fnd_Msg_Pub.initialize;
2856: END IF;
2857: IF NOT Fnd_Api.compatible_api_call (
2858: l_api_version,
2859: p_api_version,

Line 2871: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN

2867: OPEN c_Approvers;
2868: FETCH c_Approvers INTO l_Approvers_rec;
2869: IF c_Approvers%NOTFOUND THEN
2870: CLOSE c_Approvers;
2871: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2872: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
2873: Fnd_Msg_Pub.ADD;
2874: END IF;
2875: RAISE Fnd_Api.g_exc_error;

Line 2873: Fnd_Msg_Pub.ADD;

2869: IF c_Approvers%NOTFOUND THEN
2870: CLOSE c_Approvers;
2871: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2872: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
2873: Fnd_Msg_Pub.ADD;
2874: END IF;
2875: RAISE Fnd_Api.g_exc_error;
2876: END IF;
2877: CLOSE c_Approvers;

Line 2892: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN

2888: CLOSE check_approval_rules;
2889: ELSE
2890: CLOSE check_approval_rules;
2891: IF UPPER(l_status) = 'ACTIVE' THEN
2892: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2893: Fnd_Message.set_name('AHL', 'AHL_APPR_NOT_DELETE');
2894: Fnd_Msg_Pub.ADD;
2895: END IF;
2896: RAISE Fnd_Api.g_exc_error;

Line 2894: Fnd_Msg_Pub.ADD;

2890: CLOSE check_approval_rules;
2891: IF UPPER(l_status) = 'ACTIVE' THEN
2892: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2893: Fnd_Message.set_name('AHL', 'AHL_APPR_NOT_DELETE');
2894: Fnd_Msg_Pub.ADD;
2895: END IF;
2896: RAISE Fnd_Api.g_exc_error;
2897: END IF;
2898: END IF;

Line 2914: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

2910:
2911: DELETE FROM Ahl_Approvers
2912: WHERE APPROVAL_APPROVER_ID = p_Approval_Approver_Id;
2913: IF (SQL%NOTFOUND) THEN
2914: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2915: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
2916: Fnd_Msg_Pub.ADD;
2917: END IF;
2918: RAISE Fnd_Api.g_exc_error;

Line 2916: Fnd_Msg_Pub.ADD;

2912: WHERE APPROVAL_APPROVER_ID = p_Approval_Approver_Id;
2913: IF (SQL%NOTFOUND) THEN
2914: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2915: Fnd_Message.set_name ('AHL', 'AHL_API_RECORD_NOT_FOUND');
2916: Fnd_Msg_Pub.ADD;
2917: END IF;
2918: RAISE Fnd_Api.g_exc_error;
2919: END IF;
2920:

Line 2926: Fnd_Msg_Pub.count_and_get (

2922: -------------------- finish --------------------------
2923: IF Fnd_Api.to_boolean (p_commit) THEN
2924: COMMIT;
2925: END IF;
2926: Fnd_Msg_Pub.count_and_get (
2927: p_encoded => Fnd_Api.g_false,
2928: p_count => x_msg_count,
2929: p_data => x_msg_data
2930: );

Line 2942: Fnd_Msg_Pub.count_and_get (

2938: EXCEPTION
2939: WHEN Fnd_Api.g_exc_error THEN
2940: ROLLBACK TO Delete_Approvers;
2941: x_return_status := Fnd_Api.g_ret_sts_error;
2942: Fnd_Msg_Pub.count_and_get (
2943: p_encoded => Fnd_Api.g_false,
2944: p_count => x_msg_count,
2945: p_data => x_msg_data
2946: );

Line 2950: Fnd_Msg_Pub.count_and_get (

2946: );
2947: WHEN Fnd_Api.g_exc_unexpected_error THEN
2948: ROLLBACK TO Delete_Approvers;
2949: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2950: Fnd_Msg_Pub.count_and_get (
2951: p_encoded => Fnd_Api.g_false,
2952: p_count => x_msg_count,
2953: p_data => x_msg_data
2954: );

Line 2958: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

2954: );
2955: WHEN OTHERS THEN
2956: ROLLBACK TO Delete_Approvers;
2957: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2958: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2959: THEN
2960: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2961: END IF;
2962: Fnd_Msg_Pub.count_and_get (

Line 2960: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

2956: ROLLBACK TO Delete_Approvers;
2957: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2958: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2959: THEN
2960: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2961: END IF;
2962: Fnd_Msg_Pub.count_and_get (
2963: p_encoded => Fnd_Api.g_false,
2964: p_count => x_msg_count,

Line 2962: Fnd_Msg_Pub.count_and_get (

2958: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2959: THEN
2960: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2961: END IF;
2962: Fnd_Msg_Pub.count_and_get (
2963: p_encoded => Fnd_Api.g_false,
2964: p_count => x_msg_count,
2965: p_data => x_msg_data
2966: );

Line 3002: Fnd_Msg_Pub.initialize;

2998: IF G_DEBUG='Y' THEN
2999: Ahl_Debug_Pub.debug( l_full_name ||':Start');
3000: END IF;
3001: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
3002: Fnd_Msg_Pub.initialize;
3003: END IF;
3004: IF NOT Fnd_Api.compatible_api_call (
3005: l_api_version,
3006: p_api_version,

Line 3035: Fnd_Msg_Pub.count_and_get (

3031: Ahl_Debug_Pub.debug( l_full_name ||':Check record');
3032: END IF;
3033:
3034: -------------------- finish --------------------------
3035: Fnd_Msg_Pub.count_and_get (
3036: p_encoded => Fnd_Api.g_false,
3037: p_count => x_msg_count,
3038: p_data => x_msg_data
3039: );

Line 3050: Fnd_Msg_Pub.count_and_get (

3046: END IF;
3047: EXCEPTION
3048: WHEN Fnd_Api.g_exc_error THEN
3049: x_return_status := Fnd_Api.g_ret_sts_error;
3050: Fnd_Msg_Pub.count_and_get (
3051: p_encoded => Fnd_Api.g_false,
3052: p_count => x_msg_count,
3053: p_data => x_msg_data
3054: );

Line 3057: Fnd_Msg_Pub.count_and_get (

3053: p_data => x_msg_data
3054: );
3055: WHEN Fnd_Api.g_exc_unexpected_error THEN
3056: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
3057: Fnd_Msg_Pub.count_and_get (
3058: p_encoded => Fnd_Api.g_false,
3059: p_count => x_msg_count,
3060: p_data => x_msg_data
3061: );

Line 3064: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

3060: p_data => x_msg_data
3061: );
3062: WHEN OTHERS THEN
3063: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
3064: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
3065: THEN
3066: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
3067: END IF;
3068: Fnd_Msg_Pub.count_and_get (

Line 3066: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

3062: WHEN OTHERS THEN
3063: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
3064: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
3065: THEN
3066: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
3067: END IF;
3068: Fnd_Msg_Pub.count_and_get (
3069: p_encoded => Fnd_Api.g_false,
3070: p_count => x_msg_count,

Line 3068: Fnd_Msg_Pub.count_and_get (

3064: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
3065: THEN
3066: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
3067: END IF;
3068: Fnd_Msg_Pub.count_and_get (
3069: p_encoded => Fnd_Api.g_false,
3070: p_count => x_msg_count,
3071: p_data => x_msg_data
3072: );

Line 3153: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN

3149: OPEN c_Approvers;
3150: FETCH c_Approvers INTO l_Approvers_rec;
3151: IF c_Approvers%NOTFOUND THEN
3152: CLOSE c_Approvers;
3153: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3154: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
3155: Fnd_Msg_Pub.ADD;
3156: END IF;
3157: RAISE Fnd_Api.g_exc_error;

Line 3155: Fnd_Msg_Pub.ADD;

3151: IF c_Approvers%NOTFOUND THEN
3152: CLOSE c_Approvers;
3153: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3154: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
3155: Fnd_Msg_Pub.ADD;
3156: END IF;
3157: RAISE Fnd_Api.g_exc_error;
3158: END IF;
3159: CLOSE c_Approvers;

Line 3196: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3192: IS
3193: BEGIN
3194: -- APPROVAL SEQUENCE
3195: IF p_Approvers_rec.Approver_sequence IS NULL THEN
3196: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3197: Fnd_Message.set_name ('AHL', 'AHL_APPR_SEQUENCE_MISSING');
3198: Fnd_Msg_Pub.ADD;
3199: END IF;
3200: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3198: Fnd_Msg_Pub.ADD;

3194: -- APPROVAL SEQUENCE
3195: IF p_Approvers_rec.Approver_sequence IS NULL THEN
3196: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3197: Fnd_Message.set_name ('AHL', 'AHL_APPR_SEQUENCE_MISSING');
3198: Fnd_Msg_Pub.ADD;
3199: END IF;
3200: x_return_status := Fnd_Api.g_ret_sts_error;
3201: RETURN;
3202: END IF;

Line 3207: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3203:
3204: -- APPROVER_NAME - Approver Name is mandatory only if the approver type is user
3205: -- if approver name is null and the approval type is role, then the default approver is picked up
3206: IF UPPER(p_Approvers_rec.APPROVER_TYPE_CODE) = 'USER' AND p_Approvers_rec.APPROVER_NAME IS NULL THEN
3207: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3208: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3209: Fnd_Msg_Pub.ADD;
3210: END IF;
3211: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3209: Fnd_Msg_Pub.ADD;

3205: -- if approver name is null and the approval type is role, then the default approver is picked up
3206: IF UPPER(p_Approvers_rec.APPROVER_TYPE_CODE) = 'USER' AND p_Approvers_rec.APPROVER_NAME IS NULL THEN
3207: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3208: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3209: Fnd_Msg_Pub.ADD;
3210: END IF;
3211: x_return_status := Fnd_Api.g_ret_sts_error;
3212: RETURN;
3213: END IF;

Line 3314: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3310: FETCH c_approver_id_role INTO l_approver_id;
3311: END LOOP;
3312:
3313: IF c_approver_id_role%ROWCOUNT = 0 THEN
3314: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3315: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3316: Fnd_Msg_Pub.ADD;
3317: END IF;
3318: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3316: Fnd_Msg_Pub.ADD;

3312:
3313: IF c_approver_id_role%ROWCOUNT = 0 THEN
3314: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3315: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3316: Fnd_Msg_Pub.ADD;
3317: END IF;
3318: x_return_status := Fnd_Api.g_ret_sts_error;
3319: RETURN;
3320: ELSIF c_approver_id_role%ROWCOUNT > 1 THEN

Line 3321: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3317: END IF;
3318: x_return_status := Fnd_Api.g_ret_sts_error;
3319: RETURN;
3320: ELSIF c_approver_id_role%ROWCOUNT > 1 THEN
3321: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3322: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3323: Fnd_Msg_Pub.ADD;
3324: END IF;
3325: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3323: Fnd_Msg_Pub.ADD;

3319: RETURN;
3320: ELSIF c_approver_id_role%ROWCOUNT > 1 THEN
3321: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3322: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3323: Fnd_Msg_Pub.ADD;
3324: END IF;
3325: x_return_status := Fnd_Api.g_ret_sts_error;
3326: RETURN;
3327: END IF;

Line 3347: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3343: FETCH c_approver_id_user INTO l_approver_id;
3344: END LOOP;
3345:
3346: IF c_approver_id_user%ROWCOUNT = 0 THEN
3347: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3348: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3349: Fnd_Msg_Pub.ADD;
3350: END IF;
3351: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3349: Fnd_Msg_Pub.ADD;

3345:
3346: IF c_approver_id_user%ROWCOUNT = 0 THEN
3347: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3348: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3349: Fnd_Msg_Pub.ADD;
3350: END IF;
3351: x_return_status := Fnd_Api.g_ret_sts_error;
3352: RETURN;
3353: ELSIF c_approver_id_user%ROWCOUNT > 1 THEN

Line 3354: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3350: END IF;
3351: x_return_status := Fnd_Api.g_ret_sts_error;
3352: RETURN;
3353: ELSIF c_approver_id_user%ROWCOUNT > 1 THEN
3354: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3355: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3356: Fnd_Msg_Pub.ADD;
3357: END IF;
3358: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3356: Fnd_Msg_Pub.ADD;

3352: RETURN;
3353: ELSIF c_approver_id_user%ROWCOUNT > 1 THEN
3354: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3355: Fnd_Message.set_name ('AHL', 'AHL_APPR_TYPE_MISSING');
3356: Fnd_Msg_Pub.ADD;
3357: END IF;
3358: x_return_status := Fnd_Api.g_ret_sts_error;
3359: RETURN;
3360: END IF;

Line 3392: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3388: 'AHL_Approvers',
3389: 'APPROVAL_APPROVER_ID = ' || p_Approvers_rec.Approval_Approver_Id
3390: ) = Fnd_Api.g_false
3391: THEN
3392: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3393: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_ID');
3394: Fnd_Msg_Pub.ADD;
3395: END IF;
3396: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3394: Fnd_Msg_Pub.ADD;

3390: ) = Fnd_Api.g_false
3391: THEN
3392: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3393: Fnd_Message.set_name ('AHL', 'AHL_APPR_DUPLICATE_ID');
3394: Fnd_Msg_Pub.ADD;
3395: END IF;
3396: x_return_status := Fnd_Api.g_ret_sts_error;
3397: RETURN;
3398: END IF;

Line 3417: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

3413: ' AND Approval_Approver_id <> ' || p_Approvers_rec.Approval_Approver_id
3414: );
3415: END IF;
3416: IF l_valid_flag = Fnd_Api.g_false THEN
3417: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3418: Fnd_Message.set_name ('AHL', 'AHL_APPR_SEQ_NOT_UNIQUE');
3419: Fnd_Msg_Pub.ADD;
3420: END IF;
3421: x_return_status := Fnd_Api.g_ret_sts_error;

Line 3419: Fnd_Msg_Pub.ADD;

3415: END IF;
3416: IF l_valid_flag = Fnd_Api.g_false THEN
3417: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
3418: Fnd_Message.set_name ('AHL', 'AHL_APPR_SEQ_NOT_UNIQUE');
3419: Fnd_Msg_Pub.ADD;
3420: END IF;
3421: x_return_status := Fnd_Api.g_ret_sts_error;
3422: RETURN;
3423: END IF;