681:
682: END package_header;
683:
684: PROCEDURE proc_init (
685: procedure_name cn_obj_procedures_v.name%TYPE,
686: description cn_obj_procedures_v.description%TYPE,
687: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
688: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
689: return_type cn_obj_procedures_v.return_type%TYPE,
682: END package_header;
683:
684: PROCEDURE proc_init (
685: procedure_name cn_obj_procedures_v.name%TYPE,
686: description cn_obj_procedures_v.description%TYPE,
687: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
688: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
689: return_type cn_obj_procedures_v.return_type%TYPE,
690: code IN OUT NOCOPY cn_utils.clob_code_type,
683:
684: PROCEDURE proc_init (
685: procedure_name cn_obj_procedures_v.name%TYPE,
686: description cn_obj_procedures_v.description%TYPE,
687: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
688: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
689: return_type cn_obj_procedures_v.return_type%TYPE,
690: code IN OUT NOCOPY cn_utils.clob_code_type,
691: object_type varchar2) IS
684: PROCEDURE proc_init (
685: procedure_name cn_obj_procedures_v.name%TYPE,
686: description cn_obj_procedures_v.description%TYPE,
687: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
688: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
689: return_type cn_obj_procedures_v.return_type%TYPE,
690: code IN OUT NOCOPY cn_utils.clob_code_type,
691: object_type varchar2) IS
692:
685: procedure_name cn_obj_procedures_v.name%TYPE,
686: description cn_obj_procedures_v.description%TYPE,
687: parameter_list cn_obj_procedures_v.parameter_list%TYPE,
688: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
689: return_type cn_obj_procedures_v.return_type%TYPE,
690: code IN OUT NOCOPY cn_utils.clob_code_type,
691: object_type varchar2) IS
692:
693: X_rowid ROWID;
810: --Add the Classify function spec in the Ruleset package
811: PROCEDURE add_classify_spec (
812: code IN OUT NOCOPY cn_utils.clob_code_type) IS
813:
814: procedure_name cn_obj_procedures_v.name%TYPE;
815: procedure_desc cn_obj_procedures_v.description%TYPE;
816: parameter_list varchar2(10000);
817:
818:
811: PROCEDURE add_classify_spec (
812: code IN OUT NOCOPY cn_utils.clob_code_type) IS
813:
814: procedure_name cn_obj_procedures_v.name%TYPE;
815: procedure_desc cn_obj_procedures_v.description%TYPE;
816: parameter_list varchar2(10000);
817:
818:
819: BEGIN
1012: --Add the Classify function body in the Ruleset package
1013: PROCEDURE add_classify_body (
1014: code IN OUT NOCOPY cn_utils.clob_code_type) IS
1015:
1016: procedure_name cn_obj_procedures_v.name%TYPE;
1017: procedure_desc cn_obj_procedures_v.description%TYPE;
1018:
1019:
1020: BEGIN
1013: PROCEDURE add_classify_body (
1014: code IN OUT NOCOPY cn_utils.clob_code_type) IS
1015:
1016: procedure_name cn_obj_procedures_v.name%TYPE;
1017: procedure_desc cn_obj_procedures_v.description%TYPE;
1018:
1019:
1020: BEGIN
1021:
1403: X_revenue_class NUMBER;
1404: X_expense_ccid number;
1405: x_liability_ccid number;
1406:
1407: procedure_name cn_obj_procedures_v.name%TYPE;
1408: procedure_desc cn_obj_procedures_v.description%TYPE;
1409: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1410:
1411: dummy NUMBER(7);
1404: X_expense_ccid number;
1405: x_liability_ccid number;
1406:
1407: procedure_name cn_obj_procedures_v.name%TYPE;
1408: procedure_desc cn_obj_procedures_v.description%TYPE;
1409: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1410:
1411: dummy NUMBER(7);
1412:
1405: x_liability_ccid number;
1406:
1407: procedure_name cn_obj_procedures_v.name%TYPE;
1408: procedure_desc cn_obj_procedures_v.description%TYPE;
1409: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1410:
1411: dummy NUMBER(7);
1412:
1413: CURSOR rules IS
1522:
1523: first_flag VARCHAR2(1);
1524: X_revenue_class NUMBER;
1525:
1526: procedure_name cn_obj_procedures_v.name%TYPE;
1527: procedure_desc cn_obj_procedures_v.description%TYPE;
1528: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1529:
1530: dummy NUMBER(7);
1523: first_flag VARCHAR2(1);
1524: X_revenue_class NUMBER;
1525:
1526: procedure_name cn_obj_procedures_v.name%TYPE;
1527: procedure_desc cn_obj_procedures_v.description%TYPE;
1528: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1529:
1530: dummy NUMBER(7);
1531:
1524: X_revenue_class NUMBER;
1525:
1526: procedure_name cn_obj_procedures_v.name%TYPE;
1527: procedure_desc cn_obj_procedures_v.description%TYPE;
1528: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1529:
1530: dummy NUMBER(7);
1531:
1532: CURSOR rules IS
1641: x_rule_count NUMBER(7);
1642:
1643: package_max NUMBER(7);
1644:
1645: -- procedure_id cn_obj_procedures_v.procedure_id%TYPE; --AE 01-15-96
1646:
1647: procedure_name cn_obj_procedures_v.name%TYPE;
1648: procedure_desc cn_obj_procedures_v.description%TYPE;
1649: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1643: package_max NUMBER(7);
1644:
1645: -- procedure_id cn_obj_procedures_v.procedure_id%TYPE; --AE 01-15-96
1646:
1647: procedure_name cn_obj_procedures_v.name%TYPE;
1648: procedure_desc cn_obj_procedures_v.description%TYPE;
1649: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1650:
1651: spec_code cn_utils.clob_code_type;
1644:
1645: -- procedure_id cn_obj_procedures_v.procedure_id%TYPE; --AE 01-15-96
1646:
1647: procedure_name cn_obj_procedures_v.name%TYPE;
1648: procedure_desc cn_obj_procedures_v.description%TYPE;
1649: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1650:
1651: spec_code cn_utils.clob_code_type;
1652: body_code cn_utils.clob_code_type;
1645: -- procedure_id cn_obj_procedures_v.procedure_id%TYPE; --AE 01-15-96
1646:
1647: procedure_name cn_obj_procedures_v.name%TYPE;
1648: procedure_desc cn_obj_procedures_v.description%TYPE;
1649: parameter_list cn_obj_procedures_v.parameter_list%TYPE;
1650:
1651: spec_code cn_utils.clob_code_type;
1652: body_code cn_utils.clob_code_type;
1653: first_flag VARCHAR2(1);