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.33.12020000.7 2013/04/05 11:55:21 skuchima ship $ */
3:
4:
5: /*

Line 1675: 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);

1671: P_CVMV_REC => l_cvmv_rec,
1672: X_CVMV_REC => l_cvmv_out_rec);
1673:
1674: IF l_write_log THEN
1675: 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);
1676: END IF;
1677:
1678: l_chrv_rec.id := p_dnz_chr_id;
1679: l_chrv_rec.last_update_date := sysdate;

Line 1692: 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);

1688: P_CHRV_REC => l_chrv_rec,
1689: X_CHRV_REC => l_chrv_out_rec);
1690:
1691: IF l_write_log THEN
1692: 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);
1693: END IF;
1694:
1695: COMMIT;
1696:

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

1697: END IF;
1698:
1699: EXCEPTION
1700: WHEN OTHERS THEN
1701: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- updating version'||sqlerrm );
1702:
1703: End update_version;
1704:
1705:

Line 3034: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => QP API error '||lx_return_status_text);

3030:
3031:
3032: IF NVL (lx_return_status, 'S') <> 'S'
3033: THEN
3034: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => QP API error '||lx_return_status_text);
3035: RAISE bulk_contract_exception;
3036: END IF;
3037:
3038: for usage_line_rec IN usage_line_csr(bulk_qp_hdr_id_rec.dnz_chr_id)

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

3040: BEGIN
3041: DBMS_TRANSACTION.SAVEPOINT('BEFORE_TRANSACTION');
3042:
3043: If l_write_log then
3044: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 initializing Billing Report ');
3045: End If;
3046:
3047: l_billrep_found := FALSE;
3048:

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

3073: p_billrep_tbl(p_billrep_tbl_idx).Rejected_SubLines_Value := 0;
3074: END IF;
3075:
3076: If l_write_log then
3077: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After initializing Billing Report ');
3078: End If;
3079:
3080:
3081: SELECT count(usage_line_rec.line_id) INTO l_subline_count

Line 3437: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Failed in AR FEEDER :'||' '||usage_line_rec.line_id);

3433: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
3434: oks_bill_rec_pub.get_message (
3435: l_msg_cnt => l_msg_count,
3436: l_msg_data => l_msg_data);
3437: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Failed in AR FEEDER :'||' '||usage_line_rec.line_id);
3438:
3439: RAISE Bulk_USAGE_line_EXCEPTION;
3440:
3441:

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

3519:
3520:
3521: EXCEPTION
3522: WHEN OTHERS THEN
3523: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Usg_billing_bulk_qp_call_prc=> when others raised'||sqlerrm);
3524: END Usg_billing_bulk_qp_call_prc;
3525:
3526:
3527: -------------------------------------------------------------------------

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

5530:
5531: --mchoudha Fix for bug#4198616
5532: --initializing the variables in case of parallel workers
5533: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
5534: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS: Billing Report And Log is set to '||l_yes_no);
5535:
5536: --Ceredian ER
5537: l_bulk_usage := FND_PROFILE.VALUE('OKS_USAGE_BILL_QP_BULK_CALL');
5538:

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

5536: --Ceredian ER
5537: l_bulk_usage := FND_PROFILE.VALUE('OKS_USAGE_BILL_QP_BULK_CALL');
5538:
5539: If l_write_log then
5540: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing starts ');
5541: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS_USAGE_BILL_QP_BULK_CALL is set to '||l_bulk_usage);
5542: End If;
5543:
5544: If l_yes_no = 'YES' then

Line 5541: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS_USAGE_BILL_QP_BULK_CALL is set to '||l_bulk_usage);

5537: l_bulk_usage := FND_PROFILE.VALUE('OKS_USAGE_BILL_QP_BULK_CALL');
5538:
5539: If l_write_log then
5540: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing starts ');
5541: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => OKS_USAGE_BILL_QP_BULK_CALL is set to '||l_bulk_usage);
5542: End If;
5543:
5544: If l_yes_no = 'YES' then
5545: l_write_log := TRUE;

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

5573: l_billrep_errtbl_idx := -1 ;
5574: --End mchoudha Bug#3537100
5575:
5576: If l_write_log then
5577: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Opening billing_process cursor from '||p_process_from||' to '||p_process_to);
5578: End If;
5579:
5580:
5581:

Line 5589: 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);

5585: FETCH billing_process bulk collect
5586: INTO chr_id, cle_id,l_line_no LIMIT 10000;
5587:
5588: If l_write_log then
5589: 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);
5590: End If;
5591:
5592: IF cle_id.COUNT > 0 THEN --chk for count
5593:

Line 5603: 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));

5599:
5600: DBMS_TRANSACTION.SAVEPOINT('BEFORE_TRANSACTION');
5601:
5602: IF l_write_log THEN
5603: 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));
5604: END IF;
5605:
5606: /*****
5607: The policy context is set to multiple for Bug# 6158988

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

5624: l_select_counter := l_select_counter + 1;
5625: l_ar_Feeder_ctr := 0;
5626:
5627: IF l_write_log THEN
5628: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);

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

5625: l_ar_Feeder_ctr := 0;
5626:
5627: IF l_write_log THEN
5628: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
5633: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);

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

5626:
5627: IF l_write_log THEN
5628: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
5633: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
5634: END IF;

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

5627: IF l_write_log THEN
5628: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
5633: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
5634: END IF;
5635:

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

5628: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Contract# : '||l_bill_rec.Contract_number);
5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
5633: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
5634: END IF;
5635:
5636: -- Commented as part of R12. Authoring org id changed to org_id (MOAC)

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

5629: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Modifier: '||l_bill_rec.Contract_number_modifier);
5630: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Parameter Default Date ' || P_date);
5631: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Start# : '||l_bill_rec.period_start);
5632: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Period Type: '||l_bill_rec.period_type);
5633: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Price_uom ' ||l_bill_rec.price_uom);
5634: END IF;
5635:
5636: -- Commented as part of R12. Authoring org id changed to org_id (MOAC)
5637: -- okc_context.set_okc_org_context(l_bill_Rec.authoring_org_id, Null);

Line 5641: 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);

5637: -- okc_context.set_okc_org_context(l_bill_Rec.authoring_org_id, Null);
5638: okc_context.set_okc_org_context(l_bill_Rec.org_id, Null);
5639:
5640: IF l_write_log THEN
5641: 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);
5642: END IF;
5643:
5644:
5645: l_okl_flag := 0; --- check for OKL contract

Line 5652: 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);

5648: FETCH l_okl_contract_csr into l_okl_flag;
5649: CLOSE l_okl_contract_csr;
5650:
5651: If l_write_log then
5652: 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);
5653: End If;
5654:
5655: /*Invoices are to be generated only for contracts whose
5656: AR_interface_flag = 'Y'

Line 5659: 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'));

5655: /*Invoices are to be generated only for contracts whose
5656: AR_interface_flag = 'Y'
5657: */
5658: If l_write_log then
5659: 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'));
5660: End If;
5661:
5662: IF Nvl(l_bill_rec.ar_interface_yn,'Y') = 'Y' THEN -- {
5663:

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

5669:
5670:
5671:
5672: If l_write_log then
5673: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 initializing Billing Report ');
5674: End If;
5675:
5676: l_billrep_found := FALSE;
5677:

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

5702: l_billrep_tbl(l_billrep_tbl_idx).Rejected_SubLines_Value := 0;
5703: END IF;
5704:
5705: If l_write_log then
5706: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After initializing Billing Report ');
5707: End If;
5708:
5709: --End mchoudha Bug#3537100
5710:

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

5712: FETCH qty_uom_csr into qty_uom_rec;
5713: CLOSE qty_uom_csr;
5714:
5715: If l_write_log then
5716: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => After opening qty_uom_csr uom_code '||qty_uom_rec.uom_code);
5717: End If;
5718:
5719:
5720: IF (l_bill_rec.lse_id = 46) THEN

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

5719:
5720: IF (l_bill_rec.lse_id = 46) THEN
5721: -----------------------------------------------------------------
5722: If l_write_log then
5723: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Subscription_item for '||l_bill_rec.id);
5724: End If;
5725:
5726: Bill_Subscription_item(
5727: l_bill_rec.dnz_chr_id,

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

5751: ELSIF (l_bill_rec.lse_id in (1,19)) Then
5752: --Process_service_items
5753: -----------------------------------------------------------------
5754: If l_write_log then
5755: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Service_item for '||l_bill_rec.id);
5756: End If;
5757:
5758: Bill_Service_item(
5759: l_bill_rec.dnz_chr_id,

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

5794: If Nvl(l_bulk_usage,'N') = 'Y' THEN
5795:
5796: -- Process_usage_items
5797: If l_write_log then
5798: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Usage_Item_bulk for '||l_bill_rec.id);
5799: End If;
5800: -------------------------------------------------------------------------
5801: -- Begin partial period computation logic
5802: -- Developer Mani Choudhary

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

5837: Else
5838:
5839: -- Process_usage_items
5840: If l_write_log then
5841: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => B4 calling Bill_Usage_Item for '||l_bill_rec.id);
5842: End If;
5843: -------------------------------------------------------------------------
5844: -- Begin partial period computation logic
5845: -- Developer Mani Choudhary

Line 5895: 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);

5891:
5892: /* skuchima Ceredian ER Added condition to stop calling AR for usage lines*/
5893: IF ( (l_ar_feeder_ctr = 1 AND Nvl(l_bulk_usage,'N') = 'N') OR (l_ar_feeder_ctr =1 and l_bill_rec.lse_id <> 12 ) ) THEN
5894: If l_write_log then
5895: 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);
5896: End If;
5897:
5898: OKS_ARFEEDER_PUB.Get_REC_FEEDER
5899: (

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

5923: P_PROCESSED_SUB_LINES_TBL => l_processed_sub_lines_tbl,
5924: P_ERROR_MESSAGE => l_processed_lines_tbl(l_pr_tbl_idx).Error_Message,
5925: P_TOP_LINE => l_bill_rec.id) ;
5926:
5927: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => Failed in AR FEEDER :'||' '||l_bill_rec.id);
5928:
5929: ---DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
5930: Raise Main_Line_Exception;
5931: END IF;

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

5953: --Added by pmallara begin exception block to fix bug#3961046
5954: BEGIN
5955: l_reject_counter := l_reject_counter + 1;
5956: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
5957: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => MAIN LINE EXCEPTION RAISE'||' '||sqlerrm);
5958: RETCODE := 1;
5959: EXCEPTION
5960: WHEN OTHERS THEN
5961: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside MAIN_LINE_EXCEPTION '||sqlerrm );

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

5957: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => MAIN LINE EXCEPTION RAISE'||' '||sqlerrm);
5958: RETCODE := 1;
5959: EXCEPTION
5960: WHEN OTHERS THEN
5961: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside MAIN_LINE_EXCEPTION '||sqlerrm );
5962: exit;
5963: END;
5964:
5965: WHEN OTHERS THEN

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

5976: l_billrep_err_tbl(l_billrep_errtbl_idx).Error_Message := 'Error: '|| sqlerrm||'. Error Message: '||l_msg_data ;
5977:
5978: l_reject_counter := l_reject_counter + 1;
5979: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
5980: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when others exception raised in Mainline loop '||sqlerrm );
5981: RETCODE := 1;
5982:
5983: --Bug#5378184
5984: l_err_code := substr(sqlerrm,instr(sqlerrm,'-')+1,5);

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

5988: --End Bug#5378184
5989:
5990: EXCEPTION
5991: WHEN OTHERS THEN
5992: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => Failed- when trying to rollback inside WHEN OTHERS exception'||sqlerrm );
5993: exit;
5994: END;
5995: END;
5996: END LOOP; --end of loop for cle_id tbl

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

6034: ,p_line_to => P_process_to
6035: ,x_return_status => l_return_status);
6036:
6037: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6038: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => *** Failed to create Billing Report ***' );
6039: END IF;
6040: End If;
6041:
6042: If l_write_log then

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

6039: END IF;
6040: End If;
6041:
6042: If l_write_log then
6043: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill processing Ends ');
6044: End If;
6045:
6046: ---- Added if clause to issue warning for any data related issue
6047: IF (RETCODE <> 1) THEN

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

6052:
6053: WHEN G_EXCEPTION_HALT_VALIDATION THEN
6054: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
6055: RETCODE := 2;
6056: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
6057: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6058: WHEN G_EXCEPTION_ROLLBACK THEN
6059: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
6060: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');

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

6055: RETCODE := 2;
6056: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
6057: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6058: WHEN G_EXCEPTION_ROLLBACK THEN
6059: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
6060: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6061:
6062: WHEN OTHERS THEN
6063: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

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

6061:
6062: WHEN OTHERS THEN
6063: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
6064: RETCODE := 2;
6065: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when others raised'||sqlerrm);
6066: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
6067: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
6068: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6069:

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

6126: l_original_org_id NUMBER; /*skuchima*/
6127:
6128: BEGIN
6129:
6130: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Starts');
6131:
6132: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
6133:
6134: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main => OKS: Billing Report And Log is set to '||l_yes_no);

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

6130: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Starts');
6131:
6132: l_yes_no := Fnd_profile.value('OKS_BILLING_REPORT_AND_LOG');
6133:
6134: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main => OKS: Billing Report And Log is set to '||l_yes_no);
6135:
6136: If l_yes_no = 'YES' then
6137: l_write_log := TRUE;
6138: l_write_report := TRUE;

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

6146: --mchoudha fixed bug#4729936
6147: --IF (nvl(fnd_profile.value('OKC_VIEW_K_BY_ORG'),'N') = 'Y' ) THEN
6148: -- l_org_id := fnd_profile.value('ORG_ID');
6149: If l_write_log then
6150: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => parameter Org ID is '||l_org_id);
6151: End If;
6152: -- END IF;
6153:
6154: If l_write_log then

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

6151: End If;
6152: -- END IF;
6153:
6154: If l_write_log then
6155: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Preview Y/N ='||P_process);
6156: End If;
6157: /*Added for bug:10191601*/
6158: p_access_mode := mo_global.get_access_mode;
6159: /*p_access_mode - specifies the operating unit access. 'S' for Single, 'M' for Multiple */

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

6171: END IF;
6172:
6173: user_id := FND_GLOBAL.USER_ID;
6174: If l_write_log then
6175: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => User_Id ='||to_char(user_id));
6176: End If;
6177:
6178: --nechatur 29-Nov-2005 for bug#4459229
6179: --p_date := nvl(trunc(p_default_date),trunc(sysdate));

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

6187: --truncated during the restart of the parent
6188: If(FND_CONC_GLOBAL.request_data is null) THEN
6189:
6190: If l_write_log then
6191: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Truncating oks_process_billing');
6192: End If;
6193:
6194: v_cursor := DBMS_SQL.OPEN_CURSOR;
6195: /*Following line is required to avoid GSCC errors at ARU creation.

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

6211: */
6212: IF (FND_CONC_GLOBAL.request_data is null) THEN -- not a restart of parent
6213:
6214: If l_write_log then
6215: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Call to OKS_ARFEEDER_PUB.Get_REC_FEEDER to interface termination records');
6216: End If;
6217:
6218: OKS_ARFEEDER_PUB.Get_REC_FEEDER
6219: (

Line 6235: 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);

6231: p_billrep_err_tbl_idx => l_billrep_errtbl_idx
6232: ) ;
6233:
6234: If l_write_log then
6235: 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);
6236: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Access_Mode after AR call - '||mo_global.get_access_mode);
6237: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Org Context after AR call - '||okc_context.get_okc_org_id);
6238: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original Access Mode - '||p_Access_Mode);
6239: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original Org Context - '||l_original_org_id);

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

6806: commit;
6807: select count(*) into l_line_no from oks_process_billing;
6808:
6809: If l_write_log then
6810: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Number of records in oks_process_billing is '||l_line_no);
6811: End If;
6812:
6813:
6814: END IF;

Line 6820: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Profile option OKS: Number of Child Requests for Service Contracts Main Billing '||l_subrequests);

6816: /* As part of bug13105205 removed the hardcoded value to l_subrequests and assigning the value from profile skuchima*/
6817: l_subrequests := nvl(FND_PROFILE.VALUE('OKS_NO_CHILD_REQUESTS_MAIN_BILLING'),30);
6818:
6819: If l_write_log then
6820: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Profile option OKS: Number of Child Requests for Service Contracts Main Billing '||l_subrequests);
6821: End If;
6822:
6823:
6824: IF (p_contract_hdr_id is null) AND -- not a specific contract

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

6826: (nvl(FND_PROFILE.VALUE('OKS_PARALLEL_WORKER'),'NO') = 'YES') THEN
6827:
6828: -- l_line_no represent total records to be processed here
6829: If l_write_log then
6830: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Profile option OKS: Parallel Worker is set to YES');
6831: End If;
6832:
6833: IF (l_line_no > MAX_SINGLE_REQUEST ) THEN
6834: -- populate lo,hi varrays

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

6885:
6886: ELSIF ((FND_CONC_GLOBAL.request_data is not null ) AND
6887: (nvl(FND_PROFILE.VALUE('OKS_PARALLEL_WORKER'),'NO') = 'YES')) THEN
6888: -- restart detected (sub-requests finished)...cleanup and exit.
6889: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => Commiting here');
6890: COMMIT;
6891:
6892: v_cursor := DBMS_SQL.OPEN_CURSOR;
6893: /* Following line is required to avoid GSCC errors at ARU creation.

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

6903: return;
6904: END IF; -- parent test
6905:
6906: If l_write_log then
6907: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => B4 Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
6908: End If;
6909:
6910: OKS_BILLING_PUB.CALCULATE_BILL
6911: (l_errbuf, l_retcode, 1, l_flag,

Line 6910: OKS_BILLING_PUB.CALCULATE_BILL

6906: If l_write_log then
6907: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => B4 Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
6908: End If;
6909:
6910: OKS_BILLING_PUB.CALCULATE_BILL
6911: (l_errbuf, l_retcode, 1, l_flag,
6912: p_date,1 ,l_line_no,
6913: p_prv);
6914:

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

6912: p_date,1 ,l_line_no,
6913: p_prv);
6914:
6915: If l_write_log then
6916: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OKS_BILLING_PUB.Billing_Main => After Calling OKS_BILLING_PUB.CALCULATE_BILL for sequential run');
6917: End If;
6918:
6919: IF (l_retcode = 0) THEN
6920: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Billing Main is successfully completed');

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

6942: v_truncstring := 'Truncate Table OKS'||'.oks_process_billing';
6943: DBMS_SQL.PARSE(v_cursor,v_truncstring,DBMS_SQL.V7);
6944: DBMS_SQL.CLOSE_CURSOR(v_cursor);
6945:
6946: FND_FILE.PUT_LINE( FND_FILE.LOG,'OKS_BILLING_PUB.Billing_Main Ends');
6947:
6948: EXCEPTION
6949: WHEN UTL_FILE.INVALID_PATH THEN
6950: FND_FILE.PUT_LINE (FND_FILE.LOG, 'FILE LOCATION OR NAME WAS INVALID');

Line 7247: End OKS_BILLING_PUB;

7243: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
7244: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
7245: End Process_Suppress_Credits;
7246:
7247: End OKS_BILLING_PUB;