28: lx_lrfv_upd_tbl lrfv_tbl_type;
29: l_api_name CONSTANT varchar2(30) := 'handle_lrf_ents';
30: l_api_version CONSTANT number := 1.0;
31: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
32: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.handle_lrf_ents';
33: l_debug_enabled varchar2(10);
34: is_debug_procedure_on boolean;
35: is_debug_statement_on boolean;
36:
36:
37: BEGIN
38: l_debug_enabled := okl_debug_pub.check_log_enabled;
39: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
40: ,fnd_log.level_procedure);
41:
42: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
43: okl_debug_pub.log_debug(fnd_log.level_procedure
44: ,l_module
39: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
40: ,fnd_log.level_procedure);
41:
42: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
43: okl_debug_pub.log_debug(fnd_log.level_procedure
44: ,l_module
45: ,'begin debug OKLPLRFB.pls call handle_lrf_ents');
46: END IF;
47:
47:
48: -- check for logging on STATEMENT level
49:
50: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
51: ,fnd_log.level_statement);
52:
53: -- call START_ACTIVITY to create savepoint, check compatibility
54: -- and initialize message list
55:
84:
85: -- write to log
86:
87: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
88: okl_debug_pub.log_debug(fnd_log.level_statement
89: ,l_module
90: ,'Procedure okl_lrf_pvt.insert_row with status ' ||
91: l_return_status);
92: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
116:
117: -- write to log
118:
119: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
120: okl_debug_pub.log_debug(fnd_log.level_statement
121: ,l_module
122: ,'Procedure okl_lrl_pvt.insert_row with status ' ||
123: l_return_status);
124: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
138:
139: -- write to log
140:
141: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
142: okl_debug_pub.log_debug(fnd_log.level_statement
143: ,l_module
144: ,'Procedure okl_lrl_pvt.update_row with status ' ||
145: l_return_status);
146: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
163:
164: -- write to log
165:
166: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
167: okl_debug_pub.log_debug(fnd_log.level_statement
168: ,l_module
169: ,'Procedure okl_lrf_pvt.update_row with status ' ||
170: l_return_status);
171: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
192:
193: -- write to log
194:
195: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
196: okl_debug_pub.log_debug(fnd_log.level_statement
197: ,l_module
198: ,'Procedure okl_lrl_pvt.insert_row with status ' ||
199: l_return_status);
200: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
214:
215: -- write to log
216:
217: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
218: okl_debug_pub.log_debug(fnd_log.level_statement
219: ,l_module
220: ,'Procedure okl_lrl_pvt.update_row with status ' ||
221: l_return_status);
222: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
237: okl_api.end_activity(x_msg_count => x_msg_count
238: ,x_msg_data => x_msg_data);
239:
240: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
241: okl_debug_pub.log_debug(fnd_log.level_procedure
242: ,l_module
243: ,'end debug OKLRECVB.pls.pls call handle_lrf_ents');
244: END IF;
245:
293: i number;
294: l_api_name CONSTANT varchar2(30) := 'delete_lrf';
295: l_api_version CONSTANT number := 1.0;
296: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
297: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.delete_lease_rate_factors';
298: l_debug_enabled varchar2(10);
299: is_debug_procedure_on boolean;
300: is_debug_statement_on boolean;
301:
301:
302: BEGIN
303: l_debug_enabled := okl_debug_pub.check_log_enabled;
304: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
305: ,fnd_log.level_procedure);
306:
307: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
308: okl_debug_pub.log_debug(fnd_log.level_procedure
309: ,l_module
304: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
305: ,fnd_log.level_procedure);
306:
307: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
308: okl_debug_pub.log_debug(fnd_log.level_procedure
309: ,l_module
310: ,'begin debug OKLPLRFB.pls call delete_lease_rate_factors');
311: END IF;
312:
312:
313: -- check for logging on STATEMENT level
314:
315: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
316: ,fnd_log.level_statement);
317:
318: -- call START_ACTIVITY to create savepoint, check compatibility
319: -- and initialize message list
320:
365:
366: -- write to log
367:
368: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
369: okl_debug_pub.log_debug(fnd_log.level_statement
370: ,l_module
371: ,'Procedure OKL_LRL_PVT.delete_row returned with status ' ||
372: l_return_status);
373: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
390:
391: -- write to log
392:
393: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
394: okl_debug_pub.log_debug(fnd_log.level_statement
395: ,l_module
396: ,'Procedure OKL_LRF_PVT.delete_row returned with status ' ||
397: l_return_status);
398: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
406: okl_api.end_activity(x_msg_count => x_msg_count
407: ,x_msg_data => x_msg_data);
408:
409: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
410: okl_debug_pub.log_debug(fnd_log.level_procedure
411: ,l_module
412: ,'end debug OKLRECVB.pls.pls call delete_lease_rate_factors');
413: END IF;
414:
456: i number;
457: l_api_name CONSTANT varchar2(30) := 'rmv_lrs_factor';
458: l_api_version CONSTANT number := 1.0;
459: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
460: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.remove_lrs_factor';
461: l_debug_enabled varchar2(10);
462: is_debug_procedure_on boolean;
463: is_debug_statement_on boolean;
464:
464:
465: BEGIN
466: l_debug_enabled := okl_debug_pub.check_log_enabled;
467: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
468: ,fnd_log.level_procedure);
469:
470: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
471: okl_debug_pub.log_debug(fnd_log.level_procedure
472: ,l_module
467: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
468: ,fnd_log.level_procedure);
469:
470: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
471: okl_debug_pub.log_debug(fnd_log.level_procedure
472: ,l_module
473: ,'begin debug OKLPLRFB.pls call remove_lrs_factor');
474: END IF;
475:
475:
476: -- check for logging on STATEMENT level
477:
478: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
479: ,fnd_log.level_statement);
480:
481: -- call START_ACTIVITY to create savepoint, check compatibility
482: -- and initialize message list
483:
538: okl_api.end_activity(x_msg_count => x_msg_count
539: ,x_msg_data => x_msg_data);
540:
541: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
542: okl_debug_pub.log_debug(fnd_log.level_procedure
543: ,l_module
544: ,'end debug OKLRECVB.pls.pls call remove_lrs_factor');
545: END IF;
546:
580: l_lrlv_rec okl_lrlv_rec;
581: l_api_name CONSTANT varchar2(30) := 'rmv_lrs_level';
582: l_api_version CONSTANT number := 1.0;
583: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
584: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.remove_lrs_level';
585: l_debug_enabled varchar2(10);
586: is_debug_procedure_on boolean;
587: is_debug_statement_on boolean;
588:
588:
589: BEGIN
590: l_debug_enabled := okl_debug_pub.check_log_enabled;
591: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
592: ,fnd_log.level_procedure);
593:
594: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
595: okl_debug_pub.log_debug(fnd_log.level_procedure
596: ,l_module
591: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
592: ,fnd_log.level_procedure);
593:
594: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
595: okl_debug_pub.log_debug(fnd_log.level_procedure
596: ,l_module
597: ,'begin debug OKLPLRFB.pls call remove_lrs_level');
598: END IF;
599:
599:
600: -- check for logging on STATEMENT level
601:
602: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
603: ,fnd_log.level_statement);
604:
605: -- call START_ACTIVITY to create savepoint, check compatibility
606: -- and initialize message list
607:
637: okl_api.end_activity(x_msg_count => x_msg_count
638: ,x_msg_data => x_msg_data);
639:
640: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
641: okl_debug_pub.log_debug(fnd_log.level_procedure
642: ,l_module
643: ,'end debug OKLRECVB.pls.pls call remove_lrs_level');
644: END IF;
645:
679: ,p_freq IN varchar2) RETURN varchar2 IS
680: l_freq number;
681: l_payments number;
682: l_periods number;
683: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.validate_factor_levels';
684: l_debug_enabled varchar2(10);
685: is_debug_procedure_on boolean;
686: is_debug_statement_on boolean;
687:
687:
688: BEGIN
689: l_debug_enabled := okl_debug_pub.check_log_enabled;
690: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
691: ,fnd_log.level_procedure);
692:
693: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
694: okl_debug_pub.log_debug(fnd_log.level_procedure
695: ,l_module
690: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
691: ,fnd_log.level_procedure);
692:
693: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
694: okl_debug_pub.log_debug(fnd_log.level_procedure
695: ,l_module
696: ,'begin debug OKLPLRFB.pls call validate_factor_levels');
697: END IF;
698:
698:
699: -- check for logging on STATEMENT level
700:
701: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
702: ,fnd_log.level_statement);
703:
704: --at least 1 rate factor should be present
705:
706: IF p_lrfv_tbl.COUNT = 0 THEN
755:
756: END LOOP;
757:
758: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
759: okl_debug_pub.log_debug(fnd_log.level_procedure
760: ,l_module
761: ,'end debug OKLRECVB.pls.pls call validate_factor_levels');
762: END IF;
763: RETURN okl_api.g_ret_sts_success;
770: FUNCTION is_residual_tolerance_valid(p_lrfv_tbl IN lrfv_tbl_type
771: ,p_residual_tolerance number) RETURN boolean IS
772: mindiff number;
773: diffij number;
774: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.is_residual_tolerance_valid';
775: l_debug_enabled varchar2(10);
776: is_debug_procedure_on boolean;
777: is_debug_statement_on boolean;
778:
778:
779: BEGIN
780: l_debug_enabled := okl_debug_pub.check_log_enabled;
781: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
782: ,fnd_log.level_procedure);
783:
784: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
785: okl_debug_pub.log_debug(fnd_log.level_procedure
786: ,l_module
781: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
782: ,fnd_log.level_procedure);
783:
784: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
785: okl_debug_pub.log_debug(fnd_log.level_procedure
786: ,l_module
787: ,'begin debug OKLPLRFB.pls call is_residual_tolerance_valid');
788: END IF;
789:
789:
790: -- check for logging on STATEMENT level
791:
792: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
793: ,fnd_log.level_statement);
794:
795: IF p_residual_tolerance = 0 OR p_lrfv_tbl.COUNT = 1 THEN
796: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
797: okl_debug_pub.log_debug(fnd_log.level_procedure
793: ,fnd_log.level_statement);
794:
795: IF p_residual_tolerance = 0 OR p_lrfv_tbl.COUNT = 1 THEN
796: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
797: okl_debug_pub.log_debug(fnd_log.level_procedure
798: ,l_module
799: ,'end debug OKLRECVB.pls.pls call is_residual_tolerance_valid');
800: END IF;
801: RETURN true;
816: END LOOP;
817:
818: IF p_residual_tolerance >= mindiff / 2 THEN
819: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
820: okl_debug_pub.log_debug(fnd_log.level_procedure
821: ,l_module
822: ,'end debug OKLRECVB.pls.pls call is_residual_tolerance_valid');
823: END IF;
824: RETURN false;
823: END IF;
824: RETURN false;
825: ELSE
826: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
827: okl_debug_pub.log_debug(fnd_log.level_procedure
828: ,l_module
829: ,'end debug OKLRECVB.pls.pls call is_residual_tolerance_valid');
830: END IF;
831: RETURN true;
860: AND b.std_rate_tmpl_ver_id = csr_std_rate_tmpl_ver_id
861: AND lrs_eff_from BETWEEN c.datetime_valid AND nvl(c.datetime_invalid, lrs_eff_from + 1);
862: l_rate number;
863: l_srt_type varchar2(30);
864: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.get_rate_from_srt';
865: l_debug_enabled varchar2(10);
866: is_debug_procedure_on boolean;
867: is_debug_statement_on boolean;
868: l_min_adj_rate NUMBER;
870:
871: BEGIN
872: l_debug_enabled := okl_debug_pub.check_log_enabled;
873: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
874: ,fnd_log.level_procedure);
875:
876: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
877: okl_debug_pub.log_debug(fnd_log.level_procedure
878: ,l_module
873: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
874: ,fnd_log.level_procedure);
875:
876: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
877: okl_debug_pub.log_debug(fnd_log.level_procedure
878: ,l_module
879: ,'begin debug OKLPLRFB.pls call get_rate_from_srt');
880: END IF;
881:
881:
882: -- check for logging on STATEMENT level
883:
884: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
885: ,fnd_log.level_statement);
886: l_rate := NULL;
887: OPEN get_srt_type_rate(p_srt_version_id);
888: FETCH get_srt_type_rate INTO l_srt_type
889: ,l_rate
912: END IF;
913: END IF;
914:
915: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
916: okl_debug_pub.log_debug(fnd_log.level_procedure
917: ,l_module
918: ,'end debug OKLRECVB.pls.pls call get_rate_from_srt');
919: END IF;
920: RETURN l_rate;
923: This function validates if the term-value are unique or not.
924: **/
925:
926: FUNCTION validate_unique_term_values(p_lrfv_tbl IN lrfv_tbl_type) RETURN varchar2 IS
927: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.validate_unique_term_values';
928: l_debug_enabled varchar2(10);
929: is_debug_procedure_on boolean;
930: is_debug_statement_on boolean;
931:
931:
932: BEGIN
933: l_debug_enabled := okl_debug_pub.check_log_enabled;
934: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
935: ,fnd_log.level_procedure);
936:
937: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
938: okl_debug_pub.log_debug(fnd_log.level_procedure
939: ,l_module
934: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
935: ,fnd_log.level_procedure);
936:
937: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
938: okl_debug_pub.log_debug(fnd_log.level_procedure
939: ,l_module
940: ,'begin debug OKLPLRFB.pls call validate_unique_term_values');
941: END IF;
942:
942:
943: -- check for logging on STATEMENT level
944:
945: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
946: ,fnd_log.level_statement);
947:
948: IF p_lrfv_tbl.COUNT > 0 THEN
949:
950: FOR i IN p_lrfv_tbl.FIRST..p_lrfv_tbl.LAST - 1 LOOP
964:
965: END IF;
966:
967: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
968: okl_debug_pub.log_debug(fnd_log.level_procedure
969: ,l_module
970: ,'end debug OKLRECVB.pls.pls call validate_unique_term_values');
971: END IF;
972: RETURN okl_api.g_ret_sts_success;
994: l_rate number;
995: l_api_name CONSTANT varchar2(30) := 'handle_lrf';
996: l_api_version CONSTANT number := 1.0;
997: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
998: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.handle_lease_rate_factors';
999: l_debug_enabled varchar2(10);
1000: is_debug_procedure_on boolean;
1001: is_debug_statement_on boolean;
1002:
1002:
1003: BEGIN
1004: l_debug_enabled := okl_debug_pub.check_log_enabled;
1005: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
1006: ,fnd_log.level_procedure);
1007:
1008: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1009: okl_debug_pub.log_debug(fnd_log.level_procedure
1010: ,l_module
1005: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
1006: ,fnd_log.level_procedure);
1007:
1008: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1009: okl_debug_pub.log_debug(fnd_log.level_procedure
1010: ,l_module
1011: ,'begin debug OKLPLRFB.pls call handle_lease_rate_factors');
1012: END IF;
1013:
1013:
1014: -- check for logging on STATEMENT level
1015:
1016: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
1017: ,fnd_log.level_statement);
1018:
1019: -- call START_ACTIVITY to create savepoint, check compatibility
1020: -- and initialize message list
1021:
1072:
1073: -- write to log
1074:
1075: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
1076: okl_debug_pub.log_debug(fnd_log.level_statement
1077: ,l_module
1078: ,'Procedure validate_factor_levels with status ' ||
1079: l_return_status);
1080: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1126:
1127: -- write to log
1128:
1129: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
1130: okl_debug_pub.log_debug(fnd_log.level_statement
1131: ,l_module
1132: ,'Procedure delete_lease_rate_factors with status ' ||
1133: l_return_status);
1134: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1154:
1155: -- write to log
1156:
1157: IF (nvl(l_debug_enabled, 'N') = 'Y' AND is_debug_statement_on) THEN
1158: okl_debug_pub.log_debug(fnd_log.level_statement
1159: ,l_module
1160: ,'Procedure handle_lrf_ents with status ' ||
1161: l_return_status);
1162: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1170: okl_api.end_activity(x_msg_count => x_msg_count
1171: ,x_msg_data => x_msg_data);
1172:
1173: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1174: okl_debug_pub.log_debug(fnd_log.level_procedure
1175: ,l_module
1176: ,'end debug OKLRECVB.pls.pls call handle_lease_rate_factors');
1177: END IF;
1178:
1222: l_rate number;
1223: l_api_name CONSTANT varchar2(30) := 'handle_lrf_submit';
1224: l_api_version CONSTANT number := 1.0;
1225: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
1226: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_factors_pvt.handle_lrf_submit';
1227: l_debug_enabled varchar2(10);
1228: is_debug_procedure_on boolean;
1229: is_debug_statement_on boolean;
1230:
1230:
1231: BEGIN
1232: l_debug_enabled := okl_debug_pub.check_log_enabled;
1233: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
1234: ,fnd_log.level_procedure);
1235:
1236: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1237: okl_debug_pub.log_debug(fnd_log.level_procedure
1238: ,l_module
1233: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module
1234: ,fnd_log.level_procedure);
1235:
1236: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1237: okl_debug_pub.log_debug(fnd_log.level_procedure
1238: ,l_module
1239: ,'begin debug OKLPLRFB.pls call handle_lrf_submit');
1240: END IF;
1241:
1241:
1242: -- check for logging on STATEMENT level
1243:
1244: is_debug_statement_on := okl_debug_pub.check_log_on(l_module
1245: ,fnd_log.level_statement);
1246:
1247: -- call START_ACTIVITY to create savepoint, check compatibility
1248: -- and initialize message list
1249:
1386: okl_api.end_activity(x_msg_count => x_msg_count
1387: ,x_msg_data => x_msg_data);
1388:
1389: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1390: okl_debug_pub.log_debug(fnd_log.level_procedure
1391: ,l_module
1392: ,'end debug OKLRECVB.pls.pls call handle_lrf_submit');
1393: END IF;
1394: