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);
609: BEGIN
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);
609: BEGIN
610: SELECT user INTO X_userid FROM sys.dual;
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,
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
626: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
627: return_type cn_obj_procedures_v.return_type%TYPE,
620: END proc_init_boilerplate;
621:
622: -- initialize the procedure
623: PROCEDURE proc_init(procedure_name cn_obj_procedures_v.name%TYPE,
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%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,
621:
622: -- initialize the procedure
623: PROCEDURE proc_init(procedure_name cn_obj_procedures_v.name%TYPE,
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%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,
622: -- initialize the procedure
623: PROCEDURE proc_init(procedure_name cn_obj_procedures_v.name%TYPE,
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%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,
623: PROCEDURE proc_init(procedure_name cn_obj_procedures_v.name%TYPE,
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%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
624: description cn_obj_procedures_v.description%TYPE,
625: parameter_list cn_obj_procedures_v.parameter_list%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
625: parameter_list cn_obj_procedures_v.parameter_list%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
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;
1617: package_spec_id cn_obj_packages_v.package_id%TYPE;
1618: x_repository_id cn_repositories.repository_id%TYPE;
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;
1617: package_spec_id cn_obj_packages_v.package_id%TYPE;
1618: x_repository_id cn_repositories.repository_id%TYPE;
1619:
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;
1617: package_spec_id cn_obj_packages_v.package_id%TYPE;
1618: x_repository_id cn_repositories.repository_id%TYPE;
1619:
1620: l_input_sql_select varchar2(8000);
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;
1984: package_spec_id cn_obj_packages_v.package_id%TYPE;
1985: x_repository_id cn_repositories.repository_id%TYPE;
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;
1984: package_spec_id cn_obj_packages_v.package_id%TYPE;
1985: x_repository_id cn_repositories.repository_id%TYPE;
1986:
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;
1984: package_spec_id cn_obj_packages_v.package_id%TYPE;
1985: x_repository_id cn_repositories.repository_id%TYPE;
1986:
1987: l_output_sql_select varchar2(8000);
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;
2227: package_spec_id cn_obj_packages_v.package_id%TYPE;
2228: x_repository_id cn_repositories.repository_id%TYPE;
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;
2227: package_spec_id cn_obj_packages_v.package_id%TYPE;
2228: x_repository_id cn_repositories.repository_id%TYPE;
2229:
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;
2227: package_spec_id cn_obj_packages_v.package_id%TYPE;
2228: x_repository_id cn_repositories.repository_id%TYPE;
2229:
2230: l_perf_sql_select varchar2(8000);
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;
2673: package_spec_id cn_obj_packages_v.package_id%TYPE;
2674: x_repository_id cn_repositories.repository_id%TYPE;
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;
2673: package_spec_id cn_obj_packages_v.package_id%TYPE;
2674: x_repository_id cn_repositories.repository_id%TYPE;
2675:
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;
2673: package_spec_id cn_obj_packages_v.package_id%TYPE;
2674: x_repository_id cn_repositories.repository_id%TYPE;
2675:
2676: l_rate_dim_sequence NUMBER;
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;
3514: package_spec_id cn_obj_packages_v.package_id%TYPE;
3515: x_repository_id cn_repositories.repository_id%TYPE;
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;
3514: package_spec_id cn_obj_packages_v.package_id%TYPE;
3515: x_repository_id cn_repositories.repository_id%TYPE;
3516:
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;
3514: package_spec_id cn_obj_packages_v.package_id%TYPE;
3515: x_repository_id cn_repositories.repository_id%TYPE;
3516:
3517: l_counter NUMBER(15);
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;
3679: package_spec_id cn_obj_packages_v.package_id%TYPE;
3680: x_repository_id cn_repositories.repository_id%TYPE;
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;
3679: package_spec_id cn_obj_packages_v.package_id%TYPE;
3680: x_repository_id cn_repositories.repository_id%TYPE;
3681:
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;
3679: package_spec_id cn_obj_packages_v.package_id%TYPE;
3680: x_repository_id cn_repositories.repository_id%TYPE;
3681:
3682: l_input_sql_select varchar2(8000);
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;
3824: package_spec_id cn_obj_packages_v.package_id%TYPE;
3825: x_repository_id cn_repositories.repository_id%TYPE;
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;
3824: package_spec_id cn_obj_packages_v.package_id%TYPE;
3825: x_repository_id cn_repositories.repository_id%TYPE;
3826:
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;
3824: package_spec_id cn_obj_packages_v.package_id%TYPE;
3825: x_repository_id cn_repositories.repository_id%TYPE;
3826:
3827: l_input_sql_select VARCHAR2(8000);
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;
4287:
4288: l_rate_dim_sequence NUMBER;
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;
4287:
4288: l_rate_dim_sequence NUMBER;
4289: l_sql_select VARCHAR2(8000);
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;
4287:
4288: l_rate_dim_sequence NUMBER;
4289: l_sql_select VARCHAR2(8000);
4290: l_sql_from VARCHAR2(4000);
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;
4680:
4681: l_sql_select VARCHAR2(8000);
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;
4680:
4681: l_sql_select VARCHAR2(8000);
4682: l_piped_sql_select VARCHAR2(8000);
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;
4680:
4681: l_sql_select VARCHAR2(8000);
4682: l_piped_sql_select VARCHAR2(8000);
4683: l_sql_from VARCHAR2(4000);