18: -- NOTES
19: -- 1. object_version_number will be set to 1.
20: -- 2. If timeout_id is not passed in, generate a unique one from
21: -- the sequence.
22: -- 3. Please don't pass in any FND_API.g_mess_char/num/date.
23: ---------------------------------------------------------------------
24: PROCEDURE Create_timeout_setup(
25: p_api_version IN NUMBER
26: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
22: -- 3. Please don't pass in any FND_API.g_mess_char/num/date.
23: ---------------------------------------------------------------------
24: PROCEDURE Create_timeout_setup(
25: p_api_version IN NUMBER
26: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
27: ,p_commit IN VARCHAR2 := FND_API.g_false
28: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
29:
30: ,x_return_status OUT NOCOPY VARCHAR2
23: ---------------------------------------------------------------------
24: PROCEDURE Create_timeout_setup(
25: p_api_version IN NUMBER
26: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
27: ,p_commit IN VARCHAR2 := FND_API.g_false
28: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
29:
30: ,x_return_status OUT NOCOPY VARCHAR2
31: ,x_msg_count OUT NOCOPY NUMBER
24: PROCEDURE Create_timeout_setup(
25: p_api_version IN NUMBER
26: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
27: ,p_commit IN VARCHAR2 := FND_API.g_false
28: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
29:
30: ,x_return_status OUT NOCOPY VARCHAR2
31: ,x_msg_count OUT NOCOPY NUMBER
32: ,x_msg_data OUT NOCOPY VARCHAR2
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(
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,
81: p_api_version,
82: l_api_name,
83: g_pkg_name
81: p_api_version,
82: l_api_name,
83: g_pkg_name
84: ) THEN
85: RAISE FND_API.g_exc_unexpected_error;
86: END IF;
87:
88: x_return_status := FND_API.g_ret_sts_success;
89:
84: ) THEN
85: RAISE FND_API.g_exc_unexpected_error;
86: END IF;
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');
104: x_msg_data => x_msg_data,
105: p_timeout_setup_rec => l_timeout_setup_rec
106: );
107:
108: IF l_return_status = FND_API.g_ret_sts_error THEN
109: RAISE FND_API.g_exc_error;
110: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
111: RAISE FND_API.g_exc_unexpected_error;
112: END IF;
105: p_timeout_setup_rec => l_timeout_setup_rec
106: );
107:
108: IF l_return_status = FND_API.g_ret_sts_error THEN
109: RAISE FND_API.g_exc_error;
110: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
111: RAISE FND_API.g_exc_unexpected_error;
112: END IF;
113:
106: );
107:
108: IF l_return_status = FND_API.g_ret_sts_error THEN
109: RAISE FND_API.g_exc_error;
110: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
111: RAISE FND_API.g_exc_unexpected_error;
112: END IF;
113:
114:
107:
108: IF l_return_status = FND_API.g_ret_sts_error THEN
109: RAISE FND_API.g_exc_error;
110: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
111: RAISE FND_API.g_exc_unexpected_error;
112: END IF;
113:
114:
115: --DBMS_output.put_line(l_full_name||': back validate');
167:
168: ------------------------- finish -------------------------------
169: x_timeout_setup_id := l_timeout_setup_rec.timeout_id;
170:
171: IF l_return_status = FND_API.g_ret_sts_error THEN
172: RAISE FND_API.g_exc_error;
173: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
174: RAISE FND_API.g_exc_unexpected_error;
175: END IF;
168: ------------------------- finish -------------------------------
169: x_timeout_setup_id := l_timeout_setup_rec.timeout_id;
170:
171: IF l_return_status = FND_API.g_ret_sts_error THEN
172: RAISE FND_API.g_exc_error;
173: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
174: RAISE FND_API.g_exc_unexpected_error;
175: END IF;
176:
169: x_timeout_setup_id := l_timeout_setup_rec.timeout_id;
170:
171: IF l_return_status = FND_API.g_ret_sts_error THEN
172: RAISE FND_API.g_exc_error;
173: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
174: RAISE FND_API.g_exc_unexpected_error;
175: END IF;
176:
177:
170:
171: IF l_return_status = FND_API.g_ret_sts_error THEN
172: RAISE FND_API.g_exc_error;
173: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
174: RAISE FND_API.g_exc_unexpected_error;
175: END IF;
176:
177:
178: -- Check for commit
175: END IF;
176:
177:
178: -- Check for commit
179: IF FND_API.to_boolean(p_commit) THEN
180: COMMIT;
181: END IF;
182:
183: FND_MSG_PUB.count_and_get(
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: );
188:
193:
194:
195: EXCEPTION
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
195: EXCEPTION
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
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:
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
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
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: );
214:
213: );
214:
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);
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: );
229:
236: --
237: ---------------------------------------------------------------
238: PROCEDURE Delete_timeout_setup(
239: p_api_version IN NUMBER
240: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
241: ,p_commit IN VARCHAR2 := FND_API.g_false
242:
243: ,x_return_status OUT NOCOPY VARCHAR2
244: ,x_msg_count OUT NOCOPY NUMBER
237: ---------------------------------------------------------------
238: PROCEDURE Delete_timeout_setup(
239: p_api_version IN NUMBER
240: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
241: ,p_commit IN VARCHAR2 := FND_API.g_false
242:
243: ,x_return_status OUT NOCOPY VARCHAR2
244: ,x_msg_count OUT NOCOPY NUMBER
245: ,x_msg_data OUT NOCOPY VARCHAR2
263: PVX_Utility_PVT.debug_message(l_full_name||': start');
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(
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,
273: p_api_version,
274: l_api_name,
275: g_pkg_name
273: p_api_version,
274: l_api_name,
275: g_pkg_name
276: ) THEN
277: RAISE FND_API.g_exc_unexpected_error;
278: END IF;
279:
280: x_return_status := FND_API.G_RET_STS_SUCCESS;
281:
276: ) THEN
277: RAISE FND_API.g_exc_unexpected_error;
278: END IF;
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');
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:
302: -------------------- finish --------------------------
303: IF FND_API.to_boolean(p_commit) THEN
299: RAISE FND_API.g_exc_error;
300: END IF;
301:
302: -------------------- finish --------------------------
303: IF FND_API.to_boolean(p_commit) THEN
304: COMMIT;
305: END IF;
306:
307: FND_MSG_PUB.count_and_get(
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: );
312:
317:
318:
319: EXCEPTION
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,
319: EXCEPTION
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
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:
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,
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
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: );
338:
337: );
338:
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);
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: );
353:
359: -- Update_timeout_setup
360: ----------------------------------------------------------------------
361: PROCEDURE Update_timeout_setup(
362: p_api_version IN NUMBER
363: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
364: ,p_commit IN VARCHAR2 := FND_API.g_false
365: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
366:
367: ,x_return_status OUT NOCOPY VARCHAR2
360: ----------------------------------------------------------------------
361: PROCEDURE Update_timeout_setup(
362: p_api_version IN NUMBER
363: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
364: ,p_commit IN VARCHAR2 := FND_API.g_false
365: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
366:
367: ,x_return_status OUT NOCOPY VARCHAR2
368: ,x_msg_count OUT NOCOPY NUMBER
361: PROCEDURE Update_timeout_setup(
362: p_api_version IN NUMBER
363: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
364: ,p_commit IN VARCHAR2 := FND_API.g_false
365: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
366:
367: ,x_return_status OUT NOCOPY VARCHAR2
368: ,x_msg_count OUT NOCOPY NUMBER
369: ,x_msg_data OUT NOCOPY VARCHAR2
390: END IF;
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);
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:
400: IF NOT FND_API.compatible_api_call(
401: l_api_version,
402: p_api_version,
403: l_api_name,
404: g_pkg_name
402: p_api_version,
403: l_api_name,
404: g_pkg_name
405: ) THEN
406: RAISE FND_API.g_exc_unexpected_error;
407: END IF;
408:
409: x_return_status := FND_API.G_RET_STS_SUCCESS;
410:
405: ) THEN
406: RAISE FND_API.g_exc_unexpected_error;
407: END IF;
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');
420: p_validation_mode => JTF_PLSQL_API.g_update,
421: x_return_status => l_return_status
422: );
423:
424: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
425: RAISE FND_API.g_exc_unexpected_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
427: RAISE FND_API.g_exc_error;
428: END IF;
421: x_return_status => l_return_status
422: );
423:
424: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
425: RAISE FND_API.g_exc_unexpected_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
427: RAISE FND_API.g_exc_error;
428: END IF;
429: END IF;
422: );
423:
424: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
425: RAISE FND_API.g_exc_unexpected_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
427: RAISE FND_API.g_exc_error;
428: END IF;
429: END IF;
430:
423:
424: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
425: RAISE FND_API.g_exc_unexpected_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
427: RAISE FND_API.g_exc_error;
428: END IF;
429: END IF;
430:
431: -- replace g_miss_char/num/date with current column values
438: p_mode => l_mode,
439: x_return_status => l_return_status
440: );
441:
442: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
443: RAISE FND_API.g_exc_unexpected_error;
444: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
445: RAISE FND_API.g_exc_error;
446: END IF;
439: x_return_status => l_return_status
440: );
441:
442: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
443: RAISE FND_API.g_exc_unexpected_error;
444: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
445: RAISE FND_API.g_exc_error;
446: END IF;
447: END IF;
440: );
441:
442: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
443: RAISE FND_API.g_exc_unexpected_error;
444: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
445: RAISE FND_API.g_exc_error;
446: END IF;
447: END IF;
448:
441:
442: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
443: RAISE FND_API.g_exc_unexpected_error;
444: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
445: RAISE FND_API.g_exc_error;
446: END IF;
447: END IF;
448:
449: -------------------------- update --------------------
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:
475: -------------------- finish --------------------------
476:
474:
475: -------------------- finish --------------------------
476:
477: -- Check for commit
478: IF FND_API.to_boolean(p_commit) THEN
479: COMMIT;
480: END IF;
481:
482: FND_MSG_PUB.count_and_get(
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: );
487:
492:
493:
494: EXCEPTION
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,
494: EXCEPTION
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
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:
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,
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
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: );
513:
512: );
513:
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);
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: );
528:
541: ,x_return_status OUT NOCOPY VARCHAR2
542: )
543: IS
544: BEGIN
545: x_return_status := FND_API.g_ret_sts_success;
546: -- do other record level checkings
547:
548: END Check_timeout_rec;
549:
554: --
555: --------------------------------------------------------------------
556: PROCEDURE Validate_timeout_setup(
557: p_api_version IN NUMBER
558: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
559: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
560:
561: ,x_return_status OUT NOCOPY VARCHAR2
562: ,x_msg_count OUT NOCOPY NUMBER
555: --------------------------------------------------------------------
556: PROCEDURE Validate_timeout_setup(
557: p_api_version IN NUMBER
558: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
559: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
560:
561: ,x_return_status OUT NOCOPY VARCHAR2
562: ,x_msg_count OUT NOCOPY NUMBER
563: ,x_msg_data OUT NOCOPY VARCHAR2
587: PVX_Utility_PVT.debug_message(l_full_name||': start');
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(
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,
597: p_api_version,
598: l_api_name,
599: g_pkg_name
597: p_api_version,
598: l_api_name,
599: g_pkg_name
600: ) THEN
601: RAISE FND_API.g_exc_unexpected_error;
602: END IF;
603:
604: x_return_status := FND_API.g_ret_sts_success;
605:
600: ) THEN
601: RAISE FND_API.g_exc_unexpected_error;
602: END IF;
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');
616: p_validation_mode => JTF_PLSQL_API.g_create,
617: x_return_status => l_return_status
618: );
619:
620: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
621: RAISE FND_API.g_exc_unexpected_error;
622: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
623: RAISE FND_API.g_exc_error;
624: END IF;
617: x_return_status => l_return_status
618: );
619:
620: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
621: RAISE FND_API.g_exc_unexpected_error;
622: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
623: RAISE FND_API.g_exc_error;
624: END IF;
625: END IF;
618: );
619:
620: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
621: RAISE FND_API.g_exc_unexpected_error;
622: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
623: RAISE FND_API.g_exc_error;
624: END IF;
625: END IF;
626:
619:
620: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
621: RAISE FND_API.g_exc_unexpected_error;
622: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
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
638: p_complete_rec => NULL,
639: x_return_status => l_return_status
640: );
641:
642: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
643: RAISE FND_API.g_exc_unexpected_error;
644: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
645: RAISE FND_API.g_exc_error;
646: END IF;
639: x_return_status => l_return_status
640: );
641:
642: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
643: RAISE FND_API.g_exc_unexpected_error;
644: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
645: RAISE FND_API.g_exc_error;
646: END IF;
647: END IF;
640: );
641:
642: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
643: RAISE FND_API.g_exc_unexpected_error;
644: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
645: RAISE FND_API.g_exc_error;
646: END IF;
647: END IF;
648:
641:
642: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
643: RAISE FND_API.g_exc_unexpected_error;
644: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
645: RAISE FND_API.g_exc_error;
646: END IF;
647: END IF;
648:
649:
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 --------------------------
665: FND_MSG_PUB.count_and_get(
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: );
670:
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,
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
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: );
685:
682: p_count => x_msg_count,
683: p_data => x_msg_data
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,
683: p_data => x_msg_data
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
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: );
693:
691: p_data => x_msg_data
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;
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: );
706:
717: )
718: IS
719: BEGIN
720:
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)
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;
733: END IF;
734:
735: END Check_Req_Items;
752: p_timeout_setup_rec => p_timeout_setup_rec
753: ,x_return_status => x_return_status
754: );
755:
756: IF x_return_status <> FND_API.g_ret_sts_success THEN
757: RETURN;
758: END IF;
759:
760: END Check_timeout_items;
769: )
770: IS
771: BEGIN
772:
773: x_timeout_setup_rec.timeout_id := FND_API.G_MISS_NUM;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
770: IS
771: BEGIN
772:
773: x_timeout_setup_rec.timeout_id := FND_API.G_MISS_NUM;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
771: BEGIN
772:
773: x_timeout_setup_rec.timeout_id := FND_API.G_MISS_NUM;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
772:
773: x_timeout_setup_rec.timeout_id := FND_API.G_MISS_NUM;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
773: x_timeout_setup_rec.timeout_id := FND_API.G_MISS_NUM;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
774: x_timeout_setup_rec.last_update_date := FND_API.G_MISS_DATE;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
782: x_timeout_setup_rec.country_code := FND_API.G_MISS_CHAR;
775: x_timeout_setup_rec.last_updated_by := FND_API.G_MISS_NUM;
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
782: x_timeout_setup_rec.country_code := FND_API.G_MISS_CHAR;
783:
776: x_timeout_setup_rec.creation_date := FND_API.G_MISS_DATE;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
782: x_timeout_setup_rec.country_code := FND_API.G_MISS_CHAR;
783:
784: END Init_timeout_Rec;
777: x_timeout_setup_rec.created_by := FND_API.G_MISS_NUM;
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
782: x_timeout_setup_rec.country_code := FND_API.G_MISS_CHAR;
783:
784: END Init_timeout_Rec;
785:
778: x_timeout_setup_rec.last_update_login := FND_API.G_MISS_NUM;
779: x_timeout_setup_rec.object_version_number := FND_API.G_MISS_NUM;
780: x_timeout_setup_rec.timeout_period := FND_API.G_MISS_NUM;
781: x_timeout_setup_rec.timeout_type := FND_API.G_MISS_CHAR;
782: x_timeout_setup_rec.country_code := FND_API.G_MISS_CHAR;
783:
784: END Init_timeout_Rec;
785:
786: -------------------------------------------------------------------
789: --
790: --------------------------------------------------------------------
791: PROCEDURE Lock_timeout_setup(
792: p_api_version IN NUMBER
793: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
794: ,x_return_status OUT NOCOPY VARCHAR2
795: ,x_msg_count OUT NOCOPY NUMBER
796: ,x_msg_data OUT NOCOPY VARCHAR2
797: ,p_timeout_id IN NUMBER
819: PVX_Utility_PVT.debug_message(l_full_name||': start');
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(
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,
829: p_api_version,
830: l_api_name,
831: g_pkg_name
829: p_api_version,
830: l_api_name,
831: g_pkg_name
832: ) THEN
833: RAISE FND_API.g_exc_unexpected_error;
834: END IF;
835:
836: x_return_status := FND_API.G_RET_STS_SUCCESS;
837:
832: ) THEN
833: RAISE FND_API.g_exc_unexpected_error;
834: END IF;
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');
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;
855:
856:
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: );
863:
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;
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: );
883:
880: p_count => x_msg_count,
881: p_data => x_msg_data
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,
881: p_data => x_msg_data
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
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: );
891:
888: p_count => x_msg_count,
889: p_data => x_msg_data
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,
889: p_data => x_msg_data
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
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: );
899:
897: p_data => x_msg_data
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;
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: );
912:
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;
949:
950: --dbms_output.put_line('Start 2' || to_char(p_timeout_setup_rec.timeout_period) || 'TYPE ; ' || p_timeout_setup_rec.timeout_type || 'CNTRY " ' || p_timeout_setup_rec.country_code || 'pkg :' ));
949:
950: --dbms_output.put_line('Start 2' || to_char(p_timeout_setup_rec.timeout_period) || 'TYPE ; ' || p_timeout_setup_rec.timeout_type || 'CNTRY " ' || p_timeout_setup_rec.country_code || 'pkg :' ));
951:
952:
953: IF p_timeout_setup_rec.timeout_period = FND_API.G_MISS_NUM THEN
954: x_complete_rec.timeout_period := l_timeout_setup_rec.timeout_period;
955: END IF;
956:
957: IF p_timeout_setup_rec.timeout_type = FND_API.G_MISS_CHAR THEN
953: IF p_timeout_setup_rec.timeout_period = FND_API.G_MISS_NUM THEN
954: x_complete_rec.timeout_period := l_timeout_setup_rec.timeout_period;
955: END IF;
956:
957: IF p_timeout_setup_rec.timeout_type = FND_API.G_MISS_CHAR THEN
958: x_complete_rec.timeout_type := l_timeout_setup_rec.timeout_type;
959: END IF;
960:
961: IF p_timeout_setup_rec.country_code = FND_API.G_MISS_CHAR THEN
957: IF p_timeout_setup_rec.timeout_type = FND_API.G_MISS_CHAR THEN
958: x_complete_rec.timeout_type := l_timeout_setup_rec.timeout_type;
959: END IF;
960:
961: IF p_timeout_setup_rec.country_code = FND_API.G_MISS_CHAR THEN
962: x_complete_rec.country_code := l_timeout_setup_rec.country_code;
963: END IF;
964:
965:
962: x_complete_rec.country_code := l_timeout_setup_rec.country_code;
963: END IF;
964:
965:
966: IF p_timeout_setup_rec.object_version_number = FND_API.G_MISS_NUM THEN
967: x_complete_rec.object_version_number := l_timeout_setup_rec.object_version_number;
968: END IF;
969:
970: END Complete_timeout_Rec;