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 177: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_next_pymt_date: '||SQLERRM);

173: end loop;
174: return l_next_date;
175: EXCEPTION
176: WHEN others THEN
177: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN get_next_pymt_date: '||SQLERRM);
178: return null;
179: END get_next_pymt_date;
180:
181: FUNCTION check_sel_billed( p_ref_sel_id NUMBER ) RETURN VARCHAR2

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

229:
230:
231: EXCEPTION
232: WHEN others THEN
233: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_sel_billed: '||p_ref_sel_id||SQLERRM);
234: /* dbms_output.PUT_LINE ('** EXCEPTION IN check_sel_billed: '||p_ref_sel_id||SQLERRM); */
235: return 'N';
236: END check_sel_billed;
237:

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

378:
379:
380: EXCEPTION
381: WHEN others THEN
382: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN check_rcpts: '||p_ref_sel_id||SQLERRM);
383: /* dbms_output.put_line('** EXCEPTION IN check_rcpts: '||p_ref_sel_id||SQLERRM); */
384: return NULL;
385: END check_rcpts;
386:

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

553: FETCH ia_info_csr INTO ia_info_rec;
554: CLOSE ia_info_csr;
555: l_ia_id := ia_info_rec.id;
556:
557: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing for Disbursement of Fees :');
558: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Agreement :'||p_investor_agreement );
559: -- Get the investors defined on an Investor Agreement
560: FOR investor_line_rec IN investor_line_csr( l_ia_id)
561: LOOP

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

554: CLOSE ia_info_csr;
555: l_ia_id := ia_info_rec.id;
556:
557: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing for Disbursement of Fees :');
558: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Agreement :'||p_investor_agreement );
559: -- Get the investors defined on an Investor Agreement
560: FOR investor_line_rec IN investor_line_csr( l_ia_id)
561: LOOP
562: -- Get all the expense fees defined for an Investor

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

616:
617:
618: -- Calculate Payout Date
619: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);

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

617:
618: -- Calculate Payout Date
619: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);

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

618: -- Calculate Payout Date
619: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);

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

619: l_payout_date := trunc(SYSDATE) + investor_line_rec.pay_investor_remittance_days;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);

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

620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);

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

621: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor: '||l_investor_name);
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);

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

622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Investor Site: '||l_investor_site_code);
623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);

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

623: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Name: '||l_strm_name);
624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
631: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');

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

624: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Type: '||investor_fee_line_rec.fee_type);
625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
631: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
632: -- Populate Investor Disbursement Header

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

625: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount: '||investor_fee_line_rec.amount);
626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
631: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
632: -- Populate Investor Disbursement Header
633: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;

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

626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Fee Effective From: '||investor_fee_line_rec.start_date);
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
631: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
632: -- Populate Investor Disbursement Header
633: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;
634: i_tapv_rec.currency_code := ia_info_rec.currency_code;

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

627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||investor_line_rec.PAY_INVESTOR_EVENT);
628: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Start Date: '||investor_line_rec.DATE_PAY_INVESTOR_START);
629: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Remittance Days: '||investor_line_rec.pay_investor_remittance_days);
630: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||investor_line_rec.PAY_INVESTOR_FREQUENCY);
631: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '-------------------------------------------------------------');
632: -- Populate Investor Disbursement Header
633: i_tapv_rec.org_id := ia_info_rec.authoring_org_id;
634: i_tapv_rec.currency_code := ia_info_rec.currency_code;
635: i_tapv_rec.CURRENCY_CONVERSION_TYPE := ia_info_rec.currency_conversion_type;

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

713: -- Exception handling
714: ------------------------------------------------------------
715:
716: WHEN OKL_API.G_EXCEPTION_ERROR THEN
717: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);
718: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
719: p_api_name => l_api_name,
720: p_pkg_name => G_PKG_NAME,
721: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

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

723: x_msg_data => x_msg_data,
724: p_api_type => '_PVT');
725:
726: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
727: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);
728: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
729: p_api_name => l_api_name,
730: p_pkg_name => G_PKG_NAME,
731: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

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

733: x_msg_data => x_msg_data,
734: p_api_type => '_PVT');
735:
736: WHEN OTHERS THEN
737: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);
738: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
739: p_api_name => l_api_name,
740: p_pkg_name => G_PKG_NAME,
741: p_exc_name => 'OTHERS',

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

1359: /* dbms_application_info.set_client_info('204'); */
1360: ------------------------------------------------------------
1361: -- Start processing
1362: ------------------------------------------------------------
1363: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====*** START PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
1364:
1365: --dbms_output.PUT_LINE ('=====*** START PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
1366:
1367: x_return_status := OKL_API.G_RET_STS_SUCCESS;

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

1390: -- Pick up lease contracts
1391: -- in an Investor Agreement
1392: -----------------------------------------------------------------
1393:
1394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 1 ### ');
1395:
1396: FOR inv_lease_k_rec IN inv_lease_k_csr ( p_investor_agreement ) LOOP
1397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 2 ### ');
1398: --ssiruvol Bug 5000886 start

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

1393:
1394: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 1 ### ');
1395:
1396: FOR inv_lease_k_rec IN inv_lease_k_csr ( p_investor_agreement ) LOOP
1397: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 2 ### ');
1398: --ssiruvol Bug 5000886 start
1399: strm_ele_idx :=1;
1400: inv_ele_idx :=1;
1401: l_inv_ele_id_tbl:=l_temp_ele_id_tbl;

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

1411: FOR inv_disb_rec IN inv_disb_main_csr( inv_lease_k_rec.Investor_Agreement_ID
1412: ,inv_lease_k_rec.khr_id
1413: ,p_to_date) LOOP
1414:
1415: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 3 ### ');
1416: ------------------------------------
1417: -- Initialize Variables
1418: ------------------------------------
1419: l_break_khr_id := -1;

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

1447: -----------------------------------------------------------------
1448: -- Added condition l_evrgrn_psthrgh_flg by bkatraga for bug 4922294
1449: -- ssiruvol Bug 5000886 start
1450: --IF ((check_sel_billed( inv_disb_rec.ref_sel_id ) = 'Y') AND l_evrgrn_psthrgh_flg = 0) THEN
1451: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 4 ### ');
1452: IF (l_billed = 'Y' AND l_evrgrn_psthrgh_flg = 0) THEN
1453: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 5 ### ');
1454: -- ssiruvol Bug 5000886 end
1455:

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

1449: -- ssiruvol Bug 5000886 start
1450: --IF ((check_sel_billed( inv_disb_rec.ref_sel_id ) = 'Y') AND l_evrgrn_psthrgh_flg = 0) THEN
1451: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 4 ### ');
1452: IF (l_billed = 'Y' AND l_evrgrn_psthrgh_flg = 0) THEN
1453: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 5 ### ');
1454: -- ssiruvol Bug 5000886 end
1455:
1456:
1457: -----------------------------------------------------------------

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

1473:
1474: -----------------------------------------------------------------
1475: -- Determine investor and share
1476: -----------------------------------------------------------------
1477: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 6 ### ');
1478: FOR share_rec IN share_csr ( inv_lease_k_rec.Investor_Agreement_ID ) LOOP
1479: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 7 ### ');
1480:
1481: l_sty_id := NULL;

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

1475: -- Determine investor and share
1476: -----------------------------------------------------------------
1477: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 6 ### ');
1478: FOR share_rec IN share_csr ( inv_lease_k_rec.Investor_Agreement_ID ) LOOP
1479: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 7 ### ');
1480:
1481: l_sty_id := NULL;
1482: IF inv_disb_rec.Stream_purpose = 'INVESTOR_RENT_DISB_BASIS' THEN
1483:

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

1486: p_primary_sty_purpose => 'INVESTOR_RENT_PAYABLE',
1487: x_return_status => l_return_status,
1488: x_primary_sty_id => l_sty_id );
1489: IF l_sty_id IS NULL THEN
1490: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_RENT_PAYABLE stream type found.');
1491: END IF;
1492: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_PRINCIPAL_DISB_BASIS' THEN
1493:
1494: Okl_Streams_Util.get_primary_stream_type(

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

1496: p_primary_sty_purpose => 'INVESTOR_PRINCIPAL_PAYABLE',
1497: x_return_status => l_return_status,
1498: x_primary_sty_id => l_sty_id );
1499: IF l_sty_id IS NULL THEN
1500: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PRINCIPAL_PAYABLE stream type found.');
1501: END IF;
1502: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_INTEREST_DISB_BASIS' THEN
1503:
1504: Okl_Streams_Util.get_primary_stream_type(

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

1506: p_primary_sty_purpose => 'INVESTOR_INTEREST_PAYABLE',
1507: x_return_status => l_return_status,
1508: x_primary_sty_id => l_sty_id );
1509: IF l_sty_id IS NULL THEN
1510: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_INTEREST_PAYABLE stream type found.');
1511: END IF;
1512: ELSIF inv_disb_rec.Stream_purpose = 'INVESTOR_PPD_DISB_BASIS' THEN
1513:
1514: Okl_Streams_Util.get_primary_stream_type(

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

1516: p_primary_sty_purpose => 'INVESTOR_PAYDOWN_PAYABLE',
1517: x_return_status => l_return_status,
1518: x_primary_sty_id => l_sty_id );
1519: IF l_sty_id IS NULL THEN
1520: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -*- No attached INVESTOR_PAYDOWN_PAYABLE stream type found.');
1521: END IF;
1522: ELSIF inv_disb_rec.Stream_purpose IN ('INVESTOR_LATE_FEE_PAYABLE',
1523: 'INVESTOR_LATE_INTEREST_PAY',
1524: 'INVESTOR_RENT_BUYBACK',

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

1535: ELSE
1536: l_sty_id := NULL;
1537: END IF;
1538:
1539: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 8 ### ');
1540: -- Get Disbursement Stream Name
1541: l_disb_strm_name := NULL;
1542: OPEN disb_strm_csr( l_sty_id );
1543: FETCH disb_strm_csr INTO l_disb_strm_name;

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

1541: l_disb_strm_name := NULL;
1542: OPEN disb_strm_csr( l_sty_id );
1543: FETCH disb_strm_csr INTO l_disb_strm_name;
1544: CLOSE disb_strm_csr;
1545: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 9 ### ');
1546: ------------------------------------------------------------------
1547: -- Work out common variables
1548: ------------------------------------------------------------------
1549: IF ( inv_lease_k_rec.Investor_Agreement_id <> l_break_khr_id OR

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

1548: ------------------------------------------------------------------
1549: IF ( inv_lease_k_rec.Investor_Agreement_id <> l_break_khr_id OR
1550: share_rec.TOP_LINE_ID <> l_break_top_line_id ) THEN
1551:
1552: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 10 ### ');
1553: -------------------------------------------------------
1554: -- Reset Break detection variables
1555: -------------------------------------------------------
1556: l_break_khr_id := inv_lease_k_rec.Investor_Agreement_id;

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

1581:
1582: -----------------------------------------------
1583: -- Fetch Org Id into Local Variable
1584: -----------------------------------------------
1585: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 11 ### ');
1586: OPEN org_id_csr ( inv_lease_k_rec.Investor_Agreement_id );
1587: FETCH org_id_csr INTO l_org_id;
1588: CLOSE org_id_csr;
1589:

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

1586: OPEN org_id_csr ( inv_lease_k_rec.Investor_Agreement_id );
1587: FETCH org_id_csr INTO l_org_id;
1588: CLOSE org_id_csr;
1589:
1590: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 12 ### ');
1591: -----------------------------------------------
1592: -- Fetch Set Of Books into Local Variable
1593: -----------------------------------------------
1594: OPEN sob_csr (l_org_id) ;

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

1593: -----------------------------------------------
1594: OPEN sob_csr (l_org_id) ;
1595: FETCH sob_csr INTO l_sob_id;
1596: CLOSE sob_csr;
1597: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 13 ### ');
1598:
1599: -----------------------------------------------
1600: -- Fetch try_id into Local Variable
1601: -----------------------------------------------

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

1601: -----------------------------------------------
1602: OPEN try_id_csr;
1603: FETCH try_id_csr INTO l_try_id;
1604: CLOSE try_id_csr;
1605: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 14 ### ');
1606:
1607: -----------------------------------------------
1608: -- Select Investor attributes
1609: -----------------------------------------------

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

1614: l_pay_method,
1615: l_pay_group_code;
1616: CLOSE vendor_attrs_csr;
1617:
1618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 15 ### ');
1619: ----------------------------------------
1620: -- Get Vendor Name from PO_Vendors_All
1621: ----------------------------------------
1622: l_investor_name := NULL;

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

1622: l_investor_name := NULL;
1623: OPEN vendor_name_csr ( l_investor_id );
1624: FETCH vendor_name_csr INTO l_investor_name;
1625: CLOSE vendor_name_csr;
1626: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 16 ### ');
1627:
1628: ----------------------------------------
1629: -- Get Vendor Site from po_vendor_sites
1630: ----------------------------------------

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

1632: OPEN vendor_site_csr ( l_investor_site_id );
1633: FETCH vendor_site_csr INTO l_investor_site_code;
1634: CLOSE vendor_site_csr;
1635:
1636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 17 ### ');
1637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1638: ||inv_lease_k_rec.Investor_Agreement
1639: ||' Investor: '||l_investor_name
1640: ||' Investor Site: '||l_investor_site_code);

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

1633: FETCH vendor_site_csr INTO l_investor_site_code;
1634: CLOSE vendor_site_csr;
1635:
1636: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 17 ### ');
1637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1638: ||inv_lease_k_rec.Investor_Agreement
1639: ||' Investor: '||l_investor_name
1640: ||' Investor Site: '||l_investor_site_code);
1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);

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

1637: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing Investor Agreement: '
1638: ||inv_lease_k_rec.Investor_Agreement
1639: ||' Investor: '||l_investor_name
1640: ||' Investor Site: '||l_investor_site_code);
1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);

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

1638: ||inv_lease_k_rec.Investor_Agreement
1639: ||' Investor: '||l_investor_name
1640: ||' Investor Site: '||l_investor_site_code);
1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);

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

1639: ||' Investor: '||l_investor_name
1640: ||' Investor Site: '||l_investor_site_code);
1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1647:

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

1640: ||' Investor Site: '||l_investor_site_code);
1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1647:
1648: -----------------------------------------------

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

1641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Lease Contract: '||inv_disb_rec.Lease_Contract);
1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1647:
1648: -----------------------------------------------
1649: -- Select Basis and Event

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

1642: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Name: '||inv_disb_rec.Stream_Name);
1643: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Source Stream Purpose: '||inv_disb_rec.Stream_purpose);
1644: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Disbursed Stream: '||l_disb_strm_name);
1645: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Amount: '||inv_disb_rec.amount);
1646: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Stream Date: '||inv_disb_rec.bill_date);
1647:
1648: -----------------------------------------------
1649: -- Select Basis and Event
1650: -----------------------------------------------

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

1677: END IF;
1678: END IF; -- Investor Agreement Level Break
1679:
1680:
1681: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 20 ### ');
1682:
1683: -----------------------------------------------------------------
1684: -- Determine Basis and Event
1685: -----------------------------------------------------------------

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

1686: OPEN payout_attrs_csr ( inv_lease_k_rec.Investor_Agreement_ID );
1687: FETCH payout_attrs_csr INTO l_payment_basis, l_payment_event;
1688: CLOSE payout_attrs_csr;
1689:
1690: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1692: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1693: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1694: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);

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

1687: FETCH payout_attrs_csr INTO l_payment_basis, l_payment_event;
1688: CLOSE payout_attrs_csr;
1689:
1690: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1692: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1693: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1694: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1695: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);

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

1688: CLOSE payout_attrs_csr;
1689:
1690: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 21 ### ');
1691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1692: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1693: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1694: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1695: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);
1696:

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

1691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Basis: '||l_payment_event);
1692: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Event: '||share_rec.PAY_INVESTOR_EVENT
1693: ||' Start Date: '||share_rec.DATE_PAY_INVESTOR_START
1694: ||' Remittance Days: '||share_rec.pay_investor_remittance_days);
1695: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Frequency: '||share_rec.PAY_INVESTOR_FREQUENCY);
1696:
1697: l_percent_stake := NULL;
1698:
1699: -- --------------------------------------------------------------

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

1734: END IF;
1735:
1736: l_percent_stake := NULL;
1737:
1738: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 22 ### ');
1739: OPEN get_parent_stake ( share_rec.TOP_LINE_ID
1740: ,l_parent_sty_subclass );
1741: FETCH get_parent_stake INTO l_percent_stake;
1742: CLOSE get_parent_stake;

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

1740: ,l_parent_sty_subclass );
1741: FETCH get_parent_stake INTO l_percent_stake;
1742: CLOSE get_parent_stake;
1743:
1744: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 23 ### ');
1745:
1746: IF l_percent_stake IS NULL THEN
1747: l_percent_stake := 0;
1748: END IF;

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

1762: ----------------------------------------------------
1763: -- Billing Based disbursement
1764: ----------------------------------------------------
1765:
1766: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 24 ### ');
1767: IF ( NVL(share_rec.PAY_INVESTOR_EVENT,'SCHEDULE' ) = 'SCHEDULE' ) THEN
1768: l_payout_date := get_next_pymt_date (
1769: share_rec.DATE_PAY_INVESTOR_START,
1770: share_rec.PAY_INVESTOR_FREQUENCY,

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

1773: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
1774: END IF;
1775:
1776:
1777: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1778: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1779:
1780: -- *********************************************** --
1781: -- Insert into TAP TPL

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

1774: END IF;
1775:
1776:
1777: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1778: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1779:
1780: -- *********************************************** --
1781: -- Insert into TAP TPL
1782: -- *********************************************** --

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

1839: i_tapv_rec.amount := okl_accounting_util.cross_currency_round_amount
1840: (p_amount => i_tapv_rec.amount
1841: ,p_currency_code => inv_disb_rec.currency_code);
1842:
1843: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
1844:
1845: -- Create Investor Disbursement Lines
1846: i_tplv_rec.tap_id := r_tapv_rec.id;
1847: i_tplv_rec.amount := i_tapv_rec.amount;

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

1866:
1867: -- Add tpl_rec to table
1868: i_tplv_tbl(1) := i_tplv_rec;
1869:
1870: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 25 ### ');
1871: --Call the commong disbursement API to create transactions
1872: Okl_Create_Disb_Trans_Pvt.create_disb_trx(
1873: p_api_version => p_api_version
1874: ,p_init_msg_list => p_init_msg_list

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

1879: ,p_tplv_tbl => i_tplv_tbl
1880: ,x_tapv_rec => r_tapv_rec
1881: ,x_tplv_tbl => r_tplv_tbl);
1882:
1883: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26 ### ');
1884: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1885: l_error_status := 'E';
1886: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
1887: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

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

1883: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26 ### ');
1884: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1885: l_error_status := 'E';
1886: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
1887: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1888: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1889: l_error_status := 'E';
1890: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

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

1887: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1888: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1889: l_error_status := 'E';
1890: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1892: ELSIF (x_return_status = 'S') THEN
1893: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
1894: ELSE
1895: NULL;

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

1889: l_error_status := 'E';
1890: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
1891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
1892: ELSIF (x_return_status = 'S') THEN
1893: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
1894: ELSE
1895: NULL;
1896: END IF;
1897:

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

1901: -- Build an error Table
1902: -- *********************************************** --
1903: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1904:
1905: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.1 ### ');
1906: IF l_error_status = 'E' THEN
1907: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.2 ### ');
1908: l_tld_tab_index := l_tld_tab_index + 1;
1909:

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

1903: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1904:
1905: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.1 ### ');
1906: IF l_error_status = 'E' THEN
1907: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.2 ### ');
1908: l_tld_tab_index := l_tld_tab_index + 1;
1909:
1910: tld_error_log_table(l_tld_tab_index).tap_id
1911: := r_tapv_rec.id;

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

1913: := r_tplv_rec.id;
1914: tld_error_log_table(l_tld_tab_index).error_message
1915: := l_error_message;
1916: ELSE
1917: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3 ### ');
1918: l_succ_tab_index := l_succ_tab_index + 1;
1919:
1920: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3.1 ### ' || to_char(r_tapv_rec.id));
1921:

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

1916: ELSE
1917: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3 ### ');
1918: l_succ_tab_index := l_succ_tab_index + 1;
1919:
1920: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.3.1 ### ' || to_char(r_tapv_rec.id));
1921:
1922: tld_succ_log_table( l_succ_tab_index ).tap_id
1923: := r_tapv_rec.id;
1924: tld_succ_log_table( l_succ_tab_index ).tpl_id

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

1924: tld_succ_log_table( l_succ_tab_index ).tpl_id
1925: := r_tplv_rec.id;
1926: tld_succ_log_table( l_succ_tab_index ).proc_sel_id
1927: := inv_disb_rec.sel_id;
1928: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 26.4 ### ');
1929:
1930: END IF;
1931: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
1932:

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

1931: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
1932:
1933: ELSE -- If the basis is receipt
1934:
1935: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 27 ### ');
1936: --dbms_output.PUT_LINE (' Receipt Based Processing ');
1937: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1938: l_ref_tld_id := NULL;
1939: --end:| 09-Mar-2007 cklee Change khr_id from header to line |

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

1950: -- Receipt Based disbursement
1951: ----------------------------------------------------
1952: l_rcpt_cnt := 0;
1953: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
1954: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 28 ### ');
1955: FOR rcpts_rec IN rcpts_csr (l_ref_tld_id,
1956: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
1957: inv_lease_k_rec.Investor_Agreement_id,
1958: share_rec.TOP_LINE_ID

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

1957: inv_lease_k_rec.Investor_Agreement_id,
1958: share_rec.TOP_LINE_ID
1959: ) LOOP
1960:
1961: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 29 ### ');
1962: l_rcpt_cnt := l_rcpt_cnt + 1;
1963:
1964:
1965:

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

1977: -------------------------------------------------------
1978: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
1979: END IF;
1980:
1981: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1982: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1983:
1984: --dbms_output.PUT_LINE (' Payout Date: '||l_payout_date);
1985: --dbms_output.PUT_LINE (' Percent Stake: '||l_percent_stake);

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

1978: l_payout_date := trunc(SYSDATE) + share_rec.pay_investor_remittance_days;
1979: END IF;
1980:
1981: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Payout Date: '||l_payout_date);
1982: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Percent Stake: '||l_percent_stake);
1983:
1984: --dbms_output.PUT_LINE (' Payout Date: '||l_payout_date);
1985: --dbms_output.PUT_LINE (' Percent Stake: '||l_percent_stake);
1986:

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

2048: i_tapv_rec.amount := okl_accounting_util.cross_currency_round_amount
2049: (p_amount => i_tapv_rec.amount
2050: ,p_currency_code => inv_disb_rec.currency_code);
2051:
2052: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
2053:
2054: --dbms_output.PUT_LINE (' Amount Payable: '||i_tapv_rec.amount);
2055:
2056: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 30 ### ');

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

2052: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Amount Payable: '||i_tapv_rec.amount);
2053:
2054: --dbms_output.PUT_LINE (' Amount Payable: '||i_tapv_rec.amount);
2055:
2056: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 30 ### ');
2057: -- Create Investor Disbursement Lines
2058: i_tplv_rec.tap_id := r_tapv_rec.id;
2059: i_tplv_rec.amount := i_tapv_rec.amount;
2060: i_tplv_rec.sty_id := l_sty_id; --inv_disb_rec.sty_id;

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

2074:
2075: -- Add tpl_rec to table
2076: i_tplv_tbl(1) := i_tplv_rec;
2077:
2078: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 31 ### ');
2079: --Call the commong disbursement API to create transactions
2080: Okl_Create_Disb_Trans_Pvt.create_disb_trx(
2081: p_api_version => p_api_version
2082: ,p_init_msg_list => p_init_msg_list

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

2087: ,p_tplv_tbl => i_tplv_tbl
2088: ,x_tapv_rec => r_tapv_rec
2089: ,x_tplv_tbl => r_tplv_tbl);
2090:
2091: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 32 ### ');
2092: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2093: l_error_status := 'E';
2094: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
2095: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

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

2091: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 32 ### ');
2092: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2093: l_error_status := 'E';
2094: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions. ';
2095: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2096: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2097: l_error_status := 'E';
2098: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2099: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');

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

2095: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2096: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2097: l_error_status := 'E';
2098: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2099: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2100: ELSIF (x_return_status = 'S') THEN
2101: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
2102: ELSE
2103: NULL;

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

2097: l_error_status := 'E';
2098: l_error_message := l_error_message||'Error creating Investor Disbursement Transactions ';
2099: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Error creating Investor Disbursement Transactions.');
2100: ELSIF (x_return_status = 'S') THEN
2101: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' Created Investor Disbursement Transactions.');
2102: ELSE
2103: NULL;
2104: END IF;
2105: /* ankushar end changes */

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

2128: := inv_disb_rec.sel_id;
2129: END IF;
2130: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2131:
2132: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 33 ### ');
2133:
2134: IF l_error_status = 'S' THEN
2135: ------------------------------
2136: -- Populate PK from sequence

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

2169:
2170:
2171: END IF;
2172:
2173: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 34 ### ');
2174: END LOOP; -- For each receipt undisbursed
2175:
2176: -- --------------------------------
2177: -- Check If receipts processed

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

2175:
2176: -- --------------------------------
2177: -- Check If receipts processed
2178: -- --------------------------------
2179: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 35 ### ');
2180: IF l_rcpt_cnt <= 0 THEN
2181: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' **** No Receipts to Process ***');
2182: END IF;
2183:

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

2177: -- Check If receipts processed
2178: -- --------------------------------
2179: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 35 ### ');
2180: IF l_rcpt_cnt <= 0 THEN
2181: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' **** No Receipts to Process ***');
2182: END IF;
2183:
2184: END IF;
2185:

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

2182: END IF;
2183:
2184: END IF;
2185:
2186: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 36 ### ');
2187: END LOOP; -- Determine Investor Share
2188:
2189: --dbms_output.put_line(' HERE 007: NEVER BEEN HERE ');
2190:

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

2205: -- else
2206: -- update lsm inv disb status to partial
2207: -----------------------------------------------------
2208:
2209: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 37 ### ');
2210: IF l_error_status = 'E' THEN
2211: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 38 ### ');
2212: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2213: --start:| 09-Mar-2007 cklee Change khr_id from header to line |

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

2207: -----------------------------------------------------
2208:
2209: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 37 ### ');
2210: IF l_error_status = 'E' THEN
2211: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 38 ### ');
2212: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2213: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2214: -- IF lsm_error_log_table.COUNT > 0 THEN
2215: IF tld_error_log_table.COUNT > 0 THEN

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

2212: --dbms_output.put_line(' HERE 99: '||SQLERRM);
2213: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2214: -- IF lsm_error_log_table.COUNT > 0 THEN
2215: IF tld_error_log_table.COUNT > 0 THEN
2216: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 39 ### ');
2217: -- FOR i IN lsm_error_log_table.FIRST..lsm_error_log_table.LAST LOOP
2218: FOR i IN tld_error_log_table.FIRST..tld_error_log_table.LAST LOOP
2219: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 40 ### ');
2220: UPDATE okl_trx_ap_invoices_b

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

2215: IF tld_error_log_table.COUNT > 0 THEN
2216: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 39 ### ');
2217: -- FOR i IN lsm_error_log_table.FIRST..lsm_error_log_table.LAST LOOP
2218: FOR i IN tld_error_log_table.FIRST..tld_error_log_table.LAST LOOP
2219: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 40 ### ');
2220: UPDATE okl_trx_ap_invoices_b
2221: SET trx_status_code = 'ERROR'
2222: WHERE Id = tld_error_log_table(i).tap_id;
2223:

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

2230: tld_error_log_table := l_init_tld_table;
2231: l_tld_tab_index := 0;
2232: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2233:
2234: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 41 ### ');
2235: END IF;
2236: --dbms_output.put_line(' HERE 991: '||SQLERRM);
2237: ELSE
2238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');

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

2234: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 41 ### ');
2235: END IF;
2236: --dbms_output.put_line(' HERE 991: '||SQLERRM);
2237: ELSE
2238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');
2239: --dbms_output.put_line(' HERE 100: '||SQLERRM||lsm_succ_log_table.COUNT);
2240: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2241: IF tld_succ_log_table.COUNT > 0 THEN
2242: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43 ### ');

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

2238: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 42 ### ');
2239: --dbms_output.put_line(' HERE 100: '||SQLERRM||lsm_succ_log_table.COUNT);
2240: --start:| 09-Mar-2007 cklee Change khr_id from header to line |
2241: IF tld_succ_log_table.COUNT > 0 THEN
2242: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43 ### ');
2243: FOR i IN tld_succ_log_table.FIRST..tld_succ_log_table.LAST LOOP
2244: --end:| 09-Mar-2007 cklee Change khr_id from header to line |
2245: IF ( NVL( l_payment_event,'BILLING' ) = 'BILLING' ) OR
2246: --pgomes fix for bug 4430377

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

2246: --pgomes fix for bug 4430377
2247: (inv_disb_rec.subclass = 'RESIDUAL') OR
2248: (inv_disb_rec.ref_sel_id IS NULL) THEN
2249:
2250: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.1 ### ');
2251: --ssiruvol Bug 5000886 start
2252: UPDATE okl_strm_elements
2253: SET date_billed = SYSDATE
2254: WHERE id = tld_succ_log_table(i).proc_sel_id;

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

2262: strm_ele_idx:=strm_ele_idx+1;
2263: inv_ele_idx:=inv_ele_idx+1;
2264: --ssiruvol Bug 5000886 end;
2265:
2266: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.2 ### ');
2267: ELSE
2268: --ssiruvol Bug 5000886 start
2269: -- IF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'FULL') THEN
2270: IF (check_rcpts( inv_disb_rec.cnsld_id ) = 'FULL') THEN

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

2267: ELSE
2268: --ssiruvol Bug 5000886 start
2269: -- IF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'FULL') THEN
2270: IF (check_rcpts( inv_disb_rec.cnsld_id ) = 'FULL') THEN
2271: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.3 ### ');
2272:
2273: UPDATE okl_strm_elements
2274: SET date_billed = SYSDATE
2275: WHERE id = tld_succ_log_table(i).proc_sel_id;

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

2282: l_inv_ele_id_tbl(inv_ele_idx) :=inv_disb_rec.ref_sel_id;
2283: strm_ele_idx:=strm_ele_idx+1;
2284: inv_ele_idx:=inv_ele_idx+1;
2285:
2286: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.4 ### ');
2287: --ELSIF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'PARTIAL') THEN
2288: ELSIF (check_rcpts( inv_disb_rec.cnsld_id ) = 'PARTIAL') THEN
2289:
2290: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.5 ### ');

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

2286: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.4 ### ');
2287: --ELSIF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'PARTIAL') THEN
2288: ELSIF (check_rcpts( inv_disb_rec.cnsld_id ) = 'PARTIAL') THEN
2289:
2290: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.5 ### ');
2291:
2292: l_inv_prtl_id_tbl(inv_ele_prtl_idx) := inv_disb_rec.ref_sel_id;
2293: inv_ele_prtl_idx := inv_ele_prtl_idx + 1;
2294: --ssiruvol Bug 5000886 end

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

2294: --ssiruvol Bug 5000886 end
2295:
2296:
2297: ELSE
2298: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** WARNING: Unhandled Condition');
2299: --dbms_output.put_line('** WARNING: Unhandled Condition');
2300: END IF;
2301:
2302: END IF;

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

2412: x_msg_data => x_msg_data);
2413:
2414:
2415:
2416: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '=====*** EXITING PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
2417:
2418: --dbms_output.put_line('=====*** EXITING PROCEDURE OKL_INVESTOR_DISBURSEMENT ***=====');
2419: EXCEPTION
2420: ------------------------------------------------------------

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

2421: -- Exception handling
2422: ------------------------------------------------------------
2423:
2424: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2425: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 1: '||SQLERRM);
2426: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2427: p_api_name => l_api_name,
2428: p_pkg_name => G_PKG_NAME,
2429: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

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

2431: x_msg_data => x_msg_data,
2432: p_api_type => '_PVT');
2433:
2434: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2435: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 2: '||SQLERRM);
2436: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2437: p_api_name => l_api_name,
2438: p_pkg_name => G_PKG_NAME,
2439: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

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

2441: x_msg_data => x_msg_data,
2442: p_api_type => '_PVT');
2443:
2444: WHEN OTHERS THEN
2445: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' ERROR 3: '||SQLERRM);
2446: x_return_status := OKL_API.HANDLE_EXCEPTIONS (
2447: p_api_name => l_api_name,
2448: p_pkg_name => G_PKG_NAME,
2449: p_exc_name => 'OTHERS',