DBA Data[Home] [Help]

APPS.OKL_LRF_GENERATE_PVT dependencies on FND_FILE

Line 533: fnd_file.put_line(fnd_file.log

529: l_lrfv_tbl(i).interest_rate := l_gen_lrf_tbl(i).interest_rate;
530: l_lrfv_tbl(i).lease_rate_factor := l_gen_lrf_tbl(i).lease_rate_factor;
531:
532: IF g_cp_mode = 'Y' THEN
533: fnd_file.put_line(fnd_file.log
534: ,'Term In Months = ' ||
535: l_lrfv_tbl(i).term_in_months);
536: fnd_file.put_line(fnd_file.log
537: ,'Residual Value in percent = ' ||

Line 536: fnd_file.put_line(fnd_file.log

532: IF g_cp_mode = 'Y' THEN
533: fnd_file.put_line(fnd_file.log
534: ,'Term In Months = ' ||
535: l_lrfv_tbl(i).term_in_months);
536: fnd_file.put_line(fnd_file.log
537: ,'Residual Value in percent = ' ||
538: l_lrfv_tbl(i).residual_value_percent);
539: fnd_file.put_line(fnd_file.log
540: ,'Interest Rate = ' ||

Line 539: fnd_file.put_line(fnd_file.log

535: l_lrfv_tbl(i).term_in_months);
536: fnd_file.put_line(fnd_file.log
537: ,'Residual Value in percent = ' ||
538: l_lrfv_tbl(i).residual_value_percent);
539: fnd_file.put_line(fnd_file.log
540: ,'Interest Rate = ' ||
541: l_lrfv_tbl(i).interest_rate);
542: fnd_file.put_line(fnd_file.log
543: ,'Lease Rate Factor = ' ||

Line 542: fnd_file.put_line(fnd_file.log

538: l_lrfv_tbl(i).residual_value_percent);
539: fnd_file.put_line(fnd_file.log
540: ,'Interest Rate = ' ||
541: l_lrfv_tbl(i).interest_rate);
542: fnd_file.put_line(fnd_file.log
543: ,'Lease Rate Factor = ' ||
544: l_lrfv_tbl(i).lease_rate_factor);
545: fnd_file.put_line(fnd_file.log, 'Lease Rate Factor Levels: ');
546: END IF;

Line 545: fnd_file.put_line(fnd_file.log, 'Lease Rate Factor Levels: ');

541: l_lrfv_tbl(i).interest_rate);
542: fnd_file.put_line(fnd_file.log
543: ,'Lease Rate Factor = ' ||
544: l_lrfv_tbl(i).lease_rate_factor);
545: fnd_file.put_line(fnd_file.log, 'Lease Rate Factor Levels: ');
546: END IF;
547:
548: --if deferred_pmts > 0 then
549: -- okl_lrl_tbl(1).period=deferred_pmts

Line 565: fnd_file.put_line(fnd_file.log

561: l_lrlv_tbl(j).periods := c_rate_set_rec.deferred_pmts;
562: l_lrlv_tbl(j).lease_rate_factor := 0;
563: l_lrlv_tbl(j).sequence_number := 1;
564: IF g_cp_mode = 'Y' THEN
565: fnd_file.put_line(fnd_file.log
566: ,' Periods = ' ||
567: l_lrlv_tbl(j).periods);
568: fnd_file.put_line(fnd_file.log
569: ,' Lease Rate Factor = ' ||

Line 568: fnd_file.put_line(fnd_file.log

564: IF g_cp_mode = 'Y' THEN
565: fnd_file.put_line(fnd_file.log
566: ,' Periods = ' ||
567: l_lrlv_tbl(j).periods);
568: fnd_file.put_line(fnd_file.log
569: ,' Lease Rate Factor = ' ||
570: l_lrlv_tbl(j).lease_rate_factor);
571: END IF;
572: j := j + 1;

Line 581: fnd_file.put_line(fnd_file.log

577: l_lrlv_tbl(j).periods := (l_lrfv_tbl(i).term_in_months / c_rate_set_rec.frequency) - c_rate_set_rec.deferred_pmts;
578: l_lrlv_tbl(j).lease_rate_factor := l_lrfv_tbl(i).lease_rate_factor;
579: l_lrlv_tbl(j).sequence_number := 2;
580: IF g_cp_mode = 'Y' THEN
581: fnd_file.put_line(fnd_file.log
582: ,' Periods = ' ||
583: l_lrlv_tbl(j).periods);
584: fnd_file.put_line(fnd_file.log
585: ,' Lease Rate Factor = ' ||

Line 584: fnd_file.put_line(fnd_file.log

580: IF g_cp_mode = 'Y' THEN
581: fnd_file.put_line(fnd_file.log
582: ,' Periods = ' ||
583: l_lrlv_tbl(j).periods);
584: fnd_file.put_line(fnd_file.log
585: ,' Lease Rate Factor = ' ||
586: l_lrlv_tbl(j).lease_rate_factor);
587: END IF;
588: j := j + 1;

Line 607: fnd_file.put_line(fnd_file.log

603: l_lrlv_tbl(j).periods := 1;
604: l_lrlv_tbl(j).lease_rate_factor := l_lrfv_tbl(i).lease_rate_factor * (c_rate_set_rec.advance_pmts + 1) ;
605: l_lrlv_tbl(j).sequence_number := 1;
606: IF g_cp_mode = 'Y' THEN
607: fnd_file.put_line(fnd_file.log
608: ,' Periods = ' ||
609: l_lrlv_tbl(j).periods);
610: fnd_file.put_line(fnd_file.log
611: ,' Lease Rate Factor = ' ||

Line 610: fnd_file.put_line(fnd_file.log

606: IF g_cp_mode = 'Y' THEN
607: fnd_file.put_line(fnd_file.log
608: ,' Periods = ' ||
609: l_lrlv_tbl(j).periods);
610: fnd_file.put_line(fnd_file.log
611: ,' Lease Rate Factor = ' ||
612: l_lrlv_tbl(j).lease_rate_factor);
613: END IF;
614: j := j + 1;

Line 623: fnd_file.put_line(fnd_file.log

619: l_lrlv_tbl(j).periods := (l_lrfv_tbl(i).term_in_months / c_rate_set_rec.frequency) - c_rate_set_rec.advance_pmts -1;
620: l_lrlv_tbl(j).lease_rate_factor := l_lrfv_tbl(i).lease_rate_factor;
621: l_lrlv_tbl(j).sequence_number := 2;
622: IF g_cp_mode = 'Y' THEN
623: fnd_file.put_line(fnd_file.log
624: ,' Periods = ' ||
625: l_lrlv_tbl(j).periods);
626: fnd_file.put_line(fnd_file.log
627: ,' Lease Rate Factor = ' ||

Line 626: fnd_file.put_line(fnd_file.log

622: IF g_cp_mode = 'Y' THEN
623: fnd_file.put_line(fnd_file.log
624: ,' Periods = ' ||
625: l_lrlv_tbl(j).periods);
626: fnd_file.put_line(fnd_file.log
627: ,' Lease Rate Factor = ' ||
628: l_lrlv_tbl(j).lease_rate_factor);
629: END IF;
630: IF l_lrlv_tbl(j).periods > 0 THEN

Line 641: fnd_file.put_line(fnd_file.log

637: l_lrlv_tbl(j).periods := c_rate_set_rec.advance_pmts;
638: l_lrlv_tbl(j).lease_rate_factor := 0;
639: l_lrlv_tbl(j).sequence_number := 3;
640: IF g_cp_mode = 'Y' THEN
641: fnd_file.put_line(fnd_file.log
642: ,' Periods = ' ||
643: l_lrlv_tbl(j).periods);
644: fnd_file.put_line(fnd_file.log
645: ,' Lease Rate Factor = ' ||

Line 644: fnd_file.put_line(fnd_file.log

640: IF g_cp_mode = 'Y' THEN
641: fnd_file.put_line(fnd_file.log
642: ,' Periods = ' ||
643: l_lrlv_tbl(j).periods);
644: fnd_file.put_line(fnd_file.log
645: ,' Lease Rate Factor = ' ||
646: l_lrlv_tbl(j).lease_rate_factor);
647: END IF;
648: j := j + 1;

Line 664: fnd_file.put_line(fnd_file.log

660: l_lrlv_tbl(j).periods := (l_lrfv_tbl(i).term_in_months / c_rate_set_rec.frequency);
661: l_lrlv_tbl(j).lease_rate_factor := l_lrfv_tbl(i).lease_rate_factor;
662: l_lrlv_tbl(j).sequence_number := 1;
663: IF g_cp_mode = 'Y' THEN
664: fnd_file.put_line(fnd_file.log
665: ,' Periods = ' ||
666: l_lrlv_tbl(j).periods);
667: fnd_file.put_line(fnd_file.log
668: ,' Lease Rate Factor = ' ||

Line 667: fnd_file.put_line(fnd_file.log

663: IF g_cp_mode = 'Y' THEN
664: fnd_file.put_line(fnd_file.log
665: ,' Periods = ' ||
666: l_lrlv_tbl(j).periods);
667: fnd_file.put_line(fnd_file.log
668: ,' Lease Rate Factor = ' ||
669: l_lrlv_tbl(j).lease_rate_factor);
670: END IF;
671: j := j + 1;

Line 677: fnd_file.put_line(fnd_file.log, 'Inserting into okl_ls_rt_fctr_ents');

673:
674: END LOOP;
675:
676: IF g_cp_mode = 'Y' THEN
677: fnd_file.put_line(fnd_file.log, 'Inserting into okl_ls_rt_fctr_ents');
678: END IF;
679: --call handlelrf API to insert levels and factors
680: okl_lease_rate_factors_pvt.handle_lrf_ents(p_api_version => p_api_version
681: ,p_init_msg_list => okl_api.g_false

Line 767: fnd_file.put_line(fnd_file.log, 'OKL Generate Lease Rate Factors');

763: l_rate_set_version_id := p_rate_set_version_id;
764: l_start_date := fnd_date.canonical_to_date(p_start_date);
765: l_end_date := fnd_date.canonical_to_date(p_end_date);
766: g_cp_mode := 'Y';
767: fnd_file.put_line(fnd_file.log, 'OKL Generate Lease Rate Factors');
768: fnd_file.put_line(fnd_file.log, '================================');
769: fnd_file.put_line(fnd_file.log, ' ');
770:
771: IF l_rate_set_version_id IS NULL AND l_start_date IS NULL THEN

Line 768: fnd_file.put_line(fnd_file.log, '================================');

764: l_start_date := fnd_date.canonical_to_date(p_start_date);
765: l_end_date := fnd_date.canonical_to_date(p_end_date);
766: g_cp_mode := 'Y';
767: fnd_file.put_line(fnd_file.log, 'OKL Generate Lease Rate Factors');
768: fnd_file.put_line(fnd_file.log, '================================');
769: fnd_file.put_line(fnd_file.log, ' ');
770:
771: IF l_rate_set_version_id IS NULL AND l_start_date IS NULL THEN
772: fnd_file.put_line(fnd_file.log

Line 769: fnd_file.put_line(fnd_file.log, ' ');

765: l_end_date := fnd_date.canonical_to_date(p_end_date);
766: g_cp_mode := 'Y';
767: fnd_file.put_line(fnd_file.log, 'OKL Generate Lease Rate Factors');
768: fnd_file.put_line(fnd_file.log, '================================');
769: fnd_file.put_line(fnd_file.log, ' ');
770:
771: IF l_rate_set_version_id IS NULL AND l_start_date IS NULL THEN
772: fnd_file.put_line(fnd_file.log
773: ,'ERROR: Either of Rate Set Version Or Effective Dates must be entered');

Line 772: fnd_file.put_line(fnd_file.log

768: fnd_file.put_line(fnd_file.log, '================================');
769: fnd_file.put_line(fnd_file.log, ' ');
770:
771: IF l_rate_set_version_id IS NULL AND l_start_date IS NULL THEN
772: fnd_file.put_line(fnd_file.log
773: ,'ERROR: Either of Rate Set Version Or Effective Dates must be entered');
774: l_return_status := g_ret_sts_error;
775: retcode := 2;
776: RAISE param_error;

Line 780: fnd_file.put_line(fnd_file.log

776: RAISE param_error;
777: END IF;
778:
779: IF l_rate_set_version_id IS NOT NULL THEN
780: fnd_file.put_line(fnd_file.log
781: ,'Generating lease rate factors for Rate Set Version Id :' ||
782: l_rate_set_version_id);
783:
784: --generate lease rate factors

Line 793: fnd_file.put_line(fnd_file.log

789: ,x_msg_count => x_msg_count
790: ,x_msg_data => x_msg_data
791: ,p_rate_set_version_id => l_rate_set_version_id);
792: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
793: fnd_file.put_line(fnd_file.log
794: ,'Unexpected error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
795: RAISE okl_api.g_exception_unexpected_error;
796: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
797: fnd_file.put_line(fnd_file.log

Line 797: fnd_file.put_line(fnd_file.log

793: fnd_file.put_line(fnd_file.log
794: ,'Unexpected error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
795: RAISE okl_api.g_exception_unexpected_error;
796: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
797: fnd_file.put_line(fnd_file.log
798: ,'Error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
799: RAISE okl_api.g_exception_error;
800: END IF;
801: ELSE

Line 805: fnd_file.put_line(fnd_file.log

801: ELSE
802:
803: FOR lrv IN get_lrs_versions(l_start_date, l_end_date) LOOP
804: l_rate_set_version_id := lrv.rate_set_version_id;
805: fnd_file.put_line(fnd_file.log
806: ,'Generating lease rate factors for Rate Set Version Id :' ||
807: l_rate_set_version_id);
808:
809: --generate lease rate factors

Line 818: fnd_file.put_line(fnd_file.log

814: ,x_msg_count => x_msg_count
815: ,x_msg_data => x_msg_data
816: ,p_rate_set_version_id => l_rate_set_version_id);
817: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
818: fnd_file.put_line(fnd_file.log
819: ,'Unexpected error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
820: RAISE okl_api.g_exception_unexpected_error;
821: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
822: fnd_file.put_line(fnd_file.log

Line 822: fnd_file.put_line(fnd_file.log

818: fnd_file.put_line(fnd_file.log
819: ,'Unexpected error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
820: RAISE okl_api.g_exception_unexpected_error;
821: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
822: fnd_file.put_line(fnd_file.log
823: ,'Error in call to okl_lrf_generate_pvt.generate_lease_rate_factors');
824:
825: -- RAISE OKL_API.G_EXCEPTION_ERROR;
826: -- print the error message in the log file

Line 834: fnd_file.put_line(fnd_file.log, l_data);

830: fnd_msg_pub.get(p_msg_index => l_counter
831: ,p_encoded => 'F'
832: ,p_data => l_data
833: ,p_msg_index_out => l_msg_index_out);
834: fnd_file.put_line(fnd_file.log, l_data);
835: END LOOP;
836: END IF;
837: END IF;
838: END LOOP;

Line 841: fnd_file.put_line(fnd_file.log, ' ');

837: END IF;
838: END LOOP;
839:
840: END IF;
841: fnd_file.put_line(fnd_file.log, ' ');
842: fnd_file.put_line(fnd_file.log, ' End ');
843: fnd_file.put_line(fnd_file.log, '================================');
844: fnd_file.close;
845: EXCEPTION

Line 842: fnd_file.put_line(fnd_file.log, ' End ');

838: END LOOP;
839:
840: END IF;
841: fnd_file.put_line(fnd_file.log, ' ');
842: fnd_file.put_line(fnd_file.log, ' End ');
843: fnd_file.put_line(fnd_file.log, '================================');
844: fnd_file.close;
845: EXCEPTION
846: WHEN param_error THEN

Line 843: fnd_file.put_line(fnd_file.log, '================================');

839:
840: END IF;
841: fnd_file.put_line(fnd_file.log, ' ');
842: fnd_file.put_line(fnd_file.log, ' End ');
843: fnd_file.put_line(fnd_file.log, '================================');
844: fnd_file.close;
845: EXCEPTION
846: WHEN param_error THEN
847: retcode := 0;

Line 844: fnd_file.close;

840: END IF;
841: fnd_file.put_line(fnd_file.log, ' ');
842: fnd_file.put_line(fnd_file.log, ' End ');
843: fnd_file.put_line(fnd_file.log, '================================');
844: fnd_file.close;
845: EXCEPTION
846: WHEN param_error THEN
847: retcode := 0;
848: fnd_file.put_line(fnd_file.log

Line 848: fnd_file.put_line(fnd_file.log

844: fnd_file.close;
845: EXCEPTION
846: WHEN param_error THEN
847: retcode := 0;
848: fnd_file.put_line(fnd_file.log
849: ,'Generate Lease Rate Factors Concurrent program completed with errors.');
850:
851: --close all open cursors
852:

Line 875: fnd_file.put_line(fnd_file.log, l_data);

871: fnd_msg_pub.get(p_msg_index => l_counter
872: ,p_encoded => 'F'
873: ,p_data => l_data
874: ,p_msg_index_out => l_msg_index_out);
875: fnd_file.put_line(fnd_file.log, l_data);
876: END LOOP;
877:
878: END IF;
879:

Line 898: fnd_file.put_line(fnd_file.log, l_data);

894: fnd_msg_pub.get(p_msg_index => l_counter
895: ,p_encoded => 'F'
896: ,p_data => l_data
897: ,p_msg_index_out => l_msg_index_out);
898: fnd_file.put_line(fnd_file.log, l_data);
899: END LOOP;
900:
901: END IF;
902:

Line 922: fnd_file.put_line(fnd_file.log, l_data);

918: fnd_msg_pub.get(p_msg_index => l_counter
919: ,p_encoded => 'F'
920: ,p_data => l_data
921: ,p_msg_index_out => l_msg_index_out);
922: fnd_file.put_line(fnd_file.log, l_data);
923: END LOOP;
924:
925: END IF;
926: fnd_file.put_line(fnd_file.log, sqlerrm);

Line 926: fnd_file.put_line(fnd_file.log, sqlerrm);

922: fnd_file.put_line(fnd_file.log, l_data);
923: END LOOP;
924:
925: END IF;
926: fnd_file.put_line(fnd_file.log, sqlerrm);
927: END generate_lrf;
928: End OKL_LRF_GENERATE_PVT;