57: END IF;
58:
59: l_xmp_rec := p_xmp_rec;
60: l_api_version := 1.0;
61: l_init_msg_list := OKL_API.g_false;
62: l_msg_count := 0;
63:
64: SAVEPOINT create_xmlp_params_rec_PVT;
65: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
61: l_init_msg_list := OKL_API.g_false;
62: l_msg_count := 0;
63:
64: SAVEPOINT create_xmlp_params_rec_PVT;
65: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
66: G_PKG_NAME,
67: p_init_msg_list,
68: l_api_version,
69: p_api_version,
69: p_api_version,
70: '_PVT',
71: l_return_status);
72:
73: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
74: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
75: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
76: RAISE OKL_API.G_EXCEPTION_ERROR;
77: END IF;
70: '_PVT',
71: l_return_status);
72:
73: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
74: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
75: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
76: RAISE OKL_API.G_EXCEPTION_ERROR;
77: END IF;
78:
71: l_return_status);
72:
73: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
74: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
75: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
76: RAISE OKL_API.G_EXCEPTION_ERROR;
77: END IF;
78:
79: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
72:
73: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
74: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
75: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
76: RAISE OKL_API.G_EXCEPTION_ERROR;
77: END IF;
78:
79: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
80: okl_xmp_pvt.insert_row( l_api_version,
84: l_msg_data,
85: l_xmp_rec,
86: x_xmp_rec);
87:
88: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
89: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
91: RAISE OKL_API.G_EXCEPTION_ERROR;
92: END IF;
85: l_xmp_rec,
86: x_xmp_rec);
87:
88: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
89: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
91: RAISE OKL_API.G_EXCEPTION_ERROR;
92: END IF;
93:
86: x_xmp_rec);
87:
88: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
89: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
91: RAISE OKL_API.G_EXCEPTION_ERROR;
92: END IF;
93:
94: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
87:
88: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
89: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
91: RAISE OKL_API.G_EXCEPTION_ERROR;
92: END IF;
93:
94: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
95: x_return_status := l_return_status;
90: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
91: RAISE OKL_API.G_EXCEPTION_ERROR;
92: END IF;
93:
94: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
95: x_return_status := l_return_status;
96: x_msg_data := l_msg_data;
97: x_msg_count := l_msg_count;
98:
103: END IF;
104:
105: EXCEPTION
106: WHEN G_EXCEPTION_HALT_VALIDATION THEN
107: x_return_status := OKL_API.HANDLE_EXCEPTIONS
108: (
109: l_api_name,
110: G_PKG_NAME,
111: 'OKL_API.G_RET_STS_ERROR',
107: x_return_status := OKL_API.HANDLE_EXCEPTIONS
108: (
109: l_api_name,
110: G_PKG_NAME,
111: 'OKL_API.G_RET_STS_ERROR',
112: x_msg_count,
113: x_msg_data,
114: '_PVT'
115: );
114: '_PVT'
115: );
116:
117:
118: WHEN OKL_API.G_EXCEPTION_ERROR THEN
119: x_return_status := OKL_API.HANDLE_EXCEPTIONS
120: (
121: l_api_name,
122: G_PKG_NAME,
115: );
116:
117:
118: WHEN OKL_API.G_EXCEPTION_ERROR THEN
119: x_return_status := OKL_API.HANDLE_EXCEPTIONS
120: (
121: l_api_name,
122: G_PKG_NAME,
123: 'OKL_API.G_RET_STS_ERROR',
119: x_return_status := OKL_API.HANDLE_EXCEPTIONS
120: (
121: l_api_name,
122: G_PKG_NAME,
123: 'OKL_API.G_RET_STS_ERROR',
124: x_msg_count,
125: x_msg_data,
126: '_PVT'
127: );
126: '_PVT'
127: );
128:
129: WHEN OTHERS THEN
130: x_return_status := OKL_API.HANDLE_EXCEPTIONS
131: (
132: l_api_name,
133: G_PKG_NAME,
134: 'OKL_API.G_OTHERS',
130: x_return_status := OKL_API.HANDLE_EXCEPTIONS
131: (
132: l_api_name,
133: G_PKG_NAME,
134: 'OKL_API.G_OTHERS',
135: x_msg_count,
136: x_msg_data,
137: '_PVT'
138: );
195: END IF;
196:
197: l_xmp_tbl := p_xmp_tbl;
198: l_api_version := 1.0;
199: l_init_msg_list := OKL_API.g_true; --OKL_API.g_false; :vsgandhi fix for bug 14523278
200: l_msg_count := 0;
201:
202: SAVEPOINT create_xmlp_params_rec_PVT;
203: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
199: l_init_msg_list := OKL_API.g_true; --OKL_API.g_false; :vsgandhi fix for bug 14523278
200: l_msg_count := 0;
201:
202: SAVEPOINT create_xmlp_params_rec_PVT;
203: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
204: G_PKG_NAME,
205: p_init_msg_list,
206: l_api_version,
207: p_api_version,
207: p_api_version,
208: '_PVT',
209: l_return_status);
210:
211: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
214: RAISE OKL_API.G_EXCEPTION_ERROR;
215: END IF;
208: '_PVT',
209: l_return_status);
210:
211: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
214: RAISE OKL_API.G_EXCEPTION_ERROR;
215: END IF;
216:
209: l_return_status);
210:
211: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
214: RAISE OKL_API.G_EXCEPTION_ERROR;
215: END IF;
216:
217: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
210:
211: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
214: RAISE OKL_API.G_EXCEPTION_ERROR;
215: END IF;
216:
217: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
218: okl_xmp_pvt.insert_row( l_api_version,
222: l_msg_data,
223: l_xmp_tbl,
224: x_xmp_tbl);
225:
226: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
229: RAISE OKL_API.G_EXCEPTION_ERROR;
230: END IF;
223: l_xmp_tbl,
224: x_xmp_tbl);
225:
226: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
229: RAISE OKL_API.G_EXCEPTION_ERROR;
230: END IF;
231:
224: x_xmp_tbl);
225:
226: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
229: RAISE OKL_API.G_EXCEPTION_ERROR;
230: END IF;
231:
232: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
225:
226: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
229: RAISE OKL_API.G_EXCEPTION_ERROR;
230: END IF;
231:
232: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
233: x_return_status := l_return_status;
228: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
229: RAISE OKL_API.G_EXCEPTION_ERROR;
230: END IF;
231:
232: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
233: x_return_status := l_return_status;
234: x_msg_data := l_msg_data;
235: x_msg_count := l_msg_count;
236:
241: END IF;
242:
243: EXCEPTION
244: WHEN G_EXCEPTION_HALT_VALIDATION THEN
245: x_return_status := OKL_API.HANDLE_EXCEPTIONS
246: (
247: l_api_name,
248: G_PKG_NAME,
249: 'OKL_API.G_RET_STS_ERROR',
245: x_return_status := OKL_API.HANDLE_EXCEPTIONS
246: (
247: l_api_name,
248: G_PKG_NAME,
249: 'OKL_API.G_RET_STS_ERROR',
250: x_msg_count,
251: x_msg_data,
252: '_PVT'
253: );
252: '_PVT'
253: );
254:
255:
256: WHEN OKL_API.G_EXCEPTION_ERROR THEN
257: x_return_status := OKL_API.HANDLE_EXCEPTIONS
258: (
259: l_api_name,
260: G_PKG_NAME,
253: );
254:
255:
256: WHEN OKL_API.G_EXCEPTION_ERROR THEN
257: x_return_status := OKL_API.HANDLE_EXCEPTIONS
258: (
259: l_api_name,
260: G_PKG_NAME,
261: 'OKL_API.G_RET_STS_ERROR',
257: x_return_status := OKL_API.HANDLE_EXCEPTIONS
258: (
259: l_api_name,
260: G_PKG_NAME,
261: 'OKL_API.G_RET_STS_ERROR',
262: x_msg_count,
263: x_msg_data,
264: '_PVT'
265: );
264: '_PVT'
265: );
266:
267: WHEN OTHERS THEN
268: x_return_status := OKL_API.HANDLE_EXCEPTIONS
269: (
270: l_api_name,
271: G_PKG_NAME,
272: 'OKL_API.G_OTHERS',
268: x_return_status := OKL_API.HANDLE_EXCEPTIONS
269: (
270: l_api_name,
271: G_PKG_NAME,
272: 'OKL_API.G_OTHERS',
273: x_msg_count,
274: x_msg_data,
275: '_PVT'
276: );
329: END;
330: END IF;
331: l_xmp_rec := p_xmp_rec;
332: l_api_version := 1.0;
333: l_init_msg_list := OKL_API.g_false;
334: l_msg_count := 0;
335:
336: SAVEPOINT update_xmlp_params_rec_PVT;
337: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
333: l_init_msg_list := OKL_API.g_false;
334: l_msg_count := 0;
335:
336: SAVEPOINT update_xmlp_params_rec_PVT;
337: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
338: G_PKG_NAME,
339: p_init_msg_list,
340: l_api_version,
341: p_api_version,
341: p_api_version,
342: '_PVT',
343: l_return_status);
344:
345: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
346: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
347: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
348: RAISE OKL_API.G_EXCEPTION_ERROR;
349: END IF;
342: '_PVT',
343: l_return_status);
344:
345: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
346: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
347: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
348: RAISE OKL_API.G_EXCEPTION_ERROR;
349: END IF;
350:
343: l_return_status);
344:
345: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
346: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
347: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
348: RAISE OKL_API.G_EXCEPTION_ERROR;
349: END IF;
350:
351: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
344:
345: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
346: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
347: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
348: RAISE OKL_API.G_EXCEPTION_ERROR;
349: END IF;
350:
351: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
352: okl_xmp_pvt.update_row(l_api_version,
356: l_msg_data,
357: l_xmp_rec,
358: x_xmp_rec);
359:
360: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
363: RAISE OKL_API.G_EXCEPTION_ERROR;
364: END IF;
357: l_xmp_rec,
358: x_xmp_rec);
359:
360: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
363: RAISE OKL_API.G_EXCEPTION_ERROR;
364: END IF;
365:
358: x_xmp_rec);
359:
360: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
363: RAISE OKL_API.G_EXCEPTION_ERROR;
364: END IF;
365:
366: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
359:
360: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
363: RAISE OKL_API.G_EXCEPTION_ERROR;
364: END IF;
365:
366: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
367: x_return_status := l_return_status;
362: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
363: RAISE OKL_API.G_EXCEPTION_ERROR;
364: END IF;
365:
366: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
367: x_return_status := l_return_status;
368: x_msg_data := l_msg_data;
369: x_msg_count := l_msg_count;
370:
375: END IF;
376:
377: EXCEPTION
378: WHEN G_EXCEPTION_HALT_VALIDATION THEN
379: x_return_status := OKL_API.HANDLE_EXCEPTIONS
380: (
381: l_api_name,
382: G_PKG_NAME,
383: 'OKL_API.G_RET_STS_ERROR',
379: x_return_status := OKL_API.HANDLE_EXCEPTIONS
380: (
381: l_api_name,
382: G_PKG_NAME,
383: 'OKL_API.G_RET_STS_ERROR',
384: x_msg_count,
385: x_msg_data,
386: '_PVT'
387: );
386: '_PVT'
387: );
388:
389:
390: WHEN OKL_API.G_EXCEPTION_ERROR THEN
391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
392: (
393: l_api_name,
394: G_PKG_NAME,
387: );
388:
389:
390: WHEN OKL_API.G_EXCEPTION_ERROR THEN
391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
392: (
393: l_api_name,
394: G_PKG_NAME,
395: 'OKL_API.G_RET_STS_ERROR',
391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
392: (
393: l_api_name,
394: G_PKG_NAME,
395: 'OKL_API.G_RET_STS_ERROR',
396: x_msg_count,
397: x_msg_data,
398: '_PVT'
399: );
398: '_PVT'
399: );
400:
401: WHEN OTHERS THEN
402: x_return_status := OKL_API.HANDLE_EXCEPTIONS
403: (
404: l_api_name,
405: G_PKG_NAME,
406: 'OKL_API.G_OTHERS',
402: x_return_status := OKL_API.HANDLE_EXCEPTIONS
403: (
404: l_api_name,
405: G_PKG_NAME,
406: 'OKL_API.G_OTHERS',
407: x_msg_count,
408: x_msg_data,
409: '_PVT'
410: );
462: END;
463: END IF;
464: l_xmp_tbl := p_xmp_tbl;
465: l_api_version := 1.0;
466: l_init_msg_list := OKL_API.g_false;
467: l_msg_count := 0;
468:
469: SAVEPOINT update_xmlp_params_rec_PVT;
470: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
466: l_init_msg_list := OKL_API.g_false;
467: l_msg_count := 0;
468:
469: SAVEPOINT update_xmlp_params_rec_PVT;
470: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
471: G_PKG_NAME,
472: p_init_msg_list,
473: l_api_version,
474: p_api_version,
474: p_api_version,
475: '_PVT',
476: l_return_status);
477:
478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
481: RAISE OKL_API.G_EXCEPTION_ERROR;
482: END IF;
475: '_PVT',
476: l_return_status);
477:
478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
481: RAISE OKL_API.G_EXCEPTION_ERROR;
482: END IF;
483:
476: l_return_status);
477:
478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
481: RAISE OKL_API.G_EXCEPTION_ERROR;
482: END IF;
483:
484: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
477:
478: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
479: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
481: RAISE OKL_API.G_EXCEPTION_ERROR;
482: END IF;
483:
484: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
485: okl_xmp_pvt.update_row(l_api_version,
489: l_msg_data,
490: l_xmp_tbl,
491: x_xmp_tbl);
492:
493: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
494: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
495: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_ERROR;
497: END IF;
490: l_xmp_tbl,
491: x_xmp_tbl);
492:
493: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
494: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
495: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_ERROR;
497: END IF;
498:
491: x_xmp_tbl);
492:
493: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
494: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
495: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_ERROR;
497: END IF;
498:
499: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
492:
493: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
494: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
495: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_ERROR;
497: END IF;
498:
499: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
500: x_return_status := l_return_status;
495: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
496: RAISE OKL_API.G_EXCEPTION_ERROR;
497: END IF;
498:
499: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
500: x_return_status := l_return_status;
501: x_msg_data := l_msg_data;
502: x_msg_count := l_msg_count;
503:
508: END IF;
509:
510: EXCEPTION
511: WHEN G_EXCEPTION_HALT_VALIDATION THEN
512: x_return_status := OKL_API.HANDLE_EXCEPTIONS
513: (
514: l_api_name,
515: G_PKG_NAME,
516: 'OKL_API.G_RET_STS_ERROR',
512: x_return_status := OKL_API.HANDLE_EXCEPTIONS
513: (
514: l_api_name,
515: G_PKG_NAME,
516: 'OKL_API.G_RET_STS_ERROR',
517: x_msg_count,
518: x_msg_data,
519: '_PVT'
520: );
519: '_PVT'
520: );
521:
522:
523: WHEN OKL_API.G_EXCEPTION_ERROR THEN
524: x_return_status := OKL_API.HANDLE_EXCEPTIONS
525: (
526: l_api_name,
527: G_PKG_NAME,
520: );
521:
522:
523: WHEN OKL_API.G_EXCEPTION_ERROR THEN
524: x_return_status := OKL_API.HANDLE_EXCEPTIONS
525: (
526: l_api_name,
527: G_PKG_NAME,
528: 'OKL_API.G_RET_STS_ERROR',
524: x_return_status := OKL_API.HANDLE_EXCEPTIONS
525: (
526: l_api_name,
527: G_PKG_NAME,
528: 'OKL_API.G_RET_STS_ERROR',
529: x_msg_count,
530: x_msg_data,
531: '_PVT'
532: );
531: '_PVT'
532: );
533:
534: WHEN OTHERS THEN
535: x_return_status := OKL_API.HANDLE_EXCEPTIONS
536: (
537: l_api_name,
538: G_PKG_NAME,
539: 'OKL_API.G_OTHERS',
535: x_return_status := OKL_API.HANDLE_EXCEPTIONS
536: (
537: l_api_name,
538: G_PKG_NAME,
539: 'OKL_API.G_OTHERS',
540: x_msg_count,
541: x_msg_data,
542: '_PVT'
543: );
603: END;
604: END IF;
605: l_batch_id := p_batch_id;
606: l_api_version := 1.0;
607: l_init_msg_list := OKL_API.g_false;
608: l_msg_count := 0;
609:
610: SAVEPOINT delete_xmlp_params_PVT;
611: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
607: l_init_msg_list := OKL_API.g_false;
608: l_msg_count := 0;
609:
610: SAVEPOINT delete_xmlp_params_PVT;
611: l_return_status := OKL_API.START_ACTIVITY( l_api_name,
612: G_PKG_NAME,
613: p_init_msg_list,
614: l_api_version,
615: p_api_version,
615: p_api_version,
616: '_PVT',
617: l_return_status);
618:
619: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
622: RAISE OKL_API.G_EXCEPTION_ERROR;
623: END IF;
616: '_PVT',
617: l_return_status);
618:
619: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
622: RAISE OKL_API.G_EXCEPTION_ERROR;
623: END IF;
624:
617: l_return_status);
618:
619: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
622: RAISE OKL_API.G_EXCEPTION_ERROR;
623: END IF;
624:
625: -- Call TAPI to delete the xmlp params in table OKL_XMLP_PARAMS based on the batch id.
618:
619: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
622: RAISE OKL_API.G_EXCEPTION_ERROR;
623: END IF;
624:
625: -- Call TAPI to delete the xmlp params in table OKL_XMLP_PARAMS based on the batch id.
626: FOR each_row IN c_get_param_ids(l_batch_id) LOOP
631: l_return_status,
632: l_msg_count,
633: l_msg_data,
634: l_xmp_rec);
635: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
637: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
638: RAISE OKL_API.G_EXCEPTION_ERROR;
639: END IF;
632: l_msg_count,
633: l_msg_data,
634: l_xmp_rec);
635: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
637: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
638: RAISE OKL_API.G_EXCEPTION_ERROR;
639: END IF;
640: END LOOP;
633: l_msg_data,
634: l_xmp_rec);
635: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
637: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
638: RAISE OKL_API.G_EXCEPTION_ERROR;
639: END IF;
640: END LOOP;
641:
634: l_xmp_rec);
635: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
636: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
637: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
638: RAISE OKL_API.G_EXCEPTION_ERROR;
639: END IF;
640: END LOOP;
641:
642:
639: END IF;
640: END LOOP;
641:
642:
643: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
644: x_return_status := l_return_status;
645: x_msg_data := l_msg_data;
646: x_msg_count := l_msg_count;
647:
652: END IF;
653:
654: EXCEPTION
655: WHEN G_EXCEPTION_HALT_VALIDATION THEN
656: x_return_status := OKL_API.HANDLE_EXCEPTIONS
657: (
658: l_api_name,
659: G_PKG_NAME,
660: 'OKL_API.G_RET_STS_ERROR',
656: x_return_status := OKL_API.HANDLE_EXCEPTIONS
657: (
658: l_api_name,
659: G_PKG_NAME,
660: 'OKL_API.G_RET_STS_ERROR',
661: x_msg_count,
662: x_msg_data,
663: '_PVT'
664: );
662: x_msg_data,
663: '_PVT'
664: );
665:
666: WHEN OKL_API.G_EXCEPTION_ERROR THEN
667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
668: (
669: l_api_name,
670: G_PKG_NAME,
663: '_PVT'
664: );
665:
666: WHEN OKL_API.G_EXCEPTION_ERROR THEN
667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
668: (
669: l_api_name,
670: G_PKG_NAME,
671: 'OKL_API.G_RET_STS_ERROR',
667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
668: (
669: l_api_name,
670: G_PKG_NAME,
671: 'OKL_API.G_RET_STS_ERROR',
672: x_msg_count,
673: x_msg_data,
674: '_PVT'
675: );
674: '_PVT'
675: );
676:
677: WHEN OTHERS THEN
678: x_return_status := OKL_API.HANDLE_EXCEPTIONS
679: (
680: l_api_name,
681: G_PKG_NAME,
682: 'OKL_API.G_OTHERS',
678: x_return_status := OKL_API.HANDLE_EXCEPTIONS
679: (
680: l_api_name,
681: G_PKG_NAME,
682: 'OKL_API.G_OTHERS',
683: x_msg_count,
684: x_msg_data,
685: '_PVT'
686: );
737: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRXMPB.pls call okl_xmp_pvt.validate_row ');
738: END;
739: END IF;
740: l_api_version := 1.0;
741: l_return_status := OKL_API.G_RET_STS_SUCCESS;
742:
743: -- call START_ACTIVITY to create savepoint, check compatibility
744: -- and initialize message list
745:
742:
743: -- call START_ACTIVITY to create savepoint, check compatibility
744: -- and initialize message list
745:
746: l_return_status := OKL_API.START_ACTIVITY(
747: p_api_name => l_api_name,
748: p_pkg_name => g_pkg_name,
749: p_init_msg_list => p_init_msg_list,
750: l_api_version => l_api_version,
752: p_api_type => g_api_type,
753: x_return_status => x_return_status);
754:
755: -- check if activity started successfully
756: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
757: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
759: raise OKL_API.G_EXCEPTION_ERROR;
760: End If;
753: x_return_status => x_return_status);
754:
755: -- check if activity started successfully
756: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
757: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
759: raise OKL_API.G_EXCEPTION_ERROR;
760: End If;
761:
754:
755: -- check if activity started successfully
756: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
757: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
759: raise OKL_API.G_EXCEPTION_ERROR;
760: End If;
761:
762: -- TAPI call to validate the records.
755: -- check if activity started successfully
756: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
757: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
759: raise OKL_API.G_EXCEPTION_ERROR;
760: End If;
761:
762: -- TAPI call to validate the records.
763: okl_xmp_pvt.validate_row(
768: x_msg_data => x_msg_data,
769: p_xmp_rec => l_xmp_rec);
770:
771: -- check return status
772: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
773: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
774: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
775: raise OKL_API.G_EXCEPTION_ERROR;
776: End If;
769: p_xmp_rec => l_xmp_rec);
770:
771: -- check return status
772: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
773: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
774: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
775: raise OKL_API.G_EXCEPTION_ERROR;
776: End If;
777:
770:
771: -- check return status
772: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
773: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
774: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
775: raise OKL_API.G_EXCEPTION_ERROR;
776: End If;
777:
778: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
771: -- check return status
772: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
773: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
774: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
775: raise OKL_API.G_EXCEPTION_ERROR;
776: End If;
777:
778: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
779: x_msg_data => x_msg_data);
774: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
775: raise OKL_API.G_EXCEPTION_ERROR;
776: End If;
777:
778: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
779: x_msg_data => x_msg_data);
780:
781: IF(IS_DEBUG_PROCEDURE_ON) THEN
782: BEGIN
784: END;
785: END IF;
786:
787: EXCEPTION
788: when OKL_API.G_EXCEPTION_ERROR then
789: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
790: p_api_name => l_api_name,
791: p_pkg_name => g_pkg_name,
792: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
785: END IF;
786:
787: EXCEPTION
788: when OKL_API.G_EXCEPTION_ERROR then
789: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
790: p_api_name => l_api_name,
791: p_pkg_name => g_pkg_name,
792: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
793: x_msg_count => x_msg_count,
788: when OKL_API.G_EXCEPTION_ERROR then
789: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
790: p_api_name => l_api_name,
791: p_pkg_name => g_pkg_name,
792: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
793: x_msg_count => x_msg_count,
794: x_msg_data => x_msg_data,
795: p_api_type => g_api_type);
796:
793: x_msg_count => x_msg_count,
794: x_msg_data => x_msg_data,
795: p_api_type => g_api_type);
796:
797: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
798: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
799: p_api_name => l_api_name,
800: p_pkg_name => g_pkg_name,
801: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
794: x_msg_data => x_msg_data,
795: p_api_type => g_api_type);
796:
797: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
798: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
799: p_api_name => l_api_name,
800: p_pkg_name => g_pkg_name,
801: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
802: x_msg_count => x_msg_count,
797: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
798: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
799: p_api_name => l_api_name,
800: p_pkg_name => g_pkg_name,
801: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
802: x_msg_count => x_msg_count,
803: x_msg_data => x_msg_data,
804: p_api_type => g_api_type);
805:
803: x_msg_data => x_msg_data,
804: p_api_type => g_api_type);
805:
806: when OTHERS then
807: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
808: p_api_name => l_api_name,
809: p_pkg_name => g_pkg_name,
810: p_exc_name => 'OTHERS',
811: x_msg_count => x_msg_count,
862: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRXMPB.pls call okl_xmp_pvt.validate_row ');
863: END;
864: END IF;
865: l_api_version := 1.0;
866: l_return_status := OKL_API.G_RET_STS_SUCCESS;
867:
868: -- call START_ACTIVITY to create savepoint, check compatibility
869: -- and initialize message list
870:
867:
868: -- call START_ACTIVITY to create savepoint, check compatibility
869: -- and initialize message list
870:
871: l_return_status := OKL_API.START_ACTIVITY(
872: p_api_name => l_api_name,
873: p_pkg_name => g_pkg_name,
874: p_init_msg_list => p_init_msg_list,
875: l_api_version => l_api_version,
877: p_api_type => g_api_type,
878: x_return_status => x_return_status);
879:
880: -- check if activity started successfully
881: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
882: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
884: raise OKL_API.G_EXCEPTION_ERROR;
885: End If;
878: x_return_status => x_return_status);
879:
880: -- check if activity started successfully
881: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
882: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
884: raise OKL_API.G_EXCEPTION_ERROR;
885: End If;
886:
879:
880: -- check if activity started successfully
881: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
882: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
884: raise OKL_API.G_EXCEPTION_ERROR;
885: End If;
886:
887:
880: -- check if activity started successfully
881: If (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) then
882: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: Elsif (l_return_status = OKL_API.G_RET_STS_ERROR) then
884: raise OKL_API.G_EXCEPTION_ERROR;
885: End If;
886:
887:
888: -- TAPI call to validate the records.
894: x_msg_data => x_msg_data,
895: p_xmp_tbl => l_xmp_tbl);
896:
897: -- check return status
898: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
901: raise OKL_API.G_EXCEPTION_ERROR;
902: End If;
895: p_xmp_tbl => l_xmp_tbl);
896:
897: -- check return status
898: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
901: raise OKL_API.G_EXCEPTION_ERROR;
902: End If;
903:
896:
897: -- check return status
898: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
901: raise OKL_API.G_EXCEPTION_ERROR;
902: End If;
903:
904: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
897: -- check return status
898: If x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
901: raise OKL_API.G_EXCEPTION_ERROR;
902: End If;
903:
904: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
905: x_msg_data => x_msg_data);
900: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
901: raise OKL_API.G_EXCEPTION_ERROR;
902: End If;
903:
904: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
905: x_msg_data => x_msg_data);
906:
907: IF(IS_DEBUG_PROCEDURE_ON) THEN
908: BEGIN
910: END;
911: END IF;
912:
913: EXCEPTION
914: when OKL_API.G_EXCEPTION_ERROR then
915: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
916: p_api_name => l_api_name,
917: p_pkg_name => g_pkg_name,
918: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
911: END IF;
912:
913: EXCEPTION
914: when OKL_API.G_EXCEPTION_ERROR then
915: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
916: p_api_name => l_api_name,
917: p_pkg_name => g_pkg_name,
918: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
919: x_msg_count => x_msg_count,
914: when OKL_API.G_EXCEPTION_ERROR then
915: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
916: p_api_name => l_api_name,
917: p_pkg_name => g_pkg_name,
918: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
919: x_msg_count => x_msg_count,
920: x_msg_data => x_msg_data,
921: p_api_type => g_api_type);
922:
919: x_msg_count => x_msg_count,
920: x_msg_data => x_msg_data,
921: p_api_type => g_api_type);
922:
923: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
924: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
925: p_api_name => l_api_name,
926: p_pkg_name => g_pkg_name,
927: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
920: x_msg_data => x_msg_data,
921: p_api_type => g_api_type);
922:
923: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
924: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
925: p_api_name => l_api_name,
926: p_pkg_name => g_pkg_name,
927: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
928: x_msg_count => x_msg_count,
923: when OKL_API.G_EXCEPTION_UNEXPECTED_ERROR then
924: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
925: p_api_name => l_api_name,
926: p_pkg_name => g_pkg_name,
927: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
928: x_msg_count => x_msg_count,
929: x_msg_data => x_msg_data,
930: p_api_type => g_api_type);
931:
929: x_msg_data => x_msg_data,
930: p_api_type => g_api_type);
931:
932: when OTHERS then
933: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
934: p_api_name => l_api_name,
935: p_pkg_name => g_pkg_name,
936: p_exc_name => 'OTHERS',
937: x_msg_count => x_msg_count,