DBA Data[Home] [Help]

APPS.AHL_APPROVALS_PVT dependencies on FND_API

Line 59: -- FND_API.g_true/g_false

55: -- Compare Columns
56: FUNCTION compare_columns(
57: l_Approval_Rules_rec IN Approval_Rules_Rec_Type
58: ) RETURN VARCHAR2;
59: -- FND_API.g_true/g_false
60:
61: -- Check_Approver_for_Rule : to check at least one approver present when status updating to active for approval
62: PROCEDURE Check_Approver_for_Rule (
63: p_Approval_Rules_rec IN Approval_Rules_Rec_Type,

Line 147: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

143: --
144: --------------------------------------------------------------------
145: PROCEDURE Process_Approvals (
146: p_api_version IN NUMBER,
147: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
148: p_commit IN VARCHAR2,
149: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
150:
151: p_x_Approval_Rules_Rec IN OUT NOCOPY Approval_Rules_Rec_Type,

Line 149: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

145: PROCEDURE Process_Approvals (
146: p_api_version IN NUMBER,
147: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
148: p_commit IN VARCHAR2,
149: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
150:
151: p_x_Approval_Rules_Rec IN OUT NOCOPY Approval_Rules_Rec_Type,
152: p_x_Approvers_Tbl IN OUT NOCOPY Approvers_Tbl,
153:

Line 184: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

180: IF G_DEBUG='Y' THEN
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 (

Line 188: IF NOT Fnd_Api.compatible_api_call (

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,
190: p_api_version,
191: L_API_NAME,
192: G_PKG_NAME

Line 194: RAISE Fnd_Api.g_exc_unexpected_error;

190: p_api_version,
191: L_API_NAME,
192: G_PKG_NAME
193: ) THEN
194: RAISE Fnd_Api.g_exc_unexpected_error;
195: END IF;
196:
197: x_return_status := Fnd_Api.g_ret_sts_success;
198:

Line 197: x_return_status := Fnd_Api.g_ret_sts_success;

193: ) THEN
194: RAISE Fnd_Api.g_exc_unexpected_error;
195: END IF;
196:
197: x_return_status := Fnd_Api.g_ret_sts_success;
198:
199: ----------------------- validate -----------------------
200: IF G_DEBUG='Y' THEN
201: Ahl_Debug_Pub.debug( l_full_name ||':Validate');

Line 281: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

277: END IF;
278: END LOOP;
279: END IF;
280:
281: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
282: RAISE Fnd_Api.g_exc_error;
283: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
284: RAISE Fnd_Api.g_exc_unexpected_error;
285: END IF;

Line 282: RAISE Fnd_Api.g_exc_error;

278: END LOOP;
279: END IF;
280:
281: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
282: RAISE Fnd_Api.g_exc_error;
283: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
284: RAISE Fnd_Api.g_exc_unexpected_error;
285: END IF;
286:

Line 283: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

279: END IF;
280:
281: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
282: RAISE Fnd_Api.g_exc_error;
283: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
284: RAISE Fnd_Api.g_exc_unexpected_error;
285: END IF;
286:
287: --

Line 284: RAISE Fnd_Api.g_exc_unexpected_error;

280:
281: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
282: RAISE Fnd_Api.g_exc_error;
283: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
284: RAISE Fnd_Api.g_exc_unexpected_error;
285: END IF;
286:
287: --
288: -- END of API body.

Line 291: IF Fnd_Api.To_Boolean (p_commit) THEN

287: --
288: -- END of API body.
289: --
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,

Line 295: p_encoded => Fnd_Api.g_false,

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: );
299: IF G_DEBUG='Y' THEN

Line 308: WHEN Fnd_Api.g_exc_error THEN

304: Ahl_Debug_Pub.disable_debug;
305: END IF;
306:
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,

Line 310: x_return_status := Fnd_Api.g_ret_sts_error;

306:
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

Line 312: p_encoded => Fnd_Api.g_false,

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: );
316: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 316: WHEN Fnd_Api.g_exc_unexpected_error THEN

312: p_encoded => Fnd_Api.g_false,
313: p_count => x_msg_count,
314: p_data => x_msg_data
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,

Line 318: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

314: p_data => x_msg_data
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

Line 320: p_encoded => Fnd_Api.g_false,

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: );
324: WHEN OTHERS THEN

Line 326: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

322: p_data => x_msg_data
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 (

Line 331: p_encoded => Fnd_Api.g_false,

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: );
335:

Line 400: RAISE Fnd_Api.g_exc_unexpected_error;

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;
404: x_col_val_tbl(i).col_op := '=';

Line 547: RETURN Fnd_Api.g_true;

543: l_count := 0;
544: END;
545:
546: IF l_count = 0 THEN
547: RETURN Fnd_Api.g_true;
548: ELSE
549: RETURN Fnd_Api.g_false;
550: END IF;
551:

Line 549: RETURN Fnd_Api.g_false;

545:
546: IF l_count = 0 THEN
547: RETURN Fnd_Api.g_true;
548: ELSE
549: RETURN Fnd_Api.g_false;
550: END IF;
551:
552: END Check_Rules_Uniqueness;
553:

Line 565: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

561: --------------------------------------------------------------------
562:
563: PROCEDURE Create_Approval_Rules (
564: p_api_version IN NUMBER,
565: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
566: p_commit IN VARCHAR2,
567: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
568: x_return_status OUT NOCOPY VARCHAR2,
569: x_msg_count OUT NOCOPY NUMBER,

Line 567: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

563: PROCEDURE Create_Approval_Rules (
564: p_api_version IN NUMBER,
565: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
566: p_commit IN VARCHAR2,
567: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
568: x_return_status OUT NOCOPY VARCHAR2,
569: x_msg_count OUT NOCOPY NUMBER,
570: x_msg_data OUT NOCOPY VARCHAR2,
571: p_Approval_Rules_rec IN Approval_Rules_Rec_Type,

Line 621: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

617: IF G_DEBUG='Y' THEN
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,

Line 624: IF NOT Fnd_Api.compatible_api_call (

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,
627: L_API_NAME,
628: G_PKG_NAME

Line 630: RAISE Fnd_Api.g_exc_unexpected_error;

626: p_api_version,
627: L_API_NAME,
628: G_PKG_NAME
629: ) THEN
630: RAISE Fnd_Api.g_exc_unexpected_error;
631: END IF;
632: x_return_status := Fnd_Api.g_ret_sts_success;
633: ----------------------- validate -----------------------
634: IF G_DEBUG='Y' THEN

Line 632: x_return_status := Fnd_Api.g_ret_sts_success;

628: G_PKG_NAME
629: ) THEN
630: RAISE Fnd_Api.g_exc_unexpected_error;
631: END IF;
632: x_return_status := Fnd_Api.g_ret_sts_success;
633: ----------------------- validate -----------------------
634: IF G_DEBUG='Y' THEN
635: Ahl_Debug_Pub.debug( l_full_name ||':Validate');
636: END IF;

Line 648: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

644: x_msg_count => x_msg_count,
645: x_msg_data => x_msg_data,
646: p_Approval_Rules_rec => l_Approval_Rules_rec
647: );
648: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
649: RAISE Fnd_Api.g_exc_error;
650: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
651: RAISE Fnd_Api.g_exc_unexpected_error;
652: END IF;

Line 649: RAISE Fnd_Api.g_exc_error;

645: x_msg_data => x_msg_data,
646: p_Approval_Rules_rec => l_Approval_Rules_rec
647: );
648: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
649: RAISE Fnd_Api.g_exc_error;
650: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
651: RAISE Fnd_Api.g_exc_unexpected_error;
652: END IF;
653: --

Line 650: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

646: p_Approval_Rules_rec => l_Approval_Rules_rec
647: );
648: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
649: RAISE Fnd_Api.g_exc_error;
650: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
651: RAISE Fnd_Api.g_exc_unexpected_error;
652: END IF;
653: --
654: -- Check for the ID.

Line 651: RAISE Fnd_Api.g_exc_unexpected_error;

647: );
648: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
649: RAISE Fnd_Api.g_exc_error;
650: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
651: RAISE Fnd_Api.g_exc_unexpected_error;
652: END IF;
653: --
654: -- Check for the ID.
655: --

Line 656: IF l_Approval_Rules_rec.APPROVAL_RULE_ID IS Null OR l_Approval_Rules_rec.APPROVAL_RULE_ID = Fnd_Api.g_miss_num THEN

652: END IF;
653: --
654: -- Check for the ID.
655: --
656: IF l_Approval_Rules_rec.APPROVAL_RULE_ID IS Null OR l_Approval_Rules_rec.APPROVAL_RULE_ID = Fnd_Api.g_miss_num THEN
657:
658: LOOP
659: --
660: -- If the ID is not passed into the API, then

Line 689: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

685: p_Approval_Rules_rec => p_Approval_Rules_rec,
686: p_complete_rec => l_Approval_Rules_rec,
687: x_return_status => l_return_status
688: );
689: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
690: RAISE Fnd_Api.g_exc_unexpected_error;
691: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
692: RAISE Fnd_Api.g_exc_error;
693: ELSE

Line 690: RAISE Fnd_Api.g_exc_unexpected_error;

686: p_complete_rec => l_Approval_Rules_rec,
687: x_return_status => l_return_status
688: );
689: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
690: RAISE Fnd_Api.g_exc_unexpected_error;
691: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
692: RAISE Fnd_Api.g_exc_error;
693: ELSE
694: OPEN c_operating;

Line 691: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

687: x_return_status => l_return_status
688: );
689: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
690: RAISE Fnd_Api.g_exc_unexpected_error;
691: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
692: RAISE Fnd_Api.g_exc_error;
693: ELSE
694: OPEN c_operating;
695: FETCH c_operating INTO l_Approval_Rules_rec.Operating_Unit_Id;

Line 692: RAISE Fnd_Api.g_exc_error;

688: );
689: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
690: RAISE Fnd_Api.g_exc_unexpected_error;
691: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
692: RAISE Fnd_Api.g_exc_error;
693: ELSE
694: OPEN c_operating;
695: FETCH c_operating INTO l_Approval_Rules_rec.Operating_Unit_Id;
696: CLOSE c_operating;

Line 708: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

704: Check_Appl_Usg_Code (
705: p_Approval_Rules_rec => p_Approval_Rules_rec,
706: x_return_status => l_return_status
707: );
708: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
709: RAISE Fnd_Api.g_exc_unexpected_error;
710: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
711: RAISE Fnd_Api.g_exc_error;
712: ELSE

Line 709: RAISE Fnd_Api.g_exc_unexpected_error;

705: p_Approval_Rules_rec => p_Approval_Rules_rec,
706: x_return_status => l_return_status
707: );
708: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
709: RAISE Fnd_Api.g_exc_unexpected_error;
710: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
711: RAISE Fnd_Api.g_exc_error;
712: ELSE
713: OPEN c_appl_usg;

Line 710: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

706: x_return_status => l_return_status
707: );
708: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
709: RAISE Fnd_Api.g_exc_unexpected_error;
710: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
711: RAISE Fnd_Api.g_exc_error;
712: ELSE
713: OPEN c_appl_usg;
714: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;

Line 711: RAISE Fnd_Api.g_exc_error;

707: );
708: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
709: RAISE Fnd_Api.g_exc_unexpected_error;
710: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
711: RAISE Fnd_Api.g_exc_error;
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

Line 720: RAISE Fnd_Api.g_exc_unexpected_error;

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;
723: END IF;
724: */

Line 778: IF Fnd_Api.To_Boolean ( p_commit ) THEN

774: --
775: -- END of API body.
776: --
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,

Line 782: p_encoded => Fnd_Api.g_false,

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: );
786: IF G_DEBUG='Y' THEN

Line 795: WHEN Fnd_Api.g_exc_error THEN

791: Ahl_Debug_Pub.disable_debug;
792: END IF;
793:
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,

Line 797: x_return_status := Fnd_Api.g_ret_sts_error;

793:
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

Line 799: p_encoded => Fnd_Api.g_false,

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: );
803: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 803: WHEN Fnd_Api.g_exc_unexpected_error THEN

799: p_encoded => Fnd_Api.g_false,
800: p_count => x_msg_count,
801: p_data => x_msg_data
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,

Line 805: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

801: p_data => x_msg_data
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

Line 807: p_encoded => Fnd_Api.g_false,

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: );
811: WHEN OTHERS THEN

Line 813: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

809: p_data => x_msg_data
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;

Line 819: p_encoded => Fnd_Api.g_false,

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: );
823: END Create_Approval_Rules;

Line 832: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

828: --
829: --------------------------------------------------------------------
830: PROCEDURE Update_Approval_Rules (
831: p_api_version IN NUMBER,
832: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
833: p_commit IN VARCHAR2,
834: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
835: x_return_status OUT NOCOPY VARCHAR2,
836: x_msg_count OUT NOCOPY NUMBER,

Line 834: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

830: PROCEDURE Update_Approval_Rules (
831: p_api_version IN NUMBER,
832: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
833: p_commit IN VARCHAR2,
834: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
835: x_return_status OUT NOCOPY VARCHAR2,
836: x_msg_count OUT NOCOPY NUMBER,
837: x_msg_data OUT NOCOPY VARCHAR2,
838: p_Approval_Rules_rec IN Approval_Rules_Rec_Type

Line 883: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

879: -- Debug info.
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,

Line 886: IF NOT Fnd_Api.compatible_api_call(

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,
889: l_api_name,
890: G_PKG_NAME

Line 892: RAISE Fnd_Api.g_exc_unexpected_error;

888: p_api_version,
889: l_api_name,
890: G_PKG_NAME
891: ) THEN
892: RAISE Fnd_Api.g_exc_unexpected_error;
893: END IF;
894: x_return_status := Fnd_Api.g_ret_sts_success;
895: ----------------------- validate ----------------------
896: IF G_DEBUG='Y' THEN

Line 894: x_return_status := Fnd_Api.g_ret_sts_success;

890: G_PKG_NAME
891: ) THEN
892: RAISE Fnd_Api.g_exc_unexpected_error;
893: END IF;
894: x_return_status := Fnd_Api.g_ret_sts_success;
895: ----------------------- validate ----------------------
896: IF G_DEBUG='Y' THEN
897: Ahl_Debug_Pub.debug( l_full_name ||':Validate');
898: END IF;

Line 909: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

905: p_Approval_Rules_rec => p_Approval_Rules_rec,
906: p_complete_rec => l_Approval_Rules_rec,
907: x_return_status => l_return_status
908: );
909: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
910: RAISE Fnd_Api.g_exc_unexpected_error;
911: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
912: RAISE Fnd_Api.g_exc_error;
913: ELSE

Line 910: RAISE Fnd_Api.g_exc_unexpected_error;

906: p_complete_rec => l_Approval_Rules_rec,
907: x_return_status => l_return_status
908: );
909: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
910: RAISE Fnd_Api.g_exc_unexpected_error;
911: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
912: RAISE Fnd_Api.g_exc_error;
913: ELSE
914: OPEN c_operating;

Line 911: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

907: x_return_status => l_return_status
908: );
909: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
910: RAISE Fnd_Api.g_exc_unexpected_error;
911: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
912: RAISE Fnd_Api.g_exc_error;
913: ELSE
914: OPEN c_operating;
915: FETCH c_operating INTO l_operating_unit;

Line 912: RAISE Fnd_Api.g_exc_error;

908: );
909: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
910: RAISE Fnd_Api.g_exc_unexpected_error;
911: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
912: RAISE Fnd_Api.g_exc_error;
913: ELSE
914: OPEN c_operating;
915: FETCH c_operating INTO l_operating_unit;
916: CLOSE c_operating;

Line 941: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

937: Check_Appl_Usg_Code (
938: p_Approval_Rules_rec => p_Approval_Rules_rec,
939: x_return_status => l_return_status
940: );
941: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
942: RAISE Fnd_Api.g_exc_unexpected_error;
943: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
944: RAISE Fnd_Api.g_exc_error;
945: ELSE

Line 942: RAISE Fnd_Api.g_exc_unexpected_error;

938: p_Approval_Rules_rec => p_Approval_Rules_rec,
939: x_return_status => l_return_status
940: );
941: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
942: RAISE Fnd_Api.g_exc_unexpected_error;
943: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
944: RAISE Fnd_Api.g_exc_error;
945: ELSE
946: OPEN c_appl_usg;

Line 943: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

939: x_return_status => l_return_status
940: );
941: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
942: RAISE Fnd_Api.g_exc_unexpected_error;
943: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
944: RAISE Fnd_Api.g_exc_error;
945: ELSE
946: OPEN c_appl_usg;
947: FETCH c_appl_usg INTO l_Approval_Rules_rec.Application_Usg_Code;

Line 944: RAISE Fnd_Api.g_exc_error;

940: );
941: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
942: RAISE Fnd_Api.g_exc_unexpected_error;
943: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
944: RAISE Fnd_Api.g_exc_error;
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

Line 953: RAISE Fnd_Api.g_exc_unexpected_error;

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;
956: END IF;*/
957: IF p_validation_level >= Jtf_Plsql_Api.g_valid_level_item THEN

Line 963: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

959: p_Approval_Rules_rec => p_Approval_Rules_rec,
960: p_validation_mode => Jtf_Plsql_Api.g_update,
961: x_return_status => l_return_status
962: );
963: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
964: RAISE Fnd_Api.g_exc_unexpected_error;
965: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
966: RAISE Fnd_Api.g_exc_error;
967: END IF;

Line 964: RAISE Fnd_Api.g_exc_unexpected_error;

960: p_validation_mode => Jtf_Plsql_Api.g_update,
961: x_return_status => l_return_status
962: );
963: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
964: RAISE Fnd_Api.g_exc_unexpected_error;
965: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
966: RAISE Fnd_Api.g_exc_error;
967: END IF;
968: END IF;

Line 965: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

961: x_return_status => l_return_status
962: );
963: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
964: RAISE Fnd_Api.g_exc_unexpected_error;
965: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
966: RAISE Fnd_Api.g_exc_error;
967: END IF;
968: END IF;
969:

Line 966: RAISE Fnd_Api.g_exc_error;

962: );
963: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
964: RAISE Fnd_Api.g_exc_unexpected_error;
965: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
966: RAISE Fnd_Api.g_exc_error;
967: END IF;
968: END IF;
969:
970: IF p_validation_level >= Jtf_Plsql_Api.g_valid_level_record THEN

Line 976: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

972: p_Approval_Rules_rec => p_Approval_Rules_rec,
973: p_complete_rec => l_Approval_Rules_rec,
974: x_return_status => l_return_status
975: );
976: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
977: RAISE Fnd_Api.g_exc_unexpected_error;
978: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
979: RAISE Fnd_Api.g_exc_error;
980: END IF;

Line 977: RAISE Fnd_Api.g_exc_unexpected_error;

973: p_complete_rec => l_Approval_Rules_rec,
974: x_return_status => l_return_status
975: );
976: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
977: RAISE Fnd_Api.g_exc_unexpected_error;
978: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
979: RAISE Fnd_Api.g_exc_error;
980: END IF;
981: END IF;

Line 978: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

974: x_return_status => l_return_status
975: );
976: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
977: RAISE Fnd_Api.g_exc_unexpected_error;
978: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
979: RAISE Fnd_Api.g_exc_error;
980: END IF;
981: END IF;
982:

Line 979: RAISE Fnd_Api.g_exc_error;

975: );
976: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
977: RAISE Fnd_Api.g_exc_unexpected_error;
978: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
979: RAISE Fnd_Api.g_exc_error;
980: END IF;
981: END IF;
982:
983: IF p_validation_level >= G_VALID_QUALIFIER THEN

Line 989: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

985: p_Approval_Rules_rec => p_Approval_Rules_rec,
986: p_complete_rec => l_Approval_Rules_rec,
987: x_return_status => l_return_status
988: );
989: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
990: RAISE Fnd_Api.g_exc_unexpected_error;
991: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
992: RAISE Fnd_Api.g_exc_error;
993: END IF;

Line 990: RAISE Fnd_Api.g_exc_unexpected_error;

986: p_complete_rec => l_Approval_Rules_rec,
987: x_return_status => l_return_status
988: );
989: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
990: RAISE Fnd_Api.g_exc_unexpected_error;
991: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
992: RAISE Fnd_Api.g_exc_error;
993: END IF;
994: END IF;

Line 991: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

987: x_return_status => l_return_status
988: );
989: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
990: RAISE Fnd_Api.g_exc_unexpected_error;
991: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
992: RAISE Fnd_Api.g_exc_error;
993: END IF;
994: END IF;
995:

Line 992: RAISE Fnd_Api.g_exc_error;

988: );
989: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
990: RAISE Fnd_Api.g_exc_unexpected_error;
991: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
992: RAISE Fnd_Api.g_exc_error;
993: END IF;
994: END IF;
995:
996: --

Line 1004: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1000: p_Approval_Rules_rec => p_Approval_Rules_rec,
1001: p_complete_rec => l_Approval_Rules_rec,
1002: x_return_status => l_return_status
1003: );
1004: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1005: RAISE Fnd_Api.g_exc_unexpected_error;
1006: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1007: RAISE Fnd_Api.g_exc_error;
1008: END IF;

Line 1005: RAISE Fnd_Api.g_exc_unexpected_error;

1001: p_complete_rec => l_Approval_Rules_rec,
1002: x_return_status => l_return_status
1003: );
1004: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1005: RAISE Fnd_Api.g_exc_unexpected_error;
1006: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1007: RAISE Fnd_Api.g_exc_error;
1008: END IF;
1009: END IF;

Line 1006: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1002: x_return_status => l_return_status
1003: );
1004: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1005: RAISE Fnd_Api.g_exc_unexpected_error;
1006: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1007: RAISE Fnd_Api.g_exc_error;
1008: END IF;
1009: END IF;
1010:

Line 1007: RAISE Fnd_Api.g_exc_error;

1003: );
1004: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1005: RAISE Fnd_Api.g_exc_unexpected_error;
1006: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1007: RAISE Fnd_Api.g_exc_error;
1008: END IF;
1009: END IF;
1010:
1011: --

Line 1029: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1025: l_status,
1026: p_Approval_Rules_rec.status_code,
1027: l_return_status
1028: );
1029: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1030: RAISE Fnd_Api.g_exc_unexpected_error;
1031: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1032: RAISE Fnd_Api.g_exc_error;
1033: END IF;

Line 1030: RAISE Fnd_Api.g_exc_unexpected_error;

1026: p_Approval_Rules_rec.status_code,
1027: l_return_status
1028: );
1029: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1030: RAISE Fnd_Api.g_exc_unexpected_error;
1031: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1032: RAISE Fnd_Api.g_exc_error;
1033: END IF;
1034: END IF;

Line 1031: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1027: l_return_status
1028: );
1029: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1030: RAISE Fnd_Api.g_exc_unexpected_error;
1031: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1032: RAISE Fnd_Api.g_exc_error;
1033: END IF;
1034: END IF;
1035:

Line 1032: RAISE Fnd_Api.g_exc_error;

1028: );
1029: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1030: RAISE Fnd_Api.g_exc_unexpected_error;
1031: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1032: RAISE Fnd_Api.g_exc_error;
1033: END IF;
1034: END IF;
1035:
1036: --

Line 1045: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1041: p_Approval_Rules_rec => p_Approval_Rules_rec,
1042: p_complete_rec => l_Approval_Rules_rec,
1043: x_return_status => l_return_status
1044: );
1045: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1046: RAISE Fnd_Api.g_exc_unexpected_error;
1047: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1048: RAISE Fnd_Api.g_exc_error;
1049: END IF;

Line 1046: RAISE Fnd_Api.g_exc_unexpected_error;

1042: p_complete_rec => l_Approval_Rules_rec,
1043: x_return_status => l_return_status
1044: );
1045: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1046: RAISE Fnd_Api.g_exc_unexpected_error;
1047: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1048: RAISE Fnd_Api.g_exc_error;
1049: END IF;
1050: END IF; */

Line 1047: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1043: x_return_status => l_return_status
1044: );
1045: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1046: RAISE Fnd_Api.g_exc_unexpected_error;
1047: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1048: RAISE Fnd_Api.g_exc_error;
1049: END IF;
1050: END IF; */
1051:

Line 1048: RAISE Fnd_Api.g_exc_error;

1044: );
1045: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1046: RAISE Fnd_Api.g_exc_unexpected_error;
1047: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1048: RAISE Fnd_Api.g_exc_error;
1049: END IF;
1050: END IF; */
1051:
1052: --

Line 1098: IF Fnd_Api.to_boolean (p_commit) THEN

1094: X_LAST_UPDATED_BY => Fnd_Global.USER_ID,
1095: X_LAST_UPDATE_LOGIN => Fnd_Global.LOGIN_ID );
1096:
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,

Line 1102: p_encoded => Fnd_Api.g_false,

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: );
1106:

Line 1116: WHEN Fnd_Api.g_exc_error THEN

1112: IF G_DEBUG='Y' THEN
1113: Ahl_Debug_Pub.disable_debug;
1114: END IF;
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,

Line 1118: x_return_status := Fnd_Api.g_ret_sts_error;

1114: END IF;
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

Line 1120: p_encoded => Fnd_Api.g_false,

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: );
1124: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1124: WHEN Fnd_Api.g_exc_unexpected_error THEN

1120: p_encoded => Fnd_Api.g_false,
1121: p_count => x_msg_count,
1122: p_data => x_msg_data
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,

Line 1126: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1122: p_data => x_msg_data
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

Line 1128: p_encoded => Fnd_Api.g_false,

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: );
1132: WHEN OTHERS THEN

Line 1134: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1130: p_data => x_msg_data
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;

Line 1140: p_encoded => Fnd_Api.g_false,

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: );
1144: END Update_Approval_Rules;

Line 1168: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1164:
1165: CURSOR chk_STATUS IS
1166: SELECT status_code FROM ahl_approval_rules_b WHERE approval_rule_id = p_Approval_Rules_rec.approval_rule_id;
1167: BEGIN
1168: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1169: OPEN chk_STATUS;
1170: FETCH chk_STATUS INTO l_status;
1171: CLOSE chk_STATUS;
1172: IF UPPER(l_status) <> UPPER(p_Approval_Rules_rec.status_code) THEN

Line 1184: x_return_status := Fnd_Api.g_ret_sts_error;

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
1187: CLOSE check_approver1;
1188: END IF;

Line 1198: x_return_status := Fnd_Api.g_ret_sts_error;

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
1201: Close check_approver2;
1202: END IF;

Line 1212: x_return_status := Fnd_Api.g_ret_sts_error;

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
1215: Close check_approver3;
1216: END IF;

Line 1226: x_return_status := Fnd_Api.g_ret_sts_error;

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
1229: Close check_approver4;
1230: END IF;

Line 1304: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1300: AND application_usg_code = (SELECT application_usg_code FROM ahl_approval_rules_b WHERE approval_rule_id = p_Approval_Rules_rec.approval_rule_id)
1301: AND approval_object_code = (SELECT approval_object_code FROM ahl_approval_rules_b WHERE approval_rule_id = p_Approval_Rules_rec.approval_rule_id)
1302: AND approval_rule_id <> p_Approval_Rules_rec.approval_rule_id;
1303: BEGIN
1304: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1305:
1306: IF p_Approval_Rules_rec.STATUS_CODE='ACTIVE' THEN
1307:
1308: IF p_Approval_Rules_rec.approval_priority_code IS NOT NULL AND p_Approval_Rules_rec.OPERATING_NAME IS NOT NULL THEN

Line 1317: x_return_status := Fnd_Api.g_ret_sts_error;

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
1320: CLOSE check_active1;
1321: END IF;

Line 1331: x_return_status := Fnd_Api.g_ret_sts_error;

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
1334: CLOSE check_active2;
1335: END IF;

Line 1345: x_return_status := Fnd_Api.g_ret_sts_error;

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
1348: CLOSE check_active3;
1349: END IF;

Line 1359: x_return_status := Fnd_Api.g_ret_sts_error;

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
1362: CLOSE check_active4;
1363: END IF;

Line 1373: x_return_status := Fnd_Api.g_ret_sts_error;

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
1376: CLOSE check_active5;
1377: END IF;

Line 1408: x_return_status := Fnd_Api.g_ret_sts_error;

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
1411: CLOSE chk_op_name ;
1412: END IF;

Line 1441: x_return_status := Fnd_Api.g_ret_sts_error;

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
1444: CLOSE chk_appl_usg_code;
1445: END IF;

Line 1473: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1469: CURSOR CUR_STATUS IS
1470: SELECT status_code FROM ahl_approval_rules_b WHERE approval_rule_id = p_Approval_Rules_rec.approval_rule_id;
1471:
1472: BEGIN
1473: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1474: OPEN CUR_STATUS;
1475: FETCH CUR_STATUS INTO l_status;
1476: CLOSE CUR_STATUS;
1477: IF l_status <> p_Approval_Rules_rec.status_code THEN

Line 1486: x_return_status := Fnd_Api.g_ret_sts_error;

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
1489: CLOSE check_status;
1490: END IF;

Line 1502: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

1498: --------------------------------------------------------------------
1499:
1500: PROCEDURE Delete_Approval_Rules (
1501: p_api_version IN NUMBER,
1502: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1503: p_commit IN VARCHAR2,
1504: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1505: x_return_status OUT NOCOPY VARCHAR2,
1506: x_msg_count OUT NOCOPY NUMBER,

Line 1504: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

1500: PROCEDURE Delete_Approval_Rules (
1501: p_api_version IN NUMBER,
1502: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1503: p_commit IN VARCHAR2,
1504: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1505: x_return_status OUT NOCOPY VARCHAR2,
1506: x_msg_count OUT NOCOPY NUMBER,
1507: x_msg_data OUT NOCOPY VARCHAR2,
1508: p_Approval_Rule_id IN NUMBER,

Line 1538: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1534: -- Debug info.
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,

Line 1541: IF NOT Fnd_Api.compatible_api_call (

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,
1544: l_api_name,
1545: G_PKG_NAME

Line 1547: RAISE Fnd_Api.g_exc_unexpected_error;

1543: p_api_version,
1544: l_api_name,
1545: G_PKG_NAME
1546: ) THEN
1547: RAISE Fnd_Api.g_exc_unexpected_error;
1548: END IF;
1549: x_return_status := Fnd_Api.g_ret_sts_success;
1550:
1551: ------------------------ delete ------------------------

Line 1549: x_return_status := Fnd_Api.g_ret_sts_success;

1545: G_PKG_NAME
1546: ) THEN
1547: RAISE Fnd_Api.g_exc_unexpected_error;
1548: END IF;
1549: x_return_status := Fnd_Api.g_ret_sts_success;
1550:
1551: ------------------------ delete ------------------------
1552: IF G_DEBUG='Y' THEN
1553: Ahl_Debug_Pub.debug( l_full_name ||':Delete');

Line 1564: RAISE Fnd_Api.g_exc_error;

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;
1567: -- Delete TL data
1568:

Line 1577: RAISE Fnd_Api.g_exc_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:
1580: DELETE FROM Ahl_Approval_Rules_b
1581: WHERE Approval_Rule_id = p_Approval_Rule_id;*/

Line 1592: RAISE Fnd_Api.g_exc_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:
1595: -------------------- finish --------------------------
1596: IF Fnd_Api.to_boolean (p_commit) THEN

Line 1596: IF Fnd_Api.to_boolean (p_commit) THEN

1592: RAISE Fnd_Api.g_exc_error;
1593: END IF;
1594:
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,

Line 1600: p_encoded => Fnd_Api.g_false,

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: );
1604: IF G_DEBUG='Y' THEN

Line 1612: WHEN Fnd_Api.g_exc_error THEN

1608: IF G_DEBUG='Y' THEN
1609: Ahl_Debug_Pub.disable_debug;
1610: END IF;
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,

Line 1614: x_return_status := Fnd_Api.g_ret_sts_error;

1610: END IF;
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

Line 1616: p_encoded => Fnd_Api.g_false,

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: );
1620: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1620: WHEN Fnd_Api.g_exc_unexpected_error THEN

1616: p_encoded => Fnd_Api.g_false,
1617: p_count => x_msg_count,
1618: p_data => x_msg_data
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,

Line 1622: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1618: p_data => x_msg_data
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

Line 1624: p_encoded => Fnd_Api.g_false,

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: );
1628: WHEN OTHERS THEN

Line 1630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1626: p_data => x_msg_data
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;

Line 1636: p_encoded => Fnd_Api.g_false,

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: );
1640: END Delete_Approval_Rules;

Line 1649: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

1645: --
1646: --------------------------------------------------------------------
1647: PROCEDURE Validate_Approval_Rules (
1648: p_api_version IN NUMBER,
1649: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1650: p_commit IN VARCHAR2,
1651: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1652: x_return_status OUT NOCOPY VARCHAR2,
1653: x_msg_count OUT NOCOPY NUMBER,

Line 1651: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

1647: PROCEDURE Validate_Approval_Rules (
1648: p_api_version IN NUMBER,
1649: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1650: p_commit IN VARCHAR2,
1651: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1652: x_return_status OUT NOCOPY VARCHAR2,
1653: x_msg_count OUT NOCOPY NUMBER,
1654: x_msg_data OUT NOCOPY VARCHAR2,
1655: p_Approval_Rules_rec IN Approval_Rules_Rec_Type

Line 1672: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1668: -- Debug info.
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,

Line 1675: IF NOT Fnd_Api.compatible_api_call (

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,
1678: l_api_name,
1679: G_PKG_NAME

Line 1681: RAISE Fnd_Api.g_exc_unexpected_error;

1677: p_api_version,
1678: l_api_name,
1679: G_PKG_NAME
1680: ) THEN
1681: RAISE Fnd_Api.g_exc_unexpected_error;
1682: END IF;
1683: x_return_status := Fnd_Api.g_ret_sts_success;
1684: ---------------------- validate ------------------------
1685: IF G_DEBUG='Y' THEN

Line 1683: x_return_status := Fnd_Api.g_ret_sts_success;

1679: G_PKG_NAME
1680: ) THEN
1681: RAISE Fnd_Api.g_exc_unexpected_error;
1682: END IF;
1683: x_return_status := Fnd_Api.g_ret_sts_success;
1684: ---------------------- validate ------------------------
1685: IF G_DEBUG='Y' THEN
1686: Ahl_Debug_Pub.debug( l_full_name ||':Check items');
1687: END IF;

Line 1694: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1690: p_Approval_Rules_rec => p_Approval_Rules_rec,
1691: p_validation_mode => Jtf_Plsql_Api.g_create,
1692: x_return_status => l_return_status
1693: );
1694: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1695: RAISE Fnd_Api.g_exc_unexpected_error;
1696: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1697: RAISE Fnd_Api.g_exc_error;
1698: END IF;

Line 1695: RAISE Fnd_Api.g_exc_unexpected_error;

1691: p_validation_mode => Jtf_Plsql_Api.g_create,
1692: x_return_status => l_return_status
1693: );
1694: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1695: RAISE Fnd_Api.g_exc_unexpected_error;
1696: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1697: RAISE Fnd_Api.g_exc_error;
1698: END IF;
1699: END IF;

Line 1696: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1692: x_return_status => l_return_status
1693: );
1694: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1695: RAISE Fnd_Api.g_exc_unexpected_error;
1696: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1697: RAISE Fnd_Api.g_exc_error;
1698: END IF;
1699: END IF;
1700: IF G_DEBUG='Y' THEN

Line 1697: RAISE Fnd_Api.g_exc_error;

1693: );
1694: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1695: RAISE Fnd_Api.g_exc_unexpected_error;
1696: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1697: RAISE Fnd_Api.g_exc_error;
1698: END IF;
1699: END IF;
1700: IF G_DEBUG='Y' THEN
1701: Ahl_Debug_Pub.debug( l_full_name ||':Check record');

Line 1710: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1706: p_Approval_Rules_rec => p_Approval_Rules_rec,
1707: p_complete_rec => NULL,
1708: x_return_status => l_return_status
1709: );
1710: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1711: RAISE Fnd_Api.g_exc_unexpected_error;
1712: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1713: RAISE Fnd_Api.g_exc_error;
1714: END IF;

Line 1711: RAISE Fnd_Api.g_exc_unexpected_error;

1707: p_complete_rec => NULL,
1708: x_return_status => l_return_status
1709: );
1710: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1711: RAISE Fnd_Api.g_exc_unexpected_error;
1712: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1713: RAISE Fnd_Api.g_exc_error;
1714: END IF;
1715: END IF;

Line 1712: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1708: x_return_status => l_return_status
1709: );
1710: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1711: RAISE Fnd_Api.g_exc_unexpected_error;
1712: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1713: RAISE Fnd_Api.g_exc_error;
1714: END IF;
1715: END IF;
1716: -------------------- finish --------------------------

Line 1713: RAISE Fnd_Api.g_exc_error;

1709: );
1710: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1711: RAISE Fnd_Api.g_exc_unexpected_error;
1712: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1713: RAISE Fnd_Api.g_exc_error;
1714: END IF;
1715: END IF;
1716: -------------------- finish --------------------------
1717: Fnd_Msg_Pub.count_and_get (

Line 1718: p_encoded => Fnd_Api.g_false,

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: );
1722: IF G_DEBUG='Y' THEN

Line 1730: WHEN Fnd_Api.g_exc_error THEN

1726: IF G_DEBUG='Y' THEN
1727: Ahl_Debug_Pub.disable_debug;
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,

Line 1731: x_return_status := Fnd_Api.g_ret_sts_error;

1727: Ahl_Debug_Pub.disable_debug;
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

Line 1733: p_encoded => Fnd_Api.g_false,

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: );
1737: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1737: WHEN Fnd_Api.g_exc_unexpected_error THEN

1733: p_encoded => Fnd_Api.g_false,
1734: p_count => x_msg_count,
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,

Line 1738: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1734: p_count => x_msg_count,
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

Line 1740: p_encoded => Fnd_Api.g_false,

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: );
1744: WHEN OTHERS THEN

Line 1745: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

1741: p_count => x_msg_count,
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;

Line 1751: p_encoded => Fnd_Api.g_false,

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: );
1755: END Validate_Approval_Rules;

Line 1775: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

1771: Check_Approval_Rules_Req_Items (
1772: p_Approval_Rules_rec => p_Approval_Rules_rec,
1773: x_return_status => x_return_status
1774: );
1775: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1776: RETURN;
1777: END IF;
1778:
1779: --

Line 1786: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

1782: p_Approval_Rules_rec => p_Approval_Rules_rec,
1783: p_validation_mode => p_validation_mode,
1784: x_return_status => x_return_status
1785: );
1786: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1787: RETURN;
1788: END IF;
1789:
1790: END Check_Approval_Rules_Items;

Line 1800: -- as FND_API.g_miss_char/num/date

1796: -- Check the record level business rules.
1797: --
1798: -- PARAMETERS
1799: -- p_Approval_Rules_rec: the record to be validated; may contain attributes
1800: -- as FND_API.g_miss_char/num/date
1801: -- p_complete_rec: the complete record after all "g_miss" items
1802: -- have been replaced by current database values
1803: ---------------------------------------------------------------------
1804: PROCEDURE Check_Approval_Rules_Record (

Line 1819: p_Approval_Rules_rec.active_start_date <> Fnd_Api.g_miss_date THEN

1815: IF p_complete_rec.active_start_date IS NOT NULL THEN
1816: l_active_start_date := p_complete_rec.active_start_date;
1817: ELSE
1818: IF p_Approval_Rules_rec.active_start_date IS NOT NULL AND
1819: p_Approval_Rules_rec.active_start_date <> Fnd_Api.g_miss_date THEN
1820: l_active_start_date := p_Approval_Rules_rec.active_start_date;
1821: END IF;
1822: END IF;
1823:

Line 1828: p_Approval_Rules_rec.active_end_date <> Fnd_Api.g_miss_date THEN

1824: IF p_complete_rec.active_end_date IS NOT NULL THEN
1825: l_active_end_date := p_complete_rec.active_end_date;
1826: ELSE
1827: IF p_Approval_Rules_rec.active_end_date IS NOT NULL AND
1828: p_Approval_Rules_rec.active_end_date <> Fnd_Api.g_miss_date THEN
1829: l_active_end_date := p_Approval_Rules_rec.active_end_date;
1830: END IF;
1831: END IF;
1832:

Line 1833: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1829: l_active_end_date := p_Approval_Rules_rec.active_end_date;
1830: END IF;
1831: END IF;
1832:
1833: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
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

Line 1842: x_return_status := Fnd_Api.g_ret_sts_error;

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;
1845:
1846: IF l_active_start_date = l_active_end_date THEN

Line 1851: x_return_status := Fnd_Api.g_ret_sts_error;

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;
1854: END IF;
1855:

Line 1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;

1865: x_Approval_Rules_rec OUT NOCOPY Approval_Rules_Rec_Type
1866: )
1867: IS
1868: BEGIN
1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;
1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;

Line 1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;

1866: )
1867: IS
1868: BEGIN
1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;
1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;

Line 1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;

1867: IS
1868: BEGIN
1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;
1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;

Line 1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;

1868: BEGIN
1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;
1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;

Line 1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;

1869: x_Approval_Rules_rec.approval_rule_id := Fnd_Api.g_miss_num;
1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;

Line 1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;

1870: x_Approval_Rules_rec.object_version_number := Fnd_Api.g_miss_num;
1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;

Line 1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;

1871: x_Approval_Rules_rec.approval_object_code := Fnd_Api.g_miss_char;
1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;

Line 1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;

1872: x_Approval_Rules_rec.approval_priority_code := Fnd_Api.g_miss_char;
1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;

Line 1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;

1873: x_Approval_Rules_rec.approval_type_code := Fnd_Api.g_miss_char;
1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;

Line 1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;

1874: x_Approval_Rules_rec.OPERATING_UNIT_ID := Fnd_Api.g_miss_num;
1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;

Line 1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;

1875: x_Approval_Rules_rec.active_start_date := Fnd_Api.g_miss_date;
1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;

Line 1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;

1876: x_Approval_Rules_rec.active_end_date := Fnd_Api.g_miss_date;
1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;

Line 1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;

1877: x_Approval_Rules_rec.status_code := Fnd_Api.g_miss_char;
1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;

Line 1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;

1878: x_Approval_Rules_rec.approval_rule_name := Fnd_Api.g_miss_char;
1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;

Line 1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;

1879: x_Approval_Rules_rec.description := Fnd_Api.g_miss_char;
1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;

Line 1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;

1880: x_Approval_Rules_rec.last_update_date := Fnd_Api.g_miss_date;
1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;

Line 1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;

1881: x_Approval_Rules_rec.last_updated_by := Fnd_Api.g_miss_num;
1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;

Line 1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;

1882: x_Approval_Rules_rec.creation_date := Fnd_Api.g_miss_date;
1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;

Line 1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;

1883: x_Approval_Rules_rec.created_by := Fnd_Api.g_miss_num;
1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;

Line 1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;

1884: x_Approval_Rules_rec.last_update_login := Fnd_Api.g_miss_num;
1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;

Line 1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;

1885: x_Approval_Rules_rec.attribute_category := Fnd_Api.g_miss_char;
1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;

Line 1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;

1886: x_Approval_Rules_rec.attribute1 := Fnd_Api.g_miss_char;
1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;

Line 1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;

1887: x_Approval_Rules_rec.attribute2 := Fnd_Api.g_miss_char;
1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;

Line 1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;

1888: x_Approval_Rules_rec.attribute3 := Fnd_Api.g_miss_char;
1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;

Line 1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;

1889: x_Approval_Rules_rec.attribute4 := Fnd_Api.g_miss_char;
1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;

Line 1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;

1890: x_Approval_Rules_rec.attribute5 := Fnd_Api.g_miss_char;
1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;

Line 1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;

1891: x_Approval_Rules_rec.attribute6 := Fnd_Api.g_miss_char;
1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;

Line 1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;

1892: x_Approval_Rules_rec.attribute7 := Fnd_Api.g_miss_char;
1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;
1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;

Line 1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;

1893: x_Approval_Rules_rec.attribute8 := Fnd_Api.g_miss_char;
1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;
1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;
1901:

Line 1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;

1894: x_Approval_Rules_rec.attribute9 := Fnd_Api.g_miss_char;
1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;
1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;
1901:
1902: END Init_Approval_Rules_Rec;

Line 1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;

1895: x_Approval_Rules_rec.attribute10 := Fnd_Api.g_miss_char;
1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;
1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;
1901:
1902: END Init_Approval_Rules_Rec;
1903: */

Line 1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;

1896: x_Approval_Rules_rec.attribute11 := Fnd_Api.g_miss_char;
1897: x_Approval_Rules_rec.attribute12 := Fnd_Api.g_miss_char;
1898: x_Approval_Rules_rec.attribute13 := Fnd_Api.g_miss_char;
1899: x_Approval_Rules_rec.attribute14 := Fnd_Api.g_miss_char;
1900: x_Approval_Rules_rec.attribute15 := Fnd_Api.g_miss_char;
1901:
1902: END Init_Approval_Rules_Rec;
1903: */
1904: ---------------------------------------------------------------------

Line 1934: RAISE Fnd_Api.g_exc_error;

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;
1937: --
1938: -- APPROVAL_OBJECT_CODE

Line 1939: IF p_Approval_Rules_rec.approval_object_code is null or p_Approval_Rules_rec.approval_object_code = Fnd_Api.g_miss_char THEN

1935: END IF;
1936: CLOSE c_Approval_Rules;
1937: --
1938: -- APPROVAL_OBJECT_CODE
1939: IF p_Approval_Rules_rec.approval_object_code is null or p_Approval_Rules_rec.approval_object_code = Fnd_Api.g_miss_char THEN
1940: x_complete_rec.approval_object_code := l_Approval_Rules_rec.approval_object_code;
1941: END IF;
1942:
1943: -- APPLICATION_USG_CODE

Line 1944: IF p_Approval_Rules_rec.application_usg_code is null or p_Approval_Rules_rec.application_usg_code = Fnd_Api.g_miss_char THEN

1940: x_complete_rec.approval_object_code := l_Approval_Rules_rec.approval_object_code;
1941: END IF;
1942:
1943: -- APPLICATION_USG_CODE
1944: IF p_Approval_Rules_rec.application_usg_code is null or p_Approval_Rules_rec.application_usg_code = Fnd_Api.g_miss_char THEN
1945: x_complete_rec.application_usg_code := l_Approval_Rules_rec.application_usg_code;
1946: END IF;
1947: --
1948: -- APPROVAL_TYPE_CODE

Line 1949: IF p_Approval_Rules_rec.approval_type_code is null or p_Approval_Rules_rec.approval_type_code = Fnd_Api.g_miss_char THEN

1945: x_complete_rec.application_usg_code := l_Approval_Rules_rec.application_usg_code;
1946: END IF;
1947: --
1948: -- APPROVAL_TYPE_CODE
1949: IF p_Approval_Rules_rec.approval_type_code is null or p_Approval_Rules_rec.approval_type_code = Fnd_Api.g_miss_char THEN
1950: x_complete_rec.approval_type_code := l_Approval_Rules_rec.approval_type_code;
1951: END IF;
1952:
1953: --

Line 1955: IF p_Approval_Rules_rec.status_code is null or p_Approval_Rules_rec.status_code = Fnd_Api.g_miss_char THEN

1951: END IF;
1952:
1953: --
1954: -- STATUS_CODE
1955: IF p_Approval_Rules_rec.status_code is null or p_Approval_Rules_rec.status_code = Fnd_Api.g_miss_char THEN
1956: x_complete_rec.status_code := l_Approval_Rules_rec.status_code;
1957: END IF;
1958:
1959: --

Line 1961: IF p_Approval_Rules_rec.active_start_date is null or p_Approval_Rules_rec.active_start_date = Fnd_Api.g_miss_date THEN

1957: END IF;
1958:
1959: --
1960: -- ACTIVE_START_DATE
1961: IF p_Approval_Rules_rec.active_start_date is null or p_Approval_Rules_rec.active_start_date = Fnd_Api.g_miss_date THEN
1962: x_complete_rec.active_start_date := l_Approval_Rules_rec.active_start_date;
1963: END IF;
1964:
1965: --

Line 1967: IF p_Approval_Rules_rec.approval_rule_name is null or p_Approval_Rules_rec.approval_rule_name = Fnd_Api.g_miss_char THEN

1963: END IF;
1964:
1965: --
1966: -- APPROVAL_NAME
1967: IF p_Approval_Rules_rec.approval_rule_name is null or p_Approval_Rules_rec.approval_rule_name = Fnd_Api.g_miss_char THEN
1968: x_complete_rec.approval_rule_name := l_Approval_Rules_rec.approval_rule_name;
1969: END IF;
1970:
1971: END Complete_Approval_Rules_Rec;

Line 2032: RETURN Fnd_Api.g_false;

2028: END;
2029: END IF;
2030:
2031: IF l_count = 0 THEN
2032: RETURN Fnd_Api.g_false;
2033: ELSE
2034: RETURN Fnd_Api.g_true;
2035: END IF;
2036: END compare_columns;

Line 2034: RETURN Fnd_Api.g_true;

2030:
2031: IF l_count = 0 THEN
2032: RETURN Fnd_Api.g_false;
2033: ELSE
2034: RETURN Fnd_Api.g_true;
2035: END IF;
2036: END compare_columns;
2037:
2038: -- Check_Approval_Rules_Req_Items

Line 2051: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2054:
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

Line 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

2051: x_return_status := Fnd_Api.g_ret_sts_error;
2052: RETURN;
2053: END IF;
2054:
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

Line 2063: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2066:
2067: -- APPLICATION USAGE

Line 2073: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2076:
2077: -- TYPE CODE

Line 2083: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2086: */
2087:

Line 2096: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2099:
2100: /*-- PROIRITY CODE

Line 2106: x_return_status := Fnd_Api.g_ret_sts_error;

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;*/
2109:
2110: /* -- OPERATING UNIT CODE

Line 2116: x_return_status := Fnd_Api.g_ret_sts_error;

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; */
2119:
2120: END Check_Approval_Rules_Req_Items;

Line 2156: x_return_status := Fnd_Api.g_ret_sts_success;

2152: FROM ahl_approval_rules_b
2153: WHERE approval_rule_id = p_Approval_Rules_rec.approval_rule_id;
2154:
2155: BEGIN
2156: x_return_status := Fnd_Api.g_ret_sts_success;
2157: --
2158: -- For Create_Approval_Rules, when ID is passed in, we need to
2159: -- check if this ID is unique.
2160: IF p_validation_mode = Jtf_Plsql_Api.g_create

Line 2166: ) = Fnd_Api.g_false

2162: THEN
2163: IF Ahl_Utility_Pvt.check_uniqueness(
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;

Line 2172: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2175: END IF;
2176:

Line 2193: IF l_valid_flag = Fnd_Api.g_false THEN

2189: ''' AND approval_rule_id <> ' || p_Approval_Rules_rec.approval_rule_id
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;

Line 2198: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2201:
2202: -- Check if Approval_object_code, Approval_proirity_code, Operating_unit_id, Approval_type_code make the UNIQUE KEY combination

Line 2319: IF l_valid_flag = Fnd_Api.g_false THEN

2315: '%'' AND approval_rule_id <> ' || p_Approval_Rules_rec.approval_rule_id, 'B'
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;

Line 2324: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2327:
2328: END Check_Approval_Rules_UK_Items;

Line 2342: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

2338: --------------------------------------------------------------------
2339:
2340: PROCEDURE Create_Approvers (
2341: p_api_version IN NUMBER,
2342: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2343: p_commit IN VARCHAR2,
2344: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2345: x_return_status OUT NOCOPY VARCHAR2,
2346: x_msg_count OUT NOCOPY NUMBER,

Line 2344: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

2340: PROCEDURE Create_Approvers (
2341: p_api_version IN NUMBER,
2342: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2343: p_commit IN VARCHAR2,
2344: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2345: x_return_status OUT NOCOPY VARCHAR2,
2346: x_msg_count OUT NOCOPY NUMBER,
2347: x_msg_data OUT NOCOPY VARCHAR2,
2348:

Line 2385: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

2381: IF G_DEBUG='Y' THEN
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,

Line 2388: IF NOT Fnd_Api.compatible_api_call (

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,
2391: L_API_NAME,
2392: G_PKG_NAME

Line 2394: RAISE Fnd_Api.g_exc_unexpected_error;

2390: p_api_version,
2391: L_API_NAME,
2392: G_PKG_NAME
2393: ) THEN
2394: RAISE Fnd_Api.g_exc_unexpected_error;
2395: END IF;
2396: x_return_status := Fnd_Api.g_ret_sts_success;
2397: ----------------------- validate -----------------------
2398: IF G_DEBUG='Y' THEN

Line 2396: x_return_status := Fnd_Api.g_ret_sts_success;

2392: G_PKG_NAME
2393: ) THEN
2394: RAISE Fnd_Api.g_exc_unexpected_error;
2395: END IF;
2396: x_return_status := Fnd_Api.g_ret_sts_success;
2397: ----------------------- validate -----------------------
2398: IF G_DEBUG='Y' THEN
2399: Ahl_Debug_Pub.debug( l_full_name ||':Validate');
2400: END IF;

Line 2412: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

2408: x_msg_count => x_msg_count,
2409: x_msg_data => x_msg_data,
2410: p_Approvers_rec => l_Approvers_rec
2411: );
2412: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2413: RAISE Fnd_Api.g_exc_error;
2414: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2415: RAISE Fnd_Api.g_exc_unexpected_error;
2416: END IF;

Line 2413: RAISE Fnd_Api.g_exc_error;

2409: x_msg_data => x_msg_data,
2410: p_Approvers_rec => l_Approvers_rec
2411: );
2412: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2413: RAISE Fnd_Api.g_exc_error;
2414: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2415: RAISE Fnd_Api.g_exc_unexpected_error;
2416: END IF;
2417:

Line 2414: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2410: p_Approvers_rec => l_Approvers_rec
2411: );
2412: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2413: RAISE Fnd_Api.g_exc_error;
2414: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2415: RAISE Fnd_Api.g_exc_unexpected_error;
2416: END IF;
2417:
2418: IF l_Approvers_rec.APPROVER_ID IS NULL THEN

Line 2415: RAISE Fnd_Api.g_exc_unexpected_error;

2411: );
2412: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2413: RAISE Fnd_Api.g_exc_error;
2414: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2415: RAISE Fnd_Api.g_exc_unexpected_error;
2416: END IF;
2417:
2418: IF l_Approvers_rec.APPROVER_ID IS NULL THEN
2419: Check_Approver_Role (

Line 2424: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2420: p_Approvers_rec => p_Approvers_rec,
2421: p_complete_rec => l_Approvers_rec,
2422: x_return_status => l_return_status
2423: );
2424: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2425: RAISE Fnd_Api.g_exc_unexpected_error;
2426: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2427: RAISE Fnd_Api.g_exc_error;
2428: END IF;

Line 2425: RAISE Fnd_Api.g_exc_unexpected_error;

2421: p_complete_rec => l_Approvers_rec,
2422: x_return_status => l_return_status
2423: );
2424: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2425: RAISE Fnd_Api.g_exc_unexpected_error;
2426: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2427: RAISE Fnd_Api.g_exc_error;
2428: END IF;
2429: END IF;

Line 2426: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2422: x_return_status => l_return_status
2423: );
2424: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2425: RAISE Fnd_Api.g_exc_unexpected_error;
2426: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2427: RAISE Fnd_Api.g_exc_error;
2428: END IF;
2429: END IF;
2430:

Line 2427: RAISE Fnd_Api.g_exc_error;

2423: );
2424: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2425: RAISE Fnd_Api.g_exc_unexpected_error;
2426: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2427: RAISE Fnd_Api.g_exc_error;
2428: END IF;
2429: END IF;
2430:
2431: Check_Approver_Name_Or_Id(p_approvers_rec => p_approvers_rec,

Line 2435: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2431: Check_Approver_Name_Or_Id(p_approvers_rec => p_approvers_rec,
2432: x_approver_id => l_approver_id,
2433: x_return_status => l_return_status
2434: );
2435: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2436: RAISE Fnd_Api.g_exc_unexpected_error;
2437: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2438: RAISE Fnd_Api.g_exc_error;
2439: END IF;

Line 2436: RAISE Fnd_Api.g_exc_unexpected_error;

2432: x_approver_id => l_approver_id,
2433: x_return_status => l_return_status
2434: );
2435: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2436: RAISE Fnd_Api.g_exc_unexpected_error;
2437: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2438: RAISE Fnd_Api.g_exc_error;
2439: END IF;
2440:

Line 2437: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2433: x_return_status => l_return_status
2434: );
2435: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2436: RAISE Fnd_Api.g_exc_unexpected_error;
2437: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2438: RAISE Fnd_Api.g_exc_error;
2439: END IF;
2440:
2441: l_approvers_rec.approver_id := l_approver_id;

Line 2438: RAISE Fnd_Api.g_exc_error;

2434: );
2435: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2436: RAISE Fnd_Api.g_exc_unexpected_error;
2437: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2438: RAISE Fnd_Api.g_exc_error;
2439: END IF;
2440:
2441: l_approvers_rec.approver_id := l_approver_id;
2442:

Line 2450: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2446: p_Approvers_rec => p_Approvers_rec,
2447: p_complete_rec => l_Approvers_rec,
2448: x_return_status => l_return_status
2449: );
2450: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2451: RAISE Fnd_Api.g_exc_unexpected_error;
2452: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2453: RAISE Fnd_Api.g_exc_error;
2454: END IF;

Line 2451: RAISE Fnd_Api.g_exc_unexpected_error;

2447: p_complete_rec => l_Approvers_rec,
2448: x_return_status => l_return_status
2449: );
2450: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2451: RAISE Fnd_Api.g_exc_unexpected_error;
2452: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2453: RAISE Fnd_Api.g_exc_error;
2454: END IF;
2455: END IF;

Line 2452: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2448: x_return_status => l_return_status
2449: );
2450: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2451: RAISE Fnd_Api.g_exc_unexpected_error;
2452: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2453: RAISE Fnd_Api.g_exc_error;
2454: END IF;
2455: END IF;
2456:

Line 2453: RAISE Fnd_Api.g_exc_error;

2449: );
2450: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2451: RAISE Fnd_Api.g_exc_unexpected_error;
2452: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2453: RAISE Fnd_Api.g_exc_error;
2454: END IF;
2455: END IF;
2456:
2457: --

Line 2460: IF l_Approvers_rec.Approval_Approver_Id IS NULL or l_Approvers_rec.Approval_Approver_Id = Fnd_Api.g_miss_num THEN

2456:
2457: --
2458: -- Check for the ID.
2459: --
2460: IF l_Approvers_rec.Approval_Approver_Id IS NULL or l_Approvers_rec.Approval_Approver_Id = Fnd_Api.g_miss_num THEN
2461: LOOP
2462: --
2463: -- If the ID is not passed into the API, then
2464: -- grab a value from the sequence.

Line 2525: IF Fnd_Api.To_Boolean ( p_commit ) THEN

2521: --
2522: -- END of API body.
2523: --
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,

Line 2529: p_encoded => Fnd_Api.g_false,

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: );
2533: IF G_DEBUG='Y' THEN

Line 2542: WHEN Fnd_Api.g_exc_error THEN

2538: Ahl_Debug_Pub.disable_debug;
2539: END IF;
2540:
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,

Line 2544: x_return_status := Fnd_Api.g_ret_sts_error;

2540:
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

Line 2546: p_encoded => Fnd_Api.g_false,

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: );
2550: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 2550: WHEN Fnd_Api.g_exc_unexpected_error THEN

2546: p_encoded => Fnd_Api.g_false,
2547: p_count => x_msg_count,
2548: p_data => x_msg_data
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,

Line 2552: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2548: p_data => x_msg_data
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

Line 2554: p_encoded => Fnd_Api.g_false,

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: );
2558: WHEN OTHERS THEN

Line 2560: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2556: p_data => x_msg_data
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 (

Line 2565: p_encoded => Fnd_Api.g_false,

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: );
2569: END Create_Approvers;

Line 2578: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

2574: --
2575: --------------------------------------------------------------------
2576: PROCEDURE Update_Approvers (
2577: p_api_version IN NUMBER,
2578: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2579: p_commit IN VARCHAR2,
2580: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2581: p_Approvers_rec IN Approvers_Rec_Type,
2582:

Line 2580: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

2576: PROCEDURE Update_Approvers (
2577: p_api_version IN NUMBER,
2578: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2579: p_commit IN VARCHAR2,
2580: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2581: p_Approvers_rec IN Approvers_Rec_Type,
2582:
2583: x_return_status OUT NOCOPY VARCHAR2,
2584: x_msg_count OUT NOCOPY NUMBER,

Line 2608: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

2604: -- Debug info.
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,

Line 2611: IF NOT Fnd_Api.compatible_api_call(

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,
2614: l_api_name,
2615: G_PKG_NAME

Line 2617: RAISE Fnd_Api.g_exc_unexpected_error;

2613: p_api_version,
2614: l_api_name,
2615: G_PKG_NAME
2616: ) THEN
2617: RAISE Fnd_Api.g_exc_unexpected_error;
2618: END IF;
2619: x_return_status := Fnd_Api.g_ret_sts_success;
2620: ----------------------- validate ----------------------
2621: IF G_DEBUG='Y' THEN

Line 2619: x_return_status := Fnd_Api.g_ret_sts_success;

2615: G_PKG_NAME
2616: ) THEN
2617: RAISE Fnd_Api.g_exc_unexpected_error;
2618: END IF;
2619: x_return_status := Fnd_Api.g_ret_sts_success;
2620: ----------------------- validate ----------------------
2621: IF G_DEBUG='Y' THEN
2622: Ahl_Debug_Pub.debug( l_full_name ||':Validate');
2623: END IF;

Line 2632: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2628: p_validation_mode => Jtf_Plsql_Api.g_update,
2629: p_Approvers_rec => p_Approvers_rec,
2630: x_return_status => l_return_status
2631: );
2632: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2633: RAISE Fnd_Api.g_exc_unexpected_error;
2634: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2635: RAISE Fnd_Api.g_exc_error;
2636: END IF;

Line 2633: RAISE Fnd_Api.g_exc_unexpected_error;

2629: p_Approvers_rec => p_Approvers_rec,
2630: x_return_status => l_return_status
2631: );
2632: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2633: RAISE Fnd_Api.g_exc_unexpected_error;
2634: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2635: RAISE Fnd_Api.g_exc_error;
2636: END IF;
2637: END IF;

Line 2634: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2630: x_return_status => l_return_status
2631: );
2632: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2633: RAISE Fnd_Api.g_exc_unexpected_error;
2634: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2635: RAISE Fnd_Api.g_exc_error;
2636: END IF;
2637: END IF;
2638: IF l_Approvers_rec.APPROVER_ID IS NULL THEN

Line 2635: RAISE Fnd_Api.g_exc_error;

2631: );
2632: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2633: RAISE Fnd_Api.g_exc_unexpected_error;
2634: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2635: RAISE Fnd_Api.g_exc_error;
2636: END IF;
2637: END IF;
2638: IF l_Approvers_rec.APPROVER_ID IS NULL THEN
2639: Check_Approver_Role (

Line 2644: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2640: p_Approvers_rec => p_Approvers_rec,
2641: p_complete_rec => l_Approvers_rec,
2642: x_return_status => l_return_status
2643: );
2644: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2645: RAISE Fnd_Api.g_exc_unexpected_error;
2646: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2647: RAISE Fnd_Api.g_exc_error;
2648: END IF;

Line 2645: RAISE Fnd_Api.g_exc_unexpected_error;

2641: p_complete_rec => l_Approvers_rec,
2642: x_return_status => l_return_status
2643: );
2644: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2645: RAISE Fnd_Api.g_exc_unexpected_error;
2646: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2647: RAISE Fnd_Api.g_exc_error;
2648: END IF;
2649: END IF;

Line 2646: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2642: x_return_status => l_return_status
2643: );
2644: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2645: RAISE Fnd_Api.g_exc_unexpected_error;
2646: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2647: RAISE Fnd_Api.g_exc_error;
2648: END IF;
2649: END IF;
2650:

Line 2647: RAISE Fnd_Api.g_exc_error;

2643: );
2644: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2645: RAISE Fnd_Api.g_exc_unexpected_error;
2646: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2647: RAISE Fnd_Api.g_exc_error;
2648: END IF;
2649: END IF;
2650:
2651: IF l_Approvers_rec.APPROVER_SEQUENCE IS NOT NULL THEN

Line 2657: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2653: p_Approvers_rec => p_Approvers_rec,
2654: p_complete_rec => l_Approvers_rec,
2655: x_return_status => l_return_status
2656: );
2657: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2658: RAISE Fnd_Api.g_exc_unexpected_error;
2659: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2660: RAISE Fnd_Api.g_exc_error;
2661: END IF;

Line 2658: RAISE Fnd_Api.g_exc_unexpected_error;

2654: p_complete_rec => l_Approvers_rec,
2655: x_return_status => l_return_status
2656: );
2657: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2658: RAISE Fnd_Api.g_exc_unexpected_error;
2659: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2660: RAISE Fnd_Api.g_exc_error;
2661: END IF;
2662: END IF;

Line 2659: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

2655: x_return_status => l_return_status
2656: );
2657: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2658: RAISE Fnd_Api.g_exc_unexpected_error;
2659: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2660: RAISE Fnd_Api.g_exc_error;
2661: END IF;
2662: END IF;
2663:

Line 2660: RAISE Fnd_Api.g_exc_error;

2656: );
2657: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2658: RAISE Fnd_Api.g_exc_unexpected_error;
2659: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2660: RAISE Fnd_Api.g_exc_error;
2661: END IF;
2662: END IF;
2663:
2664: ------------------------- update --------------------

Line 2698: IF Fnd_Api.to_boolean (p_commit) THEN

2694: X_ATTRIBUTE15 => l_Approvers_rec.ATTRIBUTE15 );
2695:
2696: -------------------- finish --------------------------
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,

Line 2702: p_encoded => Fnd_Api.g_false,

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: );
2706: IF G_DEBUG='Y' THEN

Line 2714: WHEN Fnd_Api.g_exc_error THEN

2710: IF G_DEBUG='Y' THEN
2711: Ahl_Debug_Pub.disable_debug;
2712: END IF;
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,

Line 2716: x_return_status := Fnd_Api.g_ret_sts_error;

2712: END IF;
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

Line 2718: p_encoded => Fnd_Api.g_false,

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: );
2722: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 2722: WHEN Fnd_Api.g_exc_unexpected_error THEN

2718: p_encoded => Fnd_Api.g_false,
2719: p_count => x_msg_count,
2720: p_data => x_msg_data
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,

Line 2724: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2720: p_data => x_msg_data
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

Line 2726: p_encoded => Fnd_Api.g_false,

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: );
2730: WHEN OTHERS THEN

Line 2732: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2728: p_data => x_msg_data
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;

Line 2738: p_encoded => Fnd_Api.g_false,

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: );
2742: END Update_Approvers;

Line 2758: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2754: )
2755: IS
2756:
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');

Line 2765: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2768: END IF;
2769: END Check_Approver_Sequence;

Line 2784: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2780: x_return_status OUT NOCOPY VARCHAR2
2781: )
2782: IS
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');

Line 2791: x_return_status := Fnd_Api.g_ret_sts_error;

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;
2794: END IF;
2795: END Check_Approver_Role;

Line 2804: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

2800: --
2801: --------------------------------------------------------------------
2802: PROCEDURE Delete_Approvers (
2803: p_api_version IN NUMBER,
2804: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2805: p_commit IN VARCHAR2,
2806: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2807: p_Approval_Approver_Id IN NUMBER,
2808: p_object_version IN NUMBER,

Line 2806: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

2802: PROCEDURE Delete_Approvers (
2803: p_api_version IN NUMBER,
2804: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2805: p_commit IN VARCHAR2,
2806: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2807: p_Approval_Approver_Id IN NUMBER,
2808: p_object_version IN NUMBER,
2809: x_return_status OUT NOCOPY VARCHAR2,
2810: x_msg_count OUT NOCOPY NUMBER,

Line 2854: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

2850: -- Debug info.
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,

Line 2857: IF NOT Fnd_Api.compatible_api_call (

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,
2860: l_api_name,
2861: G_PKG_NAME

Line 2863: RAISE Fnd_Api.g_exc_unexpected_error;

2859: p_api_version,
2860: l_api_name,
2861: G_PKG_NAME
2862: ) THEN
2863: RAISE Fnd_Api.g_exc_unexpected_error;
2864: END IF;
2865: x_return_status := Fnd_Api.g_ret_sts_success;
2866:
2867: OPEN c_Approvers;

Line 2865: x_return_status := Fnd_Api.g_ret_sts_success;

2861: G_PKG_NAME
2862: ) THEN
2863: RAISE Fnd_Api.g_exc_unexpected_error;
2864: END IF;
2865: x_return_status := Fnd_Api.g_ret_sts_success;
2866:
2867: OPEN c_Approvers;
2868: FETCH c_Approvers INTO l_Approvers_rec;
2869: IF c_Approvers%NOTFOUND THEN

Line 2875: RAISE Fnd_Api.g_exc_error;

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;
2878:
2879: /* Start Code for checking approvals by shbhanda Mar'08---*/

Line 2896: RAISE Fnd_Api.g_exc_error;

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;
2899: END IF;
2900: ELSE

Line 2918: RAISE Fnd_Api.g_exc_error;

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:
2921:
2922: -------------------- finish --------------------------

Line 2923: IF Fnd_Api.to_boolean (p_commit) THEN

2919: END IF;
2920:
2921:
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,

Line 2927: p_encoded => Fnd_Api.g_false,

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: );
2931: IF G_DEBUG='Y' THEN

Line 2939: WHEN Fnd_Api.g_exc_error THEN

2935: IF G_DEBUG='Y' THEN
2936: Ahl_Debug_Pub.disable_debug;
2937: END IF;
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,

Line 2941: x_return_status := Fnd_Api.g_ret_sts_error;

2937: END IF;
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

Line 2943: p_encoded => Fnd_Api.g_false,

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: );
2947: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 2947: WHEN Fnd_Api.g_exc_unexpected_error THEN

2943: p_encoded => Fnd_Api.g_false,
2944: p_count => x_msg_count,
2945: p_data => x_msg_data
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,

Line 2949: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2945: p_data => x_msg_data
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

Line 2951: p_encoded => Fnd_Api.g_false,

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: );
2955: WHEN OTHERS THEN

Line 2957: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2953: p_data => x_msg_data
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;

Line 2963: p_encoded => Fnd_Api.g_false,

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: );
2967:

Line 2977: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

2973: --------------------------------------------------------------------
2974: PROCEDURE Validate_Approvers (
2975:
2976: p_api_version IN NUMBER,
2977: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2978: p_commit IN VARCHAR2,
2979: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2980:
2981: x_return_status OUT NOCOPY VARCHAR2,

Line 2979: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

2975:
2976: p_api_version IN NUMBER,
2977: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2978: p_commit IN VARCHAR2,
2979: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2980:
2981: x_return_status OUT NOCOPY VARCHAR2,
2982: x_msg_count OUT NOCOPY NUMBER,
2983: x_msg_data OUT NOCOPY VARCHAR2,

Line 3001: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

2997: -- Debug info.
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,

Line 3004: IF NOT Fnd_Api.compatible_api_call (

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,
3007: l_api_name,
3008: G_PKG_NAME

Line 3010: RAISE Fnd_Api.g_exc_unexpected_error;

3006: p_api_version,
3007: l_api_name,
3008: G_PKG_NAME
3009: ) THEN
3010: RAISE Fnd_Api.g_exc_unexpected_error;
3011: END IF;
3012: x_return_status := Fnd_Api.g_ret_sts_success;
3013: ---------------------- validate ------------------------
3014: IF G_DEBUG='Y' THEN

Line 3012: x_return_status := Fnd_Api.g_ret_sts_success;

3008: G_PKG_NAME
3009: ) THEN
3010: RAISE Fnd_Api.g_exc_unexpected_error;
3011: END IF;
3012: x_return_status := Fnd_Api.g_ret_sts_success;
3013: ---------------------- validate ------------------------
3014: IF G_DEBUG='Y' THEN
3015: Ahl_Debug_Pub.debug( l_full_name ||':Check items');
3016: END IF;

Line 3024: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3020: p_validation_mode => Jtf_Plsql_Api.g_create,
3021: p_Approvers_rec => p_Approvers_rec,
3022: x_return_status => l_return_status
3023: );
3024: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3025: RAISE Fnd_Api.g_exc_unexpected_error;
3026: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3027: RAISE Fnd_Api.g_exc_error;
3028: END IF;

Line 3025: RAISE Fnd_Api.g_exc_unexpected_error;

3021: p_Approvers_rec => p_Approvers_rec,
3022: x_return_status => l_return_status
3023: );
3024: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3025: RAISE Fnd_Api.g_exc_unexpected_error;
3026: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3027: RAISE Fnd_Api.g_exc_error;
3028: END IF;
3029: END IF;

Line 3026: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

3022: x_return_status => l_return_status
3023: );
3024: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3025: RAISE Fnd_Api.g_exc_unexpected_error;
3026: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3027: RAISE Fnd_Api.g_exc_error;
3028: END IF;
3029: END IF;
3030: IF G_DEBUG='Y' THEN

Line 3027: RAISE Fnd_Api.g_exc_error;

3023: );
3024: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3025: RAISE Fnd_Api.g_exc_unexpected_error;
3026: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3027: RAISE Fnd_Api.g_exc_error;
3028: END IF;
3029: END IF;
3030: IF G_DEBUG='Y' THEN
3031: Ahl_Debug_Pub.debug( l_full_name ||':Check record');

Line 3036: p_encoded => Fnd_Api.g_false,

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: );
3040: IF G_DEBUG='Y' THEN

Line 3048: WHEN Fnd_Api.g_exc_error THEN

3044: IF G_DEBUG='Y' THEN
3045: Ahl_Debug_Pub.disable_debug;
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,

Line 3049: x_return_status := Fnd_Api.g_ret_sts_error;

3045: Ahl_Debug_Pub.disable_debug;
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

Line 3051: p_encoded => Fnd_Api.g_false,

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: );
3055: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 3055: WHEN Fnd_Api.g_exc_unexpected_error THEN

3051: p_encoded => Fnd_Api.g_false,
3052: p_count => x_msg_count,
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,

Line 3056: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

3052: p_count => x_msg_count,
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

Line 3058: p_encoded => Fnd_Api.g_false,

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: );
3062: WHEN OTHERS THEN

Line 3063: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

3059: p_count => x_msg_count,
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;

Line 3069: p_encoded => Fnd_Api.g_false,

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: );
3073: END Validate_Approvers;

Line 3093: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

3089: Check_Approvers_Req_Items (
3090: p_Approvers_rec => p_Approvers_rec,
3091: x_return_status => x_return_status
3092: );
3093: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
3094: RETURN;
3095: END IF;
3096: --
3097: -- Validate uniqueness.

Line 3103: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

3099: p_Approvers_rec => p_Approvers_rec,
3100: p_validation_mode => p_validation_mode,
3101: x_return_status => x_return_status
3102: );
3103: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
3104: RETURN;
3105: END IF;
3106:
3107: END Check_Approvers_Items;

Line 3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;

3115: x_Approvers_rec OUT NOCOPY Approvers_Rec_Type
3116: )
3117: IS
3118: BEGIN
3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;
3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;

Line 3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;

3116: )
3117: IS
3118: BEGIN
3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;
3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;
3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;

Line 3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;

3117: IS
3118: BEGIN
3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;
3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;
3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;
3125: END Init_Approvers_Rec;

Line 3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;

3118: BEGIN
3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;
3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;
3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;
3125: END Init_Approvers_Rec;
3126: */

Line 3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;

3119: x_Approvers_rec.APPROVAL_APPROVER_ID := Fnd_Api.g_miss_num;
3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;
3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;
3125: END Init_Approvers_Rec;
3126: */
3127: ---------------------------------------------------------------------

Line 3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;

3120: x_Approvers_rec.OBJECT_VERSION_NUMBER := Fnd_Api.g_miss_num;
3121: x_Approvers_rec.APPROVAL_RULE_ID := Fnd_Api.g_miss_num;
3122: x_Approvers_rec.APPROVER_TYPE_CODE := Fnd_Api.g_miss_num;
3123: x_Approvers_rec.APPROVER_SEQUENCE := Fnd_Api.g_miss_char;
3124: x_Approvers_rec.APPROVER_ID := Fnd_Api.g_miss_num;
3125: END Init_Approvers_Rec;
3126: */
3127: ---------------------------------------------------------------------
3128: -- PROCEDURE

Line 3157: RAISE Fnd_Api.g_exc_error;

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;
3160:
3161: --

Line 3163: IF p_Approvers_rec.Approver_sequence is null or p_Approvers_rec.Approver_sequence = Fnd_Api.g_miss_num THEN

3159: CLOSE c_Approvers;
3160:
3161: --
3162: -- APPROVAL_SEQUENCE
3163: IF p_Approvers_rec.Approver_sequence is null or p_Approvers_rec.Approver_sequence = Fnd_Api.g_miss_num THEN
3164: x_complete_rec.Approver_sequence := l_Approvers_rec.Approver_sequence;
3165: END IF;
3166:
3167: --

Line 3169: IF p_Approvers_rec.Approver_Id is null or p_Approvers_rec.Approver_Id = Fnd_Api.g_miss_num THEN

3165: END IF;
3166:
3167: --
3168: -- APPROVER_ID
3169: IF p_Approvers_rec.Approver_Id is null or p_Approvers_rec.Approver_Id = Fnd_Api.g_miss_num THEN
3170: x_complete_rec.Approver_Id := l_Approvers_rec.Approver_Id;
3171: END IF;
3172:
3173: --

Line 3175: IF p_Approvers_rec.APPROVAL_RULE_ID is null or p_Approvers_rec.APPROVAL_RULE_ID = Fnd_Api.g_miss_num THEN

3171: END IF;
3172:
3173: --
3174: -- APPROVAL_RULE_ID
3175: IF p_Approvers_rec.APPROVAL_RULE_ID is null or p_Approvers_rec.APPROVAL_RULE_ID = Fnd_Api.g_miss_num THEN
3176: x_complete_rec.APPROVAL_RULE_ID := l_Approvers_rec.APPROVAL_RULE_ID;
3177: END IF;
3178:
3179: --

Line 3181: IF p_Approvers_rec.APPROVER_TYPE_CODE is null or p_Approvers_rec.APPROVER_TYPE_CODE = Fnd_Api.g_miss_char THEN

3177: END IF;
3178:
3179: --
3180: -- APPROVAL_TYPE_CODE
3181: IF p_Approvers_rec.APPROVER_TYPE_CODE is null or p_Approvers_rec.APPROVER_TYPE_CODE = Fnd_Api.g_miss_char THEN
3182: x_complete_rec.APPROVER_TYPE_CODE := l_Approvers_rec.APPROVER_TYPE_CODE;
3183: END IF;
3184:
3185: END Complete_Approvers_Rec;

Line 3200: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3203:
3204: -- APPROVER_NAME - Approver Name is mandatory only if the approver type is user

Line 3211: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3214:
3215: END Check_Approvers_Req_Items;

Line 3291: x_return_status := Fnd_Api.g_ret_sts_success;

3287:
3288: l_approver_id NUMBER;
3289:
3290: BEGIN
3291: x_return_status := Fnd_Api.g_ret_sts_success;
3292:
3293: IF(p_approvers_rec.approver_name IS NOT NULL and p_approvers_rec.approver_name <> FND_API.G_MISS_CHAR) THEN
3294:
3295:

Line 3293: IF(p_approvers_rec.approver_name IS NOT NULL and p_approvers_rec.approver_name <> FND_API.G_MISS_CHAR) THEN

3289:
3290: BEGIN
3291: x_return_status := Fnd_Api.g_ret_sts_success;
3292:
3293: IF(p_approvers_rec.approver_name IS NOT NULL and p_approvers_rec.approver_name <> FND_API.G_MISS_CHAR) THEN
3294:
3295:
3296: -- Bug 4919031 (Perf Fix)
3297: -- Spliting cursor c_approver_id into c_approver_id_user and c_approver_id_role

Line 3318: x_return_status := Fnd_Api.g_ret_sts_error;

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
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');

Line 3325: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3328: CLOSE c_approver_id_role;
3329: END IF;

Line 3351: x_return_status := Fnd_Api.g_ret_sts_error;

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
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');

Line 3358: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3361: CLOSE c_approver_id_user;
3362: END IF;

Line 3380: x_return_status := Fnd_Api.g_ret_sts_success;

3376: )
3377: IS
3378: l_valid_flag VARCHAR2(1);
3379: BEGIN
3380: x_return_status := Fnd_Api.g_ret_sts_success;
3381: -- APPROVAL_APPROVER_ID
3382: -- For Create_Approvers, when ID is passed in, we need to
3383: -- check if this ID is unique.
3384: IF p_validation_mode = Jtf_Plsql_Api.g_create

Line 3390: ) = Fnd_Api.g_false

3386: THEN
3387: IF Ahl_Utility_Pvt.check_uniqueness(
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;

Line 3396: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3399: END IF;
3400: -- check if Approval_Rule_Id,Approver_Sequence and Approver_Id is UNIQUE

Line 3416: IF l_valid_flag = Fnd_Api.g_false THEN

3412: ' AND Approver_Sequence = ' || p_Approvers_rec.Approver_Sequence ||
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;

Line 3421: x_return_status := Fnd_Api.g_ret_sts_error;

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;
3424: END Check_Approvers_UK_Items;
3425: