2266: /* ****** ------------------- Procedures for creating Billing report ------------------------ ****** */
2267: /* ************************************************************************************************* */
2268:
2269:
2270: PROCEDURE delete_duplicate_lines (p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2271: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2272: ,x_return_status OUT NOCOPY Varchar2
2273: ) IS
2274:
2267: /* ************************************************************************************************* */
2268:
2269:
2270: PROCEDURE delete_duplicate_lines (p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2271: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2272: ,x_return_status OUT NOCOPY Varchar2
2273: ) IS
2274:
2275: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2271: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2272: ,x_return_status OUT NOCOPY Varchar2
2273: ) IS
2274:
2275: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2276: l_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2277:
2278: l_tbl_idx Binary_integer;
2279: l_line_id1 Varchar2(100) ;
2272: ,x_return_status OUT NOCOPY Varchar2
2273: ) IS
2274:
2275: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2276: l_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2277:
2278: l_tbl_idx Binary_integer;
2279: l_line_id1 Varchar2(100) ;
2280: l_line_id2 Varchar2(100);
2317: End delete_duplicate_lines ;
2318:
2319: /* *** --------------------------------------------- *** */
2320:
2321: PROCEDURE delete_duplicate_sub_lines (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2322: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2323: ,x_return_status OUT NOCOPY Varchar2
2324: ) IS
2325:
2318:
2319: /* *** --------------------------------------------- *** */
2320:
2321: PROCEDURE delete_duplicate_sub_lines (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2322: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2323: ,x_return_status OUT NOCOPY Varchar2
2324: ) IS
2325:
2326: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2322: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2323: ,x_return_status OUT NOCOPY Varchar2
2324: ) IS
2325:
2326: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2327: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2328:
2329: l_tbl_idx Binary_integer;
2330: l_line_id1 Varchar2(100) ;
2323: ,x_return_status OUT NOCOPY Varchar2
2324: ) IS
2325:
2326: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2327: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2328:
2329: l_tbl_idx Binary_integer;
2330: l_line_id1 Varchar2(100) ;
2331: l_line_id2 Varchar2(100);
2368:
2369: /* *** --------------------------------------------- *** */
2370:
2371:
2372: PROCEDURE sort_lines_table (p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2373: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2374: ,x_return_status OUT NOCOPY Varchar2
2375: ) IS
2376:
2369: /* *** --------------------------------------------- *** */
2370:
2371:
2372: PROCEDURE sort_lines_table (p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2373: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2374: ,x_return_status OUT NOCOPY Varchar2
2375: ) IS
2376:
2377: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2373: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2374: ,x_return_status OUT NOCOPY Varchar2
2375: ) IS
2376:
2377: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2378: l_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2379:
2380: l_in_tbl_idx Binary_integer;
2381: l_out_tbl_idx Binary_integer;
2374: ,x_return_status OUT NOCOPY Varchar2
2375: ) IS
2376:
2377: l_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2378: l_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2379:
2380: l_in_tbl_idx Binary_integer;
2381: l_out_tbl_idx Binary_integer;
2382: l_line_id1 Varchar2(95) ;
2432:
2433: /* **** --------------------------------------- *** */
2434:
2435:
2436: PROCEDURE sort_sub_lines_table (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2437: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2438: ,x_return_status OUT NOCOPY Varchar2
2439: ) IS
2440:
2433: /* **** --------------------------------------- *** */
2434:
2435:
2436: PROCEDURE sort_sub_lines_table (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2437: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2438: ,x_return_status OUT NOCOPY Varchar2
2439: ) IS
2440:
2441: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2437: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2438: ,x_return_status OUT NOCOPY Varchar2
2439: ) IS
2440:
2441: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2442: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2443:
2444: l_in_tbl_idx Binary_integer;
2445: l_out_tbl_idx Binary_integer;
2438: ,x_return_status OUT NOCOPY Varchar2
2439: ) IS
2440:
2441: l_sub_lines_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2442: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2443:
2444: l_in_tbl_idx Binary_integer;
2445: l_out_tbl_idx Binary_integer;
2446: l_sub_line_id1 Varchar2(135);
2496: End sort_sub_lines_table ;
2497:
2498: /* *** --------------------------------------------- *** */
2499:
2500: PROCEDURE sub_lines_bill_status (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2501: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2502: ,x_return_status OUT NOCOPY Varchar2
2503: ) IS
2504:
2497:
2498: /* *** --------------------------------------------- *** */
2499:
2500: PROCEDURE sub_lines_bill_status (p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2501: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2502: ,x_return_status OUT NOCOPY Varchar2
2503: ) IS
2504:
2505: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2501: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2502: ,x_return_status OUT NOCOPY Varchar2
2503: ) IS
2504:
2505: l_sub_lines_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table ;
2506:
2507: l_tmp_tbl_idx Binary_integer;
2508: l_in_tbl_idx Binary_integer;
2509: l_line_id Number := 0;
2582: If (l_summary_flag = 'Y') Then
2583: l_bill_profile := 'Y';
2584: Else
2585: l_summary_flag := Null;
2586: OKS_BILL_REC_PUB.Get_Bill_profile(p_dnz_chr_id, l_summary_flag);
2587: If (l_summary_flag = 'N') THEN
2588: l_bill_profile := 'N';
2589: Elsif (l_summary_flag = 'Y') THEN
2590: l_bill_profile := 'Y';
2624:
2625: /* *** --------------------------------------------- *** */
2626:
2627: Procedure Set_Billing_Profile (
2628: p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2629: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2630: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2631: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2632: ,x_return_status OUT NOCOPY Varchar2
2625: /* *** --------------------------------------------- *** */
2626:
2627: Procedure Set_Billing_Profile (
2628: p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2629: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2630: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2631: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2632: ,x_return_status OUT NOCOPY Varchar2
2633: ) IS
2626:
2627: Procedure Set_Billing_Profile (
2628: p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2629: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2630: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2631: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2632: ,x_return_status OUT NOCOPY Varchar2
2633: ) IS
2634:
2627: Procedure Set_Billing_Profile (
2628: p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2629: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2630: ,x_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2631: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2632: ,x_return_status OUT NOCOPY Varchar2
2633: ) IS
2634:
2635: l_lines_tbl_copy OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table;
2631: ,x_sub_lines_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2632: ,x_return_status OUT NOCOPY Varchar2
2633: ) IS
2634:
2635: l_lines_tbl_copy OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table;
2636: l_sub_lines_tbl_copy OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2637: l_lines_tbl_idx Binary_integer;
2638: l_slines_tbl_idx Binary_integer;
2639:
2632: ,x_return_status OUT NOCOPY Varchar2
2633: ) IS
2634:
2635: l_lines_tbl_copy OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table;
2636: l_sub_lines_tbl_copy OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2637: l_lines_tbl_idx Binary_integer;
2638: l_slines_tbl_idx Binary_integer;
2639:
2640: l_bill_profile Varchar2(100) := Null;
2814:
2815: /* *** --------------------------------------------- *** */
2816:
2817:
2818: PROCEDURE delete_duplicate_currency_code (p_currency_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2819: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2820: ,x_return_status OUT NOCOPY Varchar2
2821: ) IS
2822:
2815: /* *** --------------------------------------------- *** */
2816:
2817:
2818: PROCEDURE delete_duplicate_currency_code (p_currency_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2819: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2820: ,x_return_status OUT NOCOPY Varchar2
2821: ) IS
2822:
2823: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2819: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2820: ,x_return_status OUT NOCOPY Varchar2
2821: ) IS
2822:
2823: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2824: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_currency_table ;
2825:
2826: l_tbl_idx Binary_integer;
2827: l_currency_cd1 Varchar2(15) ;
2820: ,x_return_status OUT NOCOPY Varchar2
2821: ) IS
2822:
2823: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2824: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_currency_table ;
2825:
2826: l_tbl_idx Binary_integer;
2827: l_currency_cd1 Varchar2(15) ;
2828: l_currency_cd2 Varchar2(15);
2868:
2869: /* *** --------------------------------------------- *** */
2870:
2871:
2872: PROCEDURE sort_currency_table (p_currency_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2873: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2874: ,x_return_status OUT NOCOPY Varchar2
2875: ) IS
2876:
2869: /* *** --------------------------------------------- *** */
2870:
2871:
2872: PROCEDURE sort_currency_table (p_currency_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2873: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2874: ,x_return_status OUT NOCOPY Varchar2
2875: ) IS
2876:
2877: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2873: ,x_currency_table OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2874: ,x_return_status OUT NOCOPY Varchar2
2875: ) IS
2876:
2877: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2878: l_currency_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_currency_table ;
2879:
2880: l_in_tbl_idx Binary_integer;
2881: l_out_tbl_idx Binary_integer;
2874: ,x_return_status OUT NOCOPY Varchar2
2875: ) IS
2876:
2877: l_currency_rec_tmp OKS_BILL_REC_PUB.line_report_rec_type;
2878: l_currency_tbl_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_currency_table ;
2879:
2880: l_in_tbl_idx Binary_integer;
2881: l_out_tbl_idx Binary_integer;
2882: l_currency_cd1 Varchar2(15) ;
2928: End sort_currency_table ;
2929:
2930:
2931: /* *** --------------------------------------------- *** */
2932: Procedure Get_Currency_code(p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2933: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2934: ,x_currency_table_out OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2935: ,x_return_status OUT NOCOPY Varchar2
2936: ) IS
2929:
2930:
2931: /* *** --------------------------------------------- *** */
2932: Procedure Get_Currency_code(p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2933: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2934: ,x_currency_table_out OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2935: ,x_return_status OUT NOCOPY Varchar2
2936: ) IS
2937:
2930:
2931: /* *** --------------------------------------------- *** */
2932: Procedure Get_Currency_code(p_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2933: ,p_sub_lines_table IN OKS_BILL_REC_PUB.line_report_tbl_type
2934: ,x_currency_table_out OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2935: ,x_return_status OUT NOCOPY Varchar2
2936: ) IS
2937:
2938: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type ;
2934: ,x_currency_table_out OUT NOCOPY OKS_BILL_REC_PUB.line_report_tbl_type
2935: ,x_return_status OUT NOCOPY Varchar2
2936: ) IS
2937:
2938: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type ;
2939: l_currency_table_in OKS_BILL_REC_PUB.line_report_tbl_type ;
2940: l_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2941: l_sub_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2942:
2935: ,x_return_status OUT NOCOPY Varchar2
2936: ) IS
2937:
2938: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type ;
2939: l_currency_table_in OKS_BILL_REC_PUB.line_report_tbl_type ;
2940: l_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2941: l_sub_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2942:
2943: l_line_tbl_idx Binary_Integer ;
2936: ) IS
2937:
2938: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type ;
2939: l_currency_table_in OKS_BILL_REC_PUB.line_report_tbl_type ;
2940: l_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2941: l_sub_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2942:
2943: l_line_tbl_idx Binary_Integer ;
2944: l_sub_line_tbl_idx Binary_Integer ;
2937:
2938: l_currency_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type ;
2939: l_currency_table_in OKS_BILL_REC_PUB.line_report_tbl_type ;
2940: l_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_lines_table ;
2941: l_sub_lines_table_tmp OKS_BILL_REC_PUB.line_report_tbl_type DEFAULT p_sub_lines_table;
2942:
2943: l_line_tbl_idx Binary_Integer ;
2944: l_sub_line_tbl_idx Binary_Integer ;
2945:
3150:
3151: /* *** --------------------------------------------- *** */
3152:
3153:
3154: Procedure Print_Error_Report ( p_billrep_error_tbl IN OKS_BILL_REC_PUB.billrep_error_tbl_type
3155: ,p_lines_rejected IN Number
3156: ,p_slines_rejected IN Number
3157: ,x_return_status OUT NOCOPY Varchar2
3158: ) IS
3510:
3511: /* *** --------------------------------------------- *** */
3512:
3513: Procedure Create_Report (
3514: p_billrep_table IN OKS_BILL_REC_PUB.bill_report_tbl_type
3515: ,p_billrep_err_tbl IN OKS_BILL_REC_PUB.billrep_error_tbl_type
3516: ,p_line_from IN NUMBER
3517: ,p_line_to IN NUMBER
3518: ,x_return_status OUT NOCOPY Varchar2
3511: /* *** --------------------------------------------- *** */
3512:
3513: Procedure Create_Report (
3514: p_billrep_table IN OKS_BILL_REC_PUB.bill_report_tbl_type
3515: ,p_billrep_err_tbl IN OKS_BILL_REC_PUB.billrep_error_tbl_type
3516: ,p_line_from IN NUMBER
3517: ,p_line_to IN NUMBER
3518: ,x_return_status OUT NOCOPY Varchar2
3519: ) IS