PACKAGE BODY: APPS.CZ_MANAGER

Source

1 package body CZ_MANAGER as
2 /*  $Header: czmangrb.pls 115.12 2002/11/27 17:05:25 askhacha ship $	*/
3 
4 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
5 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
6 
7 procedure ASSESS_DATA is
8 begin
9 CZ_XF_MGR.ASSESS_DATA;
10 CZ_IM_MGR.ASSESS_DATA;
11 CZ_PR_MGR.ASSESS_DATA;
12 CZ_PS_MGR.ASSESS_DATA;
13 CZ_QC_MGR.ASSESS_DATA;
14 CZ_OM_MGR.ASSESS_DATA;
15 CZ_LC_MGR.ASSESS_DATA;
16 CZ_GN_MGR.ASSESS_DATA;
17 CZ_UI_MGR.ASSESS_DATA;
18 CZ_PUB_MGR.ASSESS_DATA;
19 end;
20 
21 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
22 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
23 
24 procedure REDO_STATISTICS is
25 begin
26 CZ_PS_MGR.REDO_STATISTICS;
27 CZ_GN_MGR.REDO_STATISTICS;
28 CZ_PR_MGR.REDO_STATISTICS;
29 CZ_XF_MGR.REDO_STATISTICS;
30 CZ_IM_MGR.REDO_STATISTICS;
31 CZ_LC_MGR.REDO_STATISTICS;
32 CZ_UI_MGR.REDO_STATISTICS;
33 CZ_OM_MGR.REDO_STATISTICS;
34 CZ_QC_MGR.REDO_STATISTICS;
35 CZ_PUB_MGR.REDO_STATISTICS;
36 end;
37 
38 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
39 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
40 
41 procedure Triggers_Enabled
42 (Switch in varchar2) is
43 begin
44 CZ_PS_MGR.Triggers_Enabled(Switch);
45 CZ_GN_MGR.Triggers_Enabled(Switch);
46 CZ_PR_MGR.Triggers_Enabled(Switch);
47 CZ_XF_MGR.Triggers_Enabled(Switch);
48 CZ_IM_MGR.Triggers_Enabled(Switch);
49 CZ_LC_MGR.Triggers_Enabled(Switch);
50 CZ_UI_MGR.Triggers_Enabled(Switch);
51 CZ_OM_MGR.Triggers_Enabled(Switch);
52 CZ_QC_MGR.Triggers_Enabled(Switch);
53 CZ_PUB_MGR.Triggers_Enabled(Switch);
54 end;
55 
56 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
57 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
58 
59 procedure CONSTRAINTS_ENABLED
60 (Switch in varchar2) is
61 begin
62 CZ_PS_MGR.Constraints_Enabled(Switch);
63 CZ_GN_MGR.Constraints_Enabled(Switch);
64 CZ_PR_MGR.Constraints_Enabled(Switch);
65 CZ_XF_MGR.Constraints_Enabled(Switch);
66 CZ_IM_MGR.Constraints_Enabled(Switch);
67 CZ_LC_MGR.Constraints_Enabled(Switch);
68 CZ_UI_MGR.Constraints_Enabled(Switch);
69 CZ_OM_MGR.Constraints_Enabled(Switch);
70 CZ_QC_MGR.Constraints_Enabled(Switch);
71 CZ_PUB_MGR.Constraints_Enabled(Switch);
72 end;
73 
74 
75 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
76 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
77 
78 procedure REDO_SEQUENCES
79 (RedoStart_Flag in varchar2,
80  incr           in integer default null) is
81 begin
82 CZ_UI_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
83 CZ_GN_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
84 CZ_IM_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
85 CZ_LC_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
86 CZ_XF_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
87 CZ_QC_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
88 CZ_PS_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
89 CZ_PR_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
90 CZ_OM_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
91 CZ_PUB_MGR.REDO_SEQUENCES(RedoStart_Flag,incr);
92 end;
93 
94 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
95 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
96 
97 procedure PURGE is
98 begin
99 CZ_PUB_MGR.PURGE;
100 CZ_UI_MGR.PURGE;
101 CZ_PS_MGR.PURGE;
102 CZ_IM_MGR.PURGE;
103 CZ_LC_MGR.PURGE;
104 CZ_PR_MGR.PURGE;
105 CZ_OM_MGR.PURGE;
106 CZ_QC_MGR.PURGE;
107 CZ_XF_MGR.PURGE;
108 CZ_GN_MGR.PURGE;
109 CZ_PS_MGR.PURGE;
110 end;
111 
112 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
113 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
114 
115 PROCEDURE purge_cp(Errbuf IN OUT NOCOPY VARCHAR2,
116 		   Retcode IN OUT NOCOPY pls_integer) IS
117 BEGIN
118    retcode := 0;
119    purge;
120 EXCEPTION
121    WHEN OTHERS THEN
122       retcode := 2;
123       errbuf := cz_utils.get_text('CZ_PURGE_FATAL_ERR', 'SQLERRM',Sqlerrm);
124 END purge_cp;
125 
126 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
127 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
128 
129 procedure RESET_CLEAR is
130 begin
131 CZ_IM_MGR.RESET_CLEAR;
132 CZ_PS_MGR.RESET_CLEAR;
133 CZ_UI_MGR.RESET_CLEAR;
134 CZ_LC_MGR.RESET_CLEAR;
135 CZ_PR_MGR.RESET_CLEAR;
136 CZ_OM_MGR.RESET_CLEAR;
137 CZ_QC_MGR.RESET_CLEAR;
138 CZ_XF_MGR.RESET_CLEAR;
139 CZ_GN_MGR.RESET_CLEAR;
140 CZ_PUB_MGR.RESET_CLEAR;
141 end;
142 
143 /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
144 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
145 
146 end;