eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_INVESTOR_INVOICE_DISB_PVT dependencies on FND_FILE

Line 140: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_disb_amt: '||SQLERRM);

136: return NVL(l_rbk_adjst_amt,0);
137:
138: EXCEPTION
139: WHEN others THEN
140: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_disb_amt: '||SQLERRM);
141: /* dbms_output.put_line('** EXCEPTION IN get_disb_amt: '||SQLERRM); */
142: return 0;
143: END get_disb_amt;
144:

Line 192: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_next_pymt_date: '||SQLERRM);

188: -- sechawla 26-Jun-09 8459929 : end
189: return l_next_date;
190: EXCEPTION
191: WHEN others THEN
192: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_next_pymt_date: '||SQLERRM);
193: return null;
194: END get_next_pymt_date;
195:
196: FUNCTION check_sel_billed( p_ref_sel_id NUMBER ) RETURN VARCHAR2

Line 248: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_sel_billed: '||p_ref_sel_id||SQLERRM);

244:
245:
246: EXCEPTION
247: WHEN others THEN
248: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_sel_billed: '||p_ref_sel_id||SQLERRM);
249: /* dbms_output.PUT_LINE ('** EXCEPTION IN check_sel_billed: '||p_ref_sel_id||SQLERRM); */
250: return 'N';
251: END check_sel_billed;
252:

Line 397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_rcpts: '||p_ref_sel_id||SQLERRM);

393:
394:
395: EXCEPTION
396: WHEN others THEN
397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_rcpts: '||p_ref_sel_id||SQLERRM);
398: /* dbms_output.put_line('** EXCEPTION IN check_rcpts: '||p_ref_sel_id||SQLERRM); */
399: return NULL;
400: END check_rcpts;
401:

Line 572: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing for Disbursement of Fees :');

568: FETCH ia_info_csr INTO ia_info_rec;
569: CLOSE ia_info_csr;
570: l_ia_id := ia_info_rec.id;
571:
572: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing for Disbursement of Fees :');
573: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Agreement :'||p_investor_agreement );
574: -- Get the investors defined on an Investor Agreement
575: FOR investor_line_rec IN investor_line_csr( l_ia_id)
576: LOOP

Line 573: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Agreement :'||p_investor_agreement );

569: CLOSE ia_info_csr;
570: l_ia_id := ia_info_rec.id;
571:
572: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing for Disbursement of Fees :');
573: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Agreement :'||p_investor_agreement );
574: -- Get the investors defined on an Investor Agreement
575: FOR investor_line_rec IN investor_line_csr( l_ia_id)
576: LOOP
577: -- Get all the expense fees defined for an Investor

Line 635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');

631:
632:
633: -- Calculate Payout Date
634: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);

Line 636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);

632:
633: -- Calculate Payout Date
634: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);

Line 637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);

633: -- Calculate Payout Date
634: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);

Line 638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);

634: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);

Line 639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);

635: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);

Line 640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);

636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);

Line 641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);

637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);

Line 642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);

638: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');

Line 643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);

639: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
647: -- Populate Investor Disbursement Header

Line 644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);

640: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
647: -- Populate Investor Disbursement Header
648: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;

Line 645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);

641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
647: -- Populate Investor Disbursement Header
648: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;
649: i_tapv_rec.currency_code := ia_info_rec.currency_code;

Line 646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');

642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
647: -- Populate Investor Disbursement Header
648: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;
649: i_tapv_rec.currency_code := ia_info_rec.currency_code;
650: i_tapv_rec.CURRENCY_CONVERSION_TYPE := ia_info_rec.currency_conversion_type;

Line 732: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);

728: -- Exception handling
729: ------------------------------------------------------------
730:
731: WHEN OKL_API.G_EXCEPTION_ERROR THEN
732: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);
733: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
734: p_api_name => l_api_name,
735: p_pkg_name => G_PKG_NAME,
736: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 742: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);

738: x_msg_data => x_msg_data,
739: p_api_type => '_PVT');
740:
741: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
742: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);
743: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
744: p_api_name => l_api_name,
745: p_pkg_name => G_PKG_NAME,
746: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 752: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);

748: x_msg_data => x_msg_data,
749: p_api_type => '_PVT');
750:
751: WHEN OTHERS THEN
752: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);
753: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
754: p_api_name => l_api_name,
755: p_pkg_name => G_PKG_NAME,
756: p_exc_name => 'OTHERS',

Line 1433: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====* START PROCEDURE OKL_INVESTOR_DISBURSEMENT *=====');

1429: /* dbms_application_info.set_client_info('204'); */
1430: ------------------------------------------------------------
1431: -- Start processing
1432: ------------------------------------------------------------
1433: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====*** START PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
1434:
1435: --dbms_output.PUT_LINE ('=====*** START PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
1436:
1437: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 1464: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 1 ### ');

1460: -- Pick up lease contracts
1461: -- in an Investor Agreement
1462: -----------------------------------------------------------------
1463:
1464: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 1 ### ');
1465:
1466: FOR inv_lease_k_rec IN inv_lease_k_csr ( p_investor_agreement ) LOOP
1467: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 2 ### ');
1468: --ssiruvol Bug 5000886 start

Line 1467: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 2 ### ');

1463:
1464: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 1 ### ');
1465:
1466: FOR inv_lease_k_rec IN inv_lease_k_csr ( p_investor_agreement ) LOOP
1467: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 2 ### ');
1468: --ssiruvol Bug 5000886 start
1469: strm_ele_idx :=1;
1470: inv_ele_idx :=1;
1471: l_inv_ele_id_tbl:=l_temp_ele_id_tbl;

Line 1485: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 3 ### ');

1481: FOR inv_disb_rec IN inv_disb_main_csr( inv_lease_k_rec.Investor_Agreement_ID
1482: ,inv_lease_k_rec.khr_id
1483: ,p_to_date) LOOP
1484:
1485: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 3 ### ');
1486: ------------------------------------
1487: -- Initialize Variables
1488: ------------------------------------
1489: l_break_khr_id := -1;

Line 1521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 4 ### ');

1517: -----------------------------------------------------------------
1518: -- Added condition l_evrgrn_psthrgh_flg by bkatraga for bug 4922294
1519: -- ssiruvol Bug 5000886 start
1520: --IF ((check_sel_billed( inv_disb_rec.ref_sel_id ) = 'Y') AND l_evrgrn_psthrgh_flg = 0) THEN
1521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 4 ### ');
1522: IF (l_billed = 'Y' AND l_evrgrn_psthrgh_flg = 0) THEN
1523: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 5 ### ');
1524: -- ssiruvol Bug 5000886 end
1525:

Line 1523: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 5 ### ');

1519: -- ssiruvol Bug 5000886 start
1520: --IF ((check_sel_billed( inv_disb_rec.ref_sel_id ) = 'Y') AND l_evrgrn_psthrgh_flg = 0) THEN
1521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 4 ### ');
1522: IF (l_billed = 'Y' AND l_evrgrn_psthrgh_flg = 0) THEN
1523: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 5 ### ');
1524: -- ssiruvol Bug 5000886 end
1525:
1526:
1527: -----------------------------------------------------------------

Line 1547: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 6 ### ');

1543:
1544: -----------------------------------------------------------------
1545: -- Determine investor and share
1546: -----------------------------------------------------------------
1547: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 6 ### ');
1548: FOR share_rec IN share_csr ( inv_lease_k_rec.Investor_Agreement_ID ) LOOP
1549: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 7 ### ');
1550:
1551: l_sty_id := NULL;

Line 1549: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 7 ### ');

1545: -- Determine investor and share
1546: -----------------------------------------------------------------
1547: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 6 ### ');
1548: FOR share_rec IN share_csr ( inv_lease_k_rec.Investor_Agreement_ID ) LOOP
1549: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 7 ### ');
1550:
1551: l_sty_id := NULL;
1552: IF inv_disb_rec.Stream_purpose = 'INVESTOR_RENT_DISB_BASIS' THEN
1553:

Line 1560: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_RENT_PAYABLE stream type found.');

1556: p_primary_sty_purpose => 'INVESTOR_RENT_PAYABLE',
1557: x_return_status => l_return_status,
1558: x_primary_sty_id => l_sty_id );
1559: IF l_sty_id IS NULL THEN
1560: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_RENT_PAYABLE stream type found.');
1561: END IF;
1562: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_PRINCIPAL_DISB_BASIS' THEN
1563:
1564: Okl_Streams_Util.get_primary_stream_type(

Line 1570: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PRINCIPAL_PAYABLE stream type found.');

1566: p_primary_sty_purpose => 'INVESTOR_PRINCIPAL_PAYABLE',
1567: x_return_status => l_return_status,
1568: x_primary_sty_id => l_sty_id );
1569: IF l_sty_id IS NULL THEN
1570: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PRINCIPAL_PAYABLE stream type found.');
1571: END IF;
1572: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_INTEREST_DISB_BASIS' THEN
1573:
1574: Okl_Streams_Util.get_primary_stream_type(

Line 1580: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_INTEREST_PAYABLE stream type found.');

1576: p_primary_sty_purpose => 'INVESTOR_INTEREST_PAYABLE',
1577: x_return_status => l_return_status,
1578: x_primary_sty_id => l_sty_id );
1579: IF l_sty_id IS NULL THEN
1580: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_INTEREST_PAYABLE stream type found.');
1581: END IF;
1582: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_PPD_DISB_BASIS' THEN
1583:
1584: Okl_Streams_Util.get_primary_stream_type(

Line 1590: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PAYDOWN_PAYABLE stream type found.');

1586: p_primary_sty_purpose => 'INVESTOR_PAYDOWN_PAYABLE',
1587: x_return_status => l_return_status,
1588: x_primary_sty_id => l_sty_id );
1589: IF l_sty_id IS NULL THEN
1590: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PAYDOWN_PAYABLE stream type found.');
1591: END IF;
1592: ELSIF inv_disb_rec.Stream_purpose IN ('INVESTOR_LATE_FEE_PAYABLE',
1593: 'INVESTOR_LATE_INTEREST_PAY',
1594: 'INVESTOR_RENT_BUYBACK',

Line 1609: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 8 ### ');

1605: ELSE
1606: l_sty_id := NULL;
1607: END IF;
1608:
1609: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 8 ### ');
1610: -- Get Disbursement Stream Name
1611: l_disb_strm_name := NULL;
1612: OPEN disb_strm_csr( l_sty_id );
1613: FETCH disb_strm_csr INTO l_disb_strm_name;

Line 1615: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 9 ### ');

1611: l_disb_strm_name := NULL;
1612: OPEN disb_strm_csr( l_sty_id );
1613: FETCH disb_strm_csr INTO l_disb_strm_name;
1614: CLOSE disb_strm_csr;
1615: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 9 ### ');
1616: ------------------------------------------------------------------
1617: -- Work out common variables
1618: ------------------------------------------------------------------
1619: IF ( inv_lease_k_rec.Investor_Agreement_id <> l_break_khr_id OR

Line 1622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 10 ### ');

1618: ------------------------------------------------------------------
1619: IF ( inv_lease_k_rec.Investor_Agreement_id <> l_break_khr_id OR
1620: share_rec.TOP_LINE_ID <> l_break_top_line_id ) THEN
1621:
1622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 10 ### ');
1623: -------------------------------------------------------
1624: -- Reset Break detection variables
1625: -------------------------------------------------------
1626: l_break_khr_id := inv_lease_k_rec.Investor_Agreement_id;

Line 1655: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 11 ### ');

1651:
1652: -----------------------------------------------
1653: -- Fetch Org Id into Local Variable
1654: -----------------------------------------------
1655: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 11 ### ');
1656: OPEN org_id_csr ( inv_lease_k_rec.Investor_Agreement_id );
1657: FETCH org_id_csr INTO l_org_id;
1658: CLOSE org_id_csr;
1659:

Line 1660: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 12 ### ');

1656: OPEN org_id_csr ( inv_lease_k_rec.Investor_Agreement_id );
1657: FETCH org_id_csr INTO l_org_id;
1658: CLOSE org_id_csr;
1659:
1660: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 12 ### ');
1661: -----------------------------------------------
1662: -- Fetch Set Of Books into Local Variable
1663: -----------------------------------------------
1664: OPEN sob_csr (l_org_id) ;

Line 1667: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 13 ### ');

1663: -----------------------------------------------
1664: OPEN sob_csr (l_org_id) ;
1665: FETCH sob_csr INTO l_sob_id;
1666: CLOSE sob_csr;
1667: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 13 ### ');
1668:
1669: -----------------------------------------------
1670: -- Fetch try_id into Local Variable
1671: -----------------------------------------------

Line 1675: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 14 ### ');

1671: -----------------------------------------------
1672: OPEN try_id_csr;
1673: FETCH try_id_csr INTO l_try_id;
1674: CLOSE try_id_csr;
1675: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 14 ### ');
1676:
1677: -----------------------------------------------
1678: -- Select Investor attributes
1679: -----------------------------------------------

Line 1688: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 15 ### ');

1684: l_pay_method,
1685: l_pay_group_code;
1686: CLOSE vendor_attrs_csr;
1687:
1688: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 15 ### ');
1689: ----------------------------------------
1690: -- Get Vendor Name from PO_Vendors_All
1691: ----------------------------------------
1692: l_investor_name := NULL;

Line 1696: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 16 ### ');

1692: l_investor_name := NULL;
1693: OPEN vendor_name_csr ( l_investor_id );
1694: FETCH vendor_name_csr INTO l_investor_name;
1695: CLOSE vendor_name_csr;
1696: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 16 ### ');
1697:
1698: ----------------------------------------
1699: -- Get Vendor Site from po_vendor_sites
1700: ----------------------------------------

Line 1706: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 17 ### ');

1702: OPEN vendor_site_csr ( l_investor_site_id );
1703: FETCH vendor_site_csr INTO l_investor_site_code;
1704: CLOSE vendor_site_csr;
1705:
1706: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 17 ### ');
1707: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1708: ||inv_lease_k_rec.Investor_Agreement
1709: ||' Investor: '||l_investor_name
1710: ||' Investor Site: '||l_investor_site_code);

Line 1707: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '

1703: FETCH vendor_site_csr INTO l_investor_site_code;
1704: CLOSE vendor_site_csr;
1705:
1706: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 17 ### ');
1707: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1708: ||inv_lease_k_rec.Investor_Agreement
1709: ||' Investor: '||l_investor_name
1710: ||' Investor Site: '||l_investor_site_code);
1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);

Line 1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);

1707: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1708: ||inv_lease_k_rec.Investor_Agreement
1709: ||' Investor: '||l_investor_name
1710: ||' Investor Site: '||l_investor_site_code);
1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);

Line 1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);

1708: ||inv_lease_k_rec.Investor_Agreement
1709: ||' Investor: '||l_investor_name
1710: ||' Investor Site: '||l_investor_site_code);
1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);

Line 1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);

1709: ||' Investor: '||l_investor_name
1710: ||' Investor Site: '||l_investor_site_code);
1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1717:

Line 1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);

1710: ||' Investor Site: '||l_investor_site_code);
1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1717:
1718: -----------------------------------------------

Line 1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);

1711: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1717:
1718: -----------------------------------------------
1719: -- Select Basis and Event

Line 1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);

1712: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1713: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1714: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1715: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1716: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1717:
1718: -----------------------------------------------
1719: -- Select Basis and Event
1720: -----------------------------------------------

Line 1751: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 20 ### ');

1747: END IF;
1748: END IF; -- Investor Agreement Level Break
1749:
1750:
1751: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 20 ### ');
1752:
1753: -----------------------------------------------------------------
1754: -- Determine Basis and Event
1755: -----------------------------------------------------------------

Line 1760: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');

1756: OPEN payout_attrs_csr ( inv_lease_k_rec.Investor_Agreement_ID );
1757: FETCH payout_attrs_csr INTO l_payment_basis, l_payment_event;
1758: CLOSE payout_attrs_csr;
1759:
1760: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1761: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1763: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1764: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);

Line 1761: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);

1757: FETCH payout_attrs_csr INTO l_payment_basis, l_payment_event;
1758: CLOSE payout_attrs_csr;
1759:
1760: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1761: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1763: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1764: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1765: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);

Line 1762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT

1758: CLOSE payout_attrs_csr;
1759:
1760: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1761: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1763: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1764: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1765: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);
1766:

Line 1765: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);

1761: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1763: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1764: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1765: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);
1766:
1767: l_percent_stake := NULL;
1768:
1769: -- --------------------------------------------------------------

Line 1808: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 22 ### ');

1804: END IF;
1805:
1806: l_percent_stake := NULL;
1807:
1808: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 22 ### ');
1809: OPEN get_parent_stake ( share_rec.TOP_LINE_ID
1810: ,l_parent_sty_subclass );
1811: FETCH get_parent_stake INTO l_percent_stake;
1812: CLOSE get_parent_stake;

Line 1814: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 23 ### ');

1810: ,l_parent_sty_subclass );
1811: FETCH get_parent_stake INTO l_percent_stake;
1812: CLOSE get_parent_stake;
1813:
1814: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 23 ### ');
1815:
1816: IF l_percent_stake IS NULL THEN
1817: l_percent_stake := 0;
1818: END IF;

Line 1836: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 24 ### ');

1832: ----------------------------------------------------
1833: -- Billing Based disbursement
1834: ----------------------------------------------------
1835:
1836: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 24 ### ');
1837: IF ( NVL(share_rec.PAY_INVESTOR_EVENT,'SCHEDULE' ) = 'SCHEDULE' ) THEN
1838: -- sechawla 26-jun-09 8459929 - Investor Contract Oblg and and Inv Disb Adjustment to be on same date as AR contract
1839: -- Oblg invoice : begin
1840: -- Note here that for Inv Contract Obl and Inv Disb Adj streams

Line 1858: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);

1854: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
1855: END IF;
1856:
1857:
1858: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1859: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1860:
1861: -- *********************************************** --
1862: -- Insert into TAP TPL

Line 1859: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);

1855: END IF;
1856:
1857:
1858: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1859: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1860:
1861: -- *********************************************** --
1862: -- Insert into TAP TPL
1863: -- *********************************************** --

Line 1924: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);

1920: i_tapv_rec.amount := okl_accounting_util.cross_currency_round_amount
1921: (p_amount => i_tapv_rec.amount
1922: ,p_currency_code => inv_disb_rec.currency_code);
1923:
1924: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
1925:
1926: -- Create Investor Disbursement Lines
1927: i_tplv_rec.tap_id := r_tapv_rec.id;
1928: i_tplv_rec.amount := i_tapv_rec.amount;

Line 1951: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 25 ### ');

1947:
1948: -- Add tpl_rec to table
1949: i_tplv_tbl(1) := i_tplv_rec;
1950:
1951: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 25 ### ');
1952: --Call the commong disbursement API to create transactions
1953: Okl_Create_Disb_Trans_Pvt.create_disb_trx(
1954: p_api_version => p_api_version
1955: ,p_init_msg_list => p_init_msg_list

Line 1964: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26 ### ');

1960: ,p_tplv_tbl => i_tplv_tbl
1961: ,x_tapv_rec => r_tapv_rec
1962: ,x_tplv_tbl => r_tplv_tbl);
1963:
1964: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26 ### ');
1965: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1966: l_error_status := 'E';
1967: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
1968: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

Line 1968: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

1964: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26 ### ');
1965: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1966: l_error_status := 'E';
1967: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
1968: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1970: l_error_status := 'E';
1971: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1972: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

Line 1972: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

1968: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1969: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1970: l_error_status := 'E';
1971: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1972: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1973: ELSIF (x_return_status = 'S') THEN
1974: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
1975: ELSE
1976: NULL;

Line 1974: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');

1970: l_error_status := 'E';
1971: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1972: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1973: ELSIF (x_return_status = 'S') THEN
1974: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
1975: ELSE
1976: NULL;
1977: END IF;
1978:

Line 1986: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.1 ### ');

1982: -- Build an error Table
1983: -- *********************************************** --
1984: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1985:
1986: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.1 ### ');
1987: IF l_error_status = 'E' THEN
1988: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.2 ### ');
1989: l_tld_tab_index := l_tld_tab_index + 1;
1990:

Line 1988: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.2 ### ');

1984: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1985:
1986: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.1 ### ');
1987: IF l_error_status = 'E' THEN
1988: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.2 ### ');
1989: l_tld_tab_index := l_tld_tab_index + 1;
1990:
1991: tld_error_log_table(l_tld_tab_index).tap_id
1992: := r_tapv_rec.id;

Line 1998: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3 ### ');

1994: := r_tplv_rec.id;
1995: tld_error_log_table(l_tld_tab_index).error_message
1996: := l_error_message;
1997: ELSE
1998: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3 ### ');
1999: l_succ_tab_index := l_succ_tab_index + 1;
2000:
2001: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3.1 ### ' || to_char(r_tapv_rec.id));
2002:

Line 2001: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3.1 ### ' || to_char(r_tapv_rec.id));

1997: ELSE
1998: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3 ### ');
1999: l_succ_tab_index := l_succ_tab_index + 1;
2000:
2001: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3.1 ### ' || to_char(r_tapv_rec.id));
2002:
2003: tld_succ_log_table( l_succ_tab_index ).tap_id
2004: := r_tapv_rec.id;
2005: tld_succ_log_table( l_succ_tab_index ).tpl_id

Line 2009: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.4 ### ');

2005: tld_succ_log_table( l_succ_tab_index ).tpl_id
2006: := r_tplv_rec.id;
2007: tld_succ_log_table( l_succ_tab_index ).proc_sel_id
2008: := inv_disb_rec.sel_id;
2009: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.4 ### ');
2010:
2011: END IF;
2012: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2013:

Line 2016: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 27 ### ');

2012: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2013:
2014: ELSE -- If the basis is receipt
2015:
2016: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 27 ### ');
2017: --dbms_output.PUT_LINE (' Receipt Based Processing ');
2018: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2019: l_ref_tld_id := NULL;
2020: --end:| 09-Mar-2007 cklee Change khr_id from header to line |

Line 2035: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 28 ### ');

2031: -- Receipt Based disbursement
2032: ----------------------------------------------------
2033: l_rcpt_cnt := 0;
2034: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2035: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 28 ### ');
2036: FOR rcpts_rec IN rcpts_csr (l_ref_tld_id,
2037: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2038: inv_lease_k_rec.Investor_Agreement_id,
2039: share_rec.TOP_LINE_ID

Line 2042: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 29 ### ');

2038: inv_lease_k_rec.Investor_Agreement_id,
2039: share_rec.TOP_LINE_ID
2040: ) LOOP
2041:
2042: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 29 ### ');
2043: l_rcpt_cnt := l_rcpt_cnt + 1;
2044:
2045:
2046:

Line 2069: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);

2065: -------------------------------------------------------
2066: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
2067: END IF;
2068:
2069: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
2070: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
2071:
2072: --dbms_output.PUT_LINE (' Payout Date: '||l_payout_date);
2073: --dbms_output.PUT_LINE (' Percent Stake: '||l_percent_stake);

Line 2070: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);

2066: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
2067: END IF;
2068:
2069: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
2070: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
2071:
2072: --dbms_output.PUT_LINE (' Payout Date: '||l_payout_date);
2073: --dbms_output.PUT_LINE (' Percent Stake: '||l_percent_stake);
2074:

Line 2140: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);

2136: i_tapv_rec.amount := okl_accounting_util.cross_currency_round_amount
2137: (p_amount => i_tapv_rec.amount
2138: ,p_currency_code => inv_disb_rec.currency_code);
2139:
2140: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
2141:
2142: --dbms_output.PUT_LINE (' Amount Payable: '||i_tapv_rec.amount);
2143:
2144: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 30 ### ');

Line 2144: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 30 ### ');

2140: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
2141:
2142: --dbms_output.PUT_LINE (' Amount Payable: '||i_tapv_rec.amount);
2143:
2144: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 30 ### ');
2145: -- Create Investor Disbursement Lines
2146: i_tplv_rec.tap_id := r_tapv_rec.id;
2147: i_tplv_rec.amount := i_tapv_rec.amount;
2148: i_tplv_rec.sty_id := l_sty_id; --inv_disb_rec.sty_id;

Line 2166: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 31 ### ');

2162:
2163: -- Add tpl_rec to table
2164: i_tplv_tbl(1) := i_tplv_rec;
2165:
2166: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 31 ### ');
2167: --Call the commong disbursement API to create transactions
2168: Okl_Create_Disb_Trans_Pvt.create_disb_trx(
2169: p_api_version => p_api_version
2170: ,p_init_msg_list => p_init_msg_list

Line 2179: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 32 ### ');

2175: ,p_tplv_tbl => i_tplv_tbl
2176: ,x_tapv_rec => r_tapv_rec
2177: ,x_tplv_tbl => r_tplv_tbl);
2178:
2179: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 32 ### ');
2180: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2181: l_error_status := 'E';
2182: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
2183: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

Line 2183: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

2179: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 32 ### ');
2180: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2181: l_error_status := 'E';
2182: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
2183: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2184: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2185: l_error_status := 'E';
2186: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2187: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

Line 2187: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

2183: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2184: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2185: l_error_status := 'E';
2186: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2187: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2188: ELSIF (x_return_status = 'S') THEN
2189: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
2190: ELSE
2191: NULL;

Line 2189: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');

2185: l_error_status := 'E';
2186: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2187: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2188: ELSIF (x_return_status = 'S') THEN
2189: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
2190: ELSE
2191: NULL;
2192: END IF;
2193: /* ankushar end changes */

Line 2220: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 33 ### ');

2216: := inv_disb_rec.sel_id;
2217: END IF;
2218: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2219:
2220: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 33 ### ');
2221:
2222: IF l_error_status = 'S' THEN
2223: ------------------------------
2224: -- Populate PK from sequence

Line 2261: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 34 ### ');

2257:
2258:
2259: END IF;
2260:
2261: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 34 ### ');
2262: END LOOP; -- For each receipt undisbursed
2263:
2264: -- --------------------------------
2265: -- Check If receipts processed

Line 2267: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 35 ### ');

2263:
2264: -- --------------------------------
2265: -- Check If receipts processed
2266: -- --------------------------------
2267: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 35 ### ');
2268: IF l_rcpt_cnt <= 0 THEN
2269: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' **** No Receipts to Process ***');
2270: END IF;
2271:

Line 2269: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ** No Receipts to Process *');

2265: -- Check If receipts processed
2266: -- --------------------------------
2267: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 35 ### ');
2268: IF l_rcpt_cnt <= 0 THEN
2269: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' **** No Receipts to Process ***');
2270: END IF;
2271:
2272: END IF;
2273:

Line 2274: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 36 ### ');

2270: END IF;
2271:
2272: END IF;
2273:
2274: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 36 ### ');
2275: END LOOP; -- Determine Investor Share
2276:
2277: --dbms_output.put_line(' HERE 007: NEVER BEEN HERE ');
2278:

Line 2297: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 37 ### ');

2293: -- else
2294: -- update lsm inv disb status to partial
2295: -----------------------------------------------------
2296:
2297: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 37 ### ');
2298: IF l_error_status = 'E' THEN
2299: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 38 ### ');
2300: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2301: --start:| 09-Mar-2007 cklee Change khr_id from header to line |

Line 2299: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 38 ### ');

2295: -----------------------------------------------------
2296:
2297: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 37 ### ');
2298: IF l_error_status = 'E' THEN
2299: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 38 ### ');
2300: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2301: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2302: -- IF lsm_error_log_table.COUNT > 0 THEN
2303: IF tld_error_log_table.COUNT > 0 THEN

Line 2304: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 39 ### ');

2300: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2301: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2302: -- IF lsm_error_log_table.COUNT > 0 THEN
2303: IF tld_error_log_table.COUNT > 0 THEN
2304: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 39 ### ');
2305: -- FOR i IN lsm_error_log_table.FIRST..lsm_error_log_table.LAST LOOP
2306: FOR i IN tld_error_log_table.FIRST..tld_error_log_table.LAST LOOP
2307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 40 ### ');
2308: UPDATE okl_trx_ap_invoices_b

Line 2307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 40 ### ');

2303: IF tld_error_log_table.COUNT > 0 THEN
2304: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 39 ### ');
2305: -- FOR i IN lsm_error_log_table.FIRST..lsm_error_log_table.LAST LOOP
2306: FOR i IN tld_error_log_table.FIRST..tld_error_log_table.LAST LOOP
2307: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 40 ### ');
2308: UPDATE okl_trx_ap_invoices_b
2309: SET trx_status_code = 'ERROR'
2310: WHERE Id = tld_error_log_table(i).tap_id;
2311:

Line 2322: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 41 ### ');

2318: tld_error_log_table := l_init_tld_table;
2319: l_tld_tab_index := 0;
2320: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2321:
2322: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 41 ### ');
2323: END IF;
2324: --dbms_output.put_line(' HERE 991: '||SQLERRM);
2325: ELSE
2326: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');

Line 2326: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');

2322: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 41 ### ');
2323: END IF;
2324: --dbms_output.put_line(' HERE 991: '||SQLERRM);
2325: ELSE
2326: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');
2327: --dbms_output.put_line(' HERE 100: '||SQLERRM||lsm_succ_log_table.COUNT);
2328: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2329: IF tld_succ_log_table.COUNT > 0 THEN
2330: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43 ### ');

Line 2330: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43 ### ');

2326: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');
2327: --dbms_output.put_line(' HERE 100: '||SQLERRM||lsm_succ_log_table.COUNT);
2328: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2329: IF tld_succ_log_table.COUNT > 0 THEN
2330: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43 ### ');
2331: FOR i IN tld_succ_log_table.FIRST..tld_succ_log_table.LAST LOOP
2332: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2333: IF ( NVL( l_payment_event,'BILLING' ) = 'BILLING' ) OR
2334: --pgomes fix for bug 4430377

Line 2338: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.1 ### ');

2334: --pgomes fix for bug 4430377
2335: (inv_disb_rec.subclass = 'RESIDUAL') OR
2336: (inv_disb_rec.ref_sel_id IS NULL) THEN
2337:
2338: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.1 ### ');
2339: --ssiruvol Bug 5000886 start
2340: UPDATE okl_strm_elements
2341: SET date_billed = SYSDATE
2342: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 change start here

Line 2357: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.2 ### ');

2353: strm_ele_idx:=strm_ele_idx+1;
2354: inv_ele_idx:=inv_ele_idx+1;
2355: --ssiruvol Bug 5000886 end;
2356:
2357: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.2 ### ');
2358: ELSE
2359: --ssiruvol Bug 5000886 start
2360: -- IF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'FULL') THEN
2361: IF (check_rcpts( inv_disb_rec.cnsld_id ) = 'FULL') THEN

Line 2362: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.3 ### ');

2358: ELSE
2359: --ssiruvol Bug 5000886 start
2360: -- IF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'FULL') THEN
2361: IF (check_rcpts( inv_disb_rec.cnsld_id ) = 'FULL') THEN
2362: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.3 ### ');
2363:
2364: UPDATE okl_strm_elements
2365: SET date_billed = SYSDATE
2366: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 change start here

Line 2380: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.4 ### ');

2376: l_inv_ele_id_tbl(inv_ele_idx) :=inv_disb_rec.ref_sel_id;
2377: strm_ele_idx:=strm_ele_idx+1;
2378: inv_ele_idx:=inv_ele_idx+1;
2379:
2380: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.4 ### ');
2381: --ELSIF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'PARTIAL') THEN
2382: ELSIF (check_rcpts( inv_disb_rec.cnsld_id ) = 'PARTIAL') THEN
2383:
2384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.5 ### ');

Line 2384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.5 ### ');

2380: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.4 ### ');
2381: --ELSIF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'PARTIAL') THEN
2382: ELSIF (check_rcpts( inv_disb_rec.cnsld_id ) = 'PARTIAL') THEN
2383:
2384: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.5 ### ');
2385:
2386: l_inv_prtl_id_tbl(inv_ele_prtl_idx) := inv_disb_rec.ref_sel_id;
2387: inv_ele_prtl_idx := inv_ele_prtl_idx + 1;
2388: --ssiruvol Bug 5000886 end

Line 2392: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** WARNING: Unhandled Condition');

2388: --ssiruvol Bug 5000886 end
2389:
2390:
2391: ELSE
2392: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** WARNING: Unhandled Condition');
2393: --dbms_output.put_line('** WARNING: Unhandled Condition');
2394: END IF;
2395:
2396: END IF;

Line 2516: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====* EXITING PROCEDURE OKL_INVESTOR_DISBURSEMENT *=====');

2512: x_msg_data => x_msg_data);
2513:
2514:
2515:
2516: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====*** EXITING PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
2517:
2518: --dbms_output.put_line('=====*** EXITING PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
2519: EXCEPTION
2520: ------------------------------------------------------------

Line 2525: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);

2521: -- Exception handling
2522: ------------------------------------------------------------
2523:
2524: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2525: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);
2526: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2527: p_api_name => l_api_name,
2528: p_pkg_name => G_PKG_NAME,
2529: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 2535: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);

2531: x_msg_data => x_msg_data,
2532: p_api_type => '_PVT');
2533:
2534: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2535: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);
2536: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2537: p_api_name => l_api_name,
2538: p_pkg_name => G_PKG_NAME,
2539: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2545: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);

2541: x_msg_data => x_msg_data,
2542: p_api_type => '_PVT');
2543:
2544: WHEN OTHERS THEN
2545: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);
2546: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2547: p_api_name => l_api_name,
2548: p_pkg_name => G_PKG_NAME,
2549: p_exc_name => 'OTHERS',