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_LTE_INT_PVT dependencies on FND_FILE

Line 412: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start of Calculate Late Interest.');

408: END IF;
409:
410: l_init_msg_list := p_init_msg_list ;
411:
412: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start of Calculate Late Interest.');
413:
414: SELECT FND_GLOBAL.USER_ID
415: ,FND_GLOBAL.LOGIN_ID
416: ,NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),null)

Line 424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing: RECEIVABLES INVOICE ID => '||l_inv_cur.RECEIVABLES_INVOICE_ID||

420: FROM dual;
421:
422: FOR l_inv_cur IN l_late_invs_cur
423: LOOP
424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing: RECEIVABLES INVOICE ID => '||l_inv_cur.RECEIVABLES_INVOICE_ID||
425: ' ,due date=> '||l_inv_cur.DUE_DATE|| ' ,payment application date=> '||l_inv_cur.APPLY_DATE||' and Amount=> '||l_inv_cur.AMOUNT_APPLIED
426: ||' ,Contract Id=> '||l_inv_cur.contract_number);
427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Late policy => ' || l_inv_cur.late_policy
428: || ' ,Contract currency => ' || l_inv_cur.currency_code);

Line 427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Late policy => ' || l_inv_cur.late_policy

423: LOOP
424: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Processing: RECEIVABLES INVOICE ID => '||l_inv_cur.RECEIVABLES_INVOICE_ID||
425: ' ,due date=> '||l_inv_cur.DUE_DATE|| ' ,payment application date=> '||l_inv_cur.APPLY_DATE||' and Amount=> '||l_inv_cur.AMOUNT_APPLIED
426: ||' ,Contract Id=> '||l_inv_cur.contract_number);
427: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Late policy => ' || l_inv_cur.late_policy
428: || ' ,Contract currency => ' || l_inv_cur.currency_code);
429: l_amt_applied := l_inv_cur.AMOUNT_APPLIED;
430: l_due_date := l_inv_cur.due_date;
431: l_khr_id := l_inv_cur.CONTRACT_ID;

Line 497: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- LATE POLICY TYPE CODE => '||l_lpo_cur.LATE_POLICY_TYPE_CODE||

493: l_days_in_year := l_lpo_cur.days_in_year;
494: --end code pgomes 12/18/2002
495:
496: -- pgomes 12/18/2002 start, changed code to consider converted amounts
497: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- LATE POLICY TYPE CODE => '||l_lpo_cur.LATE_POLICY_TYPE_CODE||
498: ' LATE INT MINIMUM BALANCE=> '||l_late_int_minimum_balance
499: ||' ,LATE INT GRACE PERIOD=> '||l_lpo_cur.LATE_INT_GRACE_PERIOD);
500: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- INTEREST RATE => ' || l_late_int_rate ||
501: ' ADDER RATE => ' || l_adder_rate || ' INDEX RATE => ' || l_index_rate);

Line 500: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- INTEREST RATE => ' || l_late_int_rate ||

496: -- pgomes 12/18/2002 start, changed code to consider converted amounts
497: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- LATE POLICY TYPE CODE => '||l_lpo_cur.LATE_POLICY_TYPE_CODE||
498: ' LATE INT MINIMUM BALANCE=> '||l_late_int_minimum_balance
499: ||' ,LATE INT GRACE PERIOD=> '||l_lpo_cur.LATE_INT_GRACE_PERIOD);
500: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- INTEREST RATE => ' || l_late_int_rate ||
501: ' ADDER RATE => ' || l_adder_rate || ' INDEX RATE => ' || l_index_rate);
502: END LOOP;
503: l_prev_late_policy := l_late_policy;
504: l_prev_contract_currency := l_contract_currency;

Line 509: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id => '||l_sty_id);

505: END IF;
506:
507: l_error_flag := FALSE;
508: IF(l_late_int_minimum_balance < l_amt_applied) THEN
509: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id => '||l_sty_id);
510: -- 365 to be replaced by no. of days from the rule
511: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days past due => '||(l_apply_date - l_due_date));
512: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year code => '||l_days_in_year);
513:

Line 511: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days past due => '||(l_apply_date - l_due_date));

507: l_error_flag := FALSE;
508: IF(l_late_int_minimum_balance < l_amt_applied) THEN
509: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id => '||l_sty_id);
510: -- 365 to be replaced by no. of days from the rule
511: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days past due => '||(l_apply_date - l_due_date));
512: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year code => '||l_days_in_year);
513:
514: BEGIN
515: IF (upper(l_days_in_year) = 'ACTUAL') THEN

Line 512: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year code => '||l_days_in_year);

508: IF(l_late_int_minimum_balance < l_amt_applied) THEN
509: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id => '||l_sty_id);
510: -- 365 to be replaced by no. of days from the rule
511: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days past due => '||(l_apply_date - l_due_date));
512: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year code => '||l_days_in_year);
513:
514: BEGIN
515: IF (upper(l_days_in_year) = 'ACTUAL') THEN
516: l_days_calc := add_months(trunc(l_due_date, 'YEAR'), 12) - trunc(l_due_date, 'YEAR');

Line 521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year => '||l_days_calc);

517: ELSE
518: l_days_calc := to_number(l_days_in_year);
519: END IF;
520:
521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year => '||l_days_calc);
522: EXCEPTION
523: WHEN OTHERS THEN
524: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Calculating Days in a year.');
525: END;

Line 524: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Calculating Days in a year.');

520:
521: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Days in a year => '||l_days_calc);
522: EXCEPTION
523: WHEN OTHERS THEN
524: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Calculating Days in a year.');
525: END;
526:
527: IF(l_late_int_fixed_yn = 'Y') THEN
528: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Fixed: Interest rate applied => '||(l_late_int_rate+l_adder_rate));

Line 528: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Fixed: Interest rate applied => '||(l_late_int_rate+l_adder_rate));

524: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Calculating Days in a year.');
525: END;
526:
527: IF(l_late_int_fixed_yn = 'Y') THEN
528: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Fixed: Interest rate applied => '||(l_late_int_rate+l_adder_rate));
529: l_amount := ((l_amt_applied*(l_late_int_rate+l_adder_rate)*(l_apply_date-l_due_date))/100)/l_days_calc;
530: l_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(l_amount, l_contract_currency);
531: ELSE
532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Variable: Interest rate applied => '||(l_index_rate+l_adder_rate));

Line 532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Variable: Interest rate applied => '||(l_index_rate+l_adder_rate));

528: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Fixed: Interest rate applied => '||(l_late_int_rate+l_adder_rate));
529: l_amount := ((l_amt_applied*(l_late_int_rate+l_adder_rate)*(l_apply_date-l_due_date))/100)/l_days_calc;
530: l_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(l_amount, l_contract_currency);
531: ELSE
532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Variable: Interest rate applied => '||(l_index_rate+l_adder_rate));
533: l_amount := ((l_amt_applied*(l_index_rate+l_adder_rate)*(l_apply_date-l_due_date))/100)/l_days_calc;
534: l_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(l_amount, l_contract_currency);
535: END IF;
536: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Calculated late interest => '||l_amount);

Line 536: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Calculated late interest => '||l_amount);

532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Variable: Interest rate applied => '||(l_index_rate+l_adder_rate));
533: l_amount := ((l_amt_applied*(l_index_rate+l_adder_rate)*(l_apply_date-l_due_date))/100)/l_days_calc;
534: l_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(l_amount, l_contract_currency);
535: END IF;
536: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Calculated late interest => '||l_amount);
537:
538: IF(l_amount < l_minimum_late_interest) THEN
539: l_interest_amount := l_minimum_late_interest;
540: ELSIF(l_amount > l_maximum_late_interest) THEN

Line 545: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Applied late interest => '||l_interest_amount);

541: l_interest_amount := l_maximum_late_interest;
542: ELSE
543: l_interest_amount := l_amount;
544: END IF;
545: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Applied late interest => '||l_interest_amount);
546: -- pgomes 12/18/2002 end, changed code to consider converted amountss
547:
548:
549: IF l_interest_amount > 0 then

Line 565: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose LATE_INTEREST retrieved.');

561: x_return_status => l_return_status,
562: x_primary_sty_id => l_sty_id );
563:
564: IF (l_return_status = 'S' ) THEN
565: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose LATE_INTEREST retrieved.');
566: ELSE
567: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose LATE_INTEREST.');
568: END IF;
569:

Line 567: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose LATE_INTEREST.');

563:
564: IF (l_return_status = 'S' ) THEN
565: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose LATE_INTEREST retrieved.');
566: ELSE
567: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose LATE_INTEREST.');
568: END IF;
569:
570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 600: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating LATE INTEREST Stream');

596: l_stmv_rec.active_yn := 'Y';
597: l_stmv_rec.date_current := sysdate;
598: l_stmv_rec.comments := 'LATE INTEREST BILLING';
599:
600: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating LATE INTEREST Stream');
601:
602: Okl_Streams_Pub.create_streams(
603: p_api_version => p_api_version,
604: p_init_msg_list => p_init_msg_list,

Line 616: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for LATE INTEREST');

612: l_se_line_number := 1;
613:
614: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
615: l_error_flag := TRUE;
616: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for LATE INTEREST');
617: ELSE
618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');
619: END IF;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

Line 618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');

614: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
615: l_error_flag := TRUE;
616: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for LATE INTEREST');
617: ELSE
618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');
619: END IF;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
621: ELSE
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for LATE INTEREST found');

Line 620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

616: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for LATE INTEREST');
617: ELSE
618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');
619: END IF;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
621: ELSE
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for LATE INTEREST found');
623: open l_stream_line_nbr_csr(l_stm_id);
624: fetch l_stream_line_nbr_csr into l_se_line_number;

Line 622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for LATE INTEREST found');

618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');
619: END IF;
620: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
621: ELSE
622: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for LATE INTEREST found');
623: open l_stream_line_nbr_csr(l_stm_id);
624: fetch l_stream_line_nbr_csr into l_se_line_number;
625: close l_stream_line_nbr_csr;
626: l_se_line_number := l_se_line_number + 1;

Line 627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

623: open l_stream_line_nbr_csr(l_stm_id);
624: fetch l_stream_line_nbr_csr into l_se_line_number;
625: close l_stream_line_nbr_csr;
626: l_se_line_number := l_se_line_number + 1;
627: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
628: END IF;
629:
630: --create stream element for late interest
631: IF (l_stm_id IS NOT NULL) THEN

Line 632: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating Stream Element for LATE INTEREST');

628: END IF;
629:
630: --create stream element for late interest
631: IF (l_stm_id IS NOT NULL) THEN
632: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating Stream Element for LATE INTEREST');
633: l_selv_rec := l_init_selv_rec;
634:
635: l_selv_rec.stm_id := l_stm_id;
636: l_selv_rec.SE_LINE_NUMBER := l_se_line_number;

Line 660: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Stream Element for Contract: '

656: l_sec_stream_id := lx_selv_rec.source_id;
657:
658: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
659: l_error_flag := TRUE;
660: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Stream Element for Contract: '
661: ||l_inv_cur.contract_number
662: ||' Stream Purpose: '||cns_late_interest
663: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
664: ||' Amount: '||l_interest_amount);

Line 667: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Late Interest Stream Element for Contract: '

663: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
664: ||' Amount: '||l_interest_amount);
665: ELSE
666:
667: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Late Interest Stream Element for Contract: '
668: ||l_inv_cur.contract_number
669: ||' Stream Purpose: '||cns_late_interest
670: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
671: ||' Amount: '||l_interest_amount

Line 691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');

687: x_return_status => l_return_status,
688: x_primary_sty_id => l_sty_id );
689:
690: IF (l_return_status = 'S' ) THEN
691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');
692: ELSE
693: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
694: END IF;
695:

Line 693: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');

689:
690: IF (l_return_status = 'S' ) THEN
691: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');
692: ELSE
693: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
694: END IF;
695:
696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 730: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream');

726: l_stmv_rec.source_id := cur_sec_strm.khr_id;
727: l_stmv_rec.source_table := 'OKL_K_HEADERS';
728: END IF;
729:
730: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream');
731:
732: Okl_Streams_Pub.create_streams(
733: p_api_version => p_api_version,
734: p_init_msg_list => p_init_msg_list,

Line 744: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

740:
741: l_stm_id := lx_stmv_rec.id;
742: l_se_line_number := 1;
743:
744: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
745: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
746: l_error_flag := TRUE;
747: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
748: ELSE

Line 747: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

743:
744: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
745: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
746: l_error_flag := TRUE;
747: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
748: ELSE
749: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
750: END IF;
751: ELSE

Line 749: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

745: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
746: l_error_flag := TRUE;
747: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
748: ELSE
749: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
750: END IF;
751: ELSE
752: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');
753: open l_stream_line_nbr_csr(l_stm_id);

Line 752: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');

748: ELSE
749: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
750: END IF;
751: ELSE
752: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');
753: open l_stream_line_nbr_csr(l_stm_id);
754: fetch l_stream_line_nbr_csr into l_se_line_number;
755: close l_stream_line_nbr_csr;
756: l_se_line_number := l_se_line_number + 1;

Line 757: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

753: open l_stream_line_nbr_csr(l_stm_id);
754: fetch l_stream_line_nbr_csr into l_se_line_number;
755: close l_stream_line_nbr_csr;
756: l_se_line_number := l_se_line_number + 1;
757: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
758: END IF;
759:
760: --create stream element for late interest payable
761: IF (l_stm_id IS NOT NULL) THEN

Line 762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream Elements');

758: END IF;
759:
760: --create stream element for late interest payable
761: IF (l_stm_id IS NOT NULL) THEN
762: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream Elements');
763: l_selv_rec := l_init_selv_rec;
764: l_selv_rec.stm_id := l_stm_id;
765: l_selv_rec.SE_LINE_NUMBER := l_se_line_number;
766: l_selv_rec.STREAM_ELEMENT_DATE := sysdate;

Line 787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '

783: lx_selv_rec);
784:
785: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
786: l_error_flag := TRUE;
787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '
788: ||l_inv_cur.contract_number
789: ||' Stream Purpose: '||cns_late_interest
790: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
791: ||' Amount: '||l_interest_amount);

Line 793: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Investor Late Interest Payable Stream Element for Contract: '

789: ||' Stream Purpose: '||cns_late_interest
790: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
791: ||' Amount: '||l_interest_amount);
792: ELSE
793: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Investor Late Interest Payable Stream Element for Contract: '
794: ||l_inv_cur.contract_number
795: ||' Stream Purpose: '||cns_late_interest
796: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
797: ||' Amount: '||l_interest_amount

Line 815: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');

811: x_return_status => l_return_status,
812: x_primary_sty_id => l_sty_id );
813:
814: IF (l_return_status = 'S' ) THEN
815: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');
816: ELSE
817: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
818: END IF;
819:

Line 817: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');

813:
814: IF (l_return_status = 'S' ) THEN
815: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose INVESTOR_LATE_INTEREST_PAY retrieved.');
816: ELSE
817: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
818: END IF;
819:
820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 854: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream');

850: l_stmv_rec.source_id := cur_sec_strm.khr_id;
851: l_stmv_rec.source_table := 'OKL_K_HEADERS';
852: END IF;
853:
854: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream');
855:
856: Okl_Streams_Pub.create_streams(
857: p_api_version => p_api_version,
858: p_init_msg_list => p_init_msg_list,

Line 868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

864:
865: l_stm_id := lx_stmv_rec.id;
866: l_se_line_number := 1;
867:
868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
869: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
870: l_error_flag := TRUE;
871: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
872: ELSE

Line 871: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

867:
868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
869: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
870: l_error_flag := TRUE;
871: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
872: ELSE
873: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
874: END IF;
875: ELSE

Line 873: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

869: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
870: l_error_flag := TRUE;
871: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
872: ELSE
873: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
874: END IF;
875: ELSE
876: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');
877: open l_stream_line_nbr_csr(l_stm_id);

Line 876: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');

872: ELSE
873: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
874: END IF;
875: ELSE
876: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream for INVESTOR LATE INTEREST PAYABLE found');
877: open l_stream_line_nbr_csr(l_stm_id);
878: fetch l_stream_line_nbr_csr into l_se_line_number;
879: close l_stream_line_nbr_csr;
880: l_se_line_number := l_se_line_number + 1;

Line 881: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);

877: open l_stream_line_nbr_csr(l_stm_id);
878: fetch l_stream_line_nbr_csr into l_se_line_number;
879: close l_stream_line_nbr_csr;
880: l_se_line_number := l_se_line_number + 1;
881: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
882: END IF;
883:
884: --create stream element for late interest payable
885: IF (l_stm_id IS NOT NULL) THEN

Line 886: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream Elements');

882: END IF;
883:
884: --create stream element for late interest payable
885: IF (l_stm_id IS NOT NULL) THEN
886: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Creating INVESTOR LATE INTEREST PAYABLE Stream Elements');
887: l_selv_rec := l_init_selv_rec;
888: l_selv_rec.stm_id := l_stm_id;
889: l_selv_rec.SE_LINE_NUMBER := l_se_line_number;
890: l_selv_rec.STREAM_ELEMENT_DATE := sysdate;

Line 911: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '

907: lx_selv_rec);
908:
909: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
910: l_error_flag := TRUE;
911: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '
912: ||l_inv_cur.contract_number
913: ||' Stream Purpose: '||cns_late_interest
914: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
915: ||' Amount: '||l_interest_amount);

Line 918: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Investor Late Interest Payable Stream Element for Contract: '

914: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
915: ||' Amount: '||l_interest_amount);
916: ELSE
917:
918: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Created Investor Late Interest Payable Stream Element for Contract: '
919: ||l_inv_cur.contract_number
920: ||' Stream Purpose: '||cns_late_interest
921: ||' Bill Date: '||l_selv_rec.STREAM_ELEMENT_DATE
922: ||' Amount: '||l_interest_amount

Line 945: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');

941: WHERE CURRENT OF l_AR_lsm_cur;
942:
943: -- IF (l_return_status = Fnd_Api.G_RET_STS_SUCCESS) THEN
944: IF (SQL%NOTFOUND) THEN
945: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');
946: ELSE
947: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');
948: END IF;
949: -- END IF;

Line 947: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');

943: -- IF (l_return_status = Fnd_Api.G_RET_STS_SUCCESS) THEN
944: IF (SQL%NOTFOUND) THEN
945: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');
946: ELSE
947: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');
948: END IF;
949: -- END IF;
950:
951: END LOOP;

Line 969: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');

965: WHERE CURRENT OF l_cons_lsm_cur;
966:
967: -- IF (l_return_status = Fnd_Api.G_RET_STS_SUCCESS) THEN
968: IF (SQL%NOTFOUND) THEN
969: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');
970: ELSE
971: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');
972: END IF;
973: -- END IF;

Line 971: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');

967: -- IF (l_return_status = Fnd_Api.G_RET_STS_SUCCESS) THEN
968: IF (SQL%NOTFOUND) THEN
969: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Update Unsuccessful.');
970: ELSE
971: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal Consolidation Record Updated.');
972: END IF;
973: -- END IF;
974:
975: END LOOP;

Line 1000: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End of Calculate Late Interest.');

996: END IF;
997: --dkagrawa bug# 4728636 changes end
998:
999:
1000: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End of Calculate Late Interest.');
1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);

Line 1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);

1000: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End of Calculate Late Interest.');
1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,

Line 1015: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXCP) => '||SQLERRM);

1011: x_msg_data,
1012: '_PVT'
1013: );
1014: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
1015: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXCP) => '||SQLERRM);
1016: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1017: (
1018: l_api_name,
1019: G_PKG_NAME,

Line 1026: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (Others) => '||SQLERRM);

1022: x_msg_data,
1023: '_PVT'
1024: );
1025: WHEN OTHERS THEN
1026: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (Others) => '||SQLERRM);
1027: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1028: (
1029: l_api_name,
1030: G_PKG_NAME,