DBA Data[Home] [Help]

APPS.OKS_BILLING_PUB dependencies on OKS_BILLING_PUB

Line 1: Package Body OKS_BILLING_PUB as

1: Package Body OKS_BILLING_PUB as
2: /* $Header: OKSPBILB.pls 120.21.12000000.4 2007/06/29 21:11:16 hvaladip ship $ */
3:
4:
5: /*

Line 2248: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After calling OKC_CVM_PVT.update_contract_version l_return_status '||l_return_status);

2244: P_CVMV_REC => l_cvmv_rec,
2245: X_CVMV_REC => l_cvmv_out_rec);
2246:
2247: IF l_write_log THEN
2248: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After calling OKC_CVM_PVT.update_contract_version l_return_status '||l_return_status);
2249: END IF;
2250:
2251: l_chrv_rec.id := p_dnz_chr_id;
2252: l_chrv_rec.last_update_date := sysdate;

Line 2265: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After calling OKC_CONTRACT_PUB.update_contract_header l_return_status '||l_return_status);

2261: P_CHRV_REC => l_chrv_rec,
2262: X_CHRV_REC => l_chrv_out_rec);
2263:
2264: IF l_write_log THEN
2265: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After calling OKC_CONTRACT_PUB.update_contract_header l_return_status '||l_return_status);
2266: END IF;
2267:
2268: COMMIT;
2269:

Line 2274: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- updating version'||sqlerrm );

2270: END IF;
2271:
2272: EXCEPTION
2273: WHEN OTHERS THEN
2274: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- updating version'||sqlerrm );
2275:
2276: End update_version;
2277:
2278:

Line 2470: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS: Billing Report And Log is set to '||l_yes_no);

2466:
2467: --mchoudha Fix for bug#4198616
2468: --initializing the variables in case of parallel workers
2469: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
2470: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS: Billing Report And Log is set to '||l_yes_no);
2471:
2472: If l_write_log then
2473: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing starts ');
2474: End If;

Line 2473: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing starts ');

2469: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
2470: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS: Billing Report And Log is set to '||l_yes_no);
2471:
2472: If l_write_log then
2473: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing starts ');
2474: End If;
2475:
2476: If l_yes_no = 'YES' then
2477: l_write_log := TRUE;

Line 2509: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Opening billing_process cursor from '||p_process_from||' to '||p_process_to);

2505: l_billrep_errtbl_idx := -1 ;
2506: --End mchoudha Bug#3537100
2507:
2508: If l_write_log then
2509: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Opening billing_process cursor from '||p_process_from||' to '||p_process_to);
2510: End If;
2511:
2512:
2513:

Line 2521: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After Fetch billing_process cursor count of line ids fetched '||cle_id.count);

2517: FETCH billing_process bulk collect
2518: INTO chr_id, cle_id,l_line_no LIMIT 10000;
2519:
2520: If l_write_log then
2521: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After Fetch billing_process cursor count of line ids fetched '||cle_id.count);
2522: End If;
2523:
2524: IF cle_id.COUNT > 0 THEN --chk for count
2525:

Line 2535: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 opening cursor l_bill_line_csr line id '||cle_id(i)||' header ID '||chr_id(i)||' line number '||l_line_no(i));

2531:
2532: DBMS_TRANSACTION.SAVEPOINT('BEFORE_TRANSACTION');
2533:
2534: IF l_write_log THEN
2535: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 opening cursor l_bill_line_csr line id '||cle_id(i)||' header ID '||chr_id(i)||' line number '||l_line_no(i));
2536: END IF;
2537:
2538: /*****
2539: The policy context is set to multiple for Bug# 6158988

Line 2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);

2556: l_select_counter := l_select_counter + 1;
2557: l_ar_Feeder_ctr := 0;
2558:
2559: IF l_write_log THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);

Line 2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);

2557: l_ar_Feeder_ctr := 0;
2558:
2559: IF l_write_log THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);

Line 2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);

2558:
2559: IF l_write_log THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
2566: END IF;

Line 2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);

2559: IF l_write_log THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
2566: END IF;
2567:

Line 2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);

2560: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
2566: END IF;
2567:
2568: -- Commented as part of R12. Authoring org id changed to org_id (MOAC)

Line 2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);

2561: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
2562: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
2563: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
2564: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
2565: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
2566: END IF;
2567:
2568: -- Commented as part of R12. Authoring org id changed to org_id (MOAC)
2569: -- okc_context.set_okc_org_context(l_bill_Rec.authoring_org_id, Null);

Line 2573: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After setting okc_context.set_okc_org_context for org '||l_bill_Rec.org_id);

2569: -- okc_context.set_okc_org_context(l_bill_Rec.authoring_org_id, Null);
2570: okc_context.set_okc_org_context(l_bill_Rec.org_id, Null);
2571:
2572: IF l_write_log THEN
2573: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After setting okc_context.set_okc_org_context for org '||l_bill_Rec.org_id);
2574: END IF;
2575:
2576:
2577: l_okl_flag := 0; --- check for OKL contract

Line 2584: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 opening cursor l_bill_line_csr l_okl_flag '||l_okl_flag);

2580: FETCH l_okl_contract_csr into l_okl_flag;
2581: CLOSE l_okl_contract_csr;
2582:
2583: If l_write_log then
2584: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 opening cursor l_bill_line_csr l_okl_flag '||l_okl_flag);
2585: End If;
2586:
2587: /*Invoices are to be generated only for contracts whose
2588: AR_interface_flag = 'Y'

Line 2591: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => l_bill_rec.ar_interface_yn '||Nvl(l_bill_rec.ar_interface_yn,'Y'));

2587: /*Invoices are to be generated only for contracts whose
2588: AR_interface_flag = 'Y'
2589: */
2590: If l_write_log then
2591: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => l_bill_rec.ar_interface_yn '||Nvl(l_bill_rec.ar_interface_yn,'Y'));
2592: End If;
2593:
2594: IF Nvl(l_bill_rec.ar_interface_yn,'Y') = 'Y' THEN -- {
2595:

Line 2605: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 initializing Billing Report ');

2601:
2602:
2603:
2604: If l_write_log then
2605: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 initializing Billing Report ');
2606: End If;
2607:
2608: l_billrep_found := FALSE;
2609:

Line 2638: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After initializing Billing Report ');

2634: l_billrep_tbl(l_billrep_tbl_idx).Rejected_SubLines_Value := 0;
2635: END IF;
2636:
2637: If l_write_log then
2638: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After initializing Billing Report ');
2639: End If;
2640:
2641: --End mchoudha Bug#3537100
2642:

Line 2648: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After opening qty_uom_csr uom_code '||qty_uom_rec.uom_code);

2644: FETCH qty_uom_csr into qty_uom_rec;
2645: CLOSE qty_uom_csr;
2646:
2647: If l_write_log then
2648: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After opening qty_uom_csr uom_code '||qty_uom_rec.uom_code);
2649: End If;
2650:
2651:
2652: IF (l_bill_rec.lse_id = 46) THEN

Line 2655: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Subscription_item for '||l_bill_rec.id);

2651:
2652: IF (l_bill_rec.lse_id = 46) THEN
2653: -----------------------------------------------------------------
2654: If l_write_log then
2655: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Subscription_item for '||l_bill_rec.id);
2656: End If;
2657:
2658: Bill_Subscription_item(
2659: l_bill_rec.dnz_chr_id,

Line 2687: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Service_item for '||l_bill_rec.id);

2683: ELSIF (l_bill_rec.lse_id in (1,19)) Then
2684: --Process_service_items
2685: -----------------------------------------------------------------
2686: If l_write_log then
2687: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Service_item for '||l_bill_rec.id);
2688: End If;
2689:
2690: Bill_Service_item(
2691: l_bill_rec.dnz_chr_id,

Line 2727: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Usage_Item for '||l_bill_rec.id);

2723:
2724: ELSIF (l_bill_rec.lse_id = 12) THEN
2725: -- Process_usage_items
2726: If l_write_log then
2727: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Usage_Item for '||l_bill_rec.id);
2728: End If;
2729: -------------------------------------------------------------------------
2730: -- Begin partial period computation logic
2731: -- Developer Mani Choudhary

Line 2777: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling OKS_ARFEEDER_PUB.Get_REC_FEEDER for '||l_bill_rec.id);

2773:
2774:
2775: IF (l_ar_feeder_ctr = 1 ) THEN
2776: If l_write_log then
2777: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling OKS_ARFEEDER_PUB.Get_REC_FEEDER for '||l_bill_rec.id);
2778: End If;
2779:
2780: OKS_ARFEEDER_PUB.Get_REC_FEEDER
2781: (

Line 2809: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Failed in AR FEEDER :'||' '||l_bill_rec.id);

2805: P_PROCESSED_SUB_LINES_TBL => l_processed_sub_lines_tbl,
2806: P_ERROR_MESSAGE => l_processed_lines_tbl(l_pr_tbl_idx).Error_Message,
2807: P_TOP_LINE => l_bill_rec.id) ;
2808:
2809: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Failed in AR FEEDER :'||' '||l_bill_rec.id);
2810:
2811: ---DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2812: Raise Main_Line_Exception;
2813: END IF;

Line 2836: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => MAIN LINE EXCEPTION RAISE'||' '||sqlerrm);

2832: --Added by pmallara begin exception block to fix bug#3961046
2833: BEGIN
2834: l_reject_counter := l_reject_counter + 1;
2835: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2836: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => MAIN LINE EXCEPTION RAISE'||' '||sqlerrm);
2837: RETCODE := 1;
2838: EXCEPTION
2839: WHEN OTHERS THEN
2840: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside MAIN_LINE_EXCEPTION '||sqlerrm );

Line 2840: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside MAIN_LINE_EXCEPTION '||sqlerrm );

2836: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => MAIN LINE EXCEPTION RAISE'||' '||sqlerrm);
2837: RETCODE := 1;
2838: EXCEPTION
2839: WHEN OTHERS THEN
2840: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside MAIN_LINE_EXCEPTION '||sqlerrm );
2841: exit;
2842: END;
2843:
2844: WHEN OTHERS THEN

Line 2859: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when others exception raised in Mainline loop '||sqlerrm );

2855: l_billrep_err_tbl(l_billrep_errtbl_idx).Error_Message := 'Error: '|| sqlerrm||'. Error Message: '||l_msg_data ;
2856:
2857: l_reject_counter := l_reject_counter + 1;
2858: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2859: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when others exception raised in Mainline loop '||sqlerrm );
2860: RETCODE := 1;
2861:
2862: --Bug#5378184
2863: l_err_code := substr(sqlerrm,instr(sqlerrm,'-')+1,5);

Line 2871: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside WHEN OTHERS exception'||sqlerrm );

2867: --End Bug#5378184
2868:
2869: EXCEPTION
2870: WHEN OTHERS THEN
2871: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside WHEN OTHERS exception'||sqlerrm );
2872: exit;
2873: END;
2874: END;
2875: END LOOP; --end of loop for cle_id tbl

Line 2897: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => *** Failed to create Billing Report ***' );

2893: ,p_line_to => P_process_to
2894: ,x_return_status => l_return_status);
2895:
2896: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
2897: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => *** Failed to create Billing Report ***' );
2898: END IF;
2899: End If;
2900:
2901: If l_write_log then

Line 2902: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing Ends ');

2898: END IF;
2899: End If;
2900:
2901: If l_write_log then
2902: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing Ends ');
2903: End If;
2904:
2905: ---- Added if clause to issue warning for any data related issue
2906: IF (RETCODE <> 1) THEN

Line 2915: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);

2911:
2912: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2913: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2914: RETCODE := 2;
2915: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2916: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2917: WHEN G_EXCEPTION_ROLLBACK THEN
2918: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2919: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');

Line 2918: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);

2914: RETCODE := 2;
2915: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2916: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2917: WHEN G_EXCEPTION_ROLLBACK THEN
2918: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2919: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2920:
2921: WHEN OTHERS THEN
2922: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2924: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when others raised'||sqlerrm);

2920:
2921: WHEN OTHERS THEN
2922: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2923: RETCODE := 2;
2924: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when others raised'||sqlerrm);
2925: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
2926: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2927: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2928:

Line 2983: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Starts');

2979: l_billrep_errtbl_idx NUMBER;
2980:
2981: BEGIN
2982:
2983: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Starts');
2984:
2985: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
2986:
2987: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main => OKS: Billing Report And Log is set to '||l_yes_no);

Line 2987: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main => OKS: Billing Report And Log is set to '||l_yes_no);

2983: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Starts');
2984:
2985: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
2986:
2987: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main => OKS: Billing Report And Log is set to '||l_yes_no);
2988:
2989: If l_yes_no = 'YES' then
2990: l_write_log := TRUE;
2991: l_write_report := TRUE;

Line 3003: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => parameter Org ID is '||l_org_id);

2999: --mchoudha fixed bug#4729936
3000: --IF (nvl(fnd_profile.value('OKC_VIEW_K_BY_ORG'),'N') = 'Y' ) THEN
3001: -- l_org_id := fnd_profile.value('ORG_ID');
3002: If l_write_log then
3003: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => parameter Org ID is '||l_org_id);
3004: End If;
3005: -- END IF;
3006:
3007: If l_write_log then

Line 3008: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Preview Y/N ='||P_process);

3004: End If;
3005: -- END IF;
3006:
3007: If l_write_log then
3008: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Preview Y/N ='||P_process);
3009: End If;
3010:
3011: /* Set p_prv flag, which is used to in calls to AR Feeder.
3012: p_prv = 2 -- preview billing

Line 3022: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => User_Id ='||to_char(user_id));

3018: END IF;
3019:
3020: user_id := FND_GLOBAL.USER_ID;
3021: If l_write_log then
3022: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => User_Id ='||to_char(user_id));
3023: End If;
3024:
3025: --nechatur 29-Nov-2005 for bug#4459229
3026: --p_date := nvl(trunc(p_default_date),trunc(sysdate));

Line 3038: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Truncating oks_process_billing');

3034: --truncated during the restart of the parent
3035: If(FND_CONC_GLOBAL.request_data is null) THEN
3036:
3037: If l_write_log then
3038: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Truncating oks_process_billing');
3039: End If;
3040:
3041: v_cursor := DBMS_SQL.OPEN_CURSOR;
3042: /*Following line is required to avoid GSCC errors at ARU creation.

Line 3062: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Call to OKS_ARFEEDER_PUB.Get_REC_FEEDER to interface termination records');

3058: */
3059: IF (FND_CONC_GLOBAL.request_data is null) THEN -- not a restart of parent
3060:
3061: If l_write_log then
3062: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Call to OKS_ARFEEDER_PUB.Get_REC_FEEDER to interface termination records');
3063: End If;
3064:
3065: OKS_ARFEEDER_PUB.Get_REC_FEEDER
3066: (

Line 3082: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => After Call to OKS_ARFEEDER_PUB.Get_REC_FEEDER to interface termination records l_return_status '||l_return_status);

3078: p_billrep_err_tbl_idx => l_billrep_errtbl_idx
3079: ) ;
3080:
3081: If l_write_log then
3082: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => After Call to OKS_ARFEEDER_PUB.Get_REC_FEEDER to interface termination records l_return_status '||l_return_status);
3083: End If;
3084:
3085:
3086: -- We need to see if we should spawn sub-requests;

Line 3317: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Number of records in oks_process_billing is '||l_line_no);

3313: commit;
3314: select count(*) into l_line_no from oks_process_billing;
3315:
3316: If l_write_log then
3317: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Number of records in oks_process_billing is '||l_line_no);
3318: End If;
3319:
3320:
3321: END IF;

Line 3330: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Profile option OKS: Parallel Worker is set to YES');

3326: (nvl(FND_PROFILE.VALUE('OKS_PARALLEL_WORKER'),'NO') = 'YES') THEN
3327:
3328: -- l_line_no represent total records to be processed here
3329: If l_write_log then
3330: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Profile option OKS: Parallel Worker is set to YES');
3331: End If;
3332:
3333: IF (l_line_no > MAX_SINGLE_REQUEST ) THEN
3334: -- populate lo,hi varrays

Line 3387: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Commiting here');

3383:
3384: ELSIF ((FND_CONC_GLOBAL.request_data is not null ) AND
3385: (nvl(FND_PROFILE.VALUE('OKS_PARALLEL_WORKER'),'NO') = 'YES')) THEN
3386: -- restart detected (sub-requests finished)...cleanup and exit.
3387: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Commiting here');
3388: COMMIT;
3389:
3390: v_cursor := DBMS_SQL.OPEN_CURSOR;
3391: /* Following line is required to avoid GSCC errors at ARU creation.

Line 3405: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => B4 Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');

3401: return;
3402: END IF; -- parent test
3403:
3404: If l_write_log then
3405: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => B4 Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
3406: End If;
3407:
3408: OKS_BILLING_PUB.CALCULATE_BILL
3409: (l_errbuf, l_retcode, 1, l_flag,

Line 3408: OKS_BILLING_PUB.CALCULATE_BILL

3404: If l_write_log then
3405: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => B4 Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
3406: End If;
3407:
3408: OKS_BILLING_PUB.CALCULATE_BILL
3409: (l_errbuf, l_retcode, 1, l_flag,
3410: p_date,1 ,l_line_no,
3411: p_prv);
3412:

Line 3414: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => After Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');

3410: p_date,1 ,l_line_no,
3411: p_prv);
3412:
3413: If l_write_log then
3414: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => After Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
3415: End If;
3416:
3417: IF (l_retcode = 0) THEN
3418: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Billing Main is successfully completed');

Line 3444: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Ends');

3440: v_truncstring := 'Truncate Table OKS'||'.oks_process_billing';
3441: DBMS_SQL.PARSE(v_cursor,v_truncstring,DBMS_SQL.V7);
3442: DBMS_SQL.CLOSE_CURSOR(v_cursor);
3443:
3444: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Ends');
3445:
3446: EXCEPTION
3447: WHEN UTL_FILE.INVALID_PATH THEN
3448: FND_FILE.PUT_LINE (FND_FILE.LOG, 'FILE LOCATION OR NAME WAS INVALID');

Line 3745: End OKS_BILLING_PUB;

3741: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
3742: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3743: End Process_Suppress_Credits;
3744:
3745: End OKS_BILLING_PUB;