535: return l_position_min;
536: END search_delimiter_comment ;
537:
538: -- split the long sql statement into pieces less than 80 characters and return the position
539: PROCEDURE split_long_sql ( body_code IN OUT NOCOPY cn_utils.code_type,
540: p_input_str VARCHAR2 ,
541: sql_type VARCHAR2 )
542: IS
543: l_length NUMBER; /* total length of input string */
575: END IF;
576: END LOOP;
577:
578: IF sql_type = 'COMMENT' THEN
579: cn_utils.appindcr(body_code, '-- ' || substr(p_input_str, l_start,
580: l_next_prev - l_start) );
581: ELSE
582: cn_utils.appindcr(body_code, substr(p_input_str, l_start,
583: l_next_prev - l_start));
578: IF sql_type = 'COMMENT' THEN
579: cn_utils.appindcr(body_code, '-- ' || substr(p_input_str, l_start,
580: l_next_prev - l_start) );
581: ELSE
582: cn_utils.appindcr(body_code, substr(p_input_str, l_start,
583: l_next_prev - l_start));
584: END IF;
585:
586: l_start := l_next_prev ;
591: END IF;
592: END LOOP;
593:
594: IF sql_type = 'COMMENT' THEN
595: cn_utils.appindcr(body_code, '--' || substr(p_input_str, l_start,
596: l_length - l_start + 1));
597: ELSE
598: cn_utils.appindcr(body_code, substr(p_input_str, l_start,
599: l_length - l_start + 1));
594: IF sql_type = 'COMMENT' THEN
595: cn_utils.appindcr(body_code, '--' || substr(p_input_str, l_start,
596: l_length - l_start + 1));
597: ELSE
598: cn_utils.appindcr(body_code, substr(p_input_str, l_start,
599: l_length - l_start + 1));
600: END IF;
601: END split_long_sql;
602:
600: END IF;
601: END split_long_sql;
602:
603: -- initialize the procedure boilerplate
604: PROCEDURE proc_init_boilerplate (code IN OUT NOCOPY cn_utils.code_type,
605: procedure_name cn_obj_procedures_v.name%TYPE,
606: description cn_obj_procedures_v.description%TYPE)
607: IS
608: X_userid VARCHAR2(20);
608: X_userid VARCHAR2(20);
609: BEGIN
610: SELECT user INTO X_userid FROM sys.dual;
611:
612: cn_utils.appendcr(code, '--');
613: cn_utils.appendcr(code, '-- Procedure Name');
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
609: BEGIN
610: SELECT user INTO X_userid FROM sys.dual;
611:
612: cn_utils.appendcr(code, '--');
613: cn_utils.appendcr(code, '-- Procedure Name');
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
610: SELECT user INTO X_userid FROM sys.dual;
611:
612: cn_utils.appendcr(code, '--');
613: cn_utils.appendcr(code, '-- Procedure Name');
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
618: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
611:
612: cn_utils.appendcr(code, '--');
613: cn_utils.appendcr(code, '-- Procedure Name');
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
618: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
619: cn_utils.appendcr(code, '--');
613: cn_utils.appendcr(code, '-- Procedure Name');
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
618: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
619: cn_utils.appendcr(code, '--');
620: END proc_init_boilerplate;
621:
614: cn_utils.appendcr(code, '-- ' || procedure_name);
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
618: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
619: cn_utils.appendcr(code, '--');
620: END proc_init_boilerplate;
621:
622: -- initialize the procedure
615: cn_utils.appendcr(code, '-- Purpose');
616: split_long_sql(code, description, 'COMMENT');
617: cn_utils.appendcr(code, '-- History');
618: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
619: cn_utils.appendcr(code, '--');
620: END proc_init_boilerplate;
621:
622: -- initialize the procedure
623: PROCEDURE proc_init(procedure_name cn_obj_procedures_v.name%TYPE,
626: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
627: return_type cn_obj_procedures_v.return_type%TYPE,
628: package_id cn_obj_procedures_v.package_id%TYPE,
629: repository_id cn_obj_procedures_v.repository_id%TYPE,
630: spec_code IN OUT NOCOPY cn_utils.code_type,
631: body_code IN OUT NOCOPY cn_utils.code_type) IS
632: BEGIN
633: -- Generate boilerplate comments
634: proc_init_boilerplate(spec_code, procedure_name, description);
627: return_type cn_obj_procedures_v.return_type%TYPE,
628: package_id cn_obj_procedures_v.package_id%TYPE,
629: repository_id cn_obj_procedures_v.repository_id%TYPE,
630: spec_code IN OUT NOCOPY cn_utils.code_type,
631: body_code IN OUT NOCOPY cn_utils.code_type) IS
632: BEGIN
633: -- Generate boilerplate comments
634: proc_init_boilerplate(spec_code, procedure_name, description);
635: proc_init_boilerplate(body_code, procedure_name, description);
641: ' (' || parameter_list || ')', 'FROM');
642: split_long_sql(body_code, 'PROCEDURE ' || procedure_name ||
643: ' (' || parameter_list || ')', 'FROM');
644: ELSE
645: cn_utils.appendcr(spec_code, 'PROCEDURE ' || procedure_name);
646: cn_utils.appendcr(body_code, 'PROCEDURE ' || procedure_name);
647: END IF;
648: ELSIF (procedure_type = 'F') THEN
649: IF (parameter_list IS NOT NULL) THEN
642: split_long_sql(body_code, 'PROCEDURE ' || procedure_name ||
643: ' (' || parameter_list || ')', 'FROM');
644: ELSE
645: cn_utils.appendcr(spec_code, 'PROCEDURE ' || procedure_name);
646: cn_utils.appendcr(body_code, 'PROCEDURE ' || procedure_name);
647: END IF;
648: ELSIF (procedure_type = 'F') THEN
649: IF (parameter_list IS NOT NULL) THEN
650: split_long_sql(spec_code, 'FUNCTION ' || procedure_name ||
651: ' (' || parameter_list || ')', 'FROM');
652: split_long_sql(body_code, 'FUNCTION ' || procedure_name ||
653: ' (' || parameter_list || ')', 'FROM');
654: ELSE
655: cn_utils.appendcr(spec_code, 'FUNCTION ' || procedure_name);
656: cn_utils.appendcr(body_code, 'FUNCTION ' || procedure_name);
657: END IF;
658: END IF;
659:
652: split_long_sql(body_code, 'FUNCTION ' || procedure_name ||
653: ' (' || parameter_list || ')', 'FROM');
654: ELSE
655: cn_utils.appendcr(spec_code, 'FUNCTION ' || procedure_name);
656: cn_utils.appendcr(body_code, 'FUNCTION ' || procedure_name);
657: END IF;
658: END IF;
659:
660: IF (procedure_type = 'F') THEN
657: END IF;
658: END IF;
659:
660: IF (procedure_type = 'F') THEN
661: cn_utils.appendcr(spec_code, ' RETURN ' || return_type);
662: cn_utils.appendcr(body_code, ' RETURN ' || return_type);
663: END IF;
664:
665: cn_utils.appendcr(spec_code, ';');
658: END IF;
659:
660: IF (procedure_type = 'F') THEN
661: cn_utils.appendcr(spec_code, ' RETURN ' || return_type);
662: cn_utils.appendcr(body_code, ' RETURN ' || return_type);
663: END IF;
664:
665: cn_utils.appendcr(spec_code, ';');
666: cn_utils.appendcr(spec_code);
661: cn_utils.appendcr(spec_code, ' RETURN ' || return_type);
662: cn_utils.appendcr(body_code, ' RETURN ' || return_type);
663: END IF;
664:
665: cn_utils.appendcr(spec_code, ';');
666: cn_utils.appendcr(spec_code);
667: cn_utils.appendcr(body_code, ' IS');
668: END proc_init;
669:
662: cn_utils.appendcr(body_code, ' RETURN ' || return_type);
663: END IF;
664:
665: cn_utils.appendcr(spec_code, ';');
666: cn_utils.appendcr(spec_code);
667: cn_utils.appendcr(body_code, ' IS');
668: END proc_init;
669:
670: -- initialize global variables in this package
663: END IF;
664:
665: cn_utils.appendcr(spec_code, ';');
666: cn_utils.appendcr(spec_code);
667: cn_utils.appendcr(body_code, ' IS');
668: END proc_init;
669:
670: -- initialize global variables in this package
671: PROCEDURE generate_init(p_formula_id cn_calc_formulas.calc_formula_id%TYPE) IS
823: AND object_type = x_object_type
824: AND org_id = g_org_id;
825:
826: IF dummy = 0 THEN
827: x_object_id := cn_utils.get_object_id;
828:
829: cn_objects_pkg.insert_row( x_rowid => x_rowid,
830: x_object_id => x_object_id,
831: x_org_id => g_org_id,
1516: handle_cn_salesreps_where( x_sql_select, x_sql_from, x_sql_where);
1517: END construct_sql_from_where;
1518:
1519: -- create the global variables for the formula package
1520: PROCEDURE pkg_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
1521: body_code IN OUT NOCOPY cn_utils.code_type ) IS
1522:
1523: -- Added for 11.5.10 Performance Enhancments
1524: l_counter NUMBER(15);
1517: END construct_sql_from_where;
1518:
1519: -- create the global variables for the formula package
1520: PROCEDURE pkg_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
1521: body_code IN OUT NOCOPY cn_utils.code_type ) IS
1522:
1523: -- Added for 11.5.10 Performance Enhancments
1524: l_counter NUMBER(15);
1525: l_variable_declaration VARCHAR2(1000);
1525: l_variable_declaration VARCHAR2(1000);
1526: l_table_object_id cn_objects.object_id%type;
1527:
1528: BEGIN
1529: cn_utils.appendcr(body_code);
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1526: l_table_object_id cn_objects.object_id%type;
1527:
1528: BEGIN
1529: cn_utils.appendcr(body_code);
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1527:
1528: BEGIN
1529: cn_utils.appendcr(body_code);
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1528: BEGIN
1529: cn_utils.appendcr(body_code);
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1529: cn_utils.appendcr(body_code);
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1530: cn_utils.appindcr(body_code, ' g_commission_payed_ptd NUMBER;');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1531: cn_utils.appindcr(body_code, ' g_commission_payed_itd NUMBER;');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1532: cn_utils.appindcr(body_code, ' g_input_achieved_ptd cn_formula_common_pkg.num_table_type;');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1533: cn_utils.appindcr(body_code, ' g_input_achieved_itd cn_formula_common_pkg.num_table_type;');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1534: cn_utils.appindcr(body_code, ' g_output_achieved_ptd NUMBER;');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1535: cn_utils.appindcr(body_code, ' g_output_achieved_itd NUMBER;');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1536: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd NUMBER;');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1537: cn_utils.appindcr(body_code, ' g_perf_achieved_itd NUMBER;');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1538: cn_utils.appindcr(body_code, ' g_rollover_flag VARCHAR2(1) := ' || ''''||g_rollover_flag||''''||';');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1539: cn_utils.appindcr(body_code, ' g_intel_calc_flag VARCHAR2(1);');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1540: cn_utils.appindcr(body_code, ' g_calc_type VARCHAR2(30);');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1541: cn_utils.appindcr(body_code, ' g_select_status_flag VARCHAR2(30);');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1549: cn_utils.appindcr(body_code, ' g_org_id NUMBER := ' || g_org_id || ';');
1542: cn_utils.appindcr(body_code, ' g_formula_id NUMBER := ' || g_formula_id || ' ; ');
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1549: cn_utils.appindcr(body_code, ' g_org_id NUMBER := ' || g_org_id || ';');
1550:
1543: cn_utils.appindcr(body_code, ' g_number_dim NUMBER := ' || g_number_dim || ' ; ');
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1549: cn_utils.appindcr(body_code, ' g_org_id NUMBER := ' || g_org_id || ';');
1550:
1551:
1544: cn_utils.appindcr(body_code, ' g_split_flag VARCHAR2(1) := ' || ''''|| g_split_flag ||''''||' ; ');
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1549: cn_utils.appindcr(body_code, ' g_org_id NUMBER := ' || g_org_id || ';');
1550:
1551:
1552: -- Added for 11.5.10 Performance Enhancments
1545: cn_utils.appindcr(body_code, ' g_trx_group_code VARCHAR2(30) := '|| ''''|| g_trx_group_code ||''''||' ; ');
1546: cn_utils.appindcr(body_code, ' g_itd_flag VARCHAR2(1) := ' || ''''|| g_itd_flag ||''''||' ; ');
1547: cn_utils.appindcr(body_code, ' g_input_achieved NUMBER;');
1548: cn_utils.appindcr(body_code, ' g_output_achieved NUMBER;');
1549: cn_utils.appindcr(body_code, ' g_org_id NUMBER := ' || g_org_id || ';');
1550:
1551:
1552: -- Added for 11.5.10 Performance Enhancments
1553: -- Declare record variable for each table accessed in input/output/perf expressions
1559: l_variable_declaration := g_uniq_tbl_names_tbl(l_table_object_id).variable_name;
1560: l_variable_declaration := l_variable_declaration||' '
1561: ||g_uniq_tbl_names_tbl(l_table_object_id).table_name
1562: ||'%ROWTYPE;';
1563: cn_utils.appindcr(body_code,' '|| l_variable_declaration);
1564: END IF;
1565: l_table_object_id := g_uniq_tbl_names_tbl.NEXT(l_table_object_id);
1566: END LOOP;
1567:
1566: END LOOP;
1567:
1568: -- Added for 11.5.10 Performance Enhancments
1569: -- Declare record type to hold all columns fetched from CH and CL tables
1570: cn_utils.appendcr(body_code);
1571: cn_utils.appindcr(body_code ,'TYPE comm_type IS RECORD ');
1572: cn_utils.appindcr(body_code ,'(');
1573: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
1574:
1567:
1568: -- Added for 11.5.10 Performance Enhancments
1569: -- Declare record type to hold all columns fetched from CH and CL tables
1570: cn_utils.appendcr(body_code);
1571: cn_utils.appindcr(body_code ,'TYPE comm_type IS RECORD ');
1572: cn_utils.appindcr(body_code ,'(');
1573: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
1574:
1575: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
1568: -- Added for 11.5.10 Performance Enhancments
1569: -- Declare record type to hold all columns fetched from CH and CL tables
1570: cn_utils.appendcr(body_code);
1571: cn_utils.appindcr(body_code ,'TYPE comm_type IS RECORD ');
1572: cn_utils.appindcr(body_code ,'(');
1573: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
1574:
1575: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
1576: cn_utils.appindcr(body_code ,' '||nvl(g_comm_tbl_clmn_nms_tbl(i).column_alias, g_comm_tbl_clmn_nms_tbl(i).column_name)||' '||g_comm_tbl_clmn_nms_tbl(i).table_name||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||'%TYPE,' );
1572: cn_utils.appindcr(body_code ,'(');
1573: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
1574:
1575: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
1576: cn_utils.appindcr(body_code ,' '||nvl(g_comm_tbl_clmn_nms_tbl(i).column_alias, g_comm_tbl_clmn_nms_tbl(i).column_name)||' '||g_comm_tbl_clmn_nms_tbl(i).table_name||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||'%TYPE,' );
1577: ELSE
1578: cn_utils.appindcr(body_code ,' '||nvl(g_comm_tbl_clmn_nms_tbl(i).column_alias, g_comm_tbl_clmn_nms_tbl(i).column_name)||' '||g_comm_tbl_clmn_nms_tbl(i).table_name||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||'%TYPE' );
1579: END IF;
1580:
1574:
1575: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
1576: cn_utils.appindcr(body_code ,' '||nvl(g_comm_tbl_clmn_nms_tbl(i).column_alias, g_comm_tbl_clmn_nms_tbl(i).column_name)||' '||g_comm_tbl_clmn_nms_tbl(i).table_name||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||'%TYPE,' );
1577: ELSE
1578: cn_utils.appindcr(body_code ,' '||nvl(g_comm_tbl_clmn_nms_tbl(i).column_alias, g_comm_tbl_clmn_nms_tbl(i).column_name)||' '||g_comm_tbl_clmn_nms_tbl(i).table_name||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||'%TYPE' );
1579: END IF;
1580:
1581: END LOOP;
1582:
1579: END IF;
1580:
1581: END LOOP;
1582:
1583: cn_utils.appindcr(body_code ,');');
1584: cn_utils.appindcr(body_code ,' g_commission_rec comm_type ;');
1585:
1586:
1587:
1580:
1581: END LOOP;
1582:
1583: cn_utils.appindcr(body_code ,');');
1584: cn_utils.appindcr(body_code ,' g_commission_rec comm_type ;');
1585:
1586:
1587:
1588: -- create package variables for pe references
1587:
1588: -- create package variables for pe references
1589: IF (g_pe_reference_tbl.COUNT > 0) THEN
1590: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
1591: cn_utils.appendcr(body_code, ' g_'||REPLACE(g_pe_reference_tbl(i), '.', '_')||' NUMBER;');
1592: END LOOP;
1593: END IF;
1594: cn_utils.appendcr(body_code);
1595: END pkg_variables;
1590: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
1591: cn_utils.appendcr(body_code, ' g_'||REPLACE(g_pe_reference_tbl(i), '.', '_')||' NUMBER;');
1592: END LOOP;
1593: END IF;
1594: cn_utils.appendcr(body_code);
1595: END pkg_variables;
1596:
1597: PROCEDURE convert_clob_to_string ( p_clob_loc clob, x_string OUT NOCOPY VARCHAR2) IS
1598: l_amount NUMBER;
1607: END IF;
1608: END convert_clob_to_string;
1609:
1610: -- construct the get_input procedure for the formula package.
1611: PROCEDURE get_input ( spec_code IN OUT NOCOPY cn_utils.code_type,
1612: body_code IN OUT NOCOPY cn_utils.code_type )
1613: IS
1614: procedure_name cn_obj_procedures_v.name%TYPE;
1615: procedure_desc cn_obj_procedures_v.description%TYPE;
1608: END convert_clob_to_string;
1609:
1610: -- construct the get_input procedure for the formula package.
1611: PROCEDURE get_input ( spec_code IN OUT NOCOPY cn_utils.code_type,
1612: body_code IN OUT NOCOPY cn_utils.code_type )
1613: IS
1614: procedure_name cn_obj_procedures_v.name%TYPE;
1615: procedure_desc cn_obj_procedures_v.description%TYPE;
1616: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1665: proc_init(procedure_name, procedure_desc, parameter_list,
1666: 'P', null , package_spec_id, x_repository_id,
1667: spec_code, body_code);
1668:
1669: cn_utils.appindcr(body_code, ' l_input NUMBER;');
1670: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
1671: cn_utils.appindcr(body_code, ' l_itd_target NUMBER;');
1672: cn_utils.appendcr(body_code);
1673: cn_utils.appendcr(body_code, 'BEGIN');
1666: 'P', null , package_spec_id, x_repository_id,
1667: spec_code, body_code);
1668:
1669: cn_utils.appindcr(body_code, ' l_input NUMBER;');
1670: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
1671: cn_utils.appindcr(body_code, ' l_itd_target NUMBER;');
1672: cn_utils.appendcr(body_code);
1673: cn_utils.appendcr(body_code, 'BEGIN');
1674:
1667: spec_code, body_code);
1668:
1669: cn_utils.appindcr(body_code, ' l_input NUMBER;');
1670: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
1671: cn_utils.appindcr(body_code, ' l_itd_target NUMBER;');
1672: cn_utils.appendcr(body_code);
1673: cn_utils.appendcr(body_code, 'BEGIN');
1674:
1675: IF g_trx_group_code = 'INDIVIDUAL' THEN
1668:
1669: cn_utils.appindcr(body_code, ' l_input NUMBER;');
1670: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
1671: cn_utils.appindcr(body_code, ' l_itd_target NUMBER;');
1672: cn_utils.appendcr(body_code);
1673: cn_utils.appendcr(body_code, 'BEGIN');
1674:
1675: IF g_trx_group_code = 'INDIVIDUAL' THEN
1676: l_counter := 1;
1669: cn_utils.appindcr(body_code, ' l_input NUMBER;');
1670: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
1671: cn_utils.appindcr(body_code, ' l_itd_target NUMBER;');
1672: cn_utils.appendcr(body_code);
1673: cn_utils.appendcr(body_code, 'BEGIN');
1674:
1675: IF g_trx_group_code = 'INDIVIDUAL' THEN
1676: l_counter := 1;
1677: FOR l_mul_input IN l_mul_inputs_csr LOOP
1701: l_input_sql_where );
1702: split_long_sql( body_code, l_input_sql_select, 'SELECT');
1703:
1704: IF (l_dim_unit_code = 'STRING') THEN
1705: cn_utils.appindcr(body_code, ' into l_input_string ');
1706: ELSE
1707: cn_utils.appindcr(body_code, ' into l_input ');
1708: END IF;
1709: split_long_sql( body_code, l_input_sql_from, 'FROM');
1703:
1704: IF (l_dim_unit_code = 'STRING') THEN
1705: cn_utils.appindcr(body_code, ' into l_input_string ');
1706: ELSE
1707: cn_utils.appindcr(body_code, ' into l_input ');
1708: END IF;
1709: split_long_sql( body_code, l_input_sql_from, 'FROM');
1710: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1711: ELSE
1720:
1721:
1722: IF g_non_plsql_func_used_tbl(l_mul_input.calc_sql_exp_id) = 'N' THEN
1723: IF (l_dim_unit_code = 'STRING') THEN
1724: cn_utils.appindcr(body_code, ' l_input_string := ');
1725: ELSE
1726: cn_utils.appindcr(body_code, 'l_input := ');
1727: END IF;
1728: ELSE
1722: IF g_non_plsql_func_used_tbl(l_mul_input.calc_sql_exp_id) = 'N' THEN
1723: IF (l_dim_unit_code = 'STRING') THEN
1724: cn_utils.appindcr(body_code, ' l_input_string := ');
1725: ELSE
1726: cn_utils.appindcr(body_code, 'l_input := ');
1727: END IF;
1728: ELSE
1729: cn_utils.appindcr(body_code,'SELECT ');
1730: END IF;
1725: ELSE
1726: cn_utils.appindcr(body_code, 'l_input := ');
1727: END IF;
1728: ELSE
1729: cn_utils.appindcr(body_code,'SELECT ');
1730: END IF;
1731: -- add the select clause of the expression with column names replaced with
1732: -- global package variables
1733: FOR i in 1..g_exp_tbl_dtls_tbl.COUNT LOOP
1762: -- if non plsq function like DECODE is used we cannot use just an expression
1763: -- so select expression from dual;
1764: IF g_non_plsql_func_used_tbl(l_mul_input.calc_sql_exp_id) = 'N' THEN
1765: -- fix for bug 3187576
1766: --cn_utils.appindcr(body_code,REPLACE(l_input_sql_select,'select',NULL)||';');
1767: split_long_sql( body_code, REPLACE(l_input_sql_select,'select',NULL)||';', 'SELECT');
1768:
1769: ELSE
1770: -- fix for bug 3187576
1767: split_long_sql( body_code, REPLACE(l_input_sql_select,'select',NULL)||';', 'SELECT');
1768:
1769: ELSE
1770: -- fix for bug 3187576
1771: --cn_utils.appindcr(body_code,REPLACE(l_input_sql_select,'select',NULL));
1772: split_long_sql( body_code, REPLACE(l_input_sql_select,'select',NULL), 'SELECT');
1773:
1774: IF (l_dim_unit_code = 'STRING') THEN
1775: cn_utils.appindcr(body_code, ' into l_input_string ');
1771: --cn_utils.appindcr(body_code,REPLACE(l_input_sql_select,'select',NULL));
1772: split_long_sql( body_code, REPLACE(l_input_sql_select,'select',NULL), 'SELECT');
1773:
1774: IF (l_dim_unit_code = 'STRING') THEN
1775: cn_utils.appindcr(body_code, ' into l_input_string ');
1776: ELSE
1777: cn_utils.appindcr(body_code, ' into l_input ');
1778: END IF;
1779: cn_utils.appindcr(body_code, ' FROM DUAL; ');
1773:
1774: IF (l_dim_unit_code = 'STRING') THEN
1775: cn_utils.appindcr(body_code, ' into l_input_string ');
1776: ELSE
1777: cn_utils.appindcr(body_code, ' into l_input ');
1778: END IF;
1779: cn_utils.appindcr(body_code, ' FROM DUAL; ');
1780: END IF;
1781: END IF;
1775: cn_utils.appindcr(body_code, ' into l_input_string ');
1776: ELSE
1777: cn_utils.appindcr(body_code, ' into l_input ');
1778: END IF;
1779: cn_utils.appindcr(body_code, ' FROM DUAL; ');
1780: END IF;
1781: END IF;
1782:
1783: cn_utils.appendcr(body_code);
1779: cn_utils.appindcr(body_code, ' FROM DUAL; ');
1780: END IF;
1781: END IF;
1782:
1783: cn_utils.appendcr(body_code);
1784: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1785: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').rate_dim_sequence := ' || l_mul_input.rate_dim_sequence || ' ; ' );
1786:
1787: IF (l_dim_unit_code = 'STRING') THEN
1780: END IF;
1781: END IF;
1782:
1783: cn_utils.appendcr(body_code);
1784: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1785: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').rate_dim_sequence := ' || l_mul_input.rate_dim_sequence || ' ; ' );
1786:
1787: IF (l_dim_unit_code = 'STRING') THEN
1788: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
1781: END IF;
1782:
1783: cn_utils.appendcr(body_code);
1784: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1785: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').rate_dim_sequence := ' || l_mul_input.rate_dim_sequence || ' ; ' );
1786:
1787: IF (l_dim_unit_code = 'STRING') THEN
1788: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
1789: ELSE
1784: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1785: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').rate_dim_sequence := ' || l_mul_input.rate_dim_sequence || ' ; ' );
1786:
1787: IF (l_dim_unit_code = 'STRING') THEN
1788: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
1789: ELSE
1790: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
1791: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').amount := l_input;' );
1792: END IF;
1786:
1787: IF (l_dim_unit_code = 'STRING') THEN
1788: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
1789: ELSE
1790: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
1791: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').amount := l_input;' );
1792: END IF;
1793:
1794: IF (l_mul_input.cumulative_flag = 'N') THEN --IF g_cumulative_flag = 'N' THEN
1787: IF (l_dim_unit_code = 'STRING') THEN
1788: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
1789: ELSE
1790: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
1791: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter ||').amount := l_input;' );
1792: END IF;
1793:
1794: IF (l_mul_input.cumulative_flag = 'N') THEN --IF g_cumulative_flag = 'N' THEN
1795: -- 1.single input with non accumulative
1794: IF (l_mul_input.cumulative_flag = 'N') THEN --IF g_cumulative_flag = 'N' THEN
1795: -- 1.single input with non accumulative
1796: -- 2.multiple inputs case is always non accumulative
1797: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN -- need to split
1798: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1799: ELSE -- non cumulative with no split
1800: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := l_input;' );
1801: END IF;
1802: ELSE -- single input with cumulative_flag ON. we need to distinguish
1796: -- 2.multiple inputs case is always non accumulative
1797: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN -- need to split
1798: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1799: ELSE -- non cumulative with no split
1800: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := l_input;' );
1801: END IF;
1802: ELSE -- single input with cumulative_flag ON. we need to distinguish
1803: IF (g_cumulative_input_no = 1) THEN
1804: g_cumulative_input_no := l_counter;
1805: END IF;
1806:
1807: IF g_itd_flag = 'N' THEN
1808: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN -- need to split
1809: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1810: ELSE
1811: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||l_mul_input.rate_dim_sequence||') + l_input;' );
1812: END IF;
1813: ELSE -- g_itd_flag = 'Y'
1807: IF g_itd_flag = 'N' THEN
1808: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN -- need to split
1809: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1810: ELSE
1811: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||l_mul_input.rate_dim_sequence||') + l_input;' );
1812: END IF;
1813: ELSE -- g_itd_flag = 'Y'
1814: cn_utils.appendcr(body_code);
1815: IF g_pq_target_flag OR g_spq_target_flag THEN
1810: ELSE
1811: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||l_mul_input.rate_dim_sequence||') + l_input;' );
1812: END IF;
1813: ELSE -- g_itd_flag = 'Y'
1814: cn_utils.appendcr(body_code);
1815: IF g_pq_target_flag OR g_spq_target_flag THEN
1816: IF g_pq_target_flag THEN
1817: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
1818: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
1813: ELSE -- g_itd_flag = 'Y'
1814: cn_utils.appendcr(body_code);
1815: IF g_pq_target_flag OR g_spq_target_flag THEN
1816: IF g_pq_target_flag THEN
1817: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
1818: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
1819: END IF;
1820:
1821: IF g_spq_target_flag THEN
1814: cn_utils.appendcr(body_code);
1815: IF g_pq_target_flag OR g_spq_target_flag THEN
1816: IF g_pq_target_flag THEN
1817: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
1818: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
1819: END IF;
1820:
1821: IF g_spq_target_flag THEN
1822: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
1818: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
1819: END IF;
1820:
1821: IF g_spq_target_flag THEN
1822: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
1823: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
1824: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
1825: END IF;
1826:
1819: END IF;
1820:
1821: IF g_spq_target_flag THEN
1822: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
1823: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
1824: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
1825: END IF;
1826:
1827: cn_utils.appendcr(body_code);
1820:
1821: IF g_spq_target_flag THEN
1822: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
1823: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
1824: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
1825: END IF;
1826:
1827: cn_utils.appendcr(body_code);
1828:
1823: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
1824: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
1825: END IF;
1826:
1827: cn_utils.appendcr(body_code);
1828:
1829: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1830: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||')) ');
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1826:
1827: cn_utils.appendcr(body_code);
1828:
1829: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1830: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||')) ');
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1827: cn_utils.appendcr(body_code);
1828:
1829: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1830: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||')) ');
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1828:
1829: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1830: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||')) ');
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1836: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1830: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||')) ');
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1836: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1837: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1838: END IF;
1831: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1836: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1837: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1838: END IF;
1839: ELSE
1832: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1836: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1837: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1838: END IF;
1839: ELSE
1840: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1833: ELSE
1834: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
1835: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := (l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||'))');
1836: cn_utils.appindcr(body_code, ' /l_itd_target;' );
1837: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1838: END IF;
1839: ELSE
1840: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1841: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1837: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1838: END IF;
1839: ELSE
1840: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1841: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1842: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1843: ELSE
1844: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input; ');
1845: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1838: END IF;
1839: ELSE
1840: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1841: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1842: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1843: ELSE
1844: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input; ');
1845: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1846: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1840: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1841: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1842: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1843: ELSE
1844: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input; ');
1845: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1846: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1847: END IF;
1848: END IF;
1841: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1842: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1843: ELSE
1844: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input; ');
1845: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1846: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1847: END IF;
1848: END IF;
1849: END IF;
1842: cn_utils.appindcr(body_code, ' x_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
1843: ELSE
1844: --cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := l_input; ');
1845: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').base_amount := l_input+ g_input_achieved_itd('||l_mul_input.rate_dim_sequence||');' );
1846: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter || ').amount := x_mul_input_tbl('|| l_counter || ').base_amount; ');
1847: END IF;
1848: END IF;
1849: END IF;
1850: END IF;
1847: END IF;
1848: END IF;
1849: END IF;
1850: END IF;
1851: cn_utils.appendcr(body_code);
1852: l_counter := l_counter+1;
1853: END LOOP;
1854: ELSE -- g_trx_group_code = 'GROUP'
1855: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
1851: cn_utils.appendcr(body_code);
1852: l_counter := l_counter+1;
1853: END LOOP;
1854: ELSE -- g_trx_group_code = 'GROUP'
1855: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
1856: cn_utils.appendcr(body_code);
1857:
1858: g_trx_group_code := 'INDIVIDUAL';
1859: l_counter :=1;
1852: l_counter := l_counter+1;
1853: END LOOP;
1854: ELSE -- g_trx_group_code = 'GROUP'
1855: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
1856: cn_utils.appendcr(body_code);
1857:
1858: g_trx_group_code := 'INDIVIDUAL';
1859: l_counter :=1;
1860: FOR l_mul_input IN l_mul_inputs_csr LOOP
1873: l_input_sql_from,
1874: l_input_sql_where );
1875:
1876: split_long_sql( body_code, l_input_sql_select, 'SELECT');
1877: cn_utils.appindcr(body_code, ' into l_input ');
1878: split_long_sql( body_code, l_input_sql_from, 'FROM');
1879: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1880:
1881:
1878: split_long_sql( body_code, l_input_sql_from, 'FROM');
1879: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1880:
1881:
1882: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1883:
1884: END LOOP;
1885: cn_utils.appindcr(body_code, ' ELSE ');
1886: cn_utils.appendcr(body_code);
1881:
1882: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1883:
1884: END LOOP;
1885: cn_utils.appindcr(body_code, ' ELSE ');
1886: cn_utils.appendcr(body_code);
1887:
1888: g_trx_group_code := 'GROUP';
1889: l_counter :=1;
1882: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1883:
1884: END LOOP;
1885: cn_utils.appindcr(body_code, ' ELSE ');
1886: cn_utils.appendcr(body_code);
1887:
1888: g_trx_group_code := 'GROUP';
1889: l_counter :=1;
1890: FOR l_mul_input IN l_mul_inputs_csr LOOP
1903: construct_sql_from_where (l_input_sql_select,
1904: l_input_sql_from,
1905: l_input_sql_where );
1906:
1907: cn_utils.appindcr(body_code, ' BEGIN ');
1908: split_long_sql( body_code, l_input_sql_select, 'SELECT');
1909: cn_utils.appindcr(body_code, ' into l_input ');
1910: split_long_sql( body_code, l_input_sql_from, 'FROM');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1905: l_input_sql_where );
1906:
1907: cn_utils.appindcr(body_code, ' BEGIN ');
1908: split_long_sql( body_code, l_input_sql_select, 'SELECT');
1909: cn_utils.appindcr(body_code, ' into l_input ');
1910: split_long_sql( body_code, l_input_sql_from, 'FROM');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1908: split_long_sql( body_code, l_input_sql_select, 'SELECT');
1909: cn_utils.appindcr(body_code, ' into l_input ');
1910: split_long_sql( body_code, l_input_sql_from, 'FROM');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1909: cn_utils.appindcr(body_code, ' into l_input ');
1910: split_long_sql( body_code, l_input_sql_from, 'FROM');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1910: split_long_sql( body_code, l_input_sql_from, 'FROM');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1911: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1912: cn_utils.appendcr(body_code);
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1913: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1914: cn_utils.appendcr(body_code);
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1915: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1916: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1917: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1918: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1919: cn_utils.appindcr(body_code, ' sqlerrm); ');
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1920: cn_utils.appindcr(body_code, ' end if; ');
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1921: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1922: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1930: cn_utils.appendcr(body_code);
1923: cn_utils.appindcr(body_code, ' raise; ');
1924: cn_utils.appindcr(body_code, ' END; ');
1925: cn_utils.appendcr(body_code);
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1930: cn_utils.appendcr(body_code);
1931: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1926: cn_utils.appindcr(body_code, ' l_input := nvl(l_input,0); ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1930: cn_utils.appendcr(body_code);
1931: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1932: ').input_amount := l_input; ');
1933: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1934: ').amount := l_input; ');
1927: cn_utils.appindcr(body_code, ' x_mul_input_tbl('||
1928: l_counter ||').rate_dim_sequence := '
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1930: cn_utils.appendcr(body_code);
1931: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1932: ').input_amount := l_input; ');
1933: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1934: ').amount := l_input; ');
1935:
1929: || l_mul_input.rate_dim_sequence || ' ; ' );
1930: cn_utils.appendcr(body_code);
1931: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1932: ').input_amount := l_input; ');
1933: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1934: ').amount := l_input; ');
1935:
1936: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1937: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1933: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1934: ').amount := l_input; ');
1935:
1936: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1937: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1938: ').base_amount := 0; ');
1939: ELSE
1940: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1941: ').base_amount := l_input; ');
1936: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
1937: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1938: ').base_amount := 0; ');
1939: ELSE
1940: cn_utils.appindcr(body_code, ' x_mul_input_tbl('|| l_counter ||
1941: ').base_amount := l_input; ');
1942: END IF;
1943:
1944:
1941: ').base_amount := l_input; ');
1942: END IF;
1943:
1944:
1945: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1946:
1947: l_counter := l_counter+1;
1948: END LOOP;
1949: cn_utils.appindcr(body_code, ' END IF; ');
1945: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1946:
1947: l_counter := l_counter+1;
1948: END LOOP;
1949: cn_utils.appindcr(body_code, ' END IF; ');
1950: END IF;
1951:
1952: if (g_trx_group_code <> 'GROUP') then
1953: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1949: cn_utils.appindcr(body_code, ' END IF; ');
1950: END IF;
1951:
1952: if (g_trx_group_code <> 'GROUP') then
1953: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1954: end if;
1955:
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1952: if (g_trx_group_code <> 'GROUP') then
1953: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1954: end if;
1955:
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1953: cn_utils.appindcr(body_code, 'g_input_achieved := x_mul_input_tbl(1).input_amount; ');
1954: end if;
1955:
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1954: end if;
1955:
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1955:
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1956: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1957: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1965:
1958: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1965:
1966: cn_utils.proc_end( procedure_name, 'N', body_code );
1959: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_input.exception'', ');
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1965:
1966: cn_utils.proc_end( procedure_name, 'N', body_code );
1967: EXCEPTION
1960: cn_utils.appindcr(body_code, ' sqlerrm); ');
1961: cn_utils.appindcr(body_code, ' end if; ');
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1965:
1966: cn_utils.proc_end( procedure_name, 'N', body_code );
1967: EXCEPTION
1968: when others then
1962: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_input: ''); ');
1963: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
1964: cn_utils.appindcr(body_code, ' raise; ');
1965:
1966: cn_utils.proc_end( procedure_name, 'N', body_code );
1967: EXCEPTION
1968: when others then
1969: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1970: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1974: raise;
1975: END get_input;
1976:
1977: -- construct the get_commission procedure for the formula package.
1978: PROCEDURE get_commission (spec_code IN OUT NOCOPY cn_utils.code_type,
1979: body_code IN OUT NOCOPY cn_utils.code_type )
1980: IS
1981: procedure_name cn_obj_procedures_v.name%TYPE;
1982: procedure_desc cn_obj_procedures_v.description%TYPE;
1975: END get_input;
1976:
1977: -- construct the get_commission procedure for the formula package.
1978: PROCEDURE get_commission (spec_code IN OUT NOCOPY cn_utils.code_type,
1979: body_code IN OUT NOCOPY cn_utils.code_type )
1980: IS
1981: procedure_name cn_obj_procedures_v.name%TYPE;
1982: procedure_desc cn_obj_procedures_v.description%TYPE;
1983: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
2014: END IF;
2015:
2016: proc_init(procedure_name, procedure_desc, parameter_list,'F', 'NUMBER', package_spec_id, x_repository_id,spec_code, body_code);
2017:
2018: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
2019: cn_utils.appindcr(body_code, ' l_output NUMBER;');
2020: cn_utils.appendcr(body_code);
2021: cn_utils.appendcr(body_code, 'BEGIN');
2022:
2015:
2016: proc_init(procedure_name, procedure_desc, parameter_list,'F', 'NUMBER', package_spec_id, x_repository_id,spec_code, body_code);
2017:
2018: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
2019: cn_utils.appindcr(body_code, ' l_output NUMBER;');
2020: cn_utils.appendcr(body_code);
2021: cn_utils.appendcr(body_code, 'BEGIN');
2022:
2023: IF g_trx_group_code = 'INDIVIDUAL' THEN
2016: proc_init(procedure_name, procedure_desc, parameter_list,'F', 'NUMBER', package_spec_id, x_repository_id,spec_code, body_code);
2017:
2018: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
2019: cn_utils.appindcr(body_code, ' l_output NUMBER;');
2020: cn_utils.appendcr(body_code);
2021: cn_utils.appendcr(body_code, 'BEGIN');
2022:
2023: IF g_trx_group_code = 'INDIVIDUAL' THEN
2024: OPEN l_sql_select_from_csr;
2017:
2018: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
2019: cn_utils.appindcr(body_code, ' l_output NUMBER;');
2020: cn_utils.appendcr(body_code);
2021: cn_utils.appendcr(body_code, 'BEGIN');
2022:
2023: IF g_trx_group_code = 'INDIVIDUAL' THEN
2024: OPEN l_sql_select_from_csr;
2025: FETCH l_sql_select_from_csr INTO l_out_calc_sql_exp_id,l_output_sql_select_clob, l_output_sql_from_clob;
2048: -- the prefetched column values held in record variables
2049:
2050: IF g_other_tabused_tbl(l_out_calc_sql_exp_id) = 'Y' THEN
2051: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2052: cn_utils.appindcr(body_code, ' into l_commission ');
2053: split_long_sql( body_code, l_output_sql_from, 'FROM');
2054: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2055: ELSE
2056: IF g_non_plsql_func_used_tbl(l_out_calc_sql_exp_id) = 'N' THEN
2053: split_long_sql( body_code, l_output_sql_from, 'FROM');
2054: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2055: ELSE
2056: IF g_non_plsql_func_used_tbl(l_out_calc_sql_exp_id) = 'N' THEN
2057: cn_utils.appindcr(body_code, 'l_commission := ');
2058: ELSE
2059: cn_utils.appindcr(body_code,'SELECT ');
2060: END IF;
2061: FOR i in 1..g_exp_tbl_dtls_tbl.COUNT LOOP
2055: ELSE
2056: IF g_non_plsql_func_used_tbl(l_out_calc_sql_exp_id) = 'N' THEN
2057: cn_utils.appindcr(body_code, 'l_commission := ');
2058: ELSE
2059: cn_utils.appindcr(body_code,'SELECT ');
2060: END IF;
2061: FOR i in 1..g_exp_tbl_dtls_tbl.COUNT LOOP
2062: IF g_exp_tbl_dtls_tbl(i).CALC_SQL_EXP_ID = l_out_calc_sql_exp_id THEN
2063: IF (g_exp_tbl_dtls_tbl(i).table_name <> 'CN_COMMISSION_LINES' AND
2087: END IF;
2088: END LOOP;
2089: IF g_non_plsql_func_used_tbl(l_out_calc_sql_exp_id) = 'N' THEN
2090: -- fix for bug 3187576
2091: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL)||';');
2092: split_long_sql( body_code, REPLACE(l_output_sql_select,'select',NULL)||';', 'SELECT');
2093: ELSE
2094: -- fix for bug 3187576
2095: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL));
2091: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL)||';');
2092: split_long_sql( body_code, REPLACE(l_output_sql_select,'select',NULL)||';', 'SELECT');
2093: ELSE
2094: -- fix for bug 3187576
2095: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL));
2096: split_long_sql( body_code, REPLACE(l_output_sql_select,'select',NULL), 'SELECT');
2097: cn_utils.appindcr(body_code, ' into l_commission ');
2098: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2099: END IF;
2093: ELSE
2094: -- fix for bug 3187576
2095: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL));
2096: split_long_sql( body_code, REPLACE(l_output_sql_select,'select',NULL), 'SELECT');
2097: cn_utils.appindcr(body_code, ' into l_commission ');
2098: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2099: END IF;
2100: END IF;
2101:
2094: -- fix for bug 3187576
2095: --cn_utils.appindcr(body_code,REPLACE(l_output_sql_select,'select',NULL));
2096: split_long_sql( body_code, REPLACE(l_output_sql_select,'select',NULL), 'SELECT');
2097: cn_utils.appindcr(body_code, ' into l_commission ');
2098: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2099: END IF;
2100: END IF;
2101:
2102: cn_utils.appendcr(body_code);
2098: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2099: END IF;
2100: END IF;
2101:
2102: cn_utils.appendcr(body_code);
2103: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2104:
2105: IF g_itd_flag = 'Y' THEN
2106: IF g_pq_payment_flag OR g_spq_payment_flag THEN
2099: END IF;
2100: END IF;
2101:
2102: cn_utils.appendcr(body_code);
2103: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2104:
2105: IF g_itd_flag = 'Y' THEN
2106: IF g_pq_payment_flag OR g_spq_payment_flag THEN
2107: -- OR g_no_trx_flag THEN
2105: IF g_itd_flag = 'Y' THEN
2106: IF g_pq_payment_flag OR g_spq_payment_flag THEN
2107: -- OR g_no_trx_flag THEN
2108: -- since itd_payment is used, we don't need to accumulate output_achieved
2109: cn_utils.appindcr(body_code, ' g_output_achieved := 0; ');
2110: cn_utils.appindcr(body_code, ' l_commission := l_commission - '|| ' g_commission_payed_itd ;' );
2111: ELSE -- we need to accumulate the output
2112: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission; ');
2113: -- if x_rate is used in output
2106: IF g_pq_payment_flag OR g_spq_payment_flag THEN
2107: -- OR g_no_trx_flag THEN
2108: -- since itd_payment is used, we don't need to accumulate output_achieved
2109: cn_utils.appindcr(body_code, ' g_output_achieved := 0; ');
2110: cn_utils.appindcr(body_code, ' l_commission := l_commission - '|| ' g_commission_payed_itd ;' );
2111: ELSE -- we need to accumulate the output
2112: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission; ');
2113: -- if x_rate is used in output
2114: IF g_rate_flag THEN
2108: -- since itd_payment is used, we don't need to accumulate output_achieved
2109: cn_utils.appindcr(body_code, ' g_output_achieved := 0; ');
2110: cn_utils.appindcr(body_code, ' l_commission := l_commission - '|| ' g_commission_payed_itd ;' );
2111: ELSE -- we need to accumulate the output
2112: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission; ');
2113: -- if x_rate is used in output
2114: IF g_rate_flag THEN
2115: IF l_operator_position > 0 THEN
2116: cn_utils.appindcr(body_code, ' l_commission := p_rate '||l_operator||
2112: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission; ');
2113: -- if x_rate is used in output
2114: IF g_rate_flag THEN
2115: IF l_operator_position > 0 THEN
2116: cn_utils.appindcr(body_code, ' l_commission := p_rate '||l_operator||
2117: ' (g_output_achieved_itd + g_output_achieved) - g_commission_payed_itd;');
2118: ELSE
2119: cn_utils.appindcr(body_code, ' l_commission := p_rate - '|| 'g_commission_payed_itd ;' );
2120: END IF;
2115: IF l_operator_position > 0 THEN
2116: cn_utils.appindcr(body_code, ' l_commission := p_rate '||l_operator||
2117: ' (g_output_achieved_itd + g_output_achieved) - g_commission_payed_itd;');
2118: ELSE
2119: cn_utils.appindcr(body_code, ' l_commission := p_rate - '|| 'g_commission_payed_itd ;' );
2120: END IF;
2121: ELSE
2122: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd + g_output_achieved - g_commission_payed_itd ;');
2123: END IF;
2118: ELSE
2119: cn_utils.appindcr(body_code, ' l_commission := p_rate - '|| 'g_commission_payed_itd ;' );
2120: END IF;
2121: ELSE
2122: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd + g_output_achieved - g_commission_payed_itd ;');
2123: END IF;
2124: END IF;
2125: END IF;
2126: ELSE -- group by case
2123: END IF;
2124: END IF;
2125: END IF;
2126: ELSE -- group by case
2127: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
2128: cn_utils.appendcr(body_code);
2129: -- construct the code for testing trx by trx
2130: g_trx_group_code := 'INDIVIDUAL';
2131: l_output_sql_where := 'WHERE 1=1 ';
2124: END IF;
2125: END IF;
2126: ELSE -- group by case
2127: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
2128: cn_utils.appendcr(body_code);
2129: -- construct the code for testing trx by trx
2130: g_trx_group_code := 'INDIVIDUAL';
2131: l_output_sql_where := 'WHERE 1=1 ';
2132:
2145: construct_sql_from_where(l_output_sql_select, l_output_sql_from, l_output_sql_where);
2146: handle_output_sql_select(l_output_sql_select, l_output_sql_from, l_output_sql_where);
2147:
2148: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2149: cn_utils.appindcr(body_code, ' into l_commission ');
2150: split_long_sql( body_code, l_output_sql_from, 'FROM');
2151: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2152: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2153: cn_utils.appindcr(body_code, ' ELSE ');
2148: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2149: cn_utils.appindcr(body_code, ' into l_commission ');
2150: split_long_sql( body_code, l_output_sql_from, 'FROM');
2151: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2152: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2153: cn_utils.appindcr(body_code, ' ELSE ');
2154: cn_utils.appendcr(body_code);
2155: -- construct the code for computing the output and commission
2156: g_trx_group_code := 'GROUP';
2149: cn_utils.appindcr(body_code, ' into l_commission ');
2150: split_long_sql( body_code, l_output_sql_from, 'FROM');
2151: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2152: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2153: cn_utils.appindcr(body_code, ' ELSE ');
2154: cn_utils.appendcr(body_code);
2155: -- construct the code for computing the output and commission
2156: g_trx_group_code := 'GROUP';
2157: l_output_sql_where := 'WHERE 1=1 ';
2150: split_long_sql( body_code, l_output_sql_from, 'FROM');
2151: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2152: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2153: cn_utils.appindcr(body_code, ' ELSE ');
2154: cn_utils.appendcr(body_code);
2155: -- construct the code for computing the output and commission
2156: g_trx_group_code := 'GROUP';
2157: l_output_sql_where := 'WHERE 1=1 ';
2158:
2167:
2168: construct_sql_from_where(l_output_sql_select, l_output_sql_from, l_output_sql_where);
2169: handle_output_sql_select(l_output_sql_select, l_output_sql_from, l_output_sql_where);
2170:
2171: cn_utils.appindcr(body_code, ' BEGIN ');
2172: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2173: cn_utils.appindcr(body_code, ' into l_commission ');
2174: split_long_sql( body_code, l_output_sql_from, 'FROM');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2169: handle_output_sql_select(l_output_sql_select, l_output_sql_from, l_output_sql_where);
2170:
2171: cn_utils.appindcr(body_code, ' BEGIN ');
2172: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2173: cn_utils.appindcr(body_code, ' into l_commission ');
2174: split_long_sql( body_code, l_output_sql_from, 'FROM');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2172: split_long_sql( body_code, l_output_sql_select, 'SELECT');
2173: cn_utils.appindcr(body_code, ' into l_commission ');
2174: split_long_sql( body_code, l_output_sql_from, 'FROM');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2173: cn_utils.appindcr(body_code, ' into l_commission ');
2174: split_long_sql( body_code, l_output_sql_from, 'FROM');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2174: split_long_sql( body_code, l_output_sql_from, 'FROM');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2175: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2176: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2177: cn_utils.appendcr(body_code);
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2178: cn_utils.appindcr(body_code, 'EXCEPTION WHEN NO_DATA_FOUND THEN ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2179: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission,0); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2180: cn_utils.appindcr(body_code, ' when others then ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2181: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2182: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2183: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2184: cn_utils.appindcr(body_code, ' sqlerrm); ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2185: cn_utils.appindcr(body_code, ' end if; ');
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2186: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2187: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2195: END IF;
2188: cn_utils.appindcr(body_code, ' raise; ');
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2195: END IF;
2196:
2189: cn_utils.appindcr(body_code, 'END;');
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2195: END IF;
2196:
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2190: cn_utils.appendcr(body_code);
2191: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := '||'l_commission - g_output_achieved_itd ;' );
2192: cn_utils.appindcr(body_code, ' g_output_achieved_itd := l_commission; ');
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2195: END IF;
2196:
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2198:
2193: cn_utils.appendcr(body_code);
2194: cn_utils.appindcr(body_code, ' END IF; ' );
2195: END IF;
2196:
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2198:
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2195: END IF;
2196:
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2198:
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2196:
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2198:
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2197: cn_utils.appindcr(body_code, ' return l_commission; ' );
2198:
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2198:
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2199: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2200: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2208:
2201: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2208:
2209: cn_utils.proc_end( procedure_name, 'N', body_code );
2202: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_commission.exception'', ');
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2208:
2209: cn_utils.proc_end( procedure_name, 'N', body_code );
2210: EXCEPTION
2203: cn_utils.appindcr(body_code, ' sqlerrm); ');
2204: cn_utils.appindcr(body_code, ' end if; ');
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2208:
2209: cn_utils.proc_end( procedure_name, 'N', body_code );
2210: EXCEPTION
2211: when others then
2205: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_commission: ''); ');
2206: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2207: cn_utils.appindcr(body_code, ' raise; ');
2208:
2209: cn_utils.proc_end( procedure_name, 'N', body_code );
2210: EXCEPTION
2211: when others then
2212: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2213: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
2217: raise;
2218: END get_commission;
2219:
2220: --construct the get_perf procedure for the formula package.
2221: PROCEDURE get_perf (spec_code IN OUT NOCOPY cn_utils.code_type,
2222: body_code IN OUT NOCOPY cn_utils.code_type )
2223: IS
2224: procedure_name cn_obj_procedures_v.name%TYPE;
2225: procedure_desc cn_obj_procedures_v.description%TYPE;
2218: END get_commission;
2219:
2220: --construct the get_perf procedure for the formula package.
2221: PROCEDURE get_perf (spec_code IN OUT NOCOPY cn_utils.code_type,
2222: body_code IN OUT NOCOPY cn_utils.code_type )
2223: IS
2224: procedure_name cn_obj_procedures_v.name%TYPE;
2225: procedure_desc cn_obj_procedures_v.description%TYPE;
2226: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
2268:
2269: proc_init(procedure_name, procedure_desc, parameter_list,'F', 'NUMBER' ,
2270: package_spec_id, x_repository_id,spec_code, body_code);
2271:
2272: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
2273: cn_utils.appendcr(body_code);
2274: cn_utils.appendcr(body_code, 'BEGIN');
2275:
2276: IF g_trx_group_code = 'INDIVIDUAL' THEN
2269: proc_init(procedure_name, procedure_desc, parameter_list,'F', 'NUMBER' ,
2270: package_spec_id, x_repository_id,spec_code, body_code);
2271:
2272: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
2273: cn_utils.appendcr(body_code);
2274: cn_utils.appendcr(body_code, 'BEGIN');
2275:
2276: IF g_trx_group_code = 'INDIVIDUAL' THEN
2277: IF g_perf_measure_id IS NOT NULL THEN
2270: package_spec_id, x_repository_id,spec_code, body_code);
2271:
2272: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
2273: cn_utils.appendcr(body_code);
2274: cn_utils.appendcr(body_code, 'BEGIN');
2275:
2276: IF g_trx_group_code = 'INDIVIDUAL' THEN
2277: IF g_perf_measure_id IS NOT NULL THEN
2278: OPEN l_perf_select_from_csr;
2305: -- Replace the select with a expression which uses
2306: -- the prefetched column values held in record variables
2307: IF g_other_tabused_tbl(NVL(g_perf_measure_id,l_input_sql_exp_id)) = 'Y' THEN
2308: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
2309: cn_utils.appindcr(body_code, ' into l_perf ');
2310: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2311: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2312: ELSE
2313: IF g_non_plsql_func_used_tbl(NVL(g_perf_measure_id,l_input_sql_exp_id)) = 'N' THEN
2310: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2311: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2312: ELSE
2313: IF g_non_plsql_func_used_tbl(NVL(g_perf_measure_id,l_input_sql_exp_id)) = 'N' THEN
2314: cn_utils.appindcr(body_code, 'l_perf := ');
2315: ELSE
2316: cn_utils.appindcr(body_code,'SELECT ');
2317: END IF;
2318: FOR i in 1..g_exp_tbl_dtls_tbl.COUNT LOOP
2312: ELSE
2313: IF g_non_plsql_func_used_tbl(NVL(g_perf_measure_id,l_input_sql_exp_id)) = 'N' THEN
2314: cn_utils.appindcr(body_code, 'l_perf := ');
2315: ELSE
2316: cn_utils.appindcr(body_code,'SELECT ');
2317: END IF;
2318: FOR i in 1..g_exp_tbl_dtls_tbl.COUNT LOOP
2319: IF g_exp_tbl_dtls_tbl(i).CALC_SQL_EXP_ID = NVL(g_perf_measure_id,l_input_sql_exp_id) THEN
2320: IF (g_exp_tbl_dtls_tbl(i).table_name <> 'CN_COMMISSION_LINES' AND
2344: END IF;
2345: END LOOP;
2346: IF g_non_plsql_func_used_tbl(NVL(g_perf_measure_id,l_input_sql_exp_id)) = 'N' THEN
2347: -- fix for bug 3187576
2348: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL)||';');
2349: split_long_sql( body_code, REPLACE(l_perf_sql_select,'select',NULL)||';', 'SELECT');
2350: ELSE
2351: -- fix for bug 3187576
2352: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL));
2348: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL)||';');
2349: split_long_sql( body_code, REPLACE(l_perf_sql_select,'select',NULL)||';', 'SELECT');
2350: ELSE
2351: -- fix for bug 3187576
2352: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL));
2353: split_long_sql( body_code, REPLACE(l_perf_sql_select,'select',NULL), 'SELECT');
2354: cn_utils.appindcr(body_code, ' into l_perf ');
2355: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2356: END IF;
2350: ELSE
2351: -- fix for bug 3187576
2352: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL));
2353: split_long_sql( body_code, REPLACE(l_perf_sql_select,'select',NULL), 'SELECT');
2354: cn_utils.appindcr(body_code, ' into l_perf ');
2355: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2356: END IF;
2357: END IF;
2358: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2351: -- fix for bug 3187576
2352: --cn_utils.appindcr(body_code,REPLACE(l_perf_sql_select,'select',NULL));
2353: split_long_sql( body_code, REPLACE(l_perf_sql_select,'select',NULL), 'SELECT');
2354: cn_utils.appindcr(body_code, ' into l_perf ');
2355: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2356: END IF;
2357: END IF;
2358: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2359: ELSE -- group by case
2354: cn_utils.appindcr(body_code, ' into l_perf ');
2355: cn_utils.appindcr(body_code, ' FROM DUAL; ');
2356: END IF;
2357: END IF;
2358: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2359: ELSE -- group by case
2360: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
2361: cn_utils.appendcr(body_code);
2362: -- construct the code for testing trx by trx
2356: END IF;
2357: END IF;
2358: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2359: ELSE -- group by case
2360: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
2361: cn_utils.appendcr(body_code);
2362: -- construct the code for testing trx by trx
2363: g_trx_group_code := 'INDIVIDUAL';
2364: l_perf_sql_where := 'WHERE 1=1 ';
2357: END IF;
2358: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2359: ELSE -- group by case
2360: cn_utils.appindcr(body_code, ' IF p_commission_line_id IS NOT NULL THEN ');
2361: cn_utils.appendcr(body_code);
2362: -- construct the code for testing trx by trx
2363: g_trx_group_code := 'INDIVIDUAL';
2364: l_perf_sql_where := 'WHERE 1=1 ';
2365:
2390: l_perf_sql_from,
2391: l_perf_sql_where );
2392:
2393: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
2394: cn_utils.appindcr(body_code, ' into l_perf ');
2395: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2396: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2397:
2398: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2394: cn_utils.appindcr(body_code, ' into l_perf ');
2395: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2396: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2397:
2398: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2399:
2400: cn_utils.appindcr(body_code, ' ELSE ');
2401: cn_utils.appendcr(body_code);
2402: -- construct the code for computing the perf
2396: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2397:
2398: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2399:
2400: cn_utils.appindcr(body_code, ' ELSE ');
2401: cn_utils.appendcr(body_code);
2402: -- construct the code for computing the perf
2403: g_trx_group_code := 'GROUP';
2404: l_perf_sql_where := 'WHERE 1=1 ';
2397:
2398: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2399:
2400: cn_utils.appindcr(body_code, ' ELSE ');
2401: cn_utils.appendcr(body_code);
2402: -- construct the code for computing the perf
2403: g_trx_group_code := 'GROUP';
2404: l_perf_sql_where := 'WHERE 1=1 ';
2405:
2428: construct_sql_from_where(l_perf_sql_select,
2429: l_perf_sql_from,
2430: l_perf_sql_where );
2431:
2432: cn_utils.appindcr(body_code, ' BEGIN ');
2433: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
2434: cn_utils.appindcr(body_code, ' into l_perf ');
2435: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2430: l_perf_sql_where );
2431:
2432: cn_utils.appindcr(body_code, ' BEGIN ');
2433: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
2434: cn_utils.appindcr(body_code, ' into l_perf ');
2435: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2433: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
2434: cn_utils.appindcr(body_code, ' into l_perf ');
2435: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2434: cn_utils.appindcr(body_code, ' into l_perf ');
2435: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2435: split_long_sql( body_code, l_perf_sql_from, 'FROM');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2436: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2437: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2438: cn_utils.appindcr(body_code, ' EXCEPTION WHEN NO_DATA_FOUND THEN ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2439: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf,0); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2440: cn_utils.appindcr(body_code, ' WHEN others then ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2441: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2442: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2443: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2444: cn_utils.appindcr(body_code, ' sqlerrm); ');
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2445: cn_utils.appindcr(body_code, ' end if; ');
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2446: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2447: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2448: cn_utils.appindcr(body_code, ' raise; ');
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2449: cn_utils.appindcr(body_code, ' END;');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2450: cn_utils.appendcr(body_code);
2451: cn_utils.appindcr(body_code, ' END IF; ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2452: END IF;
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2453: cn_utils.appendcr(body_code);
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2454: cn_utils.appindcr(body_code, ' return l_perf; ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2455:
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2456: cn_utils.appindcr(body_code, 'EXCEPTION WHEN OTHERS THEN ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2457: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2465:
2458: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2465:
2466: cn_utils.proc_end( procedure_name, 'N', body_code );
2459: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_perf.exception'', ');
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2465:
2466: cn_utils.proc_end( procedure_name, 'N', body_code );
2467: EXCEPTION
2460: cn_utils.appindcr(body_code, ' sqlerrm); ');
2461: cn_utils.appindcr(body_code, ' end if; ');
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2465:
2466: cn_utils.proc_end( procedure_name, 'N', body_code );
2467: EXCEPTION
2468: when others then
2462: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_perf: ''); ');
2463: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2464: cn_utils.appindcr(body_code, ' raise; ');
2465:
2466: cn_utils.proc_end( procedure_name, 'N', body_code );
2467: EXCEPTION
2468: when others then
2469: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2470: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
2474: raise;
2475: END get_perf;
2476:
2477: -- construct the call to cn_formula_common_pkg.calculate_init;
2478: PROCEDURE calc_init (spec_code IN OUT NOCOPY cn_utils.code_type,
2479: body_code IN OUT NOCOPY cn_utils.code_type )
2480: IS
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2475: END get_perf;
2476:
2477: -- construct the call to cn_formula_common_pkg.calculate_init;
2478: PROCEDURE calc_init (spec_code IN OUT NOCOPY cn_utils.code_type,
2479: body_code IN OUT NOCOPY cn_utils.code_type )
2480: IS
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2478: PROCEDURE calc_init (spec_code IN OUT NOCOPY cn_utils.code_type,
2479: body_code IN OUT NOCOPY cn_utils.code_type )
2480: IS
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2479: body_code IN OUT NOCOPY cn_utils.code_type )
2480: IS
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2480: IS
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2481: BEGIN
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2482: cn_utils.appendcr(body_code);
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2483: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_init( p_srp_plan_assign_id,' ||' p_salesrep_id, ' );
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2484: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, p_start_date, ');
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2492: cn_utils.appendcr(body_code);
2485: cn_utils.appindcr(body_code, ' p_process_all_flag, g_intel_calc_flag, g_calc_type,');
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2492: cn_utils.appendcr(body_code);
2493:
2486: cn_utils.appindcr(body_code, ' g_trx_group_code, g_itd_flag, g_rollover_flag,');
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2492: cn_utils.appendcr(body_code);
2493:
2494: -- resolve pe references
2487: cn_utils.appindcr(body_code, ' g_commission_payed_ptd, g_commission_payed_itd,');
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2492: cn_utils.appendcr(body_code);
2493:
2494: -- resolve pe references
2495: IF (g_pe_reference_tbl.COUNT > 0) THEN
2488: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2489: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2490: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd,');
2491: cn_utils.appindcr(body_code, ' g_select_status_flag);');
2492: cn_utils.appendcr(body_code);
2493:
2494: -- resolve pe references
2495: IF (g_pe_reference_tbl.COUNT > 0) THEN
2496: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
2493:
2494: -- resolve pe references
2495: IF (g_pe_reference_tbl.COUNT > 0) THEN
2496: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
2497: cn_utils.appendcr(body_code, ' select ' || REPLACE(g_pe_reference_tbl(i), g_pe_id_tbl(i)||'PE.', ''));
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2494: -- resolve pe references
2495: IF (g_pe_reference_tbl.COUNT > 0) THEN
2496: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
2497: cn_utils.appendcr(body_code, ' select ' || REPLACE(g_pe_reference_tbl(i), g_pe_id_tbl(i)||'PE.', ''));
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2495: IF (g_pe_reference_tbl.COUNT > 0) THEN
2496: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
2497: cn_utils.appendcr(body_code, ' select ' || REPLACE(g_pe_reference_tbl(i), g_pe_id_tbl(i)||'PE.', ''));
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2503: cn_utils.appendcr(body_code);
2496: FOR i IN g_pe_reference_tbl.first..g_pe_reference_tbl.last LOOP
2497: cn_utils.appendcr(body_code, ' select ' || REPLACE(g_pe_reference_tbl(i), g_pe_id_tbl(i)||'PE.', ''));
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2503: cn_utils.appendcr(body_code);
2504: END LOOP;
2497: cn_utils.appendcr(body_code, ' select ' || REPLACE(g_pe_reference_tbl(i), g_pe_id_tbl(i)||'PE.', ''));
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2503: cn_utils.appendcr(body_code);
2504: END LOOP;
2505: END IF;
2498: cn_utils.appendcr(body_code, ' into g_' || REPLACE(g_pe_reference_tbl(i), '.', '_'));
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2503: cn_utils.appendcr(body_code);
2504: END LOOP;
2505: END IF;
2506:
2499: cn_utils.appendcr(body_code, ' from cn_srp_period_quotas');
2500: cn_utils.appendcr(body_code, ' where srp_plan_assign_id = p_srp_plan_assign_id');
2501: cn_utils.appendcr(body_code, ' and period_id = p_period_id');
2502: cn_utils.appendcr(body_code, ' and quota_id = ' || g_pe_id_tbl(i) || ';');
2503: cn_utils.appendcr(body_code);
2504: END LOOP;
2505: END IF;
2506:
2507: END calc_init;
2506:
2507: END calc_init;
2508:
2509: -- construct the call to cn_formula_common_pkg.calculate_roll;
2510: PROCEDURE calc_roll (spec_code IN OUT NOCOPY cn_utils.code_type,
2511: body_code IN OUT NOCOPY cn_utils.code_type )
2512: IS
2513: l_sql_select VARCHAR2(8000);
2514:
2507: END calc_init;
2508:
2509: -- construct the call to cn_formula_common_pkg.calculate_roll;
2510: PROCEDURE calc_roll (spec_code IN OUT NOCOPY cn_utils.code_type,
2511: body_code IN OUT NOCOPY cn_utils.code_type )
2512: IS
2513: l_sql_select VARCHAR2(8000);
2514:
2515: CURSOR exps IS
2532: IF (g_cumulative_flag = 'Y') THEN
2533: IF (instr(l_sql_select, '/CSQA.TARGET', 1, 1) > 0 OR
2534: instr(l_sql_select, '/(CSQA.TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2535: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSQA.TARGET)', 1, 1) > 0) THEN
2536: cn_utils.appendcr(body_code);
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2533: IF (instr(l_sql_select, '/CSQA.TARGET', 1, 1) > 0 OR
2534: instr(l_sql_select, '/(CSQA.TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2535: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSQA.TARGET)', 1, 1) > 0) THEN
2536: cn_utils.appendcr(body_code);
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2534: instr(l_sql_select, '/(CSQA.TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2535: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSQA.TARGET)', 1, 1) > 0) THEN
2536: cn_utils.appendcr(body_code);
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2535: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSQA.TARGET)', 1, 1) > 0) THEN
2536: cn_utils.appendcr(body_code);
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2536: cn_utils.appendcr(body_code);
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2537: cn_utils.appendcr(body_code, ' SELECT csqa.target + nvl(cspq.total_rollover, 0)');
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2538: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2546: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2539: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa, cn_srp_period_quotas_all cspq ');
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2546: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2547:
2540: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2546: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2547:
2548: ELSIF (instr(l_sql_select, '/CSPQ.ITD_TARGET', 1, 1) > 0 OR
2541: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id ');
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2546: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2547:
2548: ELSIF (instr(l_sql_select, '/CSPQ.ITD_TARGET', 1, 1) > 0 OR
2549: instr(l_sql_select, '/(CSPQ.ITD_TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2542: cn_utils.appendcr(body_code, ' AND cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2543: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2544: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2545: cn_utils.appendcr(body_code);
2546: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2547:
2548: ELSIF (instr(l_sql_select, '/CSPQ.ITD_TARGET', 1, 1) > 0 OR
2549: instr(l_sql_select, '/(CSPQ.ITD_TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2550: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSPQ.ITD_TARGET)', 1, 1) > 0) THEN
2547:
2548: ELSIF (instr(l_sql_select, '/CSPQ.ITD_TARGET', 1, 1) > 0 OR
2549: instr(l_sql_select, '/(CSPQ.ITD_TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2550: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSPQ.ITD_TARGET)', 1, 1) > 0) THEN
2551: cn_utils.appendcr(body_code);
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2548: ELSIF (instr(l_sql_select, '/CSPQ.ITD_TARGET', 1, 1) > 0 OR
2549: instr(l_sql_select, '/(CSPQ.ITD_TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2550: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSPQ.ITD_TARGET)', 1, 1) > 0) THEN
2551: cn_utils.appendcr(body_code);
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2549: instr(l_sql_select, '/(CSPQ.ITD_TARGET+CSPQ.TOTAL_ROLLOVER)', 1, 1) > 0 OR
2550: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSPQ.ITD_TARGET)', 1, 1) > 0) THEN
2551: cn_utils.appendcr(body_code);
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2550: instr(l_sql_select, '/(CSPQ.TOTAL_ROLLOVER+CSPQ.ITD_TARGET)', 1, 1) > 0) THEN
2551: cn_utils.appendcr(body_code);
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2551: cn_utils.appendcr(body_code);
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2552: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target + nvl(cspq.total_rollover, 0)');
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2553: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2554: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2555: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2556: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2557: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2558: cn_utils.appendcr(body_code);
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2559: cn_utils.appendcr(body_code, ' l_rollover := l_rollover * (1 - g_input_achieved_itd(' || g_cumulative_input_no ||') ); ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2560:
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2561: ELSIF (g_itd_flag = 'Y') THEN
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2562: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2563: cn_utils.appendcr(body_code, ' SELECT cspq.itd_target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2564: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2565: cn_utils.appendcr(body_code, ' FROM cn_srp_period_quotas_all cspq ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2566: cn_utils.appendcr(body_code, ' WHERE cspq.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2567: cn_utils.appendcr(body_code, ' AND cspq.quota_id = p_quota_id ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2575: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id; ');
2568: cn_utils.appendcr(body_code, ' AND cspq.period_id = p_period_id; ');
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2575: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id; ');
2576:
2569: ELSE
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2575: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id; ');
2576:
2577: END IF;
2570: cn_utils.appendcr(body_code);
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2575: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id; ');
2576:
2577: END IF;
2578: END IF;
2571: cn_utils.appendcr(body_code, ' SELECT csqa.target - g_input_achieved_itd(' || g_cumulative_input_no || ') ');
2572: cn_utils.appendcr(body_code, ' INTO l_rollover ');
2573: cn_utils.appendcr(body_code, ' FROM cn_srp_quota_assigns_all csqa ');
2574: cn_utils.appendcr(body_code, ' WHERE csqa.srp_plan_assign_id = p_srp_plan_assign_id ');
2575: cn_utils.appendcr(body_code, ' AND csqa.quota_id = p_quota_id; ');
2576:
2577: END IF;
2578: END IF;
2579:
2576:
2577: END IF;
2578: END IF;
2579:
2580: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_roll( p_salesrep_id,'||
2581: 'p_period_id, p_quota_id,');
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2578: END IF;
2579:
2580: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_roll( p_salesrep_id,'||
2581: 'p_period_id, p_quota_id,');
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2579:
2580: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_roll( p_salesrep_id,'||
2581: 'p_period_id, p_quota_id,');
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2587: cn_utils.appendcr(body_code);
2580: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.calculate_roll( p_salesrep_id,'||
2581: 'p_period_id, p_quota_id,');
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2587: cn_utils.appendcr(body_code);
2588: END calc_roll;
2581: 'p_period_id, p_quota_id,');
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2587: cn_utils.appendcr(body_code);
2588: END calc_roll;
2589:
2582: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_calc_type,');
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2587: cn_utils.appendcr(body_code);
2588: END calc_roll;
2589:
2590: -- construct the cursor for individual case
2583: cn_utils.appindcr(body_code, ' g_input_achieved_ptd, g_input_achieved_itd,');
2584: cn_utils.appindcr(body_code, ' g_output_achieved_ptd, g_output_achieved_itd,');
2585: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd, g_perf_achieved_itd, ');
2586: cn_utils.appindcr(body_code, ' l_rollover );');
2587: cn_utils.appendcr(body_code);
2588: END calc_roll;
2589:
2590: -- construct the cursor for individual case
2591: PROCEDURE individual_cursor (spec_code IN OUT NOCOPY cn_utils.code_type,
2587: cn_utils.appendcr(body_code);
2588: END calc_roll;
2589:
2590: -- construct the cursor for individual case
2591: PROCEDURE individual_cursor (spec_code IN OUT NOCOPY cn_utils.code_type,
2592: body_code IN OUT NOCOPY cn_utils.code_type ) IS
2593: BEGIN
2594: cn_utils.appendcr(body_code);
2595: cn_utils.appindcr(body_code, ' CURSOR l_lines_csr IS ');
2588: END calc_roll;
2589:
2590: -- construct the cursor for individual case
2591: PROCEDURE individual_cursor (spec_code IN OUT NOCOPY cn_utils.code_type,
2592: body_code IN OUT NOCOPY cn_utils.code_type ) IS
2593: BEGIN
2594: cn_utils.appendcr(body_code);
2595: cn_utils.appindcr(body_code, ' CURSOR l_lines_csr IS ');
2596: cn_utils.appindcr(body_code, ' SELECT ');
2590: -- construct the cursor for individual case
2591: PROCEDURE individual_cursor (spec_code IN OUT NOCOPY cn_utils.code_type,
2592: body_code IN OUT NOCOPY cn_utils.code_type ) IS
2593: BEGIN
2594: cn_utils.appendcr(body_code);
2595: cn_utils.appindcr(body_code, ' CURSOR l_lines_csr IS ');
2596: cn_utils.appindcr(body_code, ' SELECT ');
2597:
2598: -- Added for 11.5.10 Performance Enhancments
2591: PROCEDURE individual_cursor (spec_code IN OUT NOCOPY cn_utils.code_type,
2592: body_code IN OUT NOCOPY cn_utils.code_type ) IS
2593: BEGIN
2594: cn_utils.appendcr(body_code);
2595: cn_utils.appindcr(body_code, ' CURSOR l_lines_csr IS ');
2596: cn_utils.appindcr(body_code, ' SELECT ');
2597:
2598: -- Added for 11.5.10 Performance Enhancments
2599: -- Add column names of CH and CL which are used in the input/output/perf expression
2592: body_code IN OUT NOCOPY cn_utils.code_type ) IS
2593: BEGIN
2594: cn_utils.appendcr(body_code);
2595: cn_utils.appindcr(body_code, ' CURSOR l_lines_csr IS ');
2596: cn_utils.appindcr(body_code, ' SELECT ');
2597:
2598: -- Added for 11.5.10 Performance Enhancments
2599: -- Add column names of CH and CL which are used in the input/output/perf expression
2600: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
2598: -- Added for 11.5.10 Performance Enhancments
2599: -- Add column names of CH and CL which are used in the input/output/perf expression
2600: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
2601: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
2602: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||',');
2603: ELSE
2604: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name);
2605: END IF;
2606: END LOOP;
2600: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
2601: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
2602: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||',');
2603: ELSE
2604: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name);
2605: END IF;
2606: END LOOP;
2607:
2608: -- Changed for 11.5.10 Performance Enhancments
2607:
2608: -- Changed for 11.5.10 Performance Enhancments
2609: -- only if CH is used add the table in the from clause
2610: IF g_ch_flag THEN
2611: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl, cn_commission_headers_all ch ');
2612: ELSE
2613: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl');
2614: END IF;
2615:
2609: -- only if CH is used add the table in the from clause
2610: IF g_ch_flag THEN
2611: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl, cn_commission_headers_all ch ');
2612: ELSE
2613: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl');
2614: END IF;
2615:
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2612: ELSE
2613: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl');
2614: END IF;
2615:
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2618: cn_utils.appindcr(body_code, ' AND cl.srp_plan_assign_id = p_srp_plan_assign_id ');
2619: cn_utils.appindcr(body_code, ' AND cl.processed_period_id = p_period_id ');
2620: cn_utils.appindcr(body_code, ' AND cl.processed_date >= p_start_date ');
2613: cn_utils.appindcr(body_code, ' FROM cn_commission_lines_all cl');
2614: END IF;
2615:
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2618: cn_utils.appindcr(body_code, ' AND cl.srp_plan_assign_id = p_srp_plan_assign_id ');
2619: cn_utils.appindcr(body_code, ' AND cl.processed_period_id = p_period_id ');
2620: cn_utils.appindcr(body_code, ' AND cl.processed_date >= p_start_date ');
2621:
2614: END IF;
2615:
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2618: cn_utils.appindcr(body_code, ' AND cl.srp_plan_assign_id = p_srp_plan_assign_id ');
2619: cn_utils.appindcr(body_code, ' AND cl.processed_period_id = p_period_id ');
2620: cn_utils.appindcr(body_code, ' AND cl.processed_date >= p_start_date ');
2621:
2622:
2615:
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2618: cn_utils.appindcr(body_code, ' AND cl.srp_plan_assign_id = p_srp_plan_assign_id ');
2619: cn_utils.appindcr(body_code, ' AND cl.processed_period_id = p_period_id ');
2620: cn_utils.appindcr(body_code, ' AND cl.processed_date >= p_start_date ');
2621:
2622:
2623: -- Changed for 11.5.10 Performance Enhancments
2616: cn_utils.appindcr(body_code, ' WHERE cl.credited_salesrep_id = p_salesrep_id ');
2617: cn_utils.appindcr(body_code, ' AND cl.quota_id = p_quota_id ');
2618: cn_utils.appindcr(body_code, ' AND cl.srp_plan_assign_id = p_srp_plan_assign_id ');
2619: cn_utils.appindcr(body_code, ' AND cl.processed_period_id = p_period_id ');
2620: cn_utils.appindcr(body_code, ' AND cl.processed_date >= p_start_date ');
2621:
2622:
2623: -- Changed for 11.5.10 Performance Enhancments
2624: -- only if CH is used add the table in the where clause
2622:
2623: -- Changed for 11.5.10 Performance Enhancments
2624: -- only if CH is used add the table in the where clause
2625: IF g_ch_flag THEN
2626: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
2627: END IF;
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2624: -- only if CH is used add the table in the where clause
2625: IF g_ch_flag THEN
2626: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
2627: END IF;
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2625: IF g_ch_flag THEN
2626: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
2627: END IF;
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2626: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
2627: END IF;
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2627: END IF;
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2628: cn_utils.appindcr(body_code, ' AND substr(cl.pre_processed_code, 4,1) = ''C'' ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2629: cn_utils.appindcr(body_code, ' AND ( (g_select_status_flag = ''PCX'' and ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2630: cn_utils.appindcr(body_code, ' cl.status in (''POP'', ''CALC'', ''XCALC'') ) ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2631: cn_utils.appindcr(body_code, ' OR (g_select_status_flag = ''P'' and cl.status = ''POP'') )');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2632: cn_utils.appindcr(body_code, ' AND (( g_calc_type = ''FORECAST'' and ');
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2640: cn_utils.appendcr(body_code);
2633: cn_utils.appindcr(body_code, ' cl.trx_type = ''FORECAST'') ');
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2640: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2634: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''BONUS'' and cl.trx_type = ''BONUS'' )');
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2640: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2642:
2635: cn_utils.appindcr(body_code, ' OR (g_calc_type = ''COMMISSION'' and ');
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2640: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2642:
2643: -- construct the code to update global variables
2636: cn_utils.appindcr(body_code, ' cl.trx_type NOT IN (''BONUS'',''FORECAST'',''GRP'') )) ');
2637: cn_utils.appindcr(body_code, ' ORDER by cl.processed_date asc ');
2638: cn_utils.appindcr(body_code, ' ,cl.commission_line_id asc ');
2639: cn_utils.appindcr(body_code, ' ; ');
2640: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2642:
2643: -- construct the code to update global variables
2644: PROCEDURE update_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
2640: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2642:
2643: -- construct the code to update global variables
2644: PROCEDURE update_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
2645: body_code IN OUT NOCOPY cn_utils.code_type )
2646: IS
2647: BEGIN
2648: cn_utils.appendcr(body_code);
2641: END individual_cursor;
2642:
2643: -- construct the code to update global variables
2644: PROCEDURE update_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
2645: body_code IN OUT NOCOPY cn_utils.code_type )
2646: IS
2647: BEGIN
2648: cn_utils.appendcr(body_code);
2649: IF g_itd_flag = 'Y' THEN
2644: PROCEDURE update_variables(spec_code IN OUT NOCOPY cn_utils.code_type,
2645: body_code IN OUT NOCOPY cn_utils.code_type )
2646: IS
2647: BEGIN
2648: cn_utils.appendcr(body_code);
2649: IF g_itd_flag = 'Y' THEN
2650: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
2651: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
2652: END IF;
2646: IS
2647: BEGIN
2648: cn_utils.appendcr(body_code);
2649: IF g_itd_flag = 'Y' THEN
2650: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
2651: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
2652: END IF;
2653: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2647: BEGIN
2648: cn_utils.appendcr(body_code);
2649: IF g_itd_flag = 'Y' THEN
2650: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
2651: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
2652: END IF;
2653: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2655:
2649: IF g_itd_flag = 'Y' THEN
2650: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
2651: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
2652: END IF;
2653: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2655:
2656: FOR i IN 1..g_number_dim LOOP
2657: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
2650: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
2651: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
2652: END IF;
2653: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2655:
2656: FOR i IN 1..g_number_dim LOOP
2657: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
2658: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
2653: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2655:
2656: FOR i IN 1..g_number_dim LOOP
2657: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
2658: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
2659: END LOOP;
2660:
2661: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
2654: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
2655:
2656: FOR i IN 1..g_number_dim LOOP
2657: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
2658: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
2659: END LOOP;
2660:
2661: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
2662: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
2657: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
2658: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
2659: END LOOP;
2660:
2661: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
2662: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
2663: cn_utils.appendcr(body_code);
2664: END update_variables;
2665:
2658: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
2659: END LOOP;
2660:
2661: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
2662: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
2663: cn_utils.appendcr(body_code);
2664: END update_variables;
2665:
2666: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
2659: END LOOP;
2660:
2661: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
2662: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
2663: cn_utils.appendcr(body_code);
2664: END update_variables;
2665:
2666: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
2667: PROCEDURE calculate_quota (spec_code IN OUT NOCOPY cn_utils.code_type,
2663: cn_utils.appendcr(body_code);
2664: END update_variables;
2665:
2666: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
2667: PROCEDURE calculate_quota (spec_code IN OUT NOCOPY cn_utils.code_type,
2668: body_code IN OUT NOCOPY cn_utils.code_type )
2669: IS
2670: procedure_name cn_obj_procedures_v.name%TYPE;
2671: procedure_desc cn_obj_procedures_v.description%TYPE;
2664: END update_variables;
2665:
2666: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
2667: PROCEDURE calculate_quota (spec_code IN OUT NOCOPY cn_utils.code_type,
2668: body_code IN OUT NOCOPY cn_utils.code_type )
2669: IS
2670: procedure_name cn_obj_procedures_v.name%TYPE;
2671: procedure_desc cn_obj_procedures_v.description%TYPE;
2672: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
2709: proc_init(procedure_name, procedure_desc, parameter_list,
2710: 'P', null , package_spec_id, x_repository_id,
2711: spec_code, body_code);
2712:
2713: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2710: 'P', null , package_spec_id, x_repository_id,
2711: spec_code, body_code);
2712:
2713: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2711: spec_code, body_code);
2712:
2713: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2712:
2713: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2713: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2714: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2715: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2716: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2717: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2718: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2719: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2720: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2721: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2722: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2723: cn_utils.appindcr(body_code, ' l_debug_flag VARCHAR2(1) := fnd_profile.value(''CN_DEBUG''); ');
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2724: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2725: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
2726: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
2727: cn_utils.appindcr(body_code, ' l_trx_rec_old cn_formula_common_pkg.trx_rec_type; ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2733: cn_utils.appindcr(body_code, ' l_start_period_id NUMBER(15); ');
2728: cn_utils.appindcr(body_code, ' l_trx_rec_new cn_formula_common_pkg.trx_rec_type; ');
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2733: cn_utils.appindcr(body_code, ' l_start_period_id NUMBER(15); ');
2734: cn_utils.appindcr(body_code, ' l_grp_trx_rec cn_formula_common_pkg.trx_rec_type; ');
2735: END IF;
2736: cn_utils.appendcr(body_code);
2729: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2733: cn_utils.appindcr(body_code, ' l_start_period_id NUMBER(15); ');
2734: cn_utils.appindcr(body_code, ' l_grp_trx_rec cn_formula_common_pkg.trx_rec_type; ');
2735: END IF;
2736: cn_utils.appendcr(body_code);
2737:
2730:
2731: IF g_trx_group_code = 'GROUP' THEN
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2733: cn_utils.appindcr(body_code, ' l_start_period_id NUMBER(15); ');
2734: cn_utils.appindcr(body_code, ' l_grp_trx_rec cn_formula_common_pkg.trx_rec_type; ');
2735: END IF;
2736: cn_utils.appendcr(body_code);
2737:
2738: -- constrcut the cursor to loop through trxs
2732: cn_utils.appindcr(body_code, ' l_endofinterval_flag VARCHAR2(1); ');
2733: cn_utils.appindcr(body_code, ' l_start_period_id NUMBER(15); ');
2734: cn_utils.appindcr(body_code, ' l_grp_trx_rec cn_formula_common_pkg.trx_rec_type; ');
2735: END IF;
2736: cn_utils.appendcr(body_code);
2737:
2738: -- constrcut the cursor to loop through trxs
2739: IF (NOT(g_no_trx_flag)) THEN
2740: individual_cursor(spec_code, body_code);
2753: l_variable_declaration := 'l_'||lower(substr(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL),1,24))||'_cur';
2754: ELSE
2755: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
2756: END IF;
2757: cn_utils.appendcr(body_code);
2758: cn_utils.appindcr(body_code, ' CURSOR '||l_variable_declaration||' IS');
2759: l_input_sql_where := 'WHERE 1=1 ';
2760: l_input_sql_select := lower_str( ' select ' ||g_uniq_tbl_names_tbl(l_table_object_id).column_name_list);
2761: l_input_sql_from := lower( ' from ' ||g_uniq_tbl_names_tbl(l_table_object_id).table_name||' '||
2754: ELSE
2755: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
2756: END IF;
2757: cn_utils.appendcr(body_code);
2758: cn_utils.appindcr(body_code, ' CURSOR '||l_variable_declaration||' IS');
2759: l_input_sql_where := 'WHERE 1=1 ';
2760: l_input_sql_select := lower_str( ' select ' ||g_uniq_tbl_names_tbl(l_table_object_id).column_name_list);
2761: l_input_sql_from := lower( ' from ' ||g_uniq_tbl_names_tbl(l_table_object_id).table_name||' '||
2762: g_uniq_tbl_names_tbl(l_table_object_id).table_alias);
2763: construct_sql_from_where (l_input_sql_select,
2764: l_input_sql_from,
2765: l_input_sql_where );
2766: --split_long_sql( body_code, l_input_sql_select, 'SELECT');
2767: cn_utils.appindcr(body_code, 'SELECT * ');
2768:
2769: split_long_sql( body_code, l_input_sql_from, 'FROM');
2770: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
2771: END IF;
2773: END LOOP;
2774: END IF;
2775:
2776:
2777: cn_utils.appendcr(body_code);
2778: cn_utils.appendcr(body_code, 'BEGIN');
2779: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
2780: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
2781: calc_init(spec_code, body_code);
2774: END IF;
2775:
2776:
2777: cn_utils.appendcr(body_code);
2778: cn_utils.appendcr(body_code, 'BEGIN');
2779: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
2780: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
2781: calc_init(spec_code, body_code);
2782:
2775:
2776:
2777: cn_utils.appendcr(body_code);
2778: cn_utils.appendcr(body_code, 'BEGIN');
2779: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
2780: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
2781: calc_init(spec_code, body_code);
2782:
2783: FOR i IN 1..g_number_dim LOOP
2776:
2777: cn_utils.appendcr(body_code);
2778: cn_utils.appendcr(body_code, 'BEGIN');
2779: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
2780: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
2781: calc_init(spec_code, body_code);
2782:
2783: FOR i IN 1..g_number_dim LOOP
2784: cn_utils.appindcr(body_code, ' l_input('||i||') := 0; ');
2780: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
2781: calc_init(spec_code, body_code);
2782:
2783: FOR i IN 1..g_number_dim LOOP
2784: cn_utils.appindcr(body_code, ' l_input('||i||') := 0; ');
2785: END LOOP;
2786:
2787: -- Added for 11.5.10 Performance Enhancments
2788: -- Declare open fetch statment which will fetch all columns of tables
2797: l_variable_declaration := 'l_'||lower(substr(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL),1,24))||'_cur';
2798: ELSE
2799: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
2800: END IF;
2801: cn_utils.appendcr(body_code);
2802: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
2803: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
2804:
2805: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
2798: ELSE
2799: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
2800: END IF;
2801: cn_utils.appendcr(body_code);
2802: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
2803: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
2804:
2805: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
2806:
2799: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
2800: END IF;
2801: cn_utils.appendcr(body_code);
2802: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
2803: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
2804:
2805: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
2806:
2807: END IF;
2801: cn_utils.appendcr(body_code);
2802: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
2803: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
2804:
2805: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
2806:
2807: END IF;
2808: l_table_object_id := g_uniq_tbl_names_tbl.NEXT(l_table_object_id);
2809: END LOOP;
2811:
2812:
2813: IF (g_trx_group_code = 'INDIVIDUAL' AND NOT(g_no_trx_flag)) THEN
2814: -- for individual case we don't need to accumulate output_achieved
2815: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2812:
2813: IF (g_trx_group_code = 'INDIVIDUAL' AND NOT(g_no_trx_flag)) THEN
2814: -- for individual case we don't need to accumulate output_achieved
2815: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2813: IF (g_trx_group_code = 'INDIVIDUAL' AND NOT(g_no_trx_flag)) THEN
2814: -- for individual case we don't need to accumulate output_achieved
2815: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2814: -- for individual case we don't need to accumulate output_achieved
2815: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2815: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2816: cn_utils.appindcr(body_code, ' LOOP ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2817: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2818: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2819: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2820: cn_utils.appendcr(body_code);
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2821: cn_utils.appindcr(body_code, ' BEGIN ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2822: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2823: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2824: cn_utils.appindcr(body_code ,' l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2825: cn_utils.appindcr(body_code ,' l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2826: cn_utils.appindcr(body_code ,' l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2827: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2828: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2829: cn_utils.appindcr(body_code ,' l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2830: cn_utils.appindcr(body_code ,' l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2831: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2832: cn_utils.appindcr(body_code ,' l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2833: cn_utils.appindcr(body_code ,' l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2834: cn_utils.appindcr(body_code ,' l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2835: cn_utils.appindcr(body_code ,' l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2836: cn_utils.appindcr(body_code ,' l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2837: cn_utils.appindcr(body_code ,' l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2838: cn_utils.appindcr(body_code ,' l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2839: cn_utils.appindcr(body_code ,' l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
2840: cn_utils.appindcr(body_code ,' l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2841: cn_utils.appindcr(body_code ,' l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2842: cn_utils.appindcr(body_code ,' l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2843: cn_utils.appindcr(body_code ,' l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2844:
2845: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2846: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2847: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2855: END LOOP;
2848: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2849:
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2855: END LOOP;
2856: cn_utils.appindcr(body_code, ' end if; ');
2850: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2851: cn_utils.appindcr(body_code, ' cn_message_pkg.debug('' ''); ');
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2855: END LOOP;
2856: cn_utils.appindcr(body_code, ' end if; ');
2857: cn_utils.appendcr(body_code);
2858:
2852: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Transaction (line ID='' || l_trx_rec_old.commission_line_id||'')'' );');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2855: END LOOP;
2856: cn_utils.appindcr(body_code, ' end if; ');
2857: cn_utils.appendcr(body_code);
2858:
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2853: FOR i IN 1..g_number_dim LOOP
2854: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2855: END LOOP;
2856: cn_utils.appindcr(body_code, ' end if; ');
2857: cn_utils.appendcr(body_code);
2858:
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2856: cn_utils.appindcr(body_code, ' end if; ');
2857: cn_utils.appendcr(body_code);
2858:
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2857: cn_utils.appendcr(body_code);
2858:
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2858:
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2859: IF g_rate_flag THEN
2860: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2867: cn_utils.appindcr(body_code, ' end if; ');
2861: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2867: cn_utils.appindcr(body_code, ' end if; ');
2868: END IF;
2869:
2862: cn_utils.appindcr(body_code, ' l_trx_rec_old.processed_date, g_number_dim,l_mul_input_tbl, ');
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2867: cn_utils.appindcr(body_code, ' end if; ');
2868: END IF;
2869:
2870: cn_utils.appendcr(body_code);
2863: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
2864:
2865: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2867: cn_utils.appindcr(body_code, ' end if; ');
2868: END IF;
2869:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2866: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
2867: cn_utils.appindcr(body_code, ' end if; ');
2868: END IF;
2869:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2867: cn_utils.appindcr(body_code, ' end if; ');
2868: END IF;
2869:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2868: END IF;
2869:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2869:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2877:
2870: cn_utils.appendcr(body_code);
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2877:
2878: IF g_perf_input_expr_seq >0 THEN
2871: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id,');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2877:
2878: IF g_perf_input_expr_seq >0 THEN
2879: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
2872: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
2873: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
2874: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2877:
2878: IF g_perf_input_expr_seq >0 THEN
2879: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
2880:
2875: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
2876: cn_utils.appindcr(body_code, ' end if; ');
2877:
2878: IF g_perf_input_expr_seq >0 THEN
2879: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
2880:
2881: ELSIF g_perf_measure_id IS NULL THEN
2882: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
2883:
2878: IF g_perf_input_expr_seq >0 THEN
2879: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
2880:
2881: ELSIF g_perf_measure_id IS NULL THEN
2882: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
2883:
2884: ELSE
2885: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2881: ELSIF g_perf_measure_id IS NULL THEN
2882: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
2883:
2884: ELSE
2885: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2882: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
2883:
2884: ELSE
2885: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2890: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
2883:
2884: ELSE
2885: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2890: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
2891: cn_utils.appindcr(body_code, ' end if; ');
2885: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2890: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
2891: cn_utils.appindcr(body_code, ' end if; ');
2892: END IF;
2893:
2886: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2890: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
2891: cn_utils.appindcr(body_code, ' end if; ');
2892: END IF;
2893:
2894: FOR i IN 1..g_number_dim LOOP
2887: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date);');
2888:
2889: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
2890: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
2891: cn_utils.appindcr(body_code, ' end if; ');
2892: END IF;
2893:
2894: FOR i IN 1..g_number_dim LOOP
2895: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
2891: cn_utils.appindcr(body_code, ' end if; ');
2892: END IF;
2893:
2894: FOR i IN 1..g_number_dim LOOP
2895: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
2896: END LOOP;
2897:
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2894: FOR i IN 1..g_number_dim LOOP
2895: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
2896: END LOOP;
2897:
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2895: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
2896: END LOOP;
2897:
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2896: END LOOP;
2897:
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2897:
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2898: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2899: cn_utils.appendcr(body_code);
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2907: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2900: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2907: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2908: ELSE
2901: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
2902: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2907: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2908: ELSE
2909: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2903: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate; ');
2904: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id ; ');
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2907: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2908: ELSE
2909: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2910: END IF;
2911: IF g_itd_flag = 'Y' THEN
2905: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
2906: IF g_number_dim > 1 THEN
2907: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2908: ELSE
2909: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2910: END IF;
2911: IF g_itd_flag = 'Y' THEN
2912: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
2913: ELSE
2908: ELSE
2909: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
2910: END IF;
2911: IF g_itd_flag = 'Y' THEN
2912: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
2913: ELSE
2914: -- output_achieved = 0 since no need to accumulate output for individual non itd case
2915: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
2916: END IF;
2911: IF g_itd_flag = 'Y' THEN
2912: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
2913: ELSE
2914: -- output_achieved = 0 since no need to accumulate output for individual non itd case
2915: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
2916: END IF;
2917: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
2918: cn_utils.appendcr(body_code);
2919: -- update package variables
2913: ELSE
2914: -- output_achieved = 0 since no need to accumulate output for individual non itd case
2915: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
2916: END IF;
2917: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
2918: cn_utils.appendcr(body_code);
2919: -- update package variables
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2914: -- output_achieved = 0 since no need to accumulate output for individual non itd case
2915: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
2916: END IF;
2917: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
2918: cn_utils.appendcr(body_code);
2919: -- update package variables
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2917: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
2918: cn_utils.appendcr(body_code);
2919: -- update package variables
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2918: cn_utils.appendcr(body_code);
2919: -- update package variables
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2919: -- update package variables
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2920: update_variables(spec_code, body_code);
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2921: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2922: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2923: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2931: cn_utils.appendcr(body_code);
2924: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2931: cn_utils.appendcr(body_code);
2932:
2925: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2931: cn_utils.appendcr(body_code);
2932:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2926: cn_utils.appindcr(body_code, ' END; ');
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2931: cn_utils.appendcr(body_code);
2932:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2934: IF g_itd_flag = 'Y' THEN
2927: cn_utils.appendcr(body_code);
2928: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
2929: cn_utils.appindcr(body_code, ' END LOOP;');
2930: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
2931: cn_utils.appendcr(body_code);
2932:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2934: IF g_itd_flag = 'Y' THEN
2935: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.check_itd_calc_trx( p_salesrep_id, ');
2931: cn_utils.appendcr(body_code);
2932:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2934: IF g_itd_flag = 'Y' THEN
2935: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.check_itd_calc_trx( p_salesrep_id, ');
2936: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_period_id, p_quota_id ) = FALSE THEN ');
2937: cn_utils.appindcr(body_code, ' BEGIN ');
2938: -- get input
2939: cn_utils.appendcr(body_code);
2932:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2934: IF g_itd_flag = 'Y' THEN
2935: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.check_itd_calc_trx( p_salesrep_id, ');
2936: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_period_id, p_quota_id ) = FALSE THEN ');
2937: cn_utils.appindcr(body_code, ' BEGIN ');
2938: -- get input
2939: cn_utils.appendcr(body_code);
2940:
2933: -- need to create 'ITD' trx if there is no calc trx in this period
2934: IF g_itd_flag = 'Y' THEN
2935: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.check_itd_calc_trx( p_salesrep_id, ');
2936: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_period_id, p_quota_id ) = FALSE THEN ');
2937: cn_utils.appindcr(body_code, ' BEGIN ');
2938: -- get input
2939: cn_utils.appendcr(body_code);
2940:
2941: -- if there is more than one input, take care of the non-cumulative inputs
2935: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.check_itd_calc_trx( p_salesrep_id, ');
2936: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_period_id, p_quota_id ) = FALSE THEN ');
2937: cn_utils.appindcr(body_code, ' BEGIN ');
2938: -- get input
2939: cn_utils.appendcr(body_code);
2940:
2941: -- if there is more than one input, take care of the non-cumulative inputs
2942: IF g_number_dim > 1 THEN
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2939: cn_utils.appendcr(body_code);
2940:
2941: -- if there is more than one input, take care of the non-cumulative inputs
2942: IF g_number_dim > 1 THEN
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2944: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, ');
2945: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2940:
2941: -- if there is more than one input, take care of the non-cumulative inputs
2942: IF g_number_dim > 1 THEN
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2944: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, ');
2945: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2948:
2941: -- if there is more than one input, take care of the non-cumulative inputs
2942: IF g_number_dim > 1 THEN
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2944: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, ');
2945: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2948:
2949: FOR i IN 1..g_number_dim LOOP
2942: IF g_number_dim > 1 THEN
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2944: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, ');
2945: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2948:
2949: FOR i IN 1..g_number_dim LOOP
2950: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2943: cn_utils.appindcr(body_code, ' g_commission_rec := null; ');
2944: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, ');
2945: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2948:
2949: FOR i IN 1..g_number_dim LOOP
2950: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2951: END LOOP;
2946: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, ');
2947: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
2948:
2949: FOR i IN 1..g_number_dim LOOP
2950: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2951: END LOOP;
2952: cn_utils.appendcr(body_code);
2953: END IF;
2954:
2948:
2949: FOR i IN 1..g_number_dim LOOP
2950: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount || l_mul_input_tbl('||i||').input_string );');
2951: END LOOP;
2952: cn_utils.appendcr(body_code);
2953: END IF;
2954:
2955: FOR itd_input IN itd_inputs LOOP
2956: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').rate_dim_sequence := '
2952: cn_utils.appendcr(body_code);
2953: END IF;
2954:
2955: FOR itd_input IN itd_inputs LOOP
2956: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').rate_dim_sequence := '
2957: || itd_input.rate_dim_sequence || ';' );
2958:
2959: SELECT sql_select input_sql_select, sql_from input_sql_from
2960: INTO l_input_sql_select_clob, l_input_sql_from_clob
2974:
2975: IF g_pq_target_flag OR g_spq_target_flag THEN
2976: -- get itd_target
2977: IF g_pq_target_flag THEN
2978: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
2979: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
2980: END IF;
2981:
2982: IF g_spq_target_flag THEN
2975: IF g_pq_target_flag OR g_spq_target_flag THEN
2976: -- get itd_target
2977: IF g_pq_target_flag THEN
2978: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
2979: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
2980: END IF;
2981:
2982: IF g_spq_target_flag THEN
2983: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
2979: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
2980: END IF;
2981:
2982: IF g_spq_target_flag THEN
2983: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
2984: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
2985: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
2986: END IF;
2987:
2980: END IF;
2981:
2982: IF g_spq_target_flag THEN
2983: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
2984: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
2985: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
2986: END IF;
2987:
2988: cn_utils.appendcr(body_code);
2981:
2982: IF g_spq_target_flag THEN
2983: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
2984: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
2985: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
2986: END IF;
2987:
2988: cn_utils.appendcr(body_code);
2989:
2984: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
2985: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
2986: END IF;
2987:
2988: cn_utils.appendcr(body_code);
2989:
2990: IF itd_input.split_flag <> 'N' THEN
2991: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
2992: ELSE
2987:
2988: cn_utils.appendcr(body_code);
2989:
2990: IF itd_input.split_flag <> 'N' THEN
2991: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
2992: ELSE
2993: IF itd_input.cumulative_flag = 'Y' THEN
2994: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := g_input_achieved_itd('
2995: ||itd_input.rate_dim_sequence||') / l_itd_target;' );
2990: IF itd_input.split_flag <> 'N' THEN
2991: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
2992: ELSE
2993: IF itd_input.cumulative_flag = 'Y' THEN
2994: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := g_input_achieved_itd('
2995: ||itd_input.rate_dim_sequence||') / l_itd_target;' );
2996: ELSE
2997: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount / l_itd_target;' );
2998: END IF;
2993: IF itd_input.cumulative_flag = 'Y' THEN
2994: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := g_input_achieved_itd('
2995: ||itd_input.rate_dim_sequence||') / l_itd_target;' );
2996: ELSE
2997: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount / l_itd_target;' );
2998: END IF;
2999: END IF;
3000:
3001: IF itd_input.cumulative_flag = 'Y' THEN
2998: END IF;
2999: END IF;
3000:
3001: IF itd_input.cumulative_flag = 'Y' THEN
3002: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := g_input_achieved_itd('
3003: ||itd_input.rate_dim_sequence||')/l_itd_target;' );
3004: ELSE
3005: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount/l_itd_target;' );
3006: END IF;
3001: IF itd_input.cumulative_flag = 'Y' THEN
3002: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := g_input_achieved_itd('
3003: ||itd_input.rate_dim_sequence||')/l_itd_target;' );
3004: ELSE
3005: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount/l_itd_target;' );
3006: END IF;
3007: ELSE
3008: IF itd_input.split_flag <> 'N' THEN
3009: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
3005: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount/l_itd_target;' );
3006: END IF;
3007: ELSE
3008: IF itd_input.split_flag <> 'N' THEN
3009: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
3010: ELSE
3011: IF itd_input.cumulative_flag = 'Y' THEN
3012: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := g_input_achieved_itd('
3013: ||itd_input.rate_dim_sequence||');' );
3008: IF itd_input.split_flag <> 'N' THEN
3009: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := 0;' );
3010: ELSE
3011: IF itd_input.cumulative_flag = 'Y' THEN
3012: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').base_amount := g_input_achieved_itd('
3013: ||itd_input.rate_dim_sequence||');' );
3014: END IF;
3015: END IF;
3016:
3014: END IF;
3015: END IF;
3016:
3017: IF itd_input.cumulative_flag = 'Y' THEN
3018: cn_utils.appindcr(body_code, ' l_mul_input_tbl('||itd_input.rate_dim_sequence||').amount := g_input_achieved_itd('
3019: ||itd_input.rate_dim_sequence||');' );
3020: END IF;
3021: END IF;
3022: END LOOP;
3021: END IF;
3022: END LOOP;
3023:
3024: -- get processed date
3025: cn_utils.appendcr(body_code);
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3022: END LOOP;
3023:
3024: -- get processed date
3025: cn_utils.appendcr(body_code);
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3023:
3024: -- get processed date
3025: cn_utils.appendcr(body_code);
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3024: -- get processed date
3025: cn_utils.appendcr(body_code);
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3025: cn_utils.appendcr(body_code);
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3026: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3034: IF g_rate_flag THEN
3027: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3028: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3029: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3030: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3036: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3031: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3036: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3037: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3038: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3039: END IF;
3032: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3033: -- get rates
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3036: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3037: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3038: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3039: END IF;
3040:
3033: -- get rates
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3036: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3037: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3038: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3039: END IF;
3040:
3041: -- get output
3034: IF g_rate_flag THEN
3035: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
3036: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3037: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3038: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3039: END IF;
3040:
3041: -- get output
3042: cn_utils.appendcr(body_code);
3038: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3039: END IF;
3040:
3041: -- get output
3042: cn_utils.appendcr(body_code);
3043: IF g_itd_flag = 'Y' THEN
3044: SELECT sql_select output_sql_select
3045: INTO l_output_sql_select_clob
3046: FROM cn_calc_sql_exps_all
3080:
3081: IF g_pq_payment_flag OR g_spq_payment_flag THEN
3082: -- get itd_payment
3083: IF g_pq_payment_flag THEN
3084: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_pq_itd_payment ');
3085: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
3086: END IF;
3087:
3088: IF g_spq_payment_flag THEN
3081: IF g_pq_payment_flag OR g_spq_payment_flag THEN
3082: -- get itd_payment
3083: IF g_pq_payment_flag THEN
3084: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_pq_itd_payment ');
3085: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
3086: END IF;
3087:
3088: IF g_spq_payment_flag THEN
3089: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_spq_itd_payment ');
3085: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
3086: END IF;
3087:
3088: IF g_spq_payment_flag THEN
3089: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_spq_itd_payment ');
3090: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
3091: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
3092: END IF;
3093:
3086: END IF;
3087:
3088: IF g_spq_payment_flag THEN
3089: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_spq_itd_payment ');
3090: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
3091: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
3092: END IF;
3093:
3094: IF g_rate_flag THEN
3087:
3088: IF g_spq_payment_flag THEN
3089: cn_utils.appindcr(body_code, ' l_itd_payment := cn_formula_common_pkg.get_spq_itd_payment ');
3090: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
3091: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
3092: END IF;
3093:
3094: IF g_rate_flag THEN
3095: IF l_operator_position > 0 THEN
3093:
3094: IF g_rate_flag THEN
3095: IF l_operator_position > 0 THEN
3096: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3097: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3098: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3099: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate);');
3100:
3101: END IF;
3094: IF g_rate_flag THEN
3095: IF l_operator_position > 0 THEN
3096: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3097: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3098: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3099: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate);');
3100:
3101: END IF;
3102: ELSE
3095: IF l_operator_position > 0 THEN
3096: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3097: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3098: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3099: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate);');
3100:
3101: END IF;
3102: ELSE
3103: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3100:
3101: END IF;
3102: ELSE
3103: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3104: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3105: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3106: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3107:
3108:
3101: END IF;
3102: ELSE
3103: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3104: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3105: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3106: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3107:
3108:
3109: END IF;
3102: ELSE
3103: -- clku bug 2877815, call get-commission to calculate ITD results correctly
3104: cn_utils.appindcr(body_code, ' l_commission := get_commission( l_trx_rec_old.commission_line_id, ');
3105: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3106: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3107:
3108:
3109: END IF;
3110: ELSE
3110: ELSE
3111: -- if x_rate is used in output
3112: IF g_rate_flag THEN
3113: IF l_operator_position > 0 THEN
3114: cn_utils.appindcr(body_code, ' l_commission := l_rate '||
3115: l_operator ||' g_output_achieved_itd ');
3116: cn_utils.appindcr(body_code, ' - g_commission_payed_itd ;' );
3117: ELSE
3118: cn_utils.appindcr(body_code, ' l_commission := l_rate - '||
3112: IF g_rate_flag THEN
3113: IF l_operator_position > 0 THEN
3114: cn_utils.appindcr(body_code, ' l_commission := l_rate '||
3115: l_operator ||' g_output_achieved_itd ');
3116: cn_utils.appindcr(body_code, ' - g_commission_payed_itd ;' );
3117: ELSE
3118: cn_utils.appindcr(body_code, ' l_commission := l_rate - '||
3119: ' g_commission_payed_itd ;' );
3120: END IF;
3114: cn_utils.appindcr(body_code, ' l_commission := l_rate '||
3115: l_operator ||' g_output_achieved_itd ');
3116: cn_utils.appindcr(body_code, ' - g_commission_payed_itd ;' );
3117: ELSE
3118: cn_utils.appindcr(body_code, ' l_commission := l_rate - '||
3119: ' g_commission_payed_itd ;' );
3120: END IF;
3121: ELSE
3122: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd '||
3118: cn_utils.appindcr(body_code, ' l_commission := l_rate - '||
3119: ' g_commission_payed_itd ;' );
3120: END IF;
3121: ELSE
3122: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd '||
3123: '- g_commission_payed_itd ;' );
3124: END IF;
3125: END IF;
3126: END IF;
3125: END IF;
3126: END IF;
3127:
3128: -- create itd trx
3129: cn_utils.appendcr(body_code);
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3126: END IF;
3127:
3128: -- create itd trx
3129: cn_utils.appendcr(body_code);
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3127:
3128: -- create itd trx
3129: cn_utils.appendcr(body_code);
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3128: -- create itd trx
3129: cn_utils.appendcr(body_code);
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3129: cn_utils.appendcr(body_code);
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3130: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3131: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3132: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3133: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3134: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3135: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3136: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3137: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3138: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3139: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3140: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3141: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3142: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3143: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3144: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3145: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3146: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3147: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3148: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3149: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := 0; ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3150: cn_utils.appendcr(body_code);
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3151: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3152: cn_utils.appendcr(body_code);
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3153: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3154: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3155: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3156: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3157: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3158: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3159: cn_utils.appindcr(body_code, ' sqlerrm); ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3160: cn_utils.appindcr(body_code, ' end if; ');
3161: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3162: cn_utils.appindcr(body_code, ' END ; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3163: cn_utils.appindcr(body_code, ' END IF; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3164: cn_utils.appendcr(body_code);
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3165: END IF;
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3166: ELSIF (g_trx_group_code = 'GROUP' AND NOT(g_no_trx_flag)) THEN
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3167: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''N''; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3168: cn_utils.appindcr(body_code, ' Open l_lines_csr; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3169: cn_utils.appindcr(body_code, ' LOOP ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3170: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3171: cn_utils.appindcr(body_code, ' FETCH l_lines_csr into g_commission_rec; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3172: cn_utils.appindcr(body_code, ' EXIT WHEN l_lines_csr%notfound; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3173: cn_utils.appindcr(body_code, ' BEGIN ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3174: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_LINE_ID := g_commission_rec.COMMISSION_LINE_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3175: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_HEADER_ID := g_commission_rec.COMMISSION_HEADER_ID; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3176: cn_utils.appindcr(body_code ,'l_trx_rec_old.SALESREP_ID := g_commission_rec.CREDITED_SALESREP_ID; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3177: cn_utils.appindcr(body_code ,'l_trx_rec_old.SRP_PLAN_ASSIGN_ID := g_commission_rec.SRP_PLAN_ASSIGN_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3178: cn_utils.appindcr(body_code ,'l_trx_rec_old.QUOTA_ID := g_commission_rec.QUOTA_ID; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3179: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREDIT_TYPE_ID := g_commission_rec.CREDIT_TYPE_ID; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3180: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_DATE := g_commission_rec.PROCESSED_DATE; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3181: cn_utils.appindcr(body_code ,'l_trx_rec_old.PROCESSED_PERIOD_ID := g_commission_rec.PROCESSED_PERIOD_ID; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3182: cn_utils.appindcr(body_code ,'l_trx_rec_old.PAY_PERIOD_ID := g_commission_rec.PAY_PERIOD_ID; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3183: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_AMOUNT := g_commission_rec.COMMISSION_AMOUNT; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3184: cn_utils.appindcr(body_code ,'l_trx_rec_old.COMMISSION_RATE := g_commission_rec.COMMISSION_RATE; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3185: cn_utils.appindcr(body_code ,'l_trx_rec_old.RATE_TIER_ID := g_commission_rec.RATE_TIER_ID; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3186: cn_utils.appindcr(body_code ,'l_trx_rec_old.TIER_SPLIT := g_commission_rec.TIER_SPLIT; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3187: cn_utils.appindcr(body_code ,'l_trx_rec_old.INPUT_ACHIEVED := g_commission_rec.INPUT_ACHIEVED; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3188: cn_utils.appindcr(body_code ,'l_trx_rec_old.OUTPUT_ACHIEVED := g_commission_rec.OUTPUT_ACHIEVED; ');
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3189: cn_utils.appindcr(body_code ,'l_trx_rec_old.PERF_ACHIEVED := g_commission_rec.PERF_ACHIEVED; ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3190: cn_utils.appindcr(body_code ,'l_trx_rec_old.POSTING_STATUS := g_commission_rec.POSTING_STATUS; ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3191: cn_utils.appindcr(body_code ,'l_trx_rec_old.PENDING_STATUS := g_commission_rec.PENDING_STATUS; ');
3192: cn_utils.appindcr(body_code ,'l_trx_rec_old.CREATED_DURING := g_commission_rec.CREATED_DURING; ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3193: cn_utils.appindcr(body_code ,'l_trx_rec_old.TRX_TYPE := g_commission_rec.TRX_TYPE; ');
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3194: cn_utils.appindcr(body_code ,'l_trx_rec_old.ERROR_REASON := g_commission_rec.ERROR_REASON; ');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3195: cn_utils.appindcr(body_code ,'l_trx_rec_old.STATUS := g_commission_rec.STATUS; ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3196:
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3197: cn_utils.appindcr(body_code, ' get_input(l_trx_rec_old.commission_line_id, p_salesrep_id, ');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3198: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3199: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_start_date, ');
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3207: IF g_perf_input_expr_seq >0 THEN
3200: cn_utils.appindcr(body_code, ' l_mul_input_tbl, l_endofinterval_flag, null);');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3207: IF g_perf_input_expr_seq >0 THEN
3208: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3201: cn_utils.appendcr(body_code);
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3207: IF g_perf_input_expr_seq >0 THEN
3208: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3209:
3202: cn_utils.appindcr(body_code, ' l_commission := get_commission(l_trx_rec_old.commission_line_id,');
3203: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3207: IF g_perf_input_expr_seq >0 THEN
3208: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3209:
3210: ELSIF g_perf_measure_id IS NULL THEN
3204: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ');
3205: cn_utils.appindcr(body_code, ' l_endofinterval_flag, null);');
3206: cn_utils.appendcr(body_code);
3207: IF g_perf_input_expr_seq >0 THEN
3208: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3209:
3210: ELSIF g_perf_measure_id IS NULL THEN
3211: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3212:
3207: IF g_perf_input_expr_seq >0 THEN
3208: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3209:
3210: ELSIF g_perf_measure_id IS NULL THEN
3211: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3212:
3213: ELSE
3214: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3210: ELSIF g_perf_measure_id IS NULL THEN
3211: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3212:
3213: ELSE
3214: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3211: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3212:
3213: ELSE
3214: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3212:
3213: ELSE
3214: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3220: cn_utils.appindcr(body_code, ' end if; ');
3214: cn_utils.appindcr(body_code, ' l_perf := get_perf(l_trx_rec_old.commission_line_id, p_salesrep_id,');
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3220: cn_utils.appindcr(body_code, ' end if; ');
3221: END IF;
3222:
3215: cn_utils.appindcr(body_code, ' p_period_id,p_quota_id, p_srp_plan_assign_id, ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3220: cn_utils.appindcr(body_code, ' end if; ');
3221: END IF;
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3216: cn_utils.appindcr(body_code, ' p_start_date, l_endofinterval_flag, null);');
3217:
3218: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3220: cn_utils.appindcr(body_code, ' end if; ');
3221: END IF;
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3219: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3220: cn_utils.appindcr(body_code, ' end if; ');
3221: END IF;
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3220: cn_utils.appindcr(body_code, ' end if; ');
3221: END IF;
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3221: END IF;
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3222:
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3223: cn_utils.appindcr(body_code, ' x_latest_processed_date := l_trx_rec_old.processed_date; ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3224: cn_utils.appendcr(body_code);
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3225: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3226: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3227: cn_utils.appendcr(body_code);
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3228: cn_utils.appindcr(body_code, ' EXCEPTION when others then ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3229: cn_utils.appindcr(body_code, ' l_trx_rec_new.error_reason := substr(sqlerrm,1,150); ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3230: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''XCALC'' ; ');
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3231: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3232: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3233: cn_utils.appindcr(body_code, ' END; ');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3234: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3235: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.update_trx(l_trx_rec_old, l_trx_rec_new) ; ');
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3236: cn_utils.appindcr(body_code, ' END LOOP; ');
3237: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3244: 'p_period_id) THEN ');
3238: cn_utils.appendcr(body_code);
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3244: 'p_period_id) THEN ');
3245: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''Y''; ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3239: cn_utils.appindcr(body_code, ' l_start_period_id := ' );
3240: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_start_period_id( '||
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3244: 'p_period_id) THEN ');
3245: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''Y''; ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3247:
3241: 'p_quota_id, p_period_id);');
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3244: 'p_period_id) THEN ');
3245: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''Y''; ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3247:
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3242: cn_utils.appendcr(body_code);
3243: cn_utils.appindcr(body_code, ' IF cn_formula_common_pkg.EndOfInterval(p_quota_id, '||
3244: 'p_period_id) THEN ');
3245: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''Y''; ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3247:
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3245: cn_utils.appindcr(body_code, ' l_endofinterval_flag := ''Y''; ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3247:
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3246: cn_utils.appindcr(body_code, ' END IF; ');
3247:
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3247:
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3248: -- get processed date
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3249: cn_utils.appendcr(body_code);
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3250: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) ');
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3251: cn_utils.appindcr(body_code, ' INTO l_processed_date ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3252: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3253: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3254: cn_utils.appindcr(body_code, ' AND spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3255: cn_utils.appindcr(body_code, ' AND p.org_id = spa.org_id ');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3256: cn_utils.appindcr(body_code, ' AND q.quota_id = p_quota_id; ');
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3257:
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3258: cn_utils.appendcr(body_code);
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3266: FOR i IN 1..g_number_dim LOOP
3259: cn_utils.appindcr(body_code, ' BEGIN ');
3260: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id,');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3266: FOR i IN 1..g_number_dim LOOP
3267: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input=''||l_mul_input_tbl('||i||').amount);');
3261: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, ');
3262: cn_utils.appindcr(body_code, ' l_processed_date, l_mul_input_tbl, ');
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3266: FOR i IN 1..g_number_dim LOOP
3267: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input=''||l_mul_input_tbl('||i||').amount);');
3268: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3269: END LOOP;
3263: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id );');
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3266: FOR i IN 1..g_number_dim LOOP
3267: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input=''||l_mul_input_tbl('||i||').amount);');
3268: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3269: END LOOP;
3270: cn_utils.appindcr(body_code, ' end if; ');
3271:
3264:
3265: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3266: FOR i IN 1..g_number_dim LOOP
3267: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input=''||l_mul_input_tbl('||i||').amount);');
3268: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3269: END LOOP;
3270: cn_utils.appindcr(body_code, ' end if; ');
3271:
3272: cn_utils.appendcr(body_code);
3266: FOR i IN 1..g_number_dim LOOP
3267: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input=''||l_mul_input_tbl('||i||').amount);');
3268: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3269: END LOOP;
3270: cn_utils.appindcr(body_code, ' end if; ');
3271:
3272: cn_utils.appendcr(body_code);
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3268: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3269: END LOOP;
3270: cn_utils.appindcr(body_code, ' end if; ');
3271:
3272: cn_utils.appendcr(body_code);
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3270: cn_utils.appindcr(body_code, ' end if; ');
3271:
3272: cn_utils.appendcr(body_code);
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3271:
3272: cn_utils.appendcr(body_code);
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3272: cn_utils.appendcr(body_code);
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3273: IF g_rate_flag THEN
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3274: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3275: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3276: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ' );
3277: cn_utils.appindcr(body_code, ' g_formula_id, l_rate, l_rate_tier_id, l_tier_split ); ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3278: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3279: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate='' || l_rate);');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3280: cn_utils.appindcr(body_code, ' end if; ');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3281: END IF;
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3282: cn_utils.appendcr(body_code);
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3290:
3283: cn_utils.appindcr(body_code, ' l_commission := get_commission(null,p_salesrep_id, ');
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3290:
3291: cn_utils.appendcr(body_code);
3284: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3290:
3291: cn_utils.appendcr(body_code);
3292:
3285: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate, ' );
3286: cn_utils.appindcr(body_code, ' l_endofinterval_flag,l_start_period_id ); ');
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3290:
3291: cn_utils.appendcr(body_code);
3292:
3293: IF g_perf_input_expr_seq >0 THEN
3287: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3288: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output='' || l_commission);');
3289: cn_utils.appindcr(body_code, ' end if; ');
3290:
3291: cn_utils.appendcr(body_code);
3292:
3293: IF g_perf_input_expr_seq >0 THEN
3294: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3295:
3290:
3291: cn_utils.appendcr(body_code);
3292:
3293: IF g_perf_input_expr_seq >0 THEN
3294: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3295:
3296: ELSIF g_perf_measure_id IS NULL THEN
3297: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3298:
3293: IF g_perf_input_expr_seq >0 THEN
3294: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3295:
3296: ELSIF g_perf_measure_id IS NULL THEN
3297: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3298:
3299: ELSE
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3296: ELSIF g_perf_measure_id IS NULL THEN
3297: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3298:
3299: ELSE
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3297: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3298:
3299: ELSE
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3298:
3299: ELSE
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3299: ELSE
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3300: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id, p_period_id, ');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3301: cn_utils.appindcr(body_code, ' p_quota_id, p_srp_plan_assign_id, null,');
3302: cn_utils.appindcr(body_code, ' l_endofinterval_flag, l_start_period_id );');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3303: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3304: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3305: cn_utils.appindcr(body_code, ' end if; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3306: END IF;
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3307: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3308: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3309: cn_utils.appindcr(body_code, ' end if; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3310: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''CALC''; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3311: cn_utils.appindcr(body_code, ' l_grp_trx_rec.credit_type_id := p_credit_type_id; ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3312: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_amount := l_commission ;');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3313: cn_utils.appindcr(body_code, ' l_grp_trx_rec.commission_rate := l_rate ; ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3314: cn_utils.appindcr(body_code, ' l_grp_trx_rec.rate_tier_id := l_rate_tier_id; ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3315: cn_utils.appindcr(body_code, ' l_grp_trx_rec.tier_split := l_tier_split ; ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3316: cn_utils.appindcr(body_code, ' l_grp_trx_rec.input_achieved := l_input(1); ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3317: cn_utils.appindcr(body_code, ' l_grp_trx_rec.output_achieved:= l_commission ; ');
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3318: cn_utils.appindcr(body_code, ' l_grp_trx_rec.perf_achieved := l_perf; ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3319: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3320: cn_utils.appindcr(body_code, ' l_grp_trx_rec.status := ''XCALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3321: cn_utils.appindcr(body_code, ' l_grp_trx_rec.error_reason := substr(sqlerrm, 1, 150); ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3322: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs while calculating commission line: ''); ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3323: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3324: cn_utils.appindcr(body_code, ' END ; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3325: cn_utils.appendcr(body_code);
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3326: cn_utils.appindcr(body_code, ' IF l_endofinterval_flag = ''Y'' THEN ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3327: cn_utils.appindcr(body_code, ' l_grp_trx_rec.salesrep_id := p_salesrep_id; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3328: cn_utils.appindcr(body_code, ' l_grp_trx_rec.created_during := ''CALC''; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3329: cn_utils.appindcr(body_code, ' l_grp_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3330: cn_utils.appindcr(body_code, ' l_grp_trx_rec.quota_id := p_quota_id; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3331: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_date := l_processed_date; ');
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3332: cn_utils.appindcr(body_code, ' l_grp_trx_rec.processed_period_id := p_period_id; ');
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3340: -- update package global variables
3333: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pay_period_id := p_period_id; ');
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3340: -- update package global variables
3341: cn_utils.appendcr(body_code);
3334: cn_utils.appindcr(body_code, ' l_grp_trx_rec.posting_status := ''UNPOSTED''; ');
3335: cn_utils.appindcr(body_code, ' l_grp_trx_rec.pending_status := null; ');
3336: cn_utils.appindcr(body_code, ' l_grp_trx_rec.trx_type := ''GRP'' ; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3340: -- update package global variables
3341: cn_utils.appendcr(body_code);
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3337: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_grp_trx_rec); ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3340: -- update package global variables
3341: cn_utils.appendcr(body_code);
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3343: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := l_perf; ');
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3338: cn_utils.appindcr(body_code, ' END IF; ');
3339:
3340: -- update package global variables
3341: cn_utils.appendcr(body_code);
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3343: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := l_perf; ');
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3339:
3340: -- update package global variables
3341: cn_utils.appendcr(body_code);
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3343: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := l_perf; ');
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3341: cn_utils.appendcr(body_code);
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3343: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := l_perf; ');
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3342: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := l_perf - g_perf_achieved_itd; ');
3343: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := l_perf; ');
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3344: FOR i IN 1..g_number_dim LOOP
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3345: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := l_input('||i||') - g_input_achieved_itd('||i||') ; ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3346: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := l_input('||i||'); ');
3347: END LOOP;
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3348: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := l_commission - g_commission_payed_itd; ');
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3349: cn_utils.appindcr(body_code, ' g_commission_payed_itd := l_commission; ');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3350: cn_utils.appendcr(body_code);
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3358: END LOOP;
3351: ELSIF (g_no_trx_flag) THEN
3352: cn_utils.appindcr(body_code, ' BEGIN ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3358: END LOOP;
3359: cn_utils.appindcr(body_code, ' end if; ');
3353: cn_utils.appindcr(body_code, ' get_input(null, p_salesrep_id, p_period_id, p_quota_id, ');
3354: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_trx_rec_old.processed_date, l_mul_input_tbl );');
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3358: END LOOP;
3359: cn_utils.appindcr(body_code, ' end if; ');
3360: cn_utils.appendcr(body_code);
3361:
3355: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3358: END LOOP;
3359: cn_utils.appindcr(body_code, ' end if; ');
3360: cn_utils.appendcr(body_code);
3361:
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3356: FOR i IN 1..g_number_dim LOOP
3357: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Input='' || l_mul_input_tbl('||i||').amount);');
3358: END LOOP;
3359: cn_utils.appindcr(body_code, ' end if; ');
3360: cn_utils.appendcr(body_code);
3361:
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3359: cn_utils.appindcr(body_code, ' end if; ');
3360: cn_utils.appendcr(body_code);
3361:
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3360: cn_utils.appendcr(body_code);
3361:
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3361:
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3362: -- get processed date
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3363: cn_utils.appendcr(body_code);
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3371: IF g_rate_flag THEN
3364: cn_utils.appindcr(body_code, ' SELECT least(p.end_date,nvl(spa.end_date,p.end_date),nvl(q.end_date,p.end_date)) into l_processed_date ');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3365: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v p,cn_srp_plan_assigns_all spa,cn_quotas_all q ');
3366: cn_utils.appindcr(body_code, ' WHERE p.period_id = p_period_id ');
3367: cn_utils.appindcr(body_code, ' and spa.srp_plan_assign_id = p_srp_plan_assign_id ');
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3373: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3368: cn_utils.appindcr(body_code, ' and p.org_id = spa.org_id ');
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3373: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3374: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3375: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3376: END IF;
3369: cn_utils.appindcr(body_code, ' and q.quota_id = p_quota_id; ');
3370: -- get rates
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3373: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3374: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3375: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3376: END IF;
3377:
3370: -- get rates
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3373: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3374: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3375: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3376: END IF;
3377:
3378: -- get output
3371: IF g_rate_flag THEN
3372: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates(p_salesrep_id, p_srp_plan_assign_id,');
3373: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
3374: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
3375: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3376: END IF;
3377:
3378: -- get output
3379: cn_utils.appendcr(body_code);
3375: cn_utils.appindcr(body_code, ' g_formula_id,l_rate, l_rate_tier_id, l_tier_split ); ');
3376: END IF;
3377:
3378: -- get output
3379: cn_utils.appendcr(body_code);
3380: cn_utils.appindcr(body_code, ' l_commission := get_commission(null, p_salesrep_id, p_period_id, p_quota_id, p_srp_plan_assign_id, l_rate);');
3381:
3382: FOR i IN 1..g_number_dim LOOP
3383: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3376: END IF;
3377:
3378: -- get output
3379: cn_utils.appendcr(body_code);
3380: cn_utils.appindcr(body_code, ' l_commission := get_commission(null, p_salesrep_id, p_period_id, p_quota_id, p_srp_plan_assign_id, l_rate);');
3381:
3382: FOR i IN 1..g_number_dim LOOP
3383: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3384: END LOOP;
3379: cn_utils.appendcr(body_code);
3380: cn_utils.appindcr(body_code, ' l_commission := get_commission(null, p_salesrep_id, p_period_id, p_quota_id, p_srp_plan_assign_id, l_rate);');
3381:
3382: FOR i IN 1..g_number_dim LOOP
3383: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3384: END LOOP;
3385:
3386: IF g_perf_input_expr_seq >0 THEN
3387: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3383: cn_utils.appindcr(body_code, ' l_input('||i||') := l_mul_input_tbl('||i||').input_amount; ');
3384: END LOOP;
3385:
3386: IF g_perf_input_expr_seq >0 THEN
3387: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3388:
3389: ELSIF g_perf_measure_id IS NULL THEN
3390: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3391:
3386: IF g_perf_input_expr_seq >0 THEN
3387: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||g_perf_input_expr_seq||').input_amount; ');
3388:
3389: ELSIF g_perf_measure_id IS NULL THEN
3390: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3391:
3392: ELSE
3393: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id,');
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3389: ELSIF g_perf_measure_id IS NULL THEN
3390: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3391:
3392: ELSE
3393: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id,');
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3390: cn_utils.appindcr(body_code,' l_perf :=l_mul_input_tbl('||1||').input_amount; ');
3391:
3392: ELSE
3393: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id,');
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3398: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3391:
3392: ELSE
3393: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id,');
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3398: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3399: cn_utils.appindcr(body_code, ' end if; ');
3393: cn_utils.appindcr(body_code, ' l_perf := get_perf(null, p_salesrep_id,');
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3398: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3399: cn_utils.appindcr(body_code, ' end if; ');
3400: END IF;
3401:
3394: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3398: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3399: cn_utils.appindcr(body_code, ' end if; ');
3400: END IF;
3401:
3402: -- create itd trx
3395: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, null);');
3396:
3397: cn_utils.appindcr(body_code, ' if (l_debug_flag = ''Y'') then');
3398: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure='' || l_perf);');
3399: cn_utils.appindcr(body_code, ' end if; ');
3400: END IF;
3401:
3402: -- create itd trx
3403: cn_utils.appendcr(body_code);
3399: cn_utils.appindcr(body_code, ' end if; ');
3400: END IF;
3401:
3402: -- create itd trx
3403: cn_utils.appendcr(body_code);
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3400: END IF;
3401:
3402: -- create itd trx
3403: cn_utils.appendcr(body_code);
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3401:
3402: -- create itd trx
3403: cn_utils.appendcr(body_code);
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3402: -- create itd trx
3403: cn_utils.appendcr(body_code);
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3403: cn_utils.appendcr(body_code);
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3404: cn_utils.appindcr(body_code, ' l_trx_rec_new := l_trx_rec_null; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3405: cn_utils.appindcr(body_code, ' l_trx_rec_new.status := ''CALC''; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3406: cn_utils.appindcr(body_code, ' l_trx_rec_new.credit_type_id := p_credit_type_id; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3407: cn_utils.appindcr(body_code, ' l_trx_rec_new.salesrep_id := p_salesrep_id; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3408: cn_utils.appindcr(body_code, ' l_trx_rec_new.created_during := ''CALC''; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3409: cn_utils.appindcr(body_code, ' l_trx_rec_new.srp_plan_assign_id := p_srp_plan_assign_id; ');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3410: cn_utils.appindcr(body_code, ' l_trx_rec_new.quota_id := p_quota_id; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3411: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_date := l_processed_date; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3412: cn_utils.appindcr(body_code, ' l_trx_rec_new.processed_period_id := p_period_id; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3413: cn_utils.appindcr(body_code, ' l_trx_rec_new.pay_period_id := p_period_id; ');
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3414: cn_utils.appindcr(body_code, ' l_trx_rec_new.posting_status := ''UNPOSTED''; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3422: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3415: cn_utils.appindcr(body_code, ' l_trx_rec_new.pending_status := null; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3422: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3423: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3416: cn_utils.appindcr(body_code, ' l_trx_rec_new.trx_type := ''ITD'' ; ');
3417: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_amount := l_commission ;');
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3422: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3423: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3424: */
3418: cn_utils.appindcr(body_code, ' l_trx_rec_new.commission_rate := l_rate ; ');
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3422: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3423: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3424: */
3425:
3426: IF g_number_dim > 1 THEN
3419: cn_utils.appindcr(body_code, ' l_trx_rec_new.rate_tier_id := l_rate_tier_id; ');
3420: cn_utils.appindcr(body_code, ' l_trx_rec_new.tier_split := l_tier_split ; ');
3421: /*
3422: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := 0; ');
3423: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3424: */
3425:
3426: IF g_number_dim > 1 THEN
3427: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3423: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved:= 0; ');
3424: */
3425:
3426: IF g_number_dim > 1 THEN
3427: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3428: ELSE
3429: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3430: END IF;
3431: IF g_itd_flag = 'Y' THEN
3425:
3426: IF g_number_dim > 1 THEN
3427: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3428: ELSE
3429: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3430: END IF;
3431: IF g_itd_flag = 'Y' THEN
3432: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
3433: ELSE
3428: ELSE
3429: cn_utils.appindcr(body_code, ' l_trx_rec_new.input_achieved := l_input(1) ; ');
3430: END IF;
3431: IF g_itd_flag = 'Y' THEN
3432: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
3433: ELSE
3434: -- output_achieved = 0 since no need to accumulate output for individual non itd case
3435: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
3436: END IF;
3431: IF g_itd_flag = 'Y' THEN
3432: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := g_output_achieved ; ');
3433: ELSE
3434: -- output_achieved = 0 since no need to accumulate output for individual non itd case
3435: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
3436: END IF;
3437: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
3438: cn_utils.appendcr(body_code);
3439:
3433: ELSE
3434: -- output_achieved = 0 since no need to accumulate output for individual non itd case
3435: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
3436: END IF;
3437: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
3438: cn_utils.appendcr(body_code);
3439:
3440:
3441: cn_utils.appendcr(body_code);
3434: -- output_achieved = 0 since no need to accumulate output for individual non itd case
3435: cn_utils.appindcr(body_code, ' l_trx_rec_new.output_achieved := 0 ; ');
3436: END IF;
3437: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
3438: cn_utils.appendcr(body_code);
3439:
3440:
3441: cn_utils.appendcr(body_code);
3442: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3437: cn_utils.appindcr(body_code, ' l_trx_rec_new.perf_achieved := l_perf ; ');
3438: cn_utils.appendcr(body_code);
3439:
3440:
3441: cn_utils.appendcr(body_code);
3442: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3443: cn_utils.appendcr(body_code);
3444:
3445: -- update package variables
3438: cn_utils.appendcr(body_code);
3439:
3440:
3441: cn_utils.appendcr(body_code);
3442: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3443: cn_utils.appendcr(body_code);
3444:
3445: -- update package variables
3446: cn_utils.appendcr(body_code);
3439:
3440:
3441: cn_utils.appendcr(body_code);
3442: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3443: cn_utils.appendcr(body_code);
3444:
3445: -- update package variables
3446: cn_utils.appendcr(body_code);
3447: IF g_itd_flag = 'Y' THEN
3442: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec_new); ');
3443: cn_utils.appendcr(body_code);
3444:
3445: -- update package variables
3446: cn_utils.appendcr(body_code);
3447: IF g_itd_flag = 'Y' THEN
3448: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
3449: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
3450: END IF;
3444:
3445: -- update package variables
3446: cn_utils.appendcr(body_code);
3447: IF g_itd_flag = 'Y' THEN
3448: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
3449: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
3450: END IF;
3451:
3452: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
3445: -- update package variables
3446: cn_utils.appendcr(body_code);
3447: IF g_itd_flag = 'Y' THEN
3448: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
3449: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
3450: END IF;
3451:
3452: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
3453: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
3448: cn_utils.appindcr(body_code, ' g_output_achieved_ptd := g_output_achieved_ptd + g_output_achieved ;' );
3449: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
3450: END IF;
3451:
3452: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
3453: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
3454:
3455: FOR i IN 1..g_number_dim LOOP
3456: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
3449: cn_utils.appindcr(body_code, ' g_output_achieved_itd := g_output_achieved_itd + g_output_achieved; ' );
3450: END IF;
3451:
3452: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
3453: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
3454:
3455: FOR i IN 1..g_number_dim LOOP
3456: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
3457: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
3452: cn_utils.appindcr(body_code, ' g_perf_achieved_ptd := g_perf_achieved_ptd+ l_perf; ');
3453: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
3454:
3455: FOR i IN 1..g_number_dim LOOP
3456: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
3457: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
3458: END LOOP;
3459:
3460: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3453: cn_utils.appindcr(body_code, ' g_perf_achieved_itd := g_perf_achieved_itd+ l_perf; ');
3454:
3455: FOR i IN 1..g_number_dim LOOP
3456: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
3457: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
3458: END LOOP;
3459:
3460: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3461: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3456: cn_utils.appindcr(body_code, ' g_input_achieved_ptd('||i||') := g_input_achieved_ptd('||i||') + l_input('||i||'); ');
3457: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
3458: END LOOP;
3459:
3460: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3461: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3462: cn_utils.appendcr(body_code);
3463:
3464: /*
3457: cn_utils.appindcr(body_code, ' g_input_achieved_itd('||i||') := g_input_achieved_itd('||i||') + l_input('||i||'); ');
3458: END LOOP;
3459:
3460: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3461: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3462: cn_utils.appendcr(body_code);
3463:
3464: /*
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3458: END LOOP;
3459:
3460: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3461: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3462: cn_utils.appendcr(body_code);
3463:
3464: /*
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3461: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3462: cn_utils.appendcr(body_code);
3463:
3464: /*
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3462: cn_utils.appendcr(body_code);
3463:
3464: /*
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3464: /*
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3465: cn_utils.appindcr(body_code, ' g_commission_payed_ptd := g_commission_payed_ptd + l_commission; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3466: cn_utils.appindcr(body_code, ' g_commission_payed_itd := g_commission_payed_itd + l_commission; ');
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3467: */
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3475: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3468: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3475: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3476: cn_utils.appindcr(body_code, ' END ; ');
3469: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3470: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3475: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3476: cn_utils.appindcr(body_code, ' END ; ');
3477: END IF;
3471: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3475: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3476: cn_utils.appindcr(body_code, ' END ; ');
3477: END IF;
3478:
3479: calc_roll(spec_code, body_code);
3472: cn_utils.appindcr(body_code, ' sqlerrm); ');
3473: cn_utils.appindcr(body_code, ' end if; ');
3474:
3475: cn_utils.appindcr(body_code, ' cn_message_pkg.debug( ''Failed to create ITD commission line'' ); ');
3476: cn_utils.appindcr(body_code, ' END ; ');
3477: END IF;
3478:
3479: calc_roll(spec_code, body_code);
3480:
3477: END IF;
3478:
3479: calc_roll(spec_code, body_code);
3480:
3481: cn_utils.appindcr(body_code, ' EXCEPTION ' );
3482: cn_utils.appindcr(body_code, ' when others then ');
3483: IF (NOT(g_no_trx_flag)) THEN
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3478:
3479: calc_roll(spec_code, body_code);
3480:
3481: cn_utils.appindcr(body_code, ' EXCEPTION ' );
3482: cn_utils.appindcr(body_code, ' when others then ');
3483: IF (NOT(g_no_trx_flag)) THEN
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3480:
3481: cn_utils.appindcr(body_code, ' EXCEPTION ' );
3482: cn_utils.appindcr(body_code, ' when others then ');
3483: IF (NOT(g_no_trx_flag)) THEN
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3481: cn_utils.appindcr(body_code, ' EXCEPTION ' );
3482: cn_utils.appindcr(body_code, ' when others then ');
3483: IF (NOT(g_no_trx_flag)) THEN
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3482: cn_utils.appindcr(body_code, ' when others then ');
3483: IF (NOT(g_no_trx_flag)) THEN
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3484: cn_utils.appindcr(body_code, ' IF l_lines_csr%isopen THEN ' );
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3485: cn_utils.appindcr(body_code, ' CLOSE l_lines_csr; ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3486: cn_utils.appindcr(body_code, ' END IF; ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3487: END IF;
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3488: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3496: cn_utils.proc_end( procedure_name, 'N', body_code );
3489: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3496: cn_utils.proc_end( procedure_name, 'N', body_code );
3497: EXCEPTION
3490: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_quota.exception'', ');
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3496: cn_utils.proc_end( procedure_name, 'N', body_code );
3497: EXCEPTION
3498: when others then
3491: cn_utils.appindcr(body_code, ' sqlerrm); ');
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3496: cn_utils.proc_end( procedure_name, 'N', body_code );
3497: EXCEPTION
3498: when others then
3499: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3492: cn_utils.appindcr(body_code, ' end if; ');
3493: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_quota:''); ');
3494: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
3495: cn_utils.appindcr(body_code, ' raise; ');
3496: cn_utils.proc_end( procedure_name, 'N', body_code );
3497: EXCEPTION
3498: when others then
3499: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3500: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
3504: raise;
3505: END calculate_quota;
3506:
3507: -- construct the get_result procedure which will be invoked if this formula is used as an embeded formula
3508: PROCEDURE get_result (spec_code IN OUT NOCOPY cn_utils.code_type,
3509: body_code IN OUT NOCOPY cn_utils.code_type )
3510: IS
3511: procedure_name cn_obj_procedures_v.name%TYPE;
3512: procedure_desc cn_obj_procedures_v.description%TYPE;
3505: END calculate_quota;
3506:
3507: -- construct the get_result procedure which will be invoked if this formula is used as an embeded formula
3508: PROCEDURE get_result (spec_code IN OUT NOCOPY cn_utils.code_type,
3509: body_code IN OUT NOCOPY cn_utils.code_type )
3510: IS
3511: procedure_name cn_obj_procedures_v.name%TYPE;
3512: procedure_desc cn_obj_procedures_v.description%TYPE;
3513: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
3530: proc_init(procedure_name, procedure_desc, parameter_list,
3531: 'F', 'NUMBER' , package_spec_id, x_repository_id,
3532: spec_code, body_code);
3533:
3534: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type;');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3531: 'F', 'NUMBER' , package_spec_id, x_repository_id,
3532: spec_code, body_code);
3533:
3534: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type;');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3532: spec_code, body_code);
3533:
3534: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type;');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3533:
3534: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type;');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3534: cn_utils.appindcr(body_code, ' l_mul_input_tbl cn_formula_common_pkg.mul_input_tbl_type;');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3535: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3536: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3537: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3538: cn_utils.appindcr(body_code, ' l_commission NUMBER;');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3546: cn_utils.appindcr(body_code, ' SELECT ');
3539: cn_utils.appindcr(body_code, ' p_salesrep_id NUMBER(15); ');
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3546: cn_utils.appindcr(body_code, ' SELECT ');
3547:
3540: cn_utils.appindcr(body_code, ' p_period_id NUMBER(15); ');
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3546: cn_utils.appindcr(body_code, ' SELECT ');
3547:
3548: -- Added for 11.5.10 Performance Enhancments
3541: cn_utils.appindcr(body_code, ' p_quota_id NUMBER(15); ');
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3546: cn_utils.appindcr(body_code, ' SELECT ');
3547:
3548: -- Added for 11.5.10 Performance Enhancments
3549: -- Add column names of CH and CL which are used in the input/output/perf expression
3542: cn_utils.appindcr(body_code, ' p_processed_date DATE ; ');
3543: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id NUMBER(15); ');
3544: cn_utils.appendcr(body_code);
3545: cn_utils.appindcr(body_code, ' CURSOR l_comm_line_csr IS ');
3546: cn_utils.appindcr(body_code, ' SELECT ');
3547:
3548: -- Added for 11.5.10 Performance Enhancments
3549: -- Add column names of CH and CL which are used in the input/output/perf expression
3550: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
3548: -- Added for 11.5.10 Performance Enhancments
3549: -- Add column names of CH and CL which are used in the input/output/perf expression
3550: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
3551: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
3552: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||',');
3553: ELSE
3554: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name);
3555: END IF;
3556: END LOOP;
3550: FOR i IN g_comm_tbl_clmn_nms_tbl.FIRST..g_comm_tbl_clmn_nms_tbl.LAST LOOP
3551: IF i <> g_comm_tbl_clmn_nms_tbl.LAST THEN
3552: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name||',');
3553: ELSE
3554: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name);
3555: END IF;
3556: END LOOP;
3557: IF g_ch_flag THEN
3558: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl, cn_commission_headers ch ');
3554: cn_utils.appindcr(body_code ,' '||g_comm_tbl_clmn_nms_tbl(i).table_alias||'.'||g_comm_tbl_clmn_nms_tbl(i).column_name);
3555: END IF;
3556: END LOOP;
3557: IF g_ch_flag THEN
3558: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl, cn_commission_headers ch ');
3559: ELSE
3560: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl');
3561: END IF;
3562: cn_utils.appindcr(body_code, ' where cl.commission_line_id = p_commission_line_id ');
3556: END LOOP;
3557: IF g_ch_flag THEN
3558: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl, cn_commission_headers ch ');
3559: ELSE
3560: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl');
3561: END IF;
3562: cn_utils.appindcr(body_code, ' where cl.commission_line_id = p_commission_line_id ');
3563: IF g_ch_flag THEN
3564: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
3558: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl, cn_commission_headers ch ');
3559: ELSE
3560: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl');
3561: END IF;
3562: cn_utils.appindcr(body_code, ' where cl.commission_line_id = p_commission_line_id ');
3563: IF g_ch_flag THEN
3564: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
3565: END IF;
3566: cn_utils.appindcr(body_code, ';');
3560: cn_utils.appindcr(body_code, ' FROM cn_commission_lines cl');
3561: END IF;
3562: cn_utils.appindcr(body_code, ' where cl.commission_line_id = p_commission_line_id ');
3563: IF g_ch_flag THEN
3564: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
3565: END IF;
3566: cn_utils.appindcr(body_code, ';');
3567:
3568: -- Added for 11.5.10 Performance Enhancments
3562: cn_utils.appindcr(body_code, ' where cl.commission_line_id = p_commission_line_id ');
3563: IF g_ch_flag THEN
3564: cn_utils.appindcr(body_code, ' AND ch.commission_header_id = cl.commission_header_id');
3565: END IF;
3566: cn_utils.appindcr(body_code, ';');
3567:
3568: -- Added for 11.5.10 Performance Enhancments
3569: -- Declare cursors which will fetch all columns of tables
3570: -- used in input/output/perf expressions.
3577: l_variable_declaration := 'l_'||lower(substr(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL),1,24))||'_cur';
3578: ELSE
3579: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
3580: END IF;
3581: cn_utils.appendcr(body_code);
3582: cn_utils.appindcr(body_code, ' CURSOR '||l_variable_declaration||' IS');
3583: l_input_sql_where := 'WHERE 1=1 ';
3584: l_input_sql_select := lower_str( ' select ' ||g_uniq_tbl_names_tbl(l_table_object_id).column_name_list);
3585: l_input_sql_from := lower( ' from ' ||g_uniq_tbl_names_tbl(l_table_object_id).table_name||' '||
3578: ELSE
3579: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
3580: END IF;
3581: cn_utils.appendcr(body_code);
3582: cn_utils.appindcr(body_code, ' CURSOR '||l_variable_declaration||' IS');
3583: l_input_sql_where := 'WHERE 1=1 ';
3584: l_input_sql_select := lower_str( ' select ' ||g_uniq_tbl_names_tbl(l_table_object_id).column_name_list);
3585: l_input_sql_from := lower( ' from ' ||g_uniq_tbl_names_tbl(l_table_object_id).table_name||' '||
3586: g_uniq_tbl_names_tbl(l_table_object_id).table_alias);
3587: construct_sql_from_where (l_input_sql_select,
3588: l_input_sql_from,
3589: l_input_sql_where );
3590: --split_long_sql( body_code, l_input_sql_select, 'SELECT');
3591: cn_utils.appindcr(body_code, 'SELECT * ');
3592:
3593: split_long_sql( body_code, l_input_sql_from, 'FROM');
3594: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3595: END IF;
3597: END LOOP;
3598: END IF;
3599:
3600:
3601: cn_utils.appendcr(body_code, 'BEGIN');
3602: -- Added for 11.5.10 Performance Enhancments
3603: -- Declare cursors which will fetch all columns of tables
3604: -- used in input/output/perf expressions.
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3601: cn_utils.appendcr(body_code, 'BEGIN');
3602: -- Added for 11.5.10 Performance Enhancments
3603: -- Declare cursors which will fetch all columns of tables
3604: -- used in input/output/perf expressions.
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3602: -- Added for 11.5.10 Performance Enhancments
3603: -- Declare cursors which will fetch all columns of tables
3604: -- used in input/output/perf expressions.
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3603: -- Declare cursors which will fetch all columns of tables
3604: -- used in input/output/perf expressions.
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3604: -- used in input/output/perf expressions.
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3605: cn_utils.appindcr(body_code, ' OPEN l_comm_line_csr ; ');
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3613:
3606: cn_utils.appindcr(body_code, ' FETCH l_comm_line_csr into g_commission_rec;');
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3613:
3614: cn_utils.appendcr(body_code);
3607: cn_utils.appindcr(body_code, ' CLOSE l_comm_line_csr; ');
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3613:
3614: cn_utils.appendcr(body_code);
3615:
3608: cn_utils.appindcr(body_code ,' p_salesrep_id := g_commission_rec.CREDITED_SALESREP_ID; ');
3609: cn_utils.appindcr(body_code ,' p_period_id := g_commission_rec.PROCESSED_PERIOD_ID; ');
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3613:
3614: cn_utils.appendcr(body_code);
3615:
3616: -- Added for 11.5.10 Performance Enhancments
3610: cn_utils.appindcr(body_code ,' p_quota_id := g_commission_rec.quota_id; ');
3611: cn_utils.appindcr(body_code ,' p_srp_plan_assign_id := g_commission_rec.srp_plan_assign_id; ');
3612: cn_utils.appindcr(body_code ,' p_processed_date := g_commission_rec.processed_date; ');
3613:
3614: cn_utils.appendcr(body_code);
3615:
3616: -- Added for 11.5.10 Performance Enhancments
3617: -- Declare fetch statment which will fetch all columns of tables
3618: -- used in input/output/perf expressions.
3626: l_variable_declaration := 'l_'||lower(substr(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL),1,24))||'_cur';
3627: ELSE
3628: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
3629: END IF;
3630: cn_utils.appendcr(body_code);
3631: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
3632: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
3633: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
3634: END IF;
3627: ELSE
3628: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
3629: END IF;
3630: cn_utils.appendcr(body_code);
3631: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
3632: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
3633: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
3634: END IF;
3635: l_table_object_id := g_uniq_tbl_names_tbl.NEXT(l_table_object_id);
3628: l_variable_declaration := 'l_'||lower(REPLACE(g_uniq_tbl_names_tbl(l_table_object_id).table_name,'_',NULL)) ||'_cur';
3629: END IF;
3630: cn_utils.appendcr(body_code);
3631: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
3632: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
3633: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
3634: END IF;
3635: l_table_object_id := g_uniq_tbl_names_tbl.NEXT(l_table_object_id);
3636: END LOOP;
3629: END IF;
3630: cn_utils.appendcr(body_code);
3631: cn_utils.appindcr(body_code, ' OPEN '||l_variable_declaration||' ;' );
3632: cn_utils.appindcr(body_code, ' FETCH '||l_variable_declaration||' INTO ' ||g_uniq_tbl_names_tbl(l_table_object_id).variable_name||' ;' );
3633: cn_utils.appindcr(body_code, ' CLOSE '||l_variable_declaration||' ;' );
3634: END IF;
3635: l_table_object_id := g_uniq_tbl_names_tbl.NEXT(l_table_object_id);
3636: END LOOP;
3637: END IF;
3636: END LOOP;
3637: END IF;
3638:
3639: IF g_trx_group_code = 'INDIVIDUAL' AND g_itd_flag = 'N' AND g_cumulative_flag = 'N' THEN
3640: cn_utils.appindcr(body_code, ' get_input(p_commission_line_id, p_salesrep_id, ');
3641: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3637: END IF;
3638:
3639: IF g_trx_group_code = 'INDIVIDUAL' AND g_itd_flag = 'N' AND g_cumulative_flag = 'N' THEN
3640: cn_utils.appindcr(body_code, ' get_input(p_commission_line_id, p_salesrep_id, ');
3641: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3638:
3639: IF g_trx_group_code = 'INDIVIDUAL' AND g_itd_flag = 'N' AND g_cumulative_flag = 'N' THEN
3640: cn_utils.appindcr(body_code, ' get_input(p_commission_line_id, p_salesrep_id, ');
3641: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3639: IF g_trx_group_code = 'INDIVIDUAL' AND g_itd_flag = 'N' AND g_cumulative_flag = 'N' THEN
3640: cn_utils.appindcr(body_code, ' get_input(p_commission_line_id, p_salesrep_id, ');
3641: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3640: cn_utils.appindcr(body_code, ' get_input(p_commission_line_id, p_salesrep_id, ');
3641: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3642: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, p_processed_date, ');
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3643: cn_utils.appindcr(body_code, ' l_mul_input_tbl );');
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3644: cn_utils.appendcr(body_code);
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3645: IF g_rate_flag THEN
3646: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id , ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3647: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ');
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3648: cn_utils.appindcr(body_code, ' p_processed_date, g_number_dim,l_mul_input_tbl, ');
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3656:
3649: cn_utils.appindcr(body_code, ' g_formula_id, l_rate , l_rate_tier_id, l_tier_split ); ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3656:
3657: cn_utils.appindcr(body_code, ' return l_commission; ');
3650: END IF;
3651: cn_utils.appendcr(body_code);
3652: cn_utils.appindcr(body_code, ' l_commission := get_commission( p_commission_line_id, ');
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3656:
3657: cn_utils.appindcr(body_code, ' return l_commission; ');
3658: cn_utils.appendcr(body_code);
3653: cn_utils.appindcr(body_code, ' p_salesrep_id, p_period_id, p_quota_id, ');
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3656:
3657: cn_utils.appindcr(body_code, ' return l_commission; ');
3658: cn_utils.appendcr(body_code);
3659:
3660: cn_utils.proc_end( procedure_name, 'N', body_code );
3661:
3654: cn_utils.appindcr(body_code, ' p_srp_plan_assign_id, l_rate); ');
3655: END IF;
3656:
3657: cn_utils.appindcr(body_code, ' return l_commission; ');
3658: cn_utils.appendcr(body_code);
3659:
3660: cn_utils.proc_end( procedure_name, 'N', body_code );
3661:
3662: EXCEPTION
3656:
3657: cn_utils.appindcr(body_code, ' return l_commission; ');
3658: cn_utils.appendcr(body_code);
3659:
3660: cn_utils.proc_end( procedure_name, 'N', body_code );
3661:
3662: EXCEPTION
3663: when others then
3664: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3669: raise;
3670: END get_result;
3671:
3672: -- construct the update_revclass_perf procedure for the formula package.
3673: PROCEDURE update_revclass_perf (spec_code IN OUT NOCOPY cn_utils.code_type,
3674: body_code IN OUT NOCOPY cn_utils.code_type )
3675: IS
3676: procedure_name cn_obj_procedures_v.name%TYPE;
3677: procedure_desc cn_obj_procedures_v.description%TYPE;
3670: END get_result;
3671:
3672: -- construct the update_revclass_perf procedure for the formula package.
3673: PROCEDURE update_revclass_perf (spec_code IN OUT NOCOPY cn_utils.code_type,
3674: body_code IN OUT NOCOPY cn_utils.code_type )
3675: IS
3676: procedure_name cn_obj_procedures_v.name%TYPE;
3677: procedure_desc cn_obj_procedures_v.description%TYPE;
3678: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
3700: proc_init(procedure_name, procedure_desc, parameter_list,
3701: 'P', null, package_spec_id, x_repository_id,
3702: spec_code, body_code);
3703:
3704: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3701: 'P', null, package_spec_id, x_repository_id,
3702: spec_code, body_code);
3703:
3704: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3702: spec_code, body_code);
3703:
3704: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3703:
3704: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3704: cn_utils.appindcr(body_code, ' l_perf NUMBER;');
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3705: cn_utils.appindcr(body_code, ' CURSOR l_rev_classes_csr IS ');
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3713: cn_utils.appendcr(body_code);
3706: cn_utils.appindcr(body_code, ' SELECT revenue_class_id, srp_per_quota_rc_id');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3713: cn_utils.appendcr(body_code);
3714: cn_utils.appendcr(body_code, 'BEGIN');
3707: cn_utils.appindcr(body_code, ' FROM cn_srp_per_quota_rc_all rc');
3708: cn_utils.appindcr(body_code, ' WHERE rc.srp_plan_assign_id = p_srp_plan_assign_id');
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3713: cn_utils.appendcr(body_code);
3714: cn_utils.appendcr(body_code, 'BEGIN');
3715:
3709: cn_utils.appindcr(body_code, ' AND rc.salesrep_id = p_salesrep_id');
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3713: cn_utils.appendcr(body_code);
3714: cn_utils.appendcr(body_code, 'BEGIN');
3715:
3716: IF g_perf_measure_id IS NOT NULL THEN
3717: select sql_select, sql_from
3710: cn_utils.appindcr(body_code, ' AND rc.period_id = p_period_id');
3711: cn_utils.appindcr(body_code, ' AND rc.quota_id = p_quota_id;');
3712:
3713: cn_utils.appendcr(body_code);
3714: cn_utils.appendcr(body_code, 'BEGIN');
3715:
3716: IF g_perf_measure_id IS NOT NULL THEN
3717: select sql_select, sql_from
3718: into l_input_sql_select_clob, l_input_sql_from_clob
3788: l_input_sql_select := REPLACE(l_input_sql_select, 'select', 'select sum(');
3789: l_input_sql_select := l_input_sql_select || ' ) ';
3790: END IF;
3791:
3792: cn_utils.appindcr(body_code, ' FOR l_rev_class IN l_rev_classes_csr LOOP ');
3793: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3794: cn_utils.appindcr(body_code, ' into l_perf ');
3795: split_long_sql( body_code, l_input_sql_from, 'FROM');
3796: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3790: END IF;
3791:
3792: cn_utils.appindcr(body_code, ' FOR l_rev_class IN l_rev_classes_csr LOOP ');
3793: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3794: cn_utils.appindcr(body_code, ' into l_perf ');
3795: split_long_sql( body_code, l_input_sql_from, 'FROM');
3796: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3797: cn_utils.appendcr(body_code);
3798: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
3793: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3794: cn_utils.appindcr(body_code, ' into l_perf ');
3795: split_long_sql( body_code, l_input_sql_from, 'FROM');
3796: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3797: cn_utils.appendcr(body_code);
3798: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
3799:
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3794: cn_utils.appindcr(body_code, ' into l_perf ');
3795: split_long_sql( body_code, l_input_sql_from, 'FROM');
3796: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3797: cn_utils.appendcr(body_code);
3798: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
3799:
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3797: cn_utils.appendcr(body_code);
3798: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
3799:
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3803: cn_utils.appindcr(body_code, ' WHERE srp_per_quota_rc_id = l_rev_class.srp_per_quota_rc_id;');
3804: cn_utils.appindcr(body_code, ' END LOOP; ' );
3805:
3798: cn_utils.appindcr(body_code, ' l_perf := nvl(l_perf, 0); ');
3799:
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3803: cn_utils.appindcr(body_code, ' WHERE srp_per_quota_rc_id = l_rev_class.srp_per_quota_rc_id;');
3804: cn_utils.appindcr(body_code, ' END LOOP; ' );
3805:
3806: cn_utils.proc_end( procedure_name, 'N', body_code );
3799:
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3803: cn_utils.appindcr(body_code, ' WHERE srp_per_quota_rc_id = l_rev_class.srp_per_quota_rc_id;');
3804: cn_utils.appindcr(body_code, ' END LOOP; ' );
3805:
3806: cn_utils.proc_end( procedure_name, 'N', body_code );
3807: EXCEPTION
3800:
3801: cn_utils.appindcr(body_code, ' UPDATE cn_srp_per_quota_rc_all');
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3803: cn_utils.appindcr(body_code, ' WHERE srp_per_quota_rc_id = l_rev_class.srp_per_quota_rc_id;');
3804: cn_utils.appindcr(body_code, ' END LOOP; ' );
3805:
3806: cn_utils.proc_end( procedure_name, 'N', body_code );
3807: EXCEPTION
3808: when others then
3802: cn_utils.appindcr(body_code, ' SET period_to_date = l_perf');
3803: cn_utils.appindcr(body_code, ' WHERE srp_per_quota_rc_id = l_rev_class.srp_per_quota_rc_id;');
3804: cn_utils.appindcr(body_code, ' END LOOP; ' );
3805:
3806: cn_utils.proc_end( procedure_name, 'N', body_code );
3807: EXCEPTION
3808: when others then
3809: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3810: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
3814: raise;
3815: END update_revclass_perf;
3816:
3817: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
3818: PROCEDURE calculate_bonus_quota (spec_code IN OUT NOCOPY cn_utils.code_type,
3819: body_code IN OUT NOCOPY cn_utils.code_type )
3820: IS
3821: procedure_name cn_obj_procedures_v.name%TYPE;
3822: procedure_desc cn_obj_procedures_v.description%TYPE;
3815: END update_revclass_perf;
3816:
3817: -- construct the calculate_quota procdure which will be invoked from the dispatcher in calc engine
3818: PROCEDURE calculate_bonus_quota (spec_code IN OUT NOCOPY cn_utils.code_type,
3819: body_code IN OUT NOCOPY cn_utils.code_type )
3820: IS
3821: procedure_name cn_obj_procedures_v.name%TYPE;
3822: procedure_desc cn_obj_procedures_v.description%TYPE;
3823: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
3914: parameter_list := parameter_list || ',p_credit_type_id NUMBER, p_role_id NUMBER, x_latest_processed_date OUT NOCOPY DATE ';
3915:
3916: proc_init(procedure_name, procedure_desc, parameter_list, 'P', null , package_spec_id, x_repository_id, spec_code, body_code);
3917:
3918: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3915:
3916: proc_init(procedure_name, procedure_desc, parameter_list, 'P', null , package_spec_id, x_repository_id, spec_code, body_code);
3917:
3918: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3916: proc_init(procedure_name, procedure_desc, parameter_list, 'P', null , package_spec_id, x_repository_id, spec_code, body_code);
3917:
3918: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3917:
3918: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3918: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3919: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3920: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER(15); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3921: cn_utils.appindcr(body_code, ' l_tier_split NUMBER(15); ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3922: cn_utils.appindcr(body_code, ' l_input cn_formula_common_pkg.num_table_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3923: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30);');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3924: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3932: cn_utils.appendcr(body_code);
3925: cn_utils.appindcr(body_code, ' l_perf NUMBER; ');
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3932: cn_utils.appendcr(body_code);
3933:
3926: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3932: cn_utils.appendcr(body_code);
3933:
3934: -- constructing input cursor here
3927: cn_utils.appindcr(body_code, ' l_error_reason VARCHAR2(150); ');
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3932: cn_utils.appendcr(body_code);
3933:
3934: -- constructing input cursor here
3935: l_counter := 1;
3928: cn_utils.appindcr(body_code, ' l_name VARCHAR2(255); ');
3929: cn_utils.appindcr(body_code, ' l_trx_rec cn_formula_common_pkg.trx_rec_type; ');
3930: cn_utils.appindcr(body_code, ' l_trx_rec_null cn_formula_common_pkg.trx_rec_type; ');
3931: cn_utils.appindcr(body_code, ' l_rollover NUMBER := 0; ');
3932: cn_utils.appendcr(body_code);
3933:
3934: -- constructing input cursor here
3935: l_counter := 1;
3936: FOR l_mul_input IN l_mul_inputs_csr LOOP
3961: IF g_external_table_id IS NOT NULL THEN
3962: FOR l_column IN l_all_columns_csr(g_external_table_id) LOOP
3963: l_ctr := l_all_columns_csr%rowcount;
3964: IF l_column.data_type IN ('CHAR', 'VARCHAR2', 'NCHAR', 'NVARCHAR2' ) THEN
3965: cn_utils.appindcr(body_code, ' l_parameter_'|| l_ctr
3966: || ' ' || l_column.data_type || ' (1000); ' );
3967: ELSE
3968: cn_utils.appindcr(body_code, ' l_parameter_'|| l_ctr
3969: || ' ' || l_column.data_type || ';' );
3964: IF l_column.data_type IN ('CHAR', 'VARCHAR2', 'NCHAR', 'NVARCHAR2' ) THEN
3965: cn_utils.appindcr(body_code, ' l_parameter_'|| l_ctr
3966: || ' ' || l_column.data_type || ' (1000); ' );
3967: ELSE
3968: cn_utils.appindcr(body_code, ' l_parameter_'|| l_ctr
3969: || ' ' || l_column.data_type || ';' );
3970: END IF;
3971: END LOOP;
3972: END IF;
3969: || ' ' || l_column.data_type || ';' );
3970: END IF;
3971: END LOOP;
3972: END IF;
3973: cn_utils.appendcr(body_code);
3974:
3975: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_'|| l_counter || ' IS ' );
3976: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3977: split_long_sql( body_code, l_input_sql_from, 'FROM');
3971: END LOOP;
3972: END IF;
3973: cn_utils.appendcr(body_code);
3974:
3975: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_'|| l_counter || ' IS ' );
3976: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3977: split_long_sql( body_code, l_input_sql_from, 'FROM');
3978: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3979: cn_utils.appendcr(body_code);
3975: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_'|| l_counter || ' IS ' );
3976: split_long_sql( body_code, l_input_sql_select, 'SELECT');
3977: split_long_sql( body_code, l_input_sql_from, 'FROM');
3978: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
3979: cn_utils.appendcr(body_code);
3980:
3981: IF g_external_table_id IS NOT NULL THEN
3982: l_input_sql_where := 'WHERE 1=1 ';
3983:
3999: l_input_sql_from,
4000: l_input_sql_where,
4001: 'INPUT0' );
4002:
4003: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_0 IS ' );
4004: split_long_sql( body_code, l_input_sql_select, 'SELECT');
4005: split_long_sql( body_code, l_input_sql_from, 'FROM');
4006: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
4007: cn_utils.appendcr(body_code);
4003: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_0 IS ' );
4004: split_long_sql( body_code, l_input_sql_select, 'SELECT');
4005: split_long_sql( body_code, l_input_sql_from, 'FROM');
4006: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
4007: cn_utils.appendcr(body_code);
4008: END IF;
4009:
4010: ELSE
4011: handle_bonus_ex_tbl_orderby(l_input_sql_select,
4012: l_input_sql_from,
4013: l_input_sql_where,
4014: 'INPUT' );
4015:
4016: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_'|| l_counter || ' IS ' );
4017: split_long_sql( body_code, l_input_sql_select, 'SELECT');
4018: split_long_sql( body_code, l_input_sql_from, 'FROM');
4019: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
4020: cn_utils.appendcr(body_code);
4016: cn_utils.appindcr(body_code, ' CURSOR l_input_csr_'|| l_counter || ' IS ' );
4017: split_long_sql( body_code, l_input_sql_select, 'SELECT');
4018: split_long_sql( body_code, l_input_sql_from, 'FROM');
4019: split_long_sql( body_code, l_input_sql_where||';', 'WHERE');
4020: cn_utils.appendcr(body_code);
4021: END IF;
4022:
4023: l_counter := l_counter+1;
4024: END LOOP;
4048: l_output_sql_from,
4049: l_output_sql_where,
4050: 'OUTPUT' );
4051:
4052: cn_utils.appindcr(body_code, ' CURSOR l_output_csr IS ' );
4053: split_long_sql( body_code, l_output_sql_select, 'SELECT');
4054: split_long_sql( body_code, l_output_sql_from, 'FROM');
4055: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
4056: cn_utils.appendcr(body_code);
4052: cn_utils.appindcr(body_code, ' CURSOR l_output_csr IS ' );
4053: split_long_sql( body_code, l_output_sql_select, 'SELECT');
4054: split_long_sql( body_code, l_output_sql_from, 'FROM');
4055: split_long_sql( body_code, l_output_sql_where||';', 'WHERE');
4056: cn_utils.appendcr(body_code);
4057:
4058: -- constructing perf_cursor here
4059: IF g_perf_measure_id IS NOT NULL THEN
4060: OPEN l_perf_select_from_csr;
4086: l_perf_sql_from,
4087: l_perf_sql_where,
4088: 'PERF' );
4089:
4090: cn_utils.appindcr(body_code, ' CURSOR l_perf_csr IS ' );
4091: split_long_sql( body_code, l_perf_sql_select, 'SELECT');
4092: split_long_sql( body_code, l_perf_sql_from, 'FROM');
4093: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
4094:
4092: split_long_sql( body_code, l_perf_sql_from, 'FROM');
4093: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
4094:
4095: -- finish contructing input/output/perf cursors
4096: cn_utils.appendcr(body_code, 'BEGIN');
4097: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
4098: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
4099: calc_init(spec_code, body_code);
4100:
4093: split_long_sql( body_code, l_perf_sql_where||';', 'WHERE');
4094:
4095: -- finish contructing input/output/perf cursors
4096: cn_utils.appendcr(body_code, 'BEGIN');
4097: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
4098: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
4099: calc_init(spec_code, body_code);
4100:
4101: FOR i IN 1..g_number_dim LOOP
4094:
4095: -- finish contructing input/output/perf cursors
4096: cn_utils.appendcr(body_code, 'BEGIN');
4097: cn_utils.appindcr(body_code, ' g_intel_calc_flag := p_intel_calc_flag;');
4098: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
4099: calc_init(spec_code, body_code);
4100:
4101: FOR i IN 1..g_number_dim LOOP
4102: cn_utils.appindcr(body_code, ' l_input('||i||') := 0; ');
4098: cn_utils.appindcr(body_code, ' g_calc_type := p_calc_type;');
4099: calc_init(spec_code, body_code);
4100:
4101: FOR i IN 1..g_number_dim LOOP
4102: cn_utils.appindcr(body_code, ' l_input('||i||') := 0; ');
4103: END LOOP;
4104:
4105: IF g_external_table_id IS NOT NULL THEN
4106: cn_utils.appindcr(body_code, ' FOR l_csr_0 IN l_input_csr_0 LOOP ');
4102: cn_utils.appindcr(body_code, ' l_input('||i||') := 0; ');
4103: END LOOP;
4104:
4105: IF g_external_table_id IS NOT NULL THEN
4106: cn_utils.appindcr(body_code, ' FOR l_csr_0 IN l_input_csr_0 LOOP ');
4107: cn_utils.appindcr(body_code, ' BEGIN ');
4108: FOR l_column IN l_all_columns_csr(g_external_table_id) LOOP
4109: cn_utils.appindcr(body_code, ' l_parameter_'||
4110: To_char(l_all_columns_csr%rowcount) || ' := l_csr_0.'
4103: END LOOP;
4104:
4105: IF g_external_table_id IS NOT NULL THEN
4106: cn_utils.appindcr(body_code, ' FOR l_csr_0 IN l_input_csr_0 LOOP ');
4107: cn_utils.appindcr(body_code, ' BEGIN ');
4108: FOR l_column IN l_all_columns_csr(g_external_table_id) LOOP
4109: cn_utils.appindcr(body_code, ' l_parameter_'||
4110: To_char(l_all_columns_csr%rowcount) || ' := l_csr_0.'
4111: || l_column.column_name || ' ;');
4105: IF g_external_table_id IS NOT NULL THEN
4106: cn_utils.appindcr(body_code, ' FOR l_csr_0 IN l_input_csr_0 LOOP ');
4107: cn_utils.appindcr(body_code, ' BEGIN ');
4108: FOR l_column IN l_all_columns_csr(g_external_table_id) LOOP
4109: cn_utils.appindcr(body_code, ' l_parameter_'||
4110: To_char(l_all_columns_csr%rowcount) || ' := l_csr_0.'
4111: || l_column.column_name || ' ;');
4112: END LOOP;
4113: cn_utils.appendcr(body_code);
4109: cn_utils.appindcr(body_code, ' l_parameter_'||
4110: To_char(l_all_columns_csr%rowcount) || ' := l_csr_0.'
4111: || l_column.column_name || ' ;');
4112: END LOOP;
4113: cn_utils.appendcr(body_code);
4114: ELSE
4115: cn_utils.appindcr(body_code, ' BEGIN ');
4116: END IF;
4117: cn_utils.appindcr(body_code, ' l_trx_rec := l_trx_rec_null; ');
4111: || l_column.column_name || ' ;');
4112: END LOOP;
4113: cn_utils.appendcr(body_code);
4114: ELSE
4115: cn_utils.appindcr(body_code, ' BEGIN ');
4116: END IF;
4117: cn_utils.appindcr(body_code, ' l_trx_rec := l_trx_rec_null; ');
4118: FOR l_mul_input IN l_mul_inputs_csr LOOP
4119: l_ctr := l_mul_inputs_csr%rowcount;
4113: cn_utils.appendcr(body_code);
4114: ELSE
4115: cn_utils.appindcr(body_code, ' BEGIN ');
4116: END IF;
4117: cn_utils.appindcr(body_code, ' l_trx_rec := l_trx_rec_null; ');
4118: FOR l_mul_input IN l_mul_inputs_csr LOOP
4119: l_ctr := l_mul_inputs_csr%rowcount;
4120: cn_utils.appindcr(body_code, ' OPEN l_input_csr_' || l_ctr || ' ;' );
4121:
4116: END IF;
4117: cn_utils.appindcr(body_code, ' l_trx_rec := l_trx_rec_null; ');
4118: FOR l_mul_input IN l_mul_inputs_csr LOOP
4119: l_ctr := l_mul_inputs_csr%rowcount;
4120: cn_utils.appindcr(body_code, ' OPEN l_input_csr_' || l_ctr || ' ;' );
4121:
4122: OPEN dim_type(l_mul_input.rate_dim_sequence);
4123: FETCH dim_type INTO l_dim_unit_code;
4124: CLOSE dim_type;
4123: FETCH dim_type INTO l_dim_unit_code;
4124: CLOSE dim_type;
4125:
4126: IF (l_dim_unit_code = 'STRING') THEN
4127: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input_string; ');
4128: ELSE
4129: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input('||l_mul_input.rate_dim_sequence||'); ');
4130: END IF;
4131:
4125:
4126: IF (l_dim_unit_code = 'STRING') THEN
4127: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input_string; ');
4128: ELSE
4129: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input('||l_mul_input.rate_dim_sequence||'); ');
4130: END IF;
4131:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4128: ELSE
4129: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input('||l_mul_input.rate_dim_sequence||'); ');
4130: END IF;
4131:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4129: cn_utils.appindcr(body_code, ' FETCH l_input_csr_' || l_ctr||' INTO l_input('||l_mul_input.rate_dim_sequence||'); ');
4130: END IF;
4131:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4130: END IF;
4131:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4138: || l_mul_input.rate_dim_sequence || ' ; ' );
4131:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4138: || l_mul_input.rate_dim_sequence || ' ; ' );
4139:
4132: cn_utils.appendcr(body_code);
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4138: || l_mul_input.rate_dim_sequence || ' ; ' );
4139:
4140: IF (l_dim_unit_code = 'STRING') THEN
4133: cn_utils.appindcr(body_code, ' IF l_input_csr_'|| l_ctr || '%notfound THEN ');
4134: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4135: cn_utils.appindcr(body_code, ' END IF; ');
4136: cn_utils.appendcr(body_code);
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4138: || l_mul_input.rate_dim_sequence || ' ; ' );
4139:
4140: IF (l_dim_unit_code = 'STRING') THEN
4141: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_string := l_input_string;' );
4137: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr ||').rate_dim_sequence := '
4138: || l_mul_input.rate_dim_sequence || ' ; ' );
4139:
4140: IF (l_dim_unit_code = 'STRING') THEN
4141: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_string := l_input_string;' );
4142: ELSE
4143: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_amount := l_input('||l_mul_input.rate_dim_sequence||');');
4144: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4145: END IF;
4139:
4140: IF (l_dim_unit_code = 'STRING') THEN
4141: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_string := l_input_string;' );
4142: ELSE
4143: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_amount := l_input('||l_mul_input.rate_dim_sequence||');');
4144: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4145: END IF;
4146:
4147: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4140: IF (l_dim_unit_code = 'STRING') THEN
4141: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_string := l_input_string;' );
4142: ELSE
4143: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').input_amount := l_input('||l_mul_input.rate_dim_sequence||');');
4144: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4145: END IF;
4146:
4147: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4148: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := 0;' );
4144: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_ctr ||').amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4145: END IF;
4146:
4147: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4148: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := 0;' );
4149: ELSE
4150: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4151: END IF;
4152: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4146:
4147: IF (l_mul_input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4148: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := 0;' );
4149: ELSE
4150: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4151: END IF;
4152: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4153: cn_utils.appendcr(body_code);
4154: END LOOP;
4148: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := 0;' );
4149: ELSE
4150: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4151: END IF;
4152: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4153: cn_utils.appendcr(body_code);
4154: END LOOP;
4155:
4156: --cn_utils.appindcr(body_code, ' l_input := l_mul_input_tbl(1).input_amount; ');
4149: ELSE
4150: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_ctr || ').base_amount := l_input('||l_mul_input.rate_dim_sequence||');' );
4151: END IF;
4152: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4153: cn_utils.appendcr(body_code);
4154: END LOOP;
4155:
4156: --cn_utils.appindcr(body_code, ' l_input := l_mul_input_tbl(1).input_amount; ');
4157: cn_utils.appendcr(body_code);
4152: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4153: cn_utils.appendcr(body_code);
4154: END LOOP;
4155:
4156: --cn_utils.appindcr(body_code, ' l_input := l_mul_input_tbl(1).input_amount; ');
4157: cn_utils.appendcr(body_code);
4158: -- get_rates
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4153: cn_utils.appendcr(body_code);
4154: END LOOP;
4155:
4156: --cn_utils.appindcr(body_code, ' l_input := l_mul_input_tbl(1).input_amount; ');
4157: cn_utils.appendcr(body_code);
4158: -- get_rates
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4156: --cn_utils.appindcr(body_code, ' l_input := l_mul_input_tbl(1).input_amount; ');
4157: cn_utils.appendcr(body_code);
4158: -- get_rates
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4157: cn_utils.appendcr(body_code);
4158: -- get_rates
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4158: -- get_rates
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4159: IF g_rate_flag THEN
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4160: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4161: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag, g_itd_flag,');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4162: cn_utils.appindcr(body_code, ' p_start_date, g_number_dim,l_mul_input_tbl, ');
4163: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4164: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Commission rate=''|| p_rate);');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4165: END IF;
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4166: cn_utils.appendcr(body_code);
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4167: -- get_commission
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4168: cn_utils.appindcr(body_code, ' OPEN l_output_csr; ');
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4169: cn_utils.appindcr(body_code, ' FETCH l_output_csr INTO l_commission; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4170: cn_utils.appindcr(body_code, ' IF l_output_csr%notfound THEN ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4171: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4172: cn_utils.appindcr(body_code, ' END IF; ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4173: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4174: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Output=''||l_commission);');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4175: cn_utils.appendcr(body_code);
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4176: -- get perf need more thought
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4177: cn_utils.appindcr(body_code, ' OPEN l_perf_csr; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4178: cn_utils.appindcr(body_code, ' FETCH l_perf_csr INTO l_perf; ');
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4179: cn_utils.appindcr(body_code, ' IF l_perf_csr%notfound THEN ');
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4180: cn_utils.appindcr(body_code, ' raise no_data_found; ');
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4181: cn_utils.appindcr(body_code, ' END IF; ');
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4182: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4183: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Performance measure=''||l_perf);');
4184: cn_utils.appendcr(body_code);
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4185: cn_utils.appindcr(body_code, ' x_latest_processed_date := p_start_date; ');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4186: cn_utils.appendcr(body_code);
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4187: -- update all global variables
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4188: update_variables(spec_code, body_code);
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4189: cn_utils.appendcr(body_code);
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4190: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := l_commission ;');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4191: cn_utils.appindcr(body_code, ' l_trx_rec.commission_rate := p_rate ; ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4192: cn_utils.appindcr(body_code, ' l_trx_rec.rate_tier_id := l_rate_tier_id ;');
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4200:
4193: cn_utils.appindcr(body_code, ' l_trx_rec.tier_split := l_tier_split ;');
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4200:
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4194: cn_utils.appindcr(body_code, ' l_trx_rec.input_achieved := g_input_achieved_itd(1); ');
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4200:
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4202: l_ctr := l_mul_inputs_csr%rowcount;
4195: cn_utils.appindcr(body_code, ' l_trx_rec.output_achieved := g_output_achieved_itd; ');
4196: cn_utils.appindcr(body_code, ' l_trx_rec.perf_achieved := l_perf; ');
4197: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''CALC''; ');
4198: cn_utils.appindcr(body_code, ' l_trx_rec.credit_type_id := p_credit_type_id; ');
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4200:
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4202: l_ctr := l_mul_inputs_csr%rowcount;
4203: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4199: cn_utils.appindcr(body_code, ' EXCEPTION WHEN OTHERS THEN ');
4200:
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4202: l_ctr := l_mul_inputs_csr%rowcount;
4203: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4204: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4200:
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4202: l_ctr := l_mul_inputs_csr%rowcount;
4203: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4204: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4201: FOR l_mul_input IN l_mul_inputs_csr LOOP
4202: l_ctr := l_mul_inputs_csr%rowcount;
4203: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4204: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4203: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4204: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4204: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4205: cn_utils.appindcr(body_code, ' END IF; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4206: END LOOP;
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4207: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4208: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4209: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4210: cn_utils.appindcr(body_code, ' END IF; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4211: cn_utils.appendcr(body_code);
4212: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4213: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4214: cn_utils.appindcr(body_code, ' END IF; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4215: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4216: -- how to handle exception -->create a trx with status 'XCALC' that has the error_reason
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4217: cn_utils.appindcr(body_code, ' l_trx_rec.error_reason := substr(sqlerrm,1,150); ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4218: cn_utils.appindcr(body_code, ' l_trx_rec.status := ''XCALC''; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4219: cn_utils.appindcr(body_code, ' l_trx_rec.commission_amount := 0 ;');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4220: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in formula calculate_bonus_quota:''); ' );
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4221: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4222: cn_utils.appindcr(body_code, ' END; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4223: cn_utils.appendcr(body_code);
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4224: cn_utils.appindcr(body_code, ' l_trx_rec.salesrep_id := p_salesrep_id; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4225: cn_utils.appindcr(body_code, ' l_trx_rec.srp_plan_assign_id := p_srp_plan_assign_id; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4226: cn_utils.appindcr(body_code, ' l_trx_rec.quota_id := p_quota_id; ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4227: cn_utils.appindcr(body_code, ' l_trx_rec.processed_date := p_start_date; ');
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4228: cn_utils.appindcr(body_code, ' l_trx_rec.processed_period_id := p_period_id; ');
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4229: cn_utils.appindcr(body_code, ' l_trx_rec.pay_period_id := p_period_id; ');
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4237: IF g_external_table_id IS NOT NULL THEN
4230: cn_utils.appindcr(body_code, ' l_trx_rec.posting_status := ''UNPOSTED''; ');
4231: cn_utils.appindcr(body_code, ' l_trx_rec.pending_status := null; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4237: IF g_external_table_id IS NOT NULL THEN
4238: cn_utils.appindcr(body_code, ' END LOOP; ');
4232: cn_utils.appindcr(body_code, ' l_trx_rec.created_during := ''CALC''; ');
4233: cn_utils.appindcr(body_code, ' l_trx_rec.trx_type := ''BONUS'' ; ');
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4237: IF g_external_table_id IS NOT NULL THEN
4238: cn_utils.appindcr(body_code, ' END LOOP; ');
4239: -- cn_utils.appindcr(body_code, ' CLOSE l_input_csr_0; ');
4240: END IF;
4234: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.create_trx(l_trx_rec); ');
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4237: IF g_external_table_id IS NOT NULL THEN
4238: cn_utils.appindcr(body_code, ' END LOOP; ');
4239: -- cn_utils.appindcr(body_code, ' CLOSE l_input_csr_0; ');
4240: END IF;
4241: -- contructing calc_roll
4242: calc_roll(spec_code, body_code);
4235: -- create_bonus_trx;
4236: cn_utils.appendcr(body_code);
4237: IF g_external_table_id IS NOT NULL THEN
4238: cn_utils.appindcr(body_code, ' END LOOP; ');
4239: -- cn_utils.appindcr(body_code, ' CLOSE l_input_csr_0; ');
4240: END IF;
4241: -- contructing calc_roll
4242: calc_roll(spec_code, body_code);
4243: cn_utils.appindcr(body_code, ' EXCEPTION ' );
4239: -- cn_utils.appindcr(body_code, ' CLOSE l_input_csr_0; ');
4240: END IF;
4241: -- contructing calc_roll
4242: calc_roll(spec_code, body_code);
4243: cn_utils.appindcr(body_code, ' EXCEPTION ' );
4244: cn_utils.appindcr(body_code, ' when others then ');
4245: FOR l_mul_input IN l_mul_inputs_csr LOOP
4246: l_ctr := l_mul_inputs_csr%rowcount;
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4240: END IF;
4241: -- contructing calc_roll
4242: calc_roll(spec_code, body_code);
4243: cn_utils.appindcr(body_code, ' EXCEPTION ' );
4244: cn_utils.appindcr(body_code, ' when others then ');
4245: FOR l_mul_input IN l_mul_inputs_csr LOOP
4246: l_ctr := l_mul_inputs_csr%rowcount;
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4243: cn_utils.appindcr(body_code, ' EXCEPTION ' );
4244: cn_utils.appindcr(body_code, ' when others then ');
4245: FOR l_mul_input IN l_mul_inputs_csr LOOP
4246: l_ctr := l_mul_inputs_csr%rowcount;
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4244: cn_utils.appindcr(body_code, ' when others then ');
4245: FOR l_mul_input IN l_mul_inputs_csr LOOP
4246: l_ctr := l_mul_inputs_csr%rowcount;
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4245: FOR l_mul_input IN l_mul_inputs_csr LOOP
4246: l_ctr := l_mul_inputs_csr%rowcount;
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4247: cn_utils.appindcr(body_code, ' IF l_input_csr_' || l_ctr || '%isopen THEN ' );
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4248: cn_utils.appindcr(body_code, ' CLOSE l_input_csr_' || l_ctr || ' ;' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4249: cn_utils.appindcr(body_code, ' END IF; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4250: END LOOP;
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4251: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4252: cn_utils.appindcr(body_code, ' IF l_output_csr%isopen THEN ' );
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4253: cn_utils.appindcr(body_code, ' CLOSE l_output_csr; ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4254: cn_utils.appindcr(body_code, ' END IF; ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4255: cn_utils.appendcr(body_code);
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4256: cn_utils.appindcr(body_code, ' IF l_perf_csr%isopen THEN ' );
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4257: cn_utils.appindcr(body_code, ' CLOSE l_perf_csr; ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4258: cn_utils.appindcr(body_code, ' END IF; ');
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4259: cn_utils.appendcr(body_code);
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4260: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4268:
4261: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4268:
4269: cn_utils.proc_end( procedure_name, 'N', body_code );
4262: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.calculate_bonus_quota.exception'', ');
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4268:
4269: cn_utils.proc_end( procedure_name, 'N', body_code );
4270: EXCEPTION
4263: cn_utils.appindcr(body_code, ' sqlerrm); ');
4264: cn_utils.appindcr(body_code, ' end if; ');
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4268:
4269: cn_utils.proc_end( procedure_name, 'N', body_code );
4270: EXCEPTION
4271: when others then
4265: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in calculate_bonsu_quota:''); ');
4266: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ' );
4267: cn_utils.appindcr(body_code, ' raise; ');
4268:
4269: cn_utils.proc_end( procedure_name, 'N', body_code );
4270: EXCEPTION
4271: when others then
4272: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4273: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
4277: raise;
4278: END calculate_bonus_quota;
4279:
4280: -- construct the get_forecast_commission procdure which will be invoked by Income Planner
4281: PROCEDURE get_forecast_commission(spec_code IN OUT NOCOPY cn_utils.code_type,
4282: body_code IN OUT NOCOPY cn_utils.code_type )
4283: IS
4284: procedure_name cn_obj_procedures_v.name%TYPE;
4285: procedure_desc cn_obj_procedures_v.description%TYPE;
4278: END calculate_bonus_quota;
4279:
4280: -- construct the get_forecast_commission procdure which will be invoked by Income Planner
4281: PROCEDURE get_forecast_commission(spec_code IN OUT NOCOPY cn_utils.code_type,
4282: body_code IN OUT NOCOPY cn_utils.code_type )
4283: IS
4284: procedure_name cn_obj_procedures_v.name%TYPE;
4285: procedure_desc cn_obj_procedures_v.description%TYPE;
4286: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
4345: proc_init(procedure_name, procedure_desc, parameter_list,
4346: 'P', null , null, null,
4347: spec_code, body_code);
4348:
4349: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4346: 'P', null , null, null,
4347: spec_code, body_code);
4348:
4349: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4347: spec_code, body_code);
4348:
4349: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4348:
4349: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4349: cn_utils.appindcr(body_code, ' l_mul_input_tbl ' || 'cn_formula_common_pkg.mul_input_tbl_type; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4350: cn_utils.appindcr(body_code, ' p_rate NUMBER;');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4351: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4352: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4353: cn_utils.appindcr(body_code, ' l_input NUMBER; ');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4354: cn_utils.appindcr(body_code, ' l_input_string VARCHAR2(30); ');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4355: cn_utils.appindcr(body_code, ' l_commission NUMBER; ');
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4356: cn_utils.appindcr(body_code, ' l_itd_target NUMBER; ');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4364: cn_utils.appindcr(body_code, ' g_calc_type := ''FORECAST'';');
4357: cn_utils.appindcr(body_code, ' l_itd_payment NUMBER; ');
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4364: cn_utils.appindcr(body_code, ' g_calc_type := ''FORECAST'';');
4365:
4358: cn_utils.appindcr(body_code, ' l_processed_date DATE; ');
4359: cn_utils.appindcr(body_code, ' p_period_id NUMBER; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4364: cn_utils.appindcr(body_code, ' g_calc_type := ''FORECAST'';');
4365:
4366: cn_utils.appindcr(body_code, ' p_period_id := p_start_period_id; ');
4360: cn_utils.appindcr(body_code, ' p_start_date DATE; ');
4361: cn_utils.appindcr(body_code, ' p_process_all_flag VARCHAR2(1) := ''Y'';');
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4364: cn_utils.appindcr(body_code, ' g_calc_type := ''FORECAST'';');
4365:
4366: cn_utils.appindcr(body_code, ' p_period_id := p_start_period_id; ');
4367:
4368: -- when initialize _itd global variables, set the period_id to be the first period in the forecasting interval
4362: cn_utils.appendcr(body_code, 'BEGIN');
4363:
4364: cn_utils.appindcr(body_code, ' g_calc_type := ''FORECAST'';');
4365:
4366: cn_utils.appindcr(body_code, ' p_period_id := p_start_period_id; ');
4367:
4368: -- when initialize _itd global variables, set the period_id to be the first period in the forecasting interval
4369:
4370:
4367:
4368: -- when initialize _itd global variables, set the period_id to be the first period in the forecasting interval
4369:
4370:
4371: /*cn_utils.appindcr(body_code, ' p_period_id := cn_api.get_acc_period_id(trunc(sysdate));');
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4368: -- when initialize _itd global variables, set the period_id to be the first period in the forecasting interval
4369:
4370:
4371: /*cn_utils.appindcr(body_code, ' p_period_id := cn_api.get_acc_period_id(trunc(sysdate));');
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4376: cn_utils.appindcr(body_code, ' end if; ');*/
4369:
4370:
4371: /*cn_utils.appindcr(body_code, ' p_period_id := cn_api.get_acc_period_id(trunc(sysdate));');
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4376: cn_utils.appindcr(body_code, ' end if; ');*/
4377:
4370:
4371: /*cn_utils.appindcr(body_code, ' p_period_id := cn_api.get_acc_period_id(trunc(sysdate));');
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4376: cn_utils.appindcr(body_code, ' end if; ');*/
4377:
4378:
4371: /*cn_utils.appindcr(body_code, ' p_period_id := cn_api.get_acc_period_id(trunc(sysdate));');
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4376: cn_utils.appindcr(body_code, ' end if; ');*/
4377:
4378:
4379: calc_init(spec_code, body_code);
4372: cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4373: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_start_period_id(p_quota_id, p_period_id);');
4374: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4375: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_start_period_id(p_quota_id, p_period_id);');
4376: cn_utils.appindcr(body_code, ' end if; ');*/
4377:
4378:
4379: calc_init(spec_code, body_code);
4380:
4377:
4378:
4379: calc_init(spec_code, body_code);
4380:
4381: /*cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4382: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_end_period_id(p_quota_id, p_period_id);');
4383: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4378:
4379: calc_init(spec_code, body_code);
4380:
4381: /*cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4382: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_end_period_id(p_quota_id, p_period_id);');
4383: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4386:
4379: calc_init(spec_code, body_code);
4380:
4381: /*cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4382: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_end_period_id(p_quota_id, p_period_id);');
4383: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4386:
4387:
4380:
4381: /*cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4382: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_end_period_id(p_quota_id, p_period_id);');
4383: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4386:
4387:
4388: cn_utils.appindcr(body_code, ' p_period_id := p_forecast_period_id; ');
4381: /*cn_utils.appindcr(body_code, ' if (p_period_type = ''Q'') then ');
4382: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_quarter_end_period_id(p_quota_id, p_period_id);');
4383: cn_utils.appindcr(body_code, ' elsif (p_period_type = ''Y'') then ');
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4386:
4387:
4388: cn_utils.appindcr(body_code, ' p_period_id := p_forecast_period_id; ');
4389:
4384: cn_utils.appindcr(body_code, ' p_period_id := cn_formula_common_pkg.get_end_period_id(p_quota_id, p_period_id);');
4385: cn_utils.appindcr(body_code, ' end if; ');*/
4386:
4387:
4388: cn_utils.appindcr(body_code, ' p_period_id := p_forecast_period_id; ');
4389:
4390: FOR input IN f_inputs LOOP
4391: OPEN dim_type(input.rate_dim_sequence);
4392: FETCH dim_type INTO l_dim_unit_code;
4405: construct_sql_from_where(l_sql_select, l_sql_from, l_sql_where);
4406:
4407: split_long_sql(body_code, l_sql_select, 'SELECT');
4408: IF (l_dim_unit_code = 'STRING') THEN
4409: cn_utils.appindcr(body_code, ' into l_input_string ');
4410: ELSE
4411: cn_utils.appindcr(body_code, ' into l_input ');
4412: END IF;
4413: split_long_sql(body_code, l_sql_from, 'FROM');
4407: split_long_sql(body_code, l_sql_select, 'SELECT');
4408: IF (l_dim_unit_code = 'STRING') THEN
4409: cn_utils.appindcr(body_code, ' into l_input_string ');
4410: ELSE
4411: cn_utils.appindcr(body_code, ' into l_input ');
4412: END IF;
4413: split_long_sql(body_code, l_sql_from, 'FROM');
4414: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4415:
4412: END IF;
4413: split_long_sql(body_code, l_sql_from, 'FROM');
4414: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4415:
4416: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
4417: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').rate_dim_sequence := ' || input.rate_dim_sequence || ';');
4418:
4419: IF (l_dim_unit_code = 'STRING') THEN
4420: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
4413: split_long_sql(body_code, l_sql_from, 'FROM');
4414: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4415:
4416: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
4417: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').rate_dim_sequence := ' || input.rate_dim_sequence || ';');
4418:
4419: IF (l_dim_unit_code = 'STRING') THEN
4420: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
4421: ELSE
4416: cn_utils.appindcr(body_code, ' l_input := nvl(l_input, 0); ');
4417: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').rate_dim_sequence := ' || input.rate_dim_sequence || ';');
4418:
4419: IF (l_dim_unit_code = 'STRING') THEN
4420: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
4421: ELSE
4422: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
4423: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter ||').amount := l_input;' );
4424: END IF;
4418:
4419: IF (l_dim_unit_code = 'STRING') THEN
4420: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
4421: ELSE
4422: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
4423: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter ||').amount := l_input;' );
4424: END IF;
4425:
4426: IF (input.cumulative_flag = 'N') THEN --IF (g_cumulative_flag = 'N') THEN
4419: IF (l_dim_unit_code = 'STRING') THEN
4420: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_string := l_input_string;' );
4421: ELSE
4422: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').input_amount := l_input;' );
4423: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter ||').amount := l_input;' );
4424: END IF;
4425:
4426: IF (input.cumulative_flag = 'N') THEN --IF (g_cumulative_flag = 'N') THEN
4427: IF (input.split_flag <> 'N') THEN --IF (g_split_flag <> 'N') THEN
4424: END IF;
4425:
4426: IF (input.cumulative_flag = 'N') THEN --IF (g_cumulative_flag = 'N') THEN
4427: IF (input.split_flag <> 'N') THEN --IF (g_split_flag <> 'N') THEN
4428: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;');
4429: ELSE
4430: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := l_input;');
4431: END IF;
4432: ELSE
4426: IF (input.cumulative_flag = 'N') THEN --IF (g_cumulative_flag = 'N') THEN
4427: IF (input.split_flag <> 'N') THEN --IF (g_split_flag <> 'N') THEN
4428: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;');
4429: ELSE
4430: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := l_input;');
4431: END IF;
4432: ELSE
4433: IF g_itd_flag = 'N' THEN
4434: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4432: ELSE
4433: IF g_itd_flag = 'N' THEN
4434: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4435: IF (g_trx_group_code = 'GROUP') THEN
4436: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;');
4437: ELSE
4438: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('
4439: ||input.rate_dim_sequence||');' );
4440: END IF;
4434: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4435: IF (g_trx_group_code = 'GROUP') THEN
4436: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;');
4437: ELSE
4438: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('
4439: ||input.rate_dim_sequence||');' );
4440: END IF;
4441: ELSE
4442: IF (g_trx_group_code = 'GROUP') THEN
4439: ||input.rate_dim_sequence||');' );
4440: END IF;
4441: ELSE
4442: IF (g_trx_group_code = 'GROUP') THEN
4443: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := l_input;');
4444: ELSE
4445: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||
4446: input.rate_dim_sequence||')+ l_input;' );
4447: END IF;
4441: ELSE
4442: IF (g_trx_group_code = 'GROUP') THEN
4443: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := l_input;');
4444: ELSE
4445: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := g_input_achieved_itd('||
4446: input.rate_dim_sequence||')+ l_input;' );
4447: END IF;
4448: END IF;
4449: ELSE
4446: input.rate_dim_sequence||')+ l_input;' );
4447: END IF;
4448: END IF;
4449: ELSE
4450: cn_utils.appendcr(body_code);
4451: IF g_pq_target_flag OR g_spq_target_flag THEN
4452: IF g_pq_target_flag THEN
4453: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
4454: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
4449: ELSE
4450: cn_utils.appendcr(body_code);
4451: IF g_pq_target_flag OR g_spq_target_flag THEN
4452: IF g_pq_target_flag THEN
4453: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
4454: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
4455: END IF;
4456:
4457: IF g_spq_target_flag THEN
4450: cn_utils.appendcr(body_code);
4451: IF g_pq_target_flag OR g_spq_target_flag THEN
4452: IF g_pq_target_flag THEN
4453: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_pq_itd_target ');
4454: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
4455: END IF;
4456:
4457: IF g_spq_target_flag THEN
4458: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
4454: cn_utils.appindcr(body_code, ' ( p_period_id, p_quota_id );' );
4455: END IF;
4456:
4457: IF g_spq_target_flag THEN
4458: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
4459: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
4460: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4455: END IF;
4456:
4457: IF g_spq_target_flag THEN
4458: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
4459: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
4460: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4456:
4457: IF g_spq_target_flag THEN
4458: cn_utils.appindcr(body_code, ' l_itd_target := cn_formula_common_pkg.get_spq_itd_target ');
4459: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
4460: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4459: cn_utils.appindcr(body_code, ' ( p_salesrep_id, p_srp_plan_assign_id, ' );
4460: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4460: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id ); ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4461:
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4469: END IF;
4462: IF (g_rollover_flag = 'Y') THEN
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4469: END IF;
4470: END IF;
4463: cn_utils.appindcr(body_code, ' SELECT l_itd_target + total_rollover ');
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4469: END IF;
4470: END IF;
4471:
4464: cn_utils.appindcr(body_code, ' INTO l_itd_target ');
4465: cn_utils.appindcr(body_code, ' FROM cn_srp_period_quotas_all ');
4466: cn_utils.appindcr(body_code, ' WHERE srp_plan_assign_id = p_srp_plan_assign_id ');
4467: cn_utils.appindcr(body_code, ' AND quota_id = p_quota_id ');
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4469: END IF;
4470: END IF;
4471:
4472: cn_utils.appendcr(body_code);
4468: cn_utils.appindcr(body_code, ' AND period_id = p_period_id; ');
4469: END IF;
4470: END IF;
4471:
4472: cn_utils.appendcr(body_code);
4473:
4474: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4475: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := (l_input + g_input_achieved_itd('
4476: ||input.rate_dim_sequence||')) ');
4471:
4472: cn_utils.appendcr(body_code);
4473:
4474: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4475: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := (l_input + g_input_achieved_itd('
4476: ||input.rate_dim_sequence||')) ');
4477: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4478: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4479: ELSE
4473:
4474: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4475: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := (l_input + g_input_achieved_itd('
4476: ||input.rate_dim_sequence||')) ');
4477: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4478: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4479: ELSE
4480: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
4481: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := (l_input + g_input_achieved_itd('
4474: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4475: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := (l_input + g_input_achieved_itd('
4476: ||input.rate_dim_sequence||')) ');
4477: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4478: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4479: ELSE
4480: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
4481: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := (l_input + g_input_achieved_itd('
4482: ||input.rate_dim_sequence||'))');
4476: ||input.rate_dim_sequence||')) ');
4477: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4478: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4479: ELSE
4480: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
4481: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := (l_input + g_input_achieved_itd('
4482: ||input.rate_dim_sequence||'))');
4483: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4484: END IF;
4477: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4478: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4479: ELSE
4480: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
4481: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := (l_input + g_input_achieved_itd('
4482: ||input.rate_dim_sequence||'))');
4483: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4484: END IF;
4485: ELSE
4479: ELSE
4480: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input / l_itd_target; ');
4481: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := (l_input + g_input_achieved_itd('
4482: ||input.rate_dim_sequence||'))');
4483: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4484: END IF;
4485: ELSE
4486: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4487: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input + g_input_achieved_itd('
4483: cn_utils.appindcr(body_code, ' /l_itd_target;' );
4484: END IF;
4485: ELSE
4486: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4487: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input + g_input_achieved_itd('
4488: ||input.rate_dim_sequence||');' );
4489: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4490: ELSE
4491: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input; ');
4485: ELSE
4486: IF (input.split_flag <> 'N') THEN --IF g_split_flag <> 'N' THEN
4487: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input + g_input_achieved_itd('
4488: ||input.rate_dim_sequence||');' );
4489: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4490: ELSE
4491: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input; ');
4492: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := l_input + g_input_achieved_itd('
4493: ||input.rate_dim_sequence||');' );
4487: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input + g_input_achieved_itd('
4488: ||input.rate_dim_sequence||');' );
4489: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4490: ELSE
4491: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input; ');
4492: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := l_input + g_input_achieved_itd('
4493: ||input.rate_dim_sequence||');' );
4494: END IF;
4495: END IF;
4488: ||input.rate_dim_sequence||');' );
4489: cn_utils.appindcr(body_code, ' l_mul_input_tbl(' || l_counter || ').base_amount := 0;' );
4490: ELSE
4491: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').amount := l_input; ');
4492: cn_utils.appindcr(body_code, ' l_mul_input_tbl('|| l_counter || ').base_amount := l_input + g_input_achieved_itd('
4493: ||input.rate_dim_sequence||');' );
4494: END IF;
4495: END IF;
4496: END IF;
4494: END IF;
4495: END IF;
4496: END IF;
4497: END IF;
4498: cn_utils.appendcr(body_code);
4499: l_counter := l_counter+1;
4500: END LOOP;
4501:
4502: OPEN f_output;
4519: END IF;
4520:
4521: IF g_rate_flag THEN
4522: -- get processed date (end_date of the last period in the forecast date range)
4523: cn_utils.appindcr(body_code, ' SELECT end_date into l_processed_date ');
4524: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v ');
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4520:
4521: IF g_rate_flag THEN
4522: -- get processed date (end_date of the last period in the forecast date range)
4523: cn_utils.appindcr(body_code, ' SELECT end_date into l_processed_date ');
4524: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v ');
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4521: IF g_rate_flag THEN
4522: -- get processed date (end_date of the last period in the forecast date range)
4523: cn_utils.appindcr(body_code, ' SELECT end_date into l_processed_date ');
4524: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v ');
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4522: -- get processed date (end_date of the last period in the forecast date range)
4523: cn_utils.appindcr(body_code, ' SELECT end_date into l_processed_date ');
4524: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v ');
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4530: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
4524: cn_utils.appindcr(body_code, ' FROM cn_acc_period_statuses_v ');
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4530: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
4531: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4532: END IF;
4525: cn_utils.appindcr(body_code, ' WHERE period_id = p_period_id ');
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4530: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
4531: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4532: END IF;
4533:
4526: cn_utils.appindcr(body_code, ' AND org_id = g_org_id; ');
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4530: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
4531: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4532: END IF;
4533:
4534: construct_sql_from_where(l_sql_select, l_sql_from, l_sql_where);
4527:
4528: cn_utils.appindcr(body_code, ' cn_formula_common_pkg.get_rates( p_salesrep_id, p_srp_plan_assign_id,');
4529: cn_utils.appindcr(body_code, ' p_period_id, p_quota_id , g_split_flag,g_itd_flag, ' );
4530: cn_utils.appindcr(body_code, ' l_processed_date, g_number_dim,l_mul_input_tbl, ');
4531: cn_utils.appindcr(body_code, ' g_formula_id, p_rate, l_rate_tier_id, l_tier_split ); ');
4532: END IF;
4533:
4534: construct_sql_from_where(l_sql_select, l_sql_from, l_sql_where);
4535: handle_output_sql_select(l_sql_select, l_sql_from, l_sql_where);
4533:
4534: construct_sql_from_where(l_sql_select, l_sql_from, l_sql_where);
4535: handle_output_sql_select(l_sql_select, l_sql_from, l_sql_where);
4536: split_long_sql(body_code, l_sql_select, 'SELECT');
4537: cn_utils.appindcr(body_code, ' into l_commission');
4538: split_long_sql(body_code, l_sql_from, 'FROM');
4539: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4540: cn_utils.appendcr(body_code);
4541: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
4536: split_long_sql(body_code, l_sql_select, 'SELECT');
4537: cn_utils.appindcr(body_code, ' into l_commission');
4538: split_long_sql(body_code, l_sql_from, 'FROM');
4539: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4540: cn_utils.appendcr(body_code);
4541: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
4542:
4543: IF g_itd_flag = 'Y' THEN
4544: IF (g_pq_payment_flag OR g_spq_payment_flag) THEN
4537: cn_utils.appindcr(body_code, ' into l_commission');
4538: split_long_sql(body_code, l_sql_from, 'FROM');
4539: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4540: cn_utils.appendcr(body_code);
4541: cn_utils.appindcr(body_code, ' l_commission := nvl(l_commission, 0); ');
4542:
4543: IF g_itd_flag = 'Y' THEN
4544: IF (g_pq_payment_flag OR g_spq_payment_flag) THEN
4545: IF (g_rate_flag) THEN
4543: IF g_itd_flag = 'Y' THEN
4544: IF (g_pq_payment_flag OR g_spq_payment_flag) THEN
4545: IF (g_rate_flag) THEN
4546: IF (l_operator_position > 0) THEN
4547: cn_utils.appindcr(body_code, ' l_commission := p_rate ' || l_operator || ' l_commission - g_commission_payed_itd;');
4548: END IF;
4549: ELSE
4550: cn_utils.appindcr(body_code, ' l_commission := l_commission - g_commission_payed_itd;');
4551: END IF;
4546: IF (l_operator_position > 0) THEN
4547: cn_utils.appindcr(body_code, ' l_commission := p_rate ' || l_operator || ' l_commission - g_commission_payed_itd;');
4548: END IF;
4549: ELSE
4550: cn_utils.appindcr(body_code, ' l_commission := l_commission - g_commission_payed_itd;');
4551: END IF;
4552: ELSE
4553: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission;');
4554: IF (g_rate_flag) THEN
4549: ELSE
4550: cn_utils.appindcr(body_code, ' l_commission := l_commission - g_commission_payed_itd;');
4551: END IF;
4552: ELSE
4553: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission;');
4554: IF (g_rate_flag) THEN
4555: IF (l_operator_position > 0) THEN
4556: cn_utils.appindcr(body_code, ' l_commission := p_rate ' || l_operator ||
4557: ' (g_output_achieved_itd + g_output_achieved) - g_commission_payed_itd;');
4552: ELSE
4553: cn_utils.appindcr(body_code, ' g_output_achieved := l_commission;');
4554: IF (g_rate_flag) THEN
4555: IF (l_operator_position > 0) THEN
4556: cn_utils.appindcr(body_code, ' l_commission := p_rate ' || l_operator ||
4557: ' (g_output_achieved_itd + g_output_achieved) - g_commission_payed_itd;');
4558: ELSE
4559: cn_utils.appindcr(body_code, ' l_commission := p_rate - g_commission_payed_itd;');
4560: END IF;
4555: IF (l_operator_position > 0) THEN
4556: cn_utils.appindcr(body_code, ' l_commission := p_rate ' || l_operator ||
4557: ' (g_output_achieved_itd + g_output_achieved) - g_commission_payed_itd;');
4558: ELSE
4559: cn_utils.appindcr(body_code, ' l_commission := p_rate - g_commission_payed_itd;');
4560: END IF;
4561: ELSE
4562: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd + g_output_achieved - g_commission_payed_itd;');
4563: END IF;
4558: ELSE
4559: cn_utils.appindcr(body_code, ' l_commission := p_rate - g_commission_payed_itd;');
4560: END IF;
4561: ELSE
4562: cn_utils.appindcr(body_code, ' l_commission := g_output_achieved_itd + g_output_achieved - g_commission_payed_itd;');
4563: END IF;
4564: END IF;
4565: END IF;
4566:
4563: END IF;
4564: END IF;
4565: END IF;
4566:
4567: cn_utils.appindcr(body_code, ' x_projected_commission := l_commission;' );
4568:
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4565: END IF;
4566:
4567: cn_utils.appindcr(body_code, ' x_projected_commission := l_commission;' );
4568:
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4566:
4567: cn_utils.appindcr(body_code, ' x_projected_commission := l_commission;' );
4568:
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4567: cn_utils.appindcr(body_code, ' x_projected_commission := l_commission;' );
4568:
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4568:
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4569: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4570: cn_utils.appindcr(body_code, ' when others then ');
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4578: cn_utils.proc_end(procedure_name, 'N', body_code );
4571: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4578: cn_utils.proc_end(procedure_name, 'N', body_code );
4579: EXCEPTION
4572: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4578: cn_utils.proc_end(procedure_name, 'N', body_code );
4579: EXCEPTION
4580: WHEN OTHERS THEN
4573: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_forecast_commission.exception'', ');
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4578: cn_utils.proc_end(procedure_name, 'N', body_code );
4579: EXCEPTION
4580: WHEN OTHERS THEN
4581: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4574: cn_utils.appindcr(body_code, ' sqlerrm); ');
4575: cn_utils.appindcr(body_code, ' end if; ');
4576: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_forecast_commission: ''); ');
4577: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4578: cn_utils.proc_end(procedure_name, 'N', body_code );
4579: EXCEPTION
4580: WHEN OTHERS THEN
4581: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4582: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
4670: raise;
4671: END;
4672:
4673: -- construct the get_estimated_payout procdure which will be invoked by SFP quota modeling
4674: PROCEDURE get_estimated_payout(spec_code IN OUT NOCOPY cn_utils.code_type,
4675: body_code IN OUT NOCOPY cn_utils.code_type )
4676: IS
4677: procedure_name cn_obj_procedures_v.name%TYPE;
4678: procedure_desc cn_obj_procedures_v.description%TYPE;
4671: END;
4672:
4673: -- construct the get_estimated_payout procdure which will be invoked by SFP quota modeling
4674: PROCEDURE get_estimated_payout(spec_code IN OUT NOCOPY cn_utils.code_type,
4675: body_code IN OUT NOCOPY cn_utils.code_type )
4676: IS
4677: procedure_name cn_obj_procedures_v.name%TYPE;
4678: procedure_desc cn_obj_procedures_v.description%TYPE;
4679: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
4722: proc_init(procedure_name, procedure_desc, parameter_list,
4723: 'P', null , null, null,
4724: spec_code, body_code);
4725:
4726: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4723: 'P', null , null, null,
4724: spec_code, body_code);
4725:
4726: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4731: cn_utils.appendcr(body_code, ' x_return_status := fnd_api.g_ret_sts_success; ');
4724: spec_code, body_code);
4725:
4726: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4731: cn_utils.appendcr(body_code, ' x_return_status := fnd_api.g_ret_sts_success; ');
4732:
4725:
4726: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4731: cn_utils.appendcr(body_code, ' x_return_status := fnd_api.g_ret_sts_success; ');
4732:
4733: OPEN input;
4726: cn_utils.appindcr(body_code, ' l_rate NUMBER;');
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4731: cn_utils.appendcr(body_code, ' x_return_status := fnd_api.g_ret_sts_success; ');
4732:
4733: OPEN input;
4734: FETCH input INTO l_calc_sql_exp_id;
4727: cn_utils.appindcr(body_code, ' l_rate_tier_id NUMBER;');
4728: cn_utils.appindcr(body_code, ' l_tier_split NUMBER;');
4729: cn_utils.appindcr(body_code, ' l_amount NUMBER; ');
4730: cn_utils.appendcr(body_code, 'BEGIN');
4731: cn_utils.appendcr(body_code, ' x_return_status := fnd_api.g_ret_sts_success; ');
4732:
4733: OPEN input;
4734: FETCH input INTO l_calc_sql_exp_id;
4735: CLOSE input;
4747: l_sql_from := lower('from cn_srp_quota_cates sqc, cn_role_details_v pt, cn_quota_categories qc');
4748:
4749: split_long_sql(body_code, l_sql_select, 'SELECT');
4750:
4751: cn_utils.appindcr(body_code, ' into l_amount ');
4752:
4753: split_long_sql(body_code, l_sql_from, 'FROM');
4754: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4755:
4768: g_rate_flag := check_sql_stmt_existence(l_sql_select, 'rateresult');
4769: l_sql_select := REPLACE(l_sql_select, 'rateresult', 'l_rate');
4770:
4771: IF g_rate_flag THEN
4772: cn_utils.appindcr(body_code, ' cn_sfp_formula_cmn_pkg.get_rates( p_srp_quota_cate_id, ');
4773: cn_utils.appindcr(body_code, ' g_split_flag, ''N'', ' );
4774: cn_utils.appindcr(body_code, ' l_amount, ');
4775: cn_utils.appindcr(body_code, ' l_rate, l_rate_tier_id, l_tier_split ); ');
4776: END IF;
4769: l_sql_select := REPLACE(l_sql_select, 'rateresult', 'l_rate');
4770:
4771: IF g_rate_flag THEN
4772: cn_utils.appindcr(body_code, ' cn_sfp_formula_cmn_pkg.get_rates( p_srp_quota_cate_id, ');
4773: cn_utils.appindcr(body_code, ' g_split_flag, ''N'', ' );
4774: cn_utils.appindcr(body_code, ' l_amount, ');
4775: cn_utils.appindcr(body_code, ' l_rate, l_rate_tier_id, l_tier_split ); ');
4776: END IF;
4777:
4770:
4771: IF g_rate_flag THEN
4772: cn_utils.appindcr(body_code, ' cn_sfp_formula_cmn_pkg.get_rates( p_srp_quota_cate_id, ');
4773: cn_utils.appindcr(body_code, ' g_split_flag, ''N'', ' );
4774: cn_utils.appindcr(body_code, ' l_amount, ');
4775: cn_utils.appindcr(body_code, ' l_rate, l_rate_tier_id, l_tier_split ); ');
4776: END IF;
4777:
4778: split_long_sql(body_code, l_sql_select, 'SELECT');
4771: IF g_rate_flag THEN
4772: cn_utils.appindcr(body_code, ' cn_sfp_formula_cmn_pkg.get_rates( p_srp_quota_cate_id, ');
4773: cn_utils.appindcr(body_code, ' g_split_flag, ''N'', ' );
4774: cn_utils.appindcr(body_code, ' l_amount, ');
4775: cn_utils.appindcr(body_code, ' l_rate, l_rate_tier_id, l_tier_split ); ');
4776: END IF;
4777:
4778: split_long_sql(body_code, l_sql_select, 'SELECT');
4779: cn_utils.appindcr(body_code, ' into x_estimated_payout ');
4775: cn_utils.appindcr(body_code, ' l_rate, l_rate_tier_id, l_tier_split ); ');
4776: END IF;
4777:
4778: split_long_sql(body_code, l_sql_select, 'SELECT');
4779: cn_utils.appindcr(body_code, ' into x_estimated_payout ');
4780: split_long_sql(body_code, l_sql_from, 'FROM');
4781: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4782: cn_utils.appendcr(body_code);
4783:
4778: split_long_sql(body_code, l_sql_select, 'SELECT');
4779: cn_utils.appindcr(body_code, ' into x_estimated_payout ');
4780: split_long_sql(body_code, l_sql_from, 'FROM');
4781: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4782: cn_utils.appendcr(body_code);
4783:
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4780: split_long_sql(body_code, l_sql_from, 'FROM');
4781: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4782: cn_utils.appendcr(body_code);
4783:
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4781: split_long_sql(body_code, l_sql_where || ';', 'WHERE');
4782: cn_utils.appendcr(body_code);
4783:
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4782: cn_utils.appendcr(body_code);
4783:
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4783:
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4784: cn_utils.appindcr(body_code, 'EXCEPTION ' );
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4785: cn_utils.appindcr(body_code, ' when zero_divide then ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4786: cn_utils.appindcr(body_code, ' x_return_status := ''Z''; ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4787: cn_utils.appindcr(body_code, ' when others then ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4788: cn_utils.appindcr(body_code, ' x_return_status := fnd_api.g_ret_sts_error; ');
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4796: cn_utils.proc_end(procedure_name, 'N', body_code );
4789: cn_utils.appindcr(body_code, ' if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then ');
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4796: cn_utils.proc_end(procedure_name, 'N', body_code );
4797: EXCEPTION
4790: cn_utils.appindcr(body_code, ' FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, ');
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4796: cn_utils.proc_end(procedure_name, 'N', body_code );
4797: EXCEPTION
4798: WHEN OTHERS THEN
4791: cn_utils.appindcr(body_code, ' ''cn.plsql.cn_formula_'||g_formula_id||'_pkg.get_estimated_payout.exception'', ');
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4796: cn_utils.proc_end(procedure_name, 'N', body_code );
4797: EXCEPTION
4798: WHEN OTHERS THEN
4799: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4792: cn_utils.appindcr(body_code, ' sqlerrm); ');
4793: cn_utils.appindcr(body_code, ' end if; ');
4794: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(''Exception occurs in get_estimated_payout: ''); ');
4795: cn_utils.appindcr(body_code, ' cn_message_pkg.debug(sqlerrm); ');
4796: cn_utils.proc_end(procedure_name, 'N', body_code );
4797: EXCEPTION
4798: WHEN OTHERS THEN
4799: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4800: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
4811: package_spec_id cn_obj_packages_v.package_id%TYPE;
4812: package_body_id cn_obj_packages_v.package_id%TYPE;
4813: package_spec_desc cn_obj_packages_v.description%TYPE;
4814: package_body_desc cn_obj_packages_v.description%TYPE;
4815: spec_code cn_utils.code_type;
4816: body_code cn_utils.code_type;
4817: dummy NUMBER(7);
4818: l_module_id number(15);
4819: l_repository_id cn_repositories.repository_id%TYPE;
4812: package_body_id cn_obj_packages_v.package_id%TYPE;
4813: package_spec_desc cn_obj_packages_v.description%TYPE;
4814: package_body_desc cn_obj_packages_v.description%TYPE;
4815: spec_code cn_utils.code_type;
4816: body_code cn_utils.code_type;
4817: dummy NUMBER(7);
4818: l_module_id number(15);
4819: l_repository_id cn_repositories.repository_id%TYPE;
4820: BEGIN
4823: 'cn.plsql.cn_formula_gen_pkg.create_formula.begin',
4824: 'Beginning of create_formula procedure ...');
4825: end if;
4826:
4827: cn_utils.set_org_id(g_org_id);
4828:
4829: SELECT repository_id
4830: INTO l_repository_id
4831: FROM cn_repositories_all
4858: end if;
4859:
4860: cn_message_pkg.debug( 'after generate_init ');
4861:
4862: cn_utils.pkg_init(l_module_id, package_name, null, package_type, 'FORMULA',
4863: package_spec_id, package_body_id, package_spec_desc,
4864: package_body_desc, spec_code, body_code);
4865:
4866: pkg_variables(spec_code, body_code);
4941: END IF;
4942:
4943: get_estimated_payout(spec_code, body_code);
4944:
4945: cn_utils.pkg_end(package_name, spec_code, body_code);
4946:
4947: cn_utils.unset_org_id;
4948: RETURN TRUE;
4949:
4943: get_estimated_payout(spec_code, body_code);
4944:
4945: cn_utils.pkg_end(package_name, spec_code, body_code);
4946:
4947: cn_utils.unset_org_id;
4948: RETURN TRUE;
4949:
4950: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4951: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
4953: 'End of create_formula');
4954: end if;
4955: EXCEPTION
4956: when others then
4957: cn_utils.unset_org_id;
4958: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4959: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
4960: 'cn.plsql.cn_formula_gen_pkg.parse.exception',
4961: sqlerrm);