47:
48:
49: PROCEDURE process_billing_setup(
50: p_api_version IN NUMBER,
51: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
52: x_return_status OUT NOCOPY VARCHAR2,
53: x_msg_count OUT NOCOPY NUMBER,
54: x_msg_data OUT NOCOPY VARCHAR2,
55: p_rgpv_rec IN billing_setup_rec_type,
123: x_msg_data => x_msg_data,
124: p_rgpv_rec => lp_labill_rgpv_rec,
125: x_rgpv_rec => lx_labill_rgpv_rec);
126:
127: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
128: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
129: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
130: RAISE OKC_API.G_EXCEPTION_ERROR;
131: END IF;
124: p_rgpv_rec => lp_labill_rgpv_rec,
125: x_rgpv_rec => lx_labill_rgpv_rec);
126:
127: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
128: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
129: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
130: RAISE OKC_API.G_EXCEPTION_ERROR;
131: END IF;
132:
125: x_rgpv_rec => lx_labill_rgpv_rec);
126:
127: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
128: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
129: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
130: RAISE OKC_API.G_EXCEPTION_ERROR;
131: END IF;
132:
133: x_rgpv_rec.rgp_id := lx_labill_rgpv_rec.id;
126:
127: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
128: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
129: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
130: RAISE OKC_API.G_EXCEPTION_ERROR;
131: END IF;
132:
133: x_rgpv_rec.rgp_id := lx_labill_rgpv_rec.id;
134: x_rgpv_rec.rgp_labill_lapmth_id := lx_labill_rgpv_rec.id;
152: x_msg_data => x_msg_data,
153: p_rgpv_rec => lp_labill_rgpv_rec,
154: x_rgpv_rec => lx_labill_rgpv_rec);
155:
156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
159: RAISE OKC_API.G_EXCEPTION_ERROR;
160: END IF;
153: p_rgpv_rec => lp_labill_rgpv_rec,
154: x_rgpv_rec => lx_labill_rgpv_rec);
155:
156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
159: RAISE OKC_API.G_EXCEPTION_ERROR;
160: END IF;
161: x_rgpv_rec.rgp_id := p_rgpv_rec.rgp_id;
154: x_rgpv_rec => lx_labill_rgpv_rec);
155:
156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
159: RAISE OKC_API.G_EXCEPTION_ERROR;
160: END IF;
161: x_rgpv_rec.rgp_id := p_rgpv_rec.rgp_id;
162:
155:
156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
159: RAISE OKC_API.G_EXCEPTION_ERROR;
160: END IF;
161: x_rgpv_rec.rgp_id := p_rgpv_rec.rgp_id;
162:
163: END IF;
177: p_khrv_rec => lp_khrv_rec,
178: x_chrv_rec => lx_chrv_rec,
179: x_khrv_rec => lx_khrv_rec);
180:
181: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
182: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
183: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
184: RAISE OKC_API.G_EXCEPTION_ERROR;
185: END IF;
178: x_chrv_rec => lx_chrv_rec,
179: x_khrv_rec => lx_khrv_rec);
180:
181: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
182: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
183: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
184: RAISE OKC_API.G_EXCEPTION_ERROR;
185: END IF;
186:
179: x_khrv_rec => lx_khrv_rec);
180:
181: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
182: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
183: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
184: RAISE OKC_API.G_EXCEPTION_ERROR;
185: END IF;
186:
187:
180:
181: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
182: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
183: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
184: RAISE OKC_API.G_EXCEPTION_ERROR;
185: END IF;
186:
187:
188: IF (p_rgpv_rec.rul_lapmth_id IS NULL) THEN
207: x_msg_data => x_msg_data,
208: p_rulv_rec => lp_lapmth_rulv_rec,
209: x_rulv_rec => lx_lapmth_rulv_rec);
210:
211: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
214: RAISE OKC_API.G_EXCEPTION_ERROR;
215: END IF;
208: p_rulv_rec => lp_lapmth_rulv_rec,
209: x_rulv_rec => lx_lapmth_rulv_rec);
210:
211: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
214: RAISE OKC_API.G_EXCEPTION_ERROR;
215: END IF;
216:
209: x_rulv_rec => lx_lapmth_rulv_rec);
210:
211: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
214: RAISE OKC_API.G_EXCEPTION_ERROR;
215: END IF;
216:
217: x_rgpv_rec.rul_lapmth_id := lx_lapmth_rulv_rec.id;
210:
211: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
214: RAISE OKC_API.G_EXCEPTION_ERROR;
215: END IF;
216:
217: x_rgpv_rec.rul_lapmth_id := lx_lapmth_rulv_rec.id;
218:
243: x_msg_data => x_msg_data,
244: p_rulv_rec => lp_lapmth_rulv_rec,
245: x_rulv_rec => lx_lapmth_rulv_rec);
246:
247: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_ERROR;
251: END IF;
244: p_rulv_rec => lp_lapmth_rulv_rec,
245: x_rulv_rec => lx_lapmth_rulv_rec);
246:
247: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_ERROR;
251: END IF;
252:
245: x_rulv_rec => lx_lapmth_rulv_rec);
246:
247: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_ERROR;
251: END IF;
252:
253: END IF;
246:
247: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_ERROR;
251: END IF;
252:
253: END IF;
254:
275: x_msg_data => x_msg_data,
276: p_rulv_rec => lp_labacc_rulv_rec,
277: x_rulv_rec => lx_labacc_rulv_rec);
278:
279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
282: RAISE OKC_API.G_EXCEPTION_ERROR;
283: END IF;
276: p_rulv_rec => lp_labacc_rulv_rec,
277: x_rulv_rec => lx_labacc_rulv_rec);
278:
279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
282: RAISE OKC_API.G_EXCEPTION_ERROR;
283: END IF;
284:
277: x_rulv_rec => lx_labacc_rulv_rec);
278:
279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
282: RAISE OKC_API.G_EXCEPTION_ERROR;
283: END IF;
284:
285: x_rgpv_rec.rul_labacc_id := lx_labacc_rulv_rec.id;
278:
279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
282: RAISE OKC_API.G_EXCEPTION_ERROR;
283: END IF;
284:
285: x_rgpv_rec.rul_labacc_id := lx_labacc_rulv_rec.id;
286:
311: x_msg_data => x_msg_data,
312: p_rulv_rec => lp_labacc_rulv_rec,
313: x_rulv_rec => lx_labacc_rulv_rec);
314:
315: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
318: RAISE OKC_API.G_EXCEPTION_ERROR;
319: END IF;
312: p_rulv_rec => lp_labacc_rulv_rec,
313: x_rulv_rec => lx_labacc_rulv_rec);
314:
315: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
318: RAISE OKC_API.G_EXCEPTION_ERROR;
319: END IF;
320:
313: x_rulv_rec => lx_labacc_rulv_rec);
314:
315: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
318: RAISE OKC_API.G_EXCEPTION_ERROR;
319: END IF;
320:
321: END IF;
314:
315: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
318: RAISE OKC_API.G_EXCEPTION_ERROR;
319: END IF;
320:
321: END IF;
322:
354: x_msg_data => x_msg_data,
355: p_rulv_rec => lp_lainvd_rulv_rec,
356: x_rulv_rec => lx_lainvd_rulv_rec);
357:
358: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
359: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_ERROR;
362: END IF;
355: p_rulv_rec => lp_lainvd_rulv_rec,
356: x_rulv_rec => lx_lainvd_rulv_rec);
357:
358: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
359: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_ERROR;
362: END IF;
363:
356: x_rulv_rec => lx_lainvd_rulv_rec);
357:
358: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
359: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_ERROR;
362: END IF;
363:
364: x_rgpv_rec.rul_lainvd_id := lx_lainvd_rulv_rec.id;
357:
358: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
359: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_ERROR;
362: END IF;
363:
364: x_rgpv_rec.rul_lainvd_id := lx_lainvd_rulv_rec.id;
365:
401: x_msg_data => x_msg_data,
402: p_rulv_rec => lp_lainvd_rulv_rec,
403: x_rulv_rec => lx_lainvd_rulv_rec);
404:
405: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
406: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
407: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
408: RAISE OKC_API.G_EXCEPTION_ERROR;
409: END IF;
402: p_rulv_rec => lp_lainvd_rulv_rec,
403: x_rulv_rec => lx_lainvd_rulv_rec);
404:
405: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
406: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
407: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
408: RAISE OKC_API.G_EXCEPTION_ERROR;
409: END IF;
410:
403: x_rulv_rec => lx_lainvd_rulv_rec);
404:
405: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
406: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
407: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
408: RAISE OKC_API.G_EXCEPTION_ERROR;
409: END IF;
410:
411: END IF;
404:
405: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
406: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
407: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
408: RAISE OKC_API.G_EXCEPTION_ERROR;
409: END IF;
410:
411: END IF;
412:
429: x_msg_data => x_msg_data,
430: p_rulv_rec => lp_lainpr_rulv_rec,
431: x_rulv_rec => lx_lainpr_rulv_rec);
432:
433: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
434: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
435: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
436: RAISE OKC_API.G_EXCEPTION_ERROR;
437: END IF;
430: p_rulv_rec => lp_lainpr_rulv_rec,
431: x_rulv_rec => lx_lainpr_rulv_rec);
432:
433: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
434: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
435: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
436: RAISE OKC_API.G_EXCEPTION_ERROR;
437: END IF;
438:
431: x_rulv_rec => lx_lainpr_rulv_rec);
432:
433: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
434: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
435: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
436: RAISE OKC_API.G_EXCEPTION_ERROR;
437: END IF;
438:
439: x_rgpv_rec.rul_lainpr_id := lx_lainpr_rulv_rec.id;
432:
433: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
434: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
435: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
436: RAISE OKC_API.G_EXCEPTION_ERROR;
437: END IF;
438:
439: x_rgpv_rec.rul_lainpr_id := lx_lainpr_rulv_rec.id;
440:
457: x_msg_data => x_msg_data,
458: p_rulv_rec => lp_lainpr_rulv_rec,
459: x_rulv_rec => lx_lainpr_rulv_rec);
460:
461: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
462: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
464: RAISE OKC_API.G_EXCEPTION_ERROR;
465: END IF;
458: p_rulv_rec => lp_lainpr_rulv_rec,
459: x_rulv_rec => lx_lainpr_rulv_rec);
460:
461: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
462: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
464: RAISE OKC_API.G_EXCEPTION_ERROR;
465: END IF;
466:
459: x_rulv_rec => lx_lainpr_rulv_rec);
460:
461: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
462: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
464: RAISE OKC_API.G_EXCEPTION_ERROR;
465: END IF;
466:
467: END IF;
460:
461: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
462: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
464: RAISE OKC_API.G_EXCEPTION_ERROR;
465: END IF;
466:
467: END IF;
468:
465: END IF;
466:
467: END IF;
468:
469: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
470:
471: EXCEPTION
472: WHEN OKC_API.G_EXCEPTION_ERROR THEN
473: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
468:
469: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
470:
471: EXCEPTION
472: WHEN OKC_API.G_EXCEPTION_ERROR THEN
473: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
474: p_api_name => l_api_name,
475: p_pkg_name => g_pkg_name,
476: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
469: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
470:
471: EXCEPTION
472: WHEN OKC_API.G_EXCEPTION_ERROR THEN
473: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
474: p_api_name => l_api_name,
475: p_pkg_name => g_pkg_name,
476: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
477: x_msg_count => x_msg_count,
472: WHEN OKC_API.G_EXCEPTION_ERROR THEN
473: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
474: p_api_name => l_api_name,
475: p_pkg_name => g_pkg_name,
476: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
477: x_msg_count => x_msg_count,
478: x_msg_data => x_msg_data,
479: p_api_type => g_api_type);
480:
477: x_msg_count => x_msg_count,
478: x_msg_data => x_msg_data,
479: p_api_type => g_api_type);
480:
481: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
482: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
483: p_api_name => l_api_name,
484: p_pkg_name => g_pkg_name,
485: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
478: x_msg_data => x_msg_data,
479: p_api_type => g_api_type);
480:
481: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
482: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
483: p_api_name => l_api_name,
484: p_pkg_name => g_pkg_name,
485: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
486: x_msg_count => x_msg_count,
481: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
482: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
483: p_api_name => l_api_name,
484: p_pkg_name => g_pkg_name,
485: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
486: x_msg_count => x_msg_count,
487: x_msg_data => x_msg_data,
488: p_api_type => g_api_type);
489:
487: x_msg_data => x_msg_data,
488: p_api_type => g_api_type);
489:
490: WHEN OTHERS THEN
491: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
492: p_api_name => l_api_name,
493: p_pkg_name => g_pkg_name,
494: p_exc_name => 'OTHERS',
495: x_msg_count => x_msg_count,
498: END process_billing_setup;
499:
500: PROCEDURE process_rvi(
501: p_api_version IN NUMBER,
502: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
503: x_return_status OUT NOCOPY VARCHAR2,
504: x_msg_count OUT NOCOPY NUMBER,
505: x_msg_data OUT NOCOPY VARCHAR2,
506: p_rgpv_rec IN rvi_rec_type,
558: x_msg_data => x_msg_data,
559: p_rgpv_rec => lp_larvin_rgpv_rec,
560: x_rgpv_rec => lx_larvin_rgpv_rec);
561:
562: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
564: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
565: RAISE OKC_API.G_EXCEPTION_ERROR;
566: END IF;
559: p_rgpv_rec => lp_larvin_rgpv_rec,
560: x_rgpv_rec => lx_larvin_rgpv_rec);
561:
562: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
564: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
565: RAISE OKC_API.G_EXCEPTION_ERROR;
566: END IF;
567:
560: x_rgpv_rec => lx_larvin_rgpv_rec);
561:
562: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
564: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
565: RAISE OKC_API.G_EXCEPTION_ERROR;
566: END IF;
567:
568: x_rgpv_rec.rgp_id := lx_larvin_rgpv_rec.id;
561:
562: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
564: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
565: RAISE OKC_API.G_EXCEPTION_ERROR;
566: END IF;
567:
568: x_rgpv_rec.rgp_id := lx_larvin_rgpv_rec.id;
569:
584: x_msg_data => x_msg_data,
585: p_rgpv_rec => lp_larvin_rgpv_rec,
586: x_rgpv_rec => lx_larvin_rgpv_rec);
587:
588: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
589: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
590: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
591: RAISE OKC_API.G_EXCEPTION_ERROR;
592: END IF;
585: p_rgpv_rec => lp_larvin_rgpv_rec,
586: x_rgpv_rec => lx_larvin_rgpv_rec);
587:
588: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
589: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
590: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
591: RAISE OKC_API.G_EXCEPTION_ERROR;
592: END IF;
593:
586: x_rgpv_rec => lx_larvin_rgpv_rec);
587:
588: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
589: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
590: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
591: RAISE OKC_API.G_EXCEPTION_ERROR;
592: END IF;
593:
594: END IF;
587:
588: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
589: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
590: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
591: RAISE OKC_API.G_EXCEPTION_ERROR;
592: END IF;
593:
594: END IF;
595:
611: x_msg_data => x_msg_data,
612: p_rulv_rec => lp_larvau_rulv_rec,
613: x_rulv_rec => lx_larvau_rulv_rec);
614:
615: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
616: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
617: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
618: RAISE OKC_API.G_EXCEPTION_ERROR;
619: END IF;
612: p_rulv_rec => lp_larvau_rulv_rec,
613: x_rulv_rec => lx_larvau_rulv_rec);
614:
615: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
616: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
617: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
618: RAISE OKC_API.G_EXCEPTION_ERROR;
619: END IF;
620:
613: x_rulv_rec => lx_larvau_rulv_rec);
614:
615: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
616: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
617: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
618: RAISE OKC_API.G_EXCEPTION_ERROR;
619: END IF;
620:
621: x_rgpv_rec.rul_larvau_id := lx_larvau_rulv_rec.id;
614:
615: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
616: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
617: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
618: RAISE OKC_API.G_EXCEPTION_ERROR;
619: END IF;
620:
621: x_rgpv_rec.rul_larvau_id := lx_larvau_rulv_rec.id;
622:
639: x_msg_data => x_msg_data,
640: p_rulv_rec => lp_larvau_rulv_rec,
641: x_rulv_rec => lx_larvau_rulv_rec);
642:
643: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
646: RAISE OKC_API.G_EXCEPTION_ERROR;
647: END IF;
640: p_rulv_rec => lp_larvau_rulv_rec,
641: x_rulv_rec => lx_larvau_rulv_rec);
642:
643: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
646: RAISE OKC_API.G_EXCEPTION_ERROR;
647: END IF;
648:
641: x_rulv_rec => lx_larvau_rulv_rec);
642:
643: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
646: RAISE OKC_API.G_EXCEPTION_ERROR;
647: END IF;
648:
649: x_rgpv_rec.rul_larvau_id := lx_larvau_rulv_rec.id;
642:
643: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
646: RAISE OKC_API.G_EXCEPTION_ERROR;
647: END IF;
648:
649: x_rgpv_rec.rul_larvau_id := lx_larvau_rulv_rec.id;
650: END IF;
667: x_msg_data => x_msg_data,
668: p_rulv_rec => lp_larvam_rulv_rec,
669: x_rulv_rec => lx_larvam_rulv_rec);
670:
671: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: RAISE OKC_API.G_EXCEPTION_ERROR;
675: END IF;
668: p_rulv_rec => lp_larvam_rulv_rec,
669: x_rulv_rec => lx_larvam_rulv_rec);
670:
671: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: RAISE OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:
669: x_rulv_rec => lx_larvam_rulv_rec);
670:
671: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: RAISE OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:
677: x_rgpv_rec.rul_larvam_id := lx_larvam_rulv_rec.id;
670:
671: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: RAISE OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:
677: x_rgpv_rec.rul_larvam_id := lx_larvam_rulv_rec.id;
678:
695: x_msg_data => x_msg_data,
696: p_rulv_rec => lp_larvam_rulv_rec,
697: x_rulv_rec => lx_larvam_rulv_rec);
698:
699: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
696: p_rulv_rec => lp_larvam_rulv_rec,
697: x_rulv_rec => lx_larvam_rulv_rec);
698:
699: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:
697: x_rulv_rec => lx_larvam_rulv_rec);
698:
699: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:
705: x_rgpv_rec.rul_larvam_id := lx_larvam_rulv_rec.id;
698:
699: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:
705: x_rgpv_rec.rul_larvam_id := lx_larvam_rulv_rec.id;
706: END IF;
721: p_check_box_value => p_rgpv_rec.larvau_rule_information1,
722: p_fee_types_rec => lp_fee_types_rec,
723: x_fee_types_rec => lx_fee_types_rec);
724:
725: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
722: p_fee_types_rec => lp_fee_types_rec,
723: x_fee_types_rec => lx_fee_types_rec);
724:
725: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730:
723: x_fee_types_rec => lx_fee_types_rec);
724:
725: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730:
731: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
724:
725: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
727: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730:
731: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
732:
727: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
728: RAISE OKC_API.G_EXCEPTION_ERROR;
729: END IF;
730:
731: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
732:
733: EXCEPTION
734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
735: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
730:
731: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
732:
733: EXCEPTION
734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
735: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
736: p_api_name => l_api_name,
737: p_pkg_name => g_pkg_name,
738: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
731: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
732:
733: EXCEPTION
734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
735: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
736: p_api_name => l_api_name,
737: p_pkg_name => g_pkg_name,
738: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
739: x_msg_count => x_msg_count,
734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
735: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
736: p_api_name => l_api_name,
737: p_pkg_name => g_pkg_name,
738: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
739: x_msg_count => x_msg_count,
740: x_msg_data => x_msg_data,
741: p_api_type => g_api_type);
742:
739: x_msg_count => x_msg_count,
740: x_msg_data => x_msg_data,
741: p_api_type => g_api_type);
742:
743: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
744: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
745: p_api_name => l_api_name,
746: p_pkg_name => g_pkg_name,
747: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
740: x_msg_data => x_msg_data,
741: p_api_type => g_api_type);
742:
743: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
744: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
745: p_api_name => l_api_name,
746: p_pkg_name => g_pkg_name,
747: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
748: x_msg_count => x_msg_count,
743: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
744: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
745: p_api_name => l_api_name,
746: p_pkg_name => g_pkg_name,
747: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
748: x_msg_count => x_msg_count,
749: x_msg_data => x_msg_data,
750: p_api_type => g_api_type);
751:
749: x_msg_data => x_msg_data,
750: p_api_type => g_api_type);
751:
752: WHEN OTHERS THEN
753: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
754: p_api_name => l_api_name,
755: p_pkg_name => g_pkg_name,
756: p_exc_name => 'OTHERS',
757: x_msg_count => x_msg_count,