20: -- bug 5183769 : BEGIN
21: -- following types/variable are added to cache Exception Definitions
22:
23: TYPE Exception_Def_Rec_Typ IS RECORD(
24: DEFAULT_SEVERITY WSH_EXCEPTION_DEFINITIONS_VL.DEFAULT_SEVERITY%TYPE,
25: EXCEPTION_HANDLING WSH_EXCEPTION_DEFINITIONS_VL.EXCEPTION_HANDLING%TYPE,
26: INITIATE_WORKFLOW WSH_EXCEPTION_DEFINITIONS_VL.INITIATE_WORKFLOW%TYPE,
27: ENABLED WSH_EXCEPTION_DEFINITIONS_VL.ENABLED%TYPE
28: );
21: -- following types/variable are added to cache Exception Definitions
22:
23: TYPE Exception_Def_Rec_Typ IS RECORD(
24: DEFAULT_SEVERITY WSH_EXCEPTION_DEFINITIONS_VL.DEFAULT_SEVERITY%TYPE,
25: EXCEPTION_HANDLING WSH_EXCEPTION_DEFINITIONS_VL.EXCEPTION_HANDLING%TYPE,
26: INITIATE_WORKFLOW WSH_EXCEPTION_DEFINITIONS_VL.INITIATE_WORKFLOW%TYPE,
27: ENABLED WSH_EXCEPTION_DEFINITIONS_VL.ENABLED%TYPE
28: );
29:
22:
23: TYPE Exception_Def_Rec_Typ IS RECORD(
24: DEFAULT_SEVERITY WSH_EXCEPTION_DEFINITIONS_VL.DEFAULT_SEVERITY%TYPE,
25: EXCEPTION_HANDLING WSH_EXCEPTION_DEFINITIONS_VL.EXCEPTION_HANDLING%TYPE,
26: INITIATE_WORKFLOW WSH_EXCEPTION_DEFINITIONS_VL.INITIATE_WORKFLOW%TYPE,
27: ENABLED WSH_EXCEPTION_DEFINITIONS_VL.ENABLED%TYPE
28: );
29:
30: TYPE Exception_Def_Tab_Typ IS TABLE OF Exception_Def_Rec_Typ INDEX BY VARCHAR2(30);
23: TYPE Exception_Def_Rec_Typ IS RECORD(
24: DEFAULT_SEVERITY WSH_EXCEPTION_DEFINITIONS_VL.DEFAULT_SEVERITY%TYPE,
25: EXCEPTION_HANDLING WSH_EXCEPTION_DEFINITIONS_VL.EXCEPTION_HANDLING%TYPE,
26: INITIATE_WORKFLOW WSH_EXCEPTION_DEFINITIONS_VL.INITIATE_WORKFLOW%TYPE,
27: ENABLED WSH_EXCEPTION_DEFINITIONS_VL.ENABLED%TYPE
28: );
29:
30: TYPE Exception_Def_Tab_Typ IS TABLE OF Exception_Def_Rec_Typ INDEX BY VARCHAR2(30);
31:
55: SELECT UPPER(default_severity),
56: UPPER(exception_handling),
57: UPPER(initiate_workflow),
58: enabled
59: FROM wsh_exception_definitions_vl
60: WHERE exception_name = c_exception_name;
61:
62: l_debug_on BOOLEAN;
63: l_msg_data VARCHAR(2000);
1746:
1747: CURSOR C2(c_exception_id NUMBER) IS
1748: SELECT UPPER(default_severity), UPPER(exception_handling),
1749: UPPER(initiate_workflow)
1750: FROM wsh_exception_definitions_vl
1751: WHERE exception_name = (
1752: SELECT exception_name
1753: FROM wsh_exceptions
1754: WHERE exception_id = c_exception_id);
1872: l_new_status := 'NO_ACTION_REQUIRED';
1873: END IF;
1874:
1875: ELSE
1876: -- exception name not found in wsh_exception_definitions_vl
1877: CLOSE C2;
1878: RAISE WSH_XC_DATA_ERROR;
1879: END IF;
1880:
2162: ) is
2163:
2164: cursor C1 (c_exception_name VARCHAR2) is
2165: select exception_name
2166: from wsh_exception_definitions_vl
2167: where exception_name = c_exception_name;
2168:
2169: cursor C2 (c_exception_definition_id NUMBER) is
2170: select ROWID from WSH_EXCEPTION_DEFINITIONS_B