63:
64: --------------------- initialize -----------------------
65: SAVEPOINT Create_timeout_setup;
66:
67: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
68: PVX_Utility_PVT.debug_message(l_full_name||': start');
69: END IF;
70:
71:
72:
73: --DBMS_output.put_line(l_full_name||': start');
74:
75: IF FND_API.to_boolean(p_init_msg_list) THEN
76: FND_MSG_PUB.initialize;
77: END IF;
78:
79: IF NOT FND_API.compatible_api_call(
80: l_api_version,
87:
88: x_return_status := FND_API.g_ret_sts_success;
89:
90: ----------------------- validate -----------------------
91: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
92: PVX_Utility_PVT.debug_message(l_full_name ||': validate');
93: END IF;
94:
95:
114:
115: --DBMS_output.put_line(l_full_name||': back validate');
116:
117: -------------------------- insert --------------------------
118: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
119: PVX_Utility_PVT.debug_message(l_full_name ||': insert');
120: END IF;
121:
122:
179: IF FND_API.to_boolean(p_commit) THEN
180: COMMIT;
181: END IF;
182:
183: FND_MSG_PUB.count_and_get(
184: p_encoded => FND_API.g_false,
185: p_count => x_msg_count,
186: p_data => x_msg_data
187: );
185: p_count => x_msg_count,
186: p_data => x_msg_data
187: );
188:
189: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
190: PVX_Utility_PVT.debug_message(l_full_name ||': end');
191: END IF;
192:
193:
196:
197: WHEN FND_API.g_exc_error THEN
198: ROLLBACK TO Create_timeout_setup;
199: x_return_status := FND_API.g_ret_sts_error;
200: FND_MSG_PUB.count_and_get (
201: p_encoded => FND_API.g_false
202: ,p_count => x_msg_count
203: ,p_data => x_msg_data
204: );
205:
206: WHEN FND_API.g_exc_unexpected_error THEN
207: ROLLBACK TO Create_timeout_setup;
208: x_return_status := FND_API.g_ret_sts_unexp_error ;
209: FND_MSG_PUB.count_and_get (
210: p_encoded => FND_API.g_false
211: ,p_count => x_msg_count
212: ,p_data => x_msg_data
213: );
215: WHEN OTHERS THEN
216: ROLLBACK TO Create_timeout_setup;
217: x_return_status := FND_API.g_ret_sts_unexp_error ;
218:
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
220: THEN
221: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
222: END IF;
223:
217: x_return_status := FND_API.g_ret_sts_unexp_error ;
218:
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
220: THEN
221: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
222: END IF;
223:
224: FND_MSG_PUB.count_and_get(
225: p_encoded => FND_API.g_false
220: THEN
221: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
222: END IF;
223:
224: FND_MSG_PUB.count_and_get(
225: p_encoded => FND_API.g_false
226: ,p_count => x_msg_count
227: ,p_data => x_msg_data
228: );
258:
259: --------------------- initialize -----------------------
260: SAVEPOINT Delete_timeout_setup;
261:
262: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
263: PVX_Utility_PVT.debug_message(l_full_name||': start');
264: END IF;
265:
266:
264: END IF;
265:
266:
267: IF FND_API.to_boolean(p_init_msg_list) THEN
268: FND_MSG_PUB.initialize;
269: END IF;
270:
271: IF NOT FND_API.compatible_api_call(
272: l_api_version,
279:
280: x_return_status := FND_API.G_RET_STS_SUCCESS;
281:
282: ------------------------ delete ------------------------
283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
284: PVX_Utility_PVT.debug_message(l_full_name ||': delete');
285: END IF;
286:
287:
290: WHERE timeout_id = p_timeout_id
291: AND object_version_number = p_object_version;
292:
293: IF (SQL%NOTFOUND) THEN
294: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
295: THEN
296: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
297: FND_MSG_PUB.add;
298: END IF;
293: IF (SQL%NOTFOUND) THEN
294: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
295: THEN
296: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
297: FND_MSG_PUB.add;
298: END IF;
299: RAISE FND_API.g_exc_error;
300: END IF;
301:
303: IF FND_API.to_boolean(p_commit) THEN
304: COMMIT;
305: END IF;
306:
307: FND_MSG_PUB.count_and_get(
308: p_encoded => FND_API.g_false,
309: p_count => x_msg_count,
310: p_data => x_msg_data
311: );
309: p_count => x_msg_count,
310: p_data => x_msg_data
311: );
312:
313: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
314: PVX_Utility_PVT.debug_message(l_full_name ||': end');
315: END IF;
316:
317:
320:
321: WHEN FND_API.g_exc_error THEN
322: ROLLBACK TO Delete_timeout_setup;
323: x_return_status := FND_API.g_ret_sts_error;
324: FND_MSG_PUB.count_and_get(
325: p_encoded => FND_API.g_false,
326: p_count => x_msg_count,
327: p_data => x_msg_data
328: );
329:
330: WHEN FND_API.g_exc_unexpected_error THEN
331: ROLLBACK TO Delete_timeout_setup;
332: x_return_status := FND_API.g_ret_sts_unexp_error ;
333: FND_MSG_PUB.count_and_get(
334: p_encoded => FND_API.g_false,
335: p_count => x_msg_count,
336: p_data => x_msg_data
337: );
339: WHEN OTHERS THEN
340: ROLLBACK TO Delete_timeout_setup;
341: x_return_status := FND_API.g_ret_sts_unexp_error ;
342:
343: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
344: THEN
345: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
346: END IF;
347:
341: x_return_status := FND_API.g_ret_sts_unexp_error ;
342:
343: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
344: THEN
345: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
346: END IF;
347:
348: FND_MSG_PUB.count_and_get(
349: p_encoded => FND_API.g_false,
344: THEN
345: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
346: END IF;
347:
348: FND_MSG_PUB.count_and_get(
349: p_encoded => FND_API.g_false,
350: p_count => x_msg_count,
351: p_data => x_msg_data
352: );
384:
385: -------------------- initialize -------------------------
386: SAVEPOINT Update_timeout_setup;
387:
388: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
389: PVX_Utility_PVT.debug_message(l_full_name||': start');
390: END IF;
391:
392:
391:
392:
393:
394: IF FND_API.to_boolean(p_init_msg_list) THEN
395: FND_MSG_PUB.initialize;
396: END IF;
397:
398: -- dbms_output.put_line('Start 2' || to_char(l_api_version) || 'p_api ; ' || p_api_version || 'l_api " ' || p_api_version || 'pkg :' || g_pkg_name);
399:
408:
409: x_return_status := FND_API.G_RET_STS_SUCCESS;
410:
411: ----------------------- validate ----------------------
412: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
413: PVX_Utility_PVT.debug_message(l_full_name ||': validate');
414: END IF;
415:
416:
446: END IF;
447: END IF;
448:
449: -------------------------- update --------------------
450: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
451: PVX_Utility_PVT.debug_message(l_full_name ||': update');
452: END IF;
453:
454:
464: WHERE timeout_id = l_timeout_setup_rec.timeout_id
465: AND object_version_number = l_timeout_setup_rec.object_version_number;
466:
467: IF (SQL%NOTFOUND) THEN
468: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
469: FND_MESSAGE.set_name('PV', 'PV_NO_RECORD_FOUND');
470: FND_MSG_PUB.add;
471: END IF;
472: RAISE FND_API.g_exc_error;
466:
467: IF (SQL%NOTFOUND) THEN
468: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
469: FND_MESSAGE.set_name('PV', 'PV_NO_RECORD_FOUND');
470: FND_MSG_PUB.add;
471: END IF;
472: RAISE FND_API.g_exc_error;
473: END IF;
474:
478: IF FND_API.to_boolean(p_commit) THEN
479: COMMIT;
480: END IF;
481:
482: FND_MSG_PUB.count_and_get(
483: p_encoded => FND_API.g_false,
484: p_count => x_msg_count,
485: p_data => x_msg_data
486: );
484: p_count => x_msg_count,
485: p_data => x_msg_data
486: );
487:
488: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
489: PVX_Utility_PVT.debug_message(l_full_name ||': end');
490: END IF;
491:
492:
495:
496: WHEN FND_API.g_exc_error THEN
497: ROLLBACK TO Update_timeout_setup;
498: x_return_status := FND_API.g_ret_sts_error;
499: FND_MSG_PUB.count_and_get(
500: p_encoded => FND_API.g_false,
501: p_count => x_msg_count,
502: p_data => x_msg_data
503: );
504:
505: WHEN FND_API.g_exc_unexpected_error THEN
506: ROLLBACK TO Update_timeout_setup;
507: x_return_status := FND_API.g_ret_sts_unexp_error ;
508: FND_MSG_PUB.count_and_get(
509: p_encoded => FND_API.g_false,
510: p_count => x_msg_count,
511: p_data => x_msg_data
512: );
514: WHEN OTHERS THEN
515: ROLLBACK TO Update_timeout_setup;
516: x_return_status := FND_API.g_ret_sts_unexp_error ;
517:
518: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
519: THEN
520: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
521: END IF;
522:
516: x_return_status := FND_API.g_ret_sts_unexp_error ;
517:
518: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
519: THEN
520: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
521: END IF;
522:
523: FND_MSG_PUB.count_and_get(
524: p_encoded => FND_API.g_false,
519: THEN
520: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
521: END IF;
522:
523: FND_MSG_PUB.count_and_get(
524: p_encoded => FND_API.g_false,
525: p_count => x_msg_count,
526: p_data => x_msg_data
527: );
582:
583: BEGIN
584:
585: ----------------------- initialize --------------------
586: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
587: PVX_Utility_PVT.debug_message(l_full_name||': start');
588: END IF;
589:
590:
588: END IF;
589:
590:
591: IF FND_API.to_boolean(p_init_msg_list) THEN
592: FND_MSG_PUB.initialize;
593: END IF;
594:
595: IF NOT FND_API.compatible_api_call(
596: l_api_version,
603:
604: x_return_status := FND_API.g_ret_sts_success;
605:
606: ---------------------- validate ------------------------
607: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
608: PVX_Utility_PVT.debug_message(l_full_name||': check items');
609: END IF;
610:
611:
623: RAISE FND_API.g_exc_error;
624: END IF;
625: END IF;
626:
627: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
628: PVX_Utility_PVT.debug_message(l_full_name||': check record');
629: END IF;
630:
631:
656: IF (c_unique_timeout%ROWCOUNT = 0) THEN
657: return;
658: ELSE
659: FND_MESSAGE.set_name('PV', 'PV_DUPLICATE_RECORD');
660: FND_MSG_PUB.add;
661: RAISE FND_API.g_exc_unexpected_error;
662: END IF;
663:
664: -------------------- finish --------------------------
661: RAISE FND_API.g_exc_unexpected_error;
662: END IF;
663:
664: -------------------- finish --------------------------
665: FND_MSG_PUB.count_and_get(
666: p_encoded => FND_API.g_false,
667: p_count => x_msg_count,
668: p_data => x_msg_data
669: );
667: p_count => x_msg_count,
668: p_data => x_msg_data
669: );
670:
671: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
672: PVX_Utility_PVT.debug_message(l_full_name ||': end');
673: END IF;
674:
675:
676: EXCEPTION
677:
678: WHEN FND_API.g_exc_error THEN
679: x_return_status := FND_API.g_ret_sts_error;
680: FND_MSG_PUB.count_and_get(
681: p_encoded => FND_API.g_false,
682: p_count => x_msg_count,
683: p_data => x_msg_data
684: );
684: );
685:
686: WHEN FND_API.g_exc_unexpected_error THEN
687: x_return_status := FND_API.g_ret_sts_unexp_error ;
688: FND_MSG_PUB.count_and_get(
689: p_encoded => FND_API.g_false,
690: p_count => x_msg_count,
691: p_data => x_msg_data
692: );
692: );
693:
694: WHEN OTHERS THEN
695: x_return_status := FND_API.g_ret_sts_unexp_error;
696: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
697: THEN
698: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
699: END IF;
700:
694: WHEN OTHERS THEN
695: x_return_status := FND_API.g_ret_sts_unexp_error;
696: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
697: THEN
698: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
699: END IF;
700:
701: FND_MSG_PUB.count_and_get(
702: p_encoded => FND_API.g_false,
697: THEN
698: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
699: END IF;
700:
701: FND_MSG_PUB.count_and_get(
702: p_encoded => FND_API.g_false,
703: p_count => x_msg_count,
704: p_data => x_msg_data
705: );
721: x_return_status := FND_API.g_ret_sts_success;
722:
723: ------------------------ entity --------------------------
724: IF p_timeout_setup_rec.timeout_period IS NULL THEN
725: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
726: THEN
727: FND_MESSAGE.set_name('PV', 'PV_NO_ENTITY');
728: FND_MSG_PUB.add;
729: END IF;
724: IF p_timeout_setup_rec.timeout_period IS NULL THEN
725: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
726: THEN
727: FND_MESSAGE.set_name('PV', 'PV_NO_ENTITY');
728: FND_MSG_PUB.add;
729: END IF;
730:
731: x_return_status := FND_API.g_ret_sts_error;
732: RETURN;
814:
815: BEGIN
816:
817: -------------------- initialize ------------------------
818: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
819: PVX_Utility_PVT.debug_message(l_full_name||': start');
820: END IF;
821:
822:
820: END IF;
821:
822:
823: IF FND_API.to_boolean(p_init_msg_list) THEN
824: FND_MSG_PUB.initialize;
825: END IF;
826:
827: IF NOT FND_API.compatible_api_call(
828: l_api_version,
835:
836: x_return_status := FND_API.G_RET_STS_SUCCESS;
837:
838: ------------------------ lock -------------------------
839: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
840: PVX_Utility_PVT.debug_message(l_full_name||': lock');
841: END IF;
842:
843:
844: OPEN c_timeout_setup;
845: FETCH c_timeout_setup INTO l_timeout_id;
846: IF (c_timeout_setup%NOTFOUND) THEN
847: CLOSE c_timeout_setup;
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
849: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
850: FND_MSG_PUB.add;
851: END IF;
852: RAISE FND_API.g_exc_error;
846: IF (c_timeout_setup%NOTFOUND) THEN
847: CLOSE c_timeout_setup;
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
849: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
850: FND_MSG_PUB.add;
851: END IF;
852: RAISE FND_API.g_exc_error;
853: END IF;
854: CLOSE c_timeout_setup;
854: CLOSE c_timeout_setup;
855:
856:
857: -------------------- finish --------------------------
858: FND_MSG_PUB.count_and_get(
859: p_encoded => FND_API.g_false,
860: p_count => x_msg_count,
861: p_data => x_msg_data
862: );
860: p_count => x_msg_count,
861: p_data => x_msg_data
862: );
863:
864: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
865: PVX_Utility_PVT.debug_message(l_full_name ||': end');
866: END IF;
867:
868:
869: EXCEPTION
870:
871: WHEN PVX_Utility_PVT.resource_locked THEN
872: x_return_status := FND_API.g_ret_sts_error;
873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
874: FND_MESSAGE.set_name('PV', 'PV_RESOURCE_LOCKED');
875: FND_MSG_PUB.add;
876: END IF;
877:
871: WHEN PVX_Utility_PVT.resource_locked THEN
872: x_return_status := FND_API.g_ret_sts_error;
873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
874: FND_MESSAGE.set_name('PV', 'PV_RESOURCE_LOCKED');
875: FND_MSG_PUB.add;
876: END IF;
877:
878: FND_MSG_PUB.count_and_get(
879: p_encoded => FND_API.g_false,
874: FND_MESSAGE.set_name('PV', 'PV_RESOURCE_LOCKED');
875: FND_MSG_PUB.add;
876: END IF;
877:
878: FND_MSG_PUB.count_and_get(
879: p_encoded => FND_API.g_false,
880: p_count => x_msg_count,
881: p_data => x_msg_data
882: );
882: );
883:
884: WHEN FND_API.g_exc_error THEN
885: x_return_status := FND_API.g_ret_sts_error;
886: FND_MSG_PUB.count_and_get(
887: p_encoded => FND_API.g_false,
888: p_count => x_msg_count,
889: p_data => x_msg_data
890: );
890: );
891:
892: WHEN FND_API.g_exc_unexpected_error THEN
893: x_return_status := FND_API.g_ret_sts_unexp_error ;
894: FND_MSG_PUB.count_and_get(
895: p_encoded => FND_API.g_false,
896: p_count => x_msg_count,
897: p_data => x_msg_data
898: );
898: );
899:
900: WHEN OTHERS THEN
901: x_return_status := FND_API.g_ret_sts_unexp_error ;
902: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
903: THEN
904: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
905: END IF;
906:
900: WHEN OTHERS THEN
901: x_return_status := FND_API.g_ret_sts_unexp_error ;
902: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
903: THEN
904: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
905: END IF;
906:
907: FND_MSG_PUB.count_and_get(
908: p_encoded => FND_API.g_false,
903: THEN
904: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
905: END IF;
906:
907: FND_MSG_PUB.count_and_get(
908: p_encoded => FND_API.g_false,
909: p_count => x_msg_count,
910: p_data => x_msg_data
911: );
938: OPEN c_timeout_setup;
939: FETCH c_timeout_setup INTO l_timeout_setup_rec;
940: IF c_timeout_setup%NOTFOUND THEN
941: CLOSE c_timeout_setup;
942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
943: FND_MESSAGE.set_name('PV', 'PV_NO_RECORD_FOUND');
944: FND_MSG_PUB.add;
945: END IF;
946: RAISE FND_API.g_exc_error;
940: IF c_timeout_setup%NOTFOUND THEN
941: CLOSE c_timeout_setup;
942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
943: FND_MESSAGE.set_name('PV', 'PV_NO_RECORD_FOUND');
944: FND_MSG_PUB.add;
945: END IF;
946: RAISE FND_API.g_exc_error;
947: END IF;
948: CLOSE c_timeout_setup;