10:
11:
12: PROCEDURE create_debit_memo(
13: p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
15: p_sel_id IN NUMBER,
16: x_return_status OUT NOCOPY VARCHAR2,
17: x_msg_count OUT NOCOPY NUMBER,
18: x_msg_data OUT NOCOPY VARCHAR2) IS
16: x_return_status OUT NOCOPY VARCHAR2,
17: x_msg_count OUT NOCOPY NUMBER,
18: x_msg_data OUT NOCOPY VARCHAR2) IS
19:
20: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
21: l_api_version CONSTANT NUMBER := 1;
22: l_api_name CONSTANT VARCHAR2(30) := 'create_debit_memo';
23:
24: -----------------------------------------------------------------
153: BEGIN
154: IF (G_DEBUG_ENABLED = 'Y') THEN
155: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
156: END IF;
157: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
158: G_PKG_NAME,
159: p_init_msg_list,
160: l_api_version,
161: p_api_version,
161: p_api_version,
162: '_PVT',
163: l_return_status);
164:
165: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
166: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
167: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
168: RAISE OKL_API.G_EXCEPTION_ERROR;
169: END IF;
162: '_PVT',
163: l_return_status);
164:
165: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
166: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
167: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
168: RAISE OKL_API.G_EXCEPTION_ERROR;
169: END IF;
170:
163: l_return_status);
164:
165: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
166: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
167: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
168: RAISE OKL_API.G_EXCEPTION_ERROR;
169: END IF;
170:
171: -- Processing starts
164:
165: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
166: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
167: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
168: RAISE OKL_API.G_EXCEPTION_ERROR;
169: END IF;
170:
171: -- Processing starts
172:
258: ,p_tplv_tbl => l_tplv_tbl
259: ,x_tapv_rec => lx_tapv_rec
260: ,x_tplv_tbl => lx_tplv_tbl);
261:
262: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
263: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
264: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
265: l_created_tpl := FALSE;
266: END IF;
259: ,x_tapv_rec => lx_tapv_rec
260: ,x_tplv_tbl => lx_tplv_tbl);
261:
262: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
263: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
264: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
265: l_created_tpl := FALSE;
266: END IF;
267:
260: ,x_tplv_tbl => lx_tplv_tbl);
261:
262: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
263: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
264: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
265: l_created_tpl := FALSE;
266: END IF;
267:
268: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
314: -- OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'after updating lsm with Reversed status, Status : ' || l_return_status); -- rmunjulu R12 Billing Fixes: commented
315: -- rmunjulu R12 Billing Fixes
316: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'after updating TLD with Reversed status, Status : ' || l_return_status);
317: END IF;
318: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
320: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
321: RAISE OKL_API.G_EXCEPTION_ERROR;
322: END IF;
315: -- rmunjulu R12 Billing Fixes
316: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'after updating TLD with Reversed status, Status : ' || l_return_status);
317: END IF;
318: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
320: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
321: RAISE OKL_API.G_EXCEPTION_ERROR;
322: END IF;
323: END IF;
316: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'after updating TLD with Reversed status, Status : ' || l_return_status);
317: END IF;
318: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
320: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
321: RAISE OKL_API.G_EXCEPTION_ERROR;
322: END IF;
323: END IF;
324: END LOOP;
317: END IF;
318: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
320: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
321: RAISE OKL_API.G_EXCEPTION_ERROR;
322: END IF;
323: END IF;
324: END LOOP;
325:
325:
326: -- Processing ends
327:
328: x_return_status := l_return_status;
329: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
330: EXCEPTION
331: WHEN OKL_API.G_EXCEPTION_ERROR THEN
332: x_return_status := OKL_API.G_RET_STS_ERROR;
333: WHEN OTHERS THEN
327:
328: x_return_status := l_return_status;
329: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
330: EXCEPTION
331: WHEN OKL_API.G_EXCEPTION_ERROR THEN
332: x_return_status := OKL_API.G_RET_STS_ERROR;
333: WHEN OTHERS THEN
334: x_return_status := OKL_API.HANDLE_EXCEPTIONS
335: (
328: x_return_status := l_return_status;
329: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
330: EXCEPTION
331: WHEN OKL_API.G_EXCEPTION_ERROR THEN
332: x_return_status := OKL_API.G_RET_STS_ERROR;
333: WHEN OTHERS THEN
334: x_return_status := OKL_API.HANDLE_EXCEPTIONS
335: (
336: l_api_name,
330: EXCEPTION
331: WHEN OKL_API.G_EXCEPTION_ERROR THEN
332: x_return_status := OKL_API.G_RET_STS_ERROR;
333: WHEN OTHERS THEN
334: x_return_status := OKL_API.HANDLE_EXCEPTIONS
335: (
336: l_api_name,
337: G_PKG_NAME,
338: 'OTHERS',
371: ---------------------------------------------------------------------------
372:
373: PROCEDURE get_billing_adjust(
374: p_api_version IN NUMBER,
375: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
376: p_input_tbl IN input_tbl_type,
377: x_baj_tbl OUT NOCOPY baj_tbl_type,
378: x_return_status OUT NOCOPY VARCHAR2,
379: x_msg_count OUT NOCOPY NUMBER,
378: x_return_status OUT NOCOPY VARCHAR2,
379: x_msg_count OUT NOCOPY NUMBER,
380: x_msg_data OUT NOCOPY VARCHAR2) IS
381:
382: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
383: l_api_version CONSTANT NUMBER := 1;
384: l_api_name CONSTANT VARCHAR2(30) := 'get_billing_adjust';
385:
386: l_input_rec input_rec_type;
488: l_int_arrears_pay_option OKL_ST_GEN_TMPT_SETS.ISG_ARREARS_PAY_DATES_OPTION%TYPE;
489: --end Bug 7456516
490:
491: BEGIN
492: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
493: G_PKG_NAME,
494: p_init_msg_list,
495: l_api_version,
496: p_api_version,
496: p_api_version,
497: '_PVT',
498: l_return_status);
499:
500: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
501: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
502: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
503: RAISE OKL_API.G_EXCEPTION_ERROR;
504: END IF;
497: '_PVT',
498: l_return_status);
499:
500: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
501: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
502: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
503: RAISE OKL_API.G_EXCEPTION_ERROR;
504: END IF;
505:
498: l_return_status);
499:
500: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
501: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
502: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
503: RAISE OKL_API.G_EXCEPTION_ERROR;
504: END IF;
505:
506: -- Processing starts
499:
500: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
501: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
502: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
503: RAISE OKL_API.G_EXCEPTION_ERROR;
504: END IF;
505:
506: -- Processing starts
507: l_input_tbl := p_input_tbl;
565: --end Bug 7456516
566: END LOOP;
567: END LOOP;
568: --akrangan Bug 5655680 end --
569: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
572: RAISE okl_api.G_EXCEPTION_ERROR;
573: END IF;
566: END LOOP;
567: END LOOP;
568: --akrangan Bug 5655680 end --
569: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
572: RAISE okl_api.G_EXCEPTION_ERROR;
573: END IF;
574:
567: END LOOP;
568: --akrangan Bug 5655680 end --
569: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
572: RAISE okl_api.G_EXCEPTION_ERROR;
573: END IF;
574:
575: input_cnt := l_input_tbl.NEXT(input_cnt);
568: --akrangan Bug 5655680 end --
569: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
572: RAISE okl_api.G_EXCEPTION_ERROR;
573: END IF;
574:
575: input_cnt := l_input_tbl.NEXT(input_cnt);
576: END LOOP;
578: -- Processing ends
579: x_baj_tbl := lx_baj_tbl;
580: x_return_status := l_return_status;
581:
582: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
583: EXCEPTION
584: WHEN OKL_API.G_EXCEPTION_ERROR THEN
585: x_return_status := OKL_API.G_RET_STS_ERROR;
586: WHEN OTHERS THEN
580: x_return_status := l_return_status;
581:
582: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
583: EXCEPTION
584: WHEN OKL_API.G_EXCEPTION_ERROR THEN
585: x_return_status := OKL_API.G_RET_STS_ERROR;
586: WHEN OTHERS THEN
587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
588: (
581:
582: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
583: EXCEPTION
584: WHEN OKL_API.G_EXCEPTION_ERROR THEN
585: x_return_status := OKL_API.G_RET_STS_ERROR;
586: WHEN OTHERS THEN
587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
588: (
589: l_api_name,
583: EXCEPTION
584: WHEN OKL_API.G_EXCEPTION_ERROR THEN
585: x_return_status := OKL_API.G_RET_STS_ERROR;
586: WHEN OTHERS THEN
587: x_return_status := OKL_API.HANDLE_EXCEPTIONS
588: (
589: l_api_name,
590: G_PKG_NAME,
591: 'OTHERS',
598: ---------------------------------------------------------------------------
599:
600: PROCEDURE get_unbilled_recvbl(
601: p_api_version IN NUMBER,
602: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
603: p_input_tbl IN input_tbl_type,
604: x_baj_tbl OUT NOCOPY baj_tbl_type,
605: x_return_status OUT NOCOPY VARCHAR2,
606: x_msg_count OUT NOCOPY NUMBER,
605: x_return_status OUT NOCOPY VARCHAR2,
606: x_msg_count OUT NOCOPY NUMBER,
607: x_msg_data OUT NOCOPY VARCHAR2) IS
608:
609: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
610: l_api_version CONSTANT NUMBER := 1;
611: l_api_name CONSTANT VARCHAR2(30) := 'get_unbilled_recvbl';
612:
613: l_input_rec input_rec_type;
663: AND nvl(stm.kle_id, -99) = nvl(cp_kle_id, nvl(stm.kle_id, -99))
664: AND OKL_BPD_TERMINATION_ADJ_PVT.get_kle_status_code(stm.kle_id) IN ('ACTIVE', 'TERMINATED', 'HEADER_LEVEL')
665: ORDER BY 1, 2, 3;
666: BEGIN
667: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
668: G_PKG_NAME,
669: p_init_msg_list,
670: l_api_version,
671: p_api_version,
671: p_api_version,
672: '_PVT',
673: l_return_status);
674:
675: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
676: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_ERROR;
679: END IF;
672: '_PVT',
673: l_return_status);
674:
675: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
676: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_ERROR;
679: END IF;
680:
673: l_return_status);
674:
675: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
676: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_ERROR;
679: END IF;
680:
681: -- Processing starts
674:
675: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
676: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
677: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
678: RAISE OKL_API.G_EXCEPTION_ERROR;
679: END IF;
680:
681: -- Processing starts
682: l_input_tbl := p_input_tbl;
690: baj_cnt := baj_cnt + 1;
691: lx_baj_tbl(baj_cnt) := cur_bill_adj;
692: END LOOP;
693:
694: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
695: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
696: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
697: RAISE okl_api.G_EXCEPTION_ERROR;
698: END IF;
691: lx_baj_tbl(baj_cnt) := cur_bill_adj;
692: END LOOP;
693:
694: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
695: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
696: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
697: RAISE okl_api.G_EXCEPTION_ERROR;
698: END IF;
699:
692: END LOOP;
693:
694: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
695: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
696: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
697: RAISE okl_api.G_EXCEPTION_ERROR;
698: END IF;
699:
700: input_cnt := l_input_tbl.NEXT(input_cnt);
693:
694: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
695: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
696: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
697: RAISE okl_api.G_EXCEPTION_ERROR;
698: END IF;
699:
700: input_cnt := l_input_tbl.NEXT(input_cnt);
701: END LOOP;
703: -- Processing ends
704: x_baj_tbl := lx_baj_tbl;
705: x_return_status := l_return_status;
706:
707: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
708: EXCEPTION
709: WHEN OKL_API.G_EXCEPTION_ERROR THEN
710: x_return_status := OKL_API.G_RET_STS_ERROR;
711: WHEN OTHERS THEN
705: x_return_status := l_return_status;
706:
707: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
708: EXCEPTION
709: WHEN OKL_API.G_EXCEPTION_ERROR THEN
710: x_return_status := OKL_API.G_RET_STS_ERROR;
711: WHEN OTHERS THEN
712: x_return_status := OKL_API.HANDLE_EXCEPTIONS
713: (
706:
707: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
708: EXCEPTION
709: WHEN OKL_API.G_EXCEPTION_ERROR THEN
710: x_return_status := OKL_API.G_RET_STS_ERROR;
711: WHEN OTHERS THEN
712: x_return_status := OKL_API.HANDLE_EXCEPTIONS
713: (
714: l_api_name,
708: EXCEPTION
709: WHEN OKL_API.G_EXCEPTION_ERROR THEN
710: x_return_status := OKL_API.G_RET_STS_ERROR;
711: WHEN OTHERS THEN
712: x_return_status := OKL_API.HANDLE_EXCEPTIONS
713: (
714: l_api_name,
715: G_PKG_NAME,
716: 'OTHERS',
723: ---------------------------------------------------------------------------
724:
725: PROCEDURE create_passthru_adj(
726: p_api_version IN NUMBER,
727: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
728: p_baj_tbl IN baj_tbl_type,
729: x_return_status OUT NOCOPY VARCHAR2,
730: x_msg_count OUT NOCOPY NUMBER,
731: x_msg_data OUT NOCOPY VARCHAR2) IS
729: x_return_status OUT NOCOPY VARCHAR2,
730: x_msg_count OUT NOCOPY NUMBER,
731: x_msg_data OUT NOCOPY VARCHAR2) IS
732:
733: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
734: l_api_version CONSTANT NUMBER := 1;
735: l_api_name CONSTANT VARCHAR2(30) := 'create_passthru_adj';
736: l_ableto_complete BOOLEAN := TRUE;
737:
739: l_baj_tbl baj_tbl_type;
740:
741: cnt NUMBER;
742: BEGIN
743: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
744: G_PKG_NAME,
745: p_init_msg_list,
746: l_api_version,
747: p_api_version,
747: p_api_version,
748: '_PVT',
749: l_return_status);
750:
751: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
752: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
753: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
754: RAISE OKL_API.G_EXCEPTION_ERROR;
755: END IF;
748: '_PVT',
749: l_return_status);
750:
751: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
752: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
753: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
754: RAISE OKL_API.G_EXCEPTION_ERROR;
755: END IF;
756:
749: l_return_status);
750:
751: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
752: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
753: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
754: RAISE OKL_API.G_EXCEPTION_ERROR;
755: END IF;
756:
757: -- Processing starts
750:
751: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
752: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
753: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
754: RAISE OKL_API.G_EXCEPTION_ERROR;
755: END IF;
756:
757: -- Processing starts
758: l_baj_tbl := p_baj_tbl;
769: x_return_status => l_return_status,
770: x_msg_count => x_msg_count,
771: x_msg_data => x_msg_data);
772:
773: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
776: l_ableto_complete := FALSE;
777: END IF;
770: x_msg_count => x_msg_count,
771: x_msg_data => x_msg_data);
772:
773: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
776: l_ableto_complete := FALSE;
777: END IF;
778:
771: x_msg_data => x_msg_data);
772:
773: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
776: l_ableto_complete := FALSE;
777: END IF;
778:
779: cnt := l_baj_tbl.NEXT(cnt);
780: END LOOP;
781:
782: -- Processing ends
783: IF NOT(l_ableto_complete) THEN
784: x_return_status := OKL_API.G_RET_STS_ERROR;
785: ELSE
786: x_return_status := OKL_API.G_RET_STS_SUCCESS;
787: END IF;
788:
782: -- Processing ends
783: IF NOT(l_ableto_complete) THEN
784: x_return_status := OKL_API.G_RET_STS_ERROR;
785: ELSE
786: x_return_status := OKL_API.G_RET_STS_SUCCESS;
787: END IF;
788:
789: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
790: EXCEPTION
785: ELSE
786: x_return_status := OKL_API.G_RET_STS_SUCCESS;
787: END IF;
788:
789: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
790: EXCEPTION
791: WHEN OKL_API.G_EXCEPTION_ERROR THEN
792: x_return_status := OKL_API.G_RET_STS_ERROR;
793: WHEN OTHERS THEN
787: END IF;
788:
789: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
790: EXCEPTION
791: WHEN OKL_API.G_EXCEPTION_ERROR THEN
792: x_return_status := OKL_API.G_RET_STS_ERROR;
793: WHEN OTHERS THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
788:
789: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
790: EXCEPTION
791: WHEN OKL_API.G_EXCEPTION_ERROR THEN
792: x_return_status := OKL_API.G_RET_STS_ERROR;
793: WHEN OTHERS THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
796: l_api_name,
790: EXCEPTION
791: WHEN OKL_API.G_EXCEPTION_ERROR THEN
792: x_return_status := OKL_API.G_RET_STS_ERROR;
793: WHEN OTHERS THEN
794: x_return_status := OKL_API.HANDLE_EXCEPTIONS
795: (
796: l_api_name,
797: G_PKG_NAME,
798: 'OTHERS',
805: ---------------------------------------------------------------------------
806:
807: PROCEDURE get_unbilled_prop_tax(
808: p_api_version IN NUMBER,
809: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
810: p_input_tbl IN input_tbl_type,
811: x_baj_tbl OUT NOCOPY baj_tbl_type,
812: x_return_status OUT NOCOPY VARCHAR2,
813: x_msg_count OUT NOCOPY NUMBER,
812: x_return_status OUT NOCOPY VARCHAR2,
813: x_msg_count OUT NOCOPY NUMBER,
814: x_msg_data OUT NOCOPY VARCHAR2) IS
815:
816: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
817: l_api_version CONSTANT NUMBER := 1;
818: l_api_name CONSTANT VARCHAR2(30) := 'get_unbilled_prop_tax';
819:
820: l_input_rec input_rec_type;
882: AND sty.stream_type_purpose = 'ESTIMATED_PROPERTY_TAX'
883: ORDER BY 1, 2, 3;
884:
885: BEGIN
886: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
887: G_PKG_NAME,
888: p_init_msg_list,
889: l_api_version,
890: p_api_version,
890: p_api_version,
891: '_PVT',
892: l_return_status);
893:
894: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
896: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
897: RAISE OKL_API.G_EXCEPTION_ERROR;
898: END IF;
891: '_PVT',
892: l_return_status);
893:
894: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
896: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
897: RAISE OKL_API.G_EXCEPTION_ERROR;
898: END IF;
899:
892: l_return_status);
893:
894: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
896: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
897: RAISE OKL_API.G_EXCEPTION_ERROR;
898: END IF;
899:
900: -- Processing starts
893:
894: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
896: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
897: RAISE OKL_API.G_EXCEPTION_ERROR;
898: END IF;
899:
900: -- Processing starts
901: l_input_tbl := p_input_tbl;
909: baj_cnt := baj_cnt + 1;
910: lx_baj_tbl(baj_cnt) := cur_bill_adj;
911: END LOOP;
912:
913: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
914: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
915: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
916: RAISE okl_api.G_EXCEPTION_ERROR;
917: END IF;
910: lx_baj_tbl(baj_cnt) := cur_bill_adj;
911: END LOOP;
912:
913: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
914: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
915: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
916: RAISE okl_api.G_EXCEPTION_ERROR;
917: END IF;
918:
911: END LOOP;
912:
913: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
914: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
915: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
916: RAISE okl_api.G_EXCEPTION_ERROR;
917: END IF;
918:
919: input_cnt := l_input_tbl.NEXT(input_cnt);
912:
913: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
914: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
915: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
916: RAISE okl_api.G_EXCEPTION_ERROR;
917: END IF;
918:
919: input_cnt := l_input_tbl.NEXT(input_cnt);
920: END LOOP;
922: -- Processing ends
923: x_baj_tbl := lx_baj_tbl;
924: x_return_status := l_return_status;
925:
926: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
927: EXCEPTION
928: WHEN OKL_API.G_EXCEPTION_ERROR THEN
929: x_return_status := OKL_API.G_RET_STS_ERROR;
930: WHEN OTHERS THEN
924: x_return_status := l_return_status;
925:
926: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
927: EXCEPTION
928: WHEN OKL_API.G_EXCEPTION_ERROR THEN
929: x_return_status := OKL_API.G_RET_STS_ERROR;
930: WHEN OTHERS THEN
931: x_return_status := OKL_API.HANDLE_EXCEPTIONS
932: (
925:
926: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
927: EXCEPTION
928: WHEN OKL_API.G_EXCEPTION_ERROR THEN
929: x_return_status := OKL_API.G_RET_STS_ERROR;
930: WHEN OTHERS THEN
931: x_return_status := OKL_API.HANDLE_EXCEPTIONS
932: (
933: l_api_name,
927: EXCEPTION
928: WHEN OKL_API.G_EXCEPTION_ERROR THEN
929: x_return_status := OKL_API.G_RET_STS_ERROR;
930: WHEN OTHERS THEN
931: x_return_status := OKL_API.HANDLE_EXCEPTIONS
932: (
933: l_api_name,
934: G_PKG_NAME,
935: 'OTHERS',
943: --interface between rebook api and bpd processing apis by fmiao
944: ------------------------------------------------------------------
945: PROCEDURE create_rbk_passthru_adj(
946: p_api_version IN NUMBER,
947: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
948: p_rebook_adj_tbl IN rebook_adj_tbl,
949: x_disb_rec OUT NOCOPY disb_rec_type,
950: x_return_status OUT NOCOPY VARCHAR2,
951: x_msg_count OUT NOCOPY NUMBER,
950: x_return_status OUT NOCOPY VARCHAR2,
951: x_msg_count OUT NOCOPY NUMBER,
952: x_msg_data OUT NOCOPY VARCHAR2) IS
953:
954: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
955: l_api_version CONSTANT NUMBER := 1;
956: l_api_name CONSTANT VARCHAR2(30) := 'create_rbk_passthru_adj';
957:
958: l_disb_rec disb_rec_type;
996: BEGIN
997: --Bug# 4884423
998: x_return_status := OKC_API.G_RET_STS_SUCCESS;
999:
1000: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1001: G_PKG_NAME,
1002: p_init_msg_list,
1003: l_api_version,
1004: p_api_version,
1004: p_api_version,
1005: '_PVT',
1006: l_return_status);
1007:
1008: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_ERROR;
1012: END IF;
1005: '_PVT',
1006: l_return_status);
1007:
1008: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_ERROR;
1012: END IF;
1013:
1006: l_return_status);
1007:
1008: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_ERROR;
1012: END IF;
1013:
1014: IF p_rebook_adj_tbl.COUNT > 0 THEN
1007:
1008: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1009: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1010: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1011: RAISE OKL_API.G_EXCEPTION_ERROR;
1012: END IF;
1013:
1014: IF p_rebook_adj_tbl.COUNT > 0 THEN
1015: i := p_rebook_adj_tbl.FIRST;
1057: x_msg_count => x_msg_count,
1058: x_msg_data => x_msg_data,
1059: p_disb_rec => l_disb_rec);
1060:
1061: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1062: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1064: RAISE OKL_API.G_EXCEPTION_ERROR;
1065: END IF;
1058: x_msg_data => x_msg_data,
1059: p_disb_rec => l_disb_rec);
1060:
1061: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1062: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1064: RAISE OKL_API.G_EXCEPTION_ERROR;
1065: END IF;
1066: END IF;
1059: p_disb_rec => l_disb_rec);
1060:
1061: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1062: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1064: RAISE OKL_API.G_EXCEPTION_ERROR;
1065: END IF;
1066: END IF;
1067:
1060:
1061: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1062: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1064: RAISE OKL_API.G_EXCEPTION_ERROR;
1065: END IF;
1066: END IF;
1067:
1068: EXIT WHEN (i = p_rebook_adj_tbl.LAST);
1069: i := p_rebook_adj_tbl.NEXT(i);
1070: END LOOP;
1071: END IF;
1072:
1073: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1075: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1076: RAISE OKL_API.G_EXCEPTION_ERROR;
1077: END IF;
1070: END LOOP;
1071: END IF;
1072:
1073: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1075: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1076: RAISE OKL_API.G_EXCEPTION_ERROR;
1077: END IF;
1078:
1071: END IF;
1072:
1073: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1075: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1076: RAISE OKL_API.G_EXCEPTION_ERROR;
1077: END IF;
1078:
1079: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1072:
1073: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1074: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1075: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1076: RAISE OKL_API.G_EXCEPTION_ERROR;
1077: END IF;
1078:
1079: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1080: EXCEPTION
1075: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1076: RAISE OKL_API.G_EXCEPTION_ERROR;
1077: END IF;
1078:
1079: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1080: EXCEPTION
1081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1082: x_return_status := OKL_API.G_RET_STS_ERROR;
1083: WHEN OTHERS THEN
1077: END IF;
1078:
1079: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1080: EXCEPTION
1081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1082: x_return_status := OKL_API.G_RET_STS_ERROR;
1083: WHEN OTHERS THEN
1084: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1085: (
1078:
1079: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1080: EXCEPTION
1081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1082: x_return_status := OKL_API.G_RET_STS_ERROR;
1083: WHEN OTHERS THEN
1084: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1085: (
1086: l_api_name,
1080: EXCEPTION
1081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1082: x_return_status := OKL_API.G_RET_STS_ERROR;
1083: WHEN OTHERS THEN
1084: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1085: (
1086: l_api_name,
1087: G_PKG_NAME,
1088: 'OTHERS',