[Home] [Help]
PACKAGE BODY: APPS.CSL_SETUP_HOOKS
Source
1 PACKAGE BODY CSL_SETUP_HOOKS AS
2 /* $Header: cslsthkb.pls 115.5 2002/11/14 13:58:24 asiegers ship $ */
3
4 ------------------------------------------------------------
5 -- procedure to initialize test datastructures
6 -- executeds prior to test run (not currently being called)
7 ------------------------------------------------------------
8 PROCEDURE init
9 IS
10 BEGIN
11 NULL;
12 END init;
13
14 ------------------------------------------------------------
15 -- procedure to cleanup any test datastructures that were setup in the init
16 -- procedure call executes after test run (not currently being called)
17 ------------------------------------------------------------
18 PROCEDURE cleanup
19 IS
20 BEGIN
21 NULL;
22 END cleanup ;
23
24
25 ------------------------------------------------------------
26 -- procedure to execute the PLSQL test
27 -- the inputs needed for the test are passed in and a report object and CLOB are -- returned.
28 ------------------------------------------------------------
29 PROCEDURE runtest(inputs IN JTF_DIAG_INPUTTBL,
30 report OUT NOCOPY JTF_DIAG_REPORT,
31 reportClob OUT NOCOPY CLOB)
32 IS
33 reportStr LONG;
34 statusStr VARCHAR2(50); -- SUCCESS or FAILURE
35 errStr VARCHAR2(4000);
36 fixInfo VARCHAR2(4000);
37 isFatal VARCHAR2(50); -- TRUE or FALSE
38 hookExists VARCHAR2(1) ;
39
40 TYPE hookRec IS RECORD (packageName varchar2 (50),
41 apiName varchar2(50),
42 hookType varchar2(1),
43 processingType varchar2(1)) ;
44
45 TYPE hookTab IS TABLE OF hookRec INDEX BY BINARY_INTEGER;
46 hookTable hookTab ;
47
48
49 CURSOR c_hook( b_package_name VARCHAR2,
50 b_api_name VARCHAR2,
51 b_hook_type VARCHAR2,
52 b_process_type VARCHAR2 ) IS
53 SELECT EXECUTE_FLAG
54 , HOOK_PACKAGE
55 , HOOK_API
56 FROM JTF_HOOKS_DATA
57 WHERE PRODUCT_CODE = 'CSL'
58 AND PACKAGE_NAME = b_package_name
59 AND API_NAME = b_api_name
60 AND HOOK_TYPE = b_hook_type
61 AND PROCESSING_TYPE = b_process_type
62 AND EXECUTE_FLAG = 'Y';
63 r_hook c_hook%ROWTYPE;
64
65 BEGIN
66 JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars(reportClob);
67
68 hookTable(1).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
69 hookTable(1).apiName := 'DELETE_ROW' ;
70 hookTable(1).hookType := 'I' ;
71 hookTable(1).processingType := 'B' ;
72
73 hookTable(2).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
74 hookTable(2).apiName := 'DELETE_ROW' ;
75 hookTable(2).hookType := 'I' ;
76 hookTable(2).processingType := 'A' ;
77
78 hookTable(3).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
79 hookTable(3).apiName := 'INSERT_ROW' ;
80 hookTable(3).hookType := 'I' ;
81 hookTable(3).processingType := 'B' ;
82
83 hookTable(4).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
84 hookTable(4).apiName := 'INSERT_ROW' ;
85 hookTable(4).hookType := 'I' ;
86 hookTable(4).processingType := 'A' ;
87
88 hookTable(5).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
89 hookTable(5).apiName := 'UPDATE_ROW' ;
90 hookTable(5).hookType := 'I' ;
91 hookTable(5).processingType := 'B' ;
92
93 hookTable(6).packageName := 'CSF_DEBRIEF_LINES_IUHK' ;
94 hookTable(6).apiName := 'UPDATE_ROW' ;
95 hookTable(6).hookType := 'I' ;
96 hookTable(6).processingType := 'A' ;
97
98 hookTable(7).packageName := 'CSP_INV_LOC_ASSIGNMENTS_IUHK' ;
99 hookTable(7).apiName := 'DELETE_ROW' ;
100 hookTable(7).hookType := 'I' ;
101 hookTable(7).processingType := 'B' ;
102
103 hookTable(8).packageName := 'CSP_INV_LOC_ASSIGNMENTS_IUHK' ;
104 hookTable(8).apiName := 'INSERT_ROW' ;
105 hookTable(8).hookType := 'I' ;
106 hookTable(8).processingType := 'A' ;
107
108 hookTable(9).packageName := 'CSP_INV_LOC_ASSIGNMENTS_IUHK' ;
109 hookTable(9).apiName := 'UPDATE_ROW' ;
110 hookTable(9).hookType := 'I' ;
111 hookTable(9).processingType := 'B' ;
112
113 hookTable(10).packageName := 'CSP_INV_LOC_ASSIGNMENTS_IUHK' ;
114 hookTable(10).apiName := 'UPDATE_ROW' ;
115 hookTable(10).hookType := 'I' ;
116 hookTable(10).processingType := 'A' ;
117
118 hookTable(11).packageName := 'CSP_REQUIREMENT_HEADERS_PKG' ;
119 hookTable(11).apiName := 'INSERT_ROW' ;
120 hookTable(11).hookType := 'I' ;
121 hookTable(11).processingType := 'A' ;
122
123 hookTable(12).packageName := 'CSP_REQUIREMENT_HEADERS_PKG' ;
124 hookTable(12).apiName := 'UPDATE_ROW' ;
125 hookTable(12).hookType := 'I' ;
126 hookTable(12).processingType := 'A' ;
127
128 hookTable(13).packageName := 'CSP_REQUIREMENT_LINES_PKG' ;
129 hookTable(13).apiName := 'INSERT_ROW' ;
130 hookTable(13).hookType := 'I' ;
131 hookTable(13).processingType := 'A' ;
132
133 hookTable(14).packageName := 'CSP_REQUIREMENT_LINES_PKG' ;
134 hookTable(14).apiName := 'UPDATE_ROW' ;
135 hookTable(14).hookType := 'I' ;
136 hookTable(14).processingType := 'A' ;
137
138 hookTable(15).packageName := 'CSP_SHIP_TO_ADDRESS_PVT' ;
139 hookTable(15).apiName := 'SHIP_TO_ADDRESS_HANDLER' ;
140 hookTable(15).hookType := 'I' ;
141 hookTable(15).processingType := 'A' ;
142
143 hookTable(16).packageName := 'CSP_SHIP_TO_ADDRESS_PVT' ;
144 hookTable(16).apiName := 'UPDATE_LOCATION' ;
145 hookTable(16).hookType := 'I' ;
146 hookTable(16).processingType := 'A' ;
147
148 hookTable(17).packageName := 'CS_ServiceRequest_PVT' ;
149 hookTable(17).apiName := 'Create_ServiceRequest' ;
150 hookTable(17).hookType := 'I' ;
151 hookTable(17).processingType := 'B' ;
152
153 hookTable(18).packageName := 'CS_ServiceRequest_PVT' ;
154 hookTable(18).apiName := 'Create_ServiceRequest' ;
155 hookTable(18).hookType := 'I' ;
156 hookTable(18).processingType := 'A' ;
157
158 hookTable(19).packageName := 'CS_ServiceRequest_PVT' ;
159 hookTable(19).apiName := 'Update_ServiceRequest' ;
160 hookTable(19).hookType := 'I' ;
161 hookTable(19).processingType := 'B' ;
162
163 hookTable(20).packageName := 'CS_ServiceRequest_PVT' ;
164 hookTable(20).apiName := 'Update_ServiceRequest' ;
165 hookTable(20).hookType := 'I' ;
166 hookTable(20).processingType := 'A' ;
167
168 hookTable(21).packageName := 'JTF_TASKS_PUB' ;
169 hookTable(21).apiName := 'CREATE_TASK' ;
170 hookTable(21).hookType := 'I' ;
171 hookTable(21).processingType := 'B' ;
172
173 hookTable(22).packageName := 'JTF_TASKS_PUB' ;
174 hookTable(22).apiName := 'CREATE_TASK' ;
175 hookTable(22).hookType := 'I' ;
176 hookTable(22).processingType := 'A' ;
177
178 hookTable(23).packageName := 'JTF_TASKS_PUB' ;
179 hookTable(23).apiName := 'DELETE_TASK' ;
180 hookTable(23).hookType := 'I' ;
181 hookTable(23).processingType := 'B' ;
182
183 hookTable(24).packageName := 'JTF_TASKS_PUB' ;
184 hookTable(24).apiName := 'DELETE_TASK' ;
185 hookTable(24).hookType := 'I' ;
186 hookTable(24).processingType := 'A' ;
187
188 hookTable(25).packageName := 'JTF_TASKS_PUB' ;
189 hookTable(25).apiName := 'UPDATE_TASK' ;
190 hookTable(25).hookType := 'I' ;
191 hookTable(25).processingType := 'B' ;
192
193 hookTable(26).packageName := 'JTF_TASKS_PUB' ;
194 hookTable(26).apiName := 'UPDATE_TASK' ;
195 hookTable(26).hookType := 'I' ;
196 hookTable(26).processingType := 'A' ;
197
198 hookTable(27).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
199 hookTable(27).apiName := 'CREATE_TASK_ASSIGNMENT' ;
200 hookTable(27).hookType := 'I' ;
201 hookTable(27).processingType := 'B' ;
202
203 hookTable(28).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
204 hookTable(28).apiName := 'CREATE_TASK_ASSIGNMENT' ;
205 hookTable(28).hookType := 'I' ;
206 hookTable(28).processingType := 'A' ;
207
208 hookTable(29).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
209 hookTable(29).apiName := 'DELETE_TASK_ASSIGNMENT' ;
210 hookTable(29).hookType := 'I' ;
211 hookTable(29).processingType := 'B' ;
212
213 hookTable(30).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
214 hookTable(30).apiName := 'DELETE_TASK_ASSIGNMENT' ;
215 hookTable(30).hookType := 'I' ;
216 hookTable(30).processingType := 'A' ;
217
218 hookTable(31).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
219 hookTable(31).apiName := 'UPDATE_TASK_ASSIGNMENT' ;
220 hookTable(31).hookType := 'I' ;
221 hookTable(31).processingType := 'B' ;
222
223 hookTable(32).packageName := 'JTF_TASK_ASSIGNMENTS_PUB' ;
224 hookTable(32).apiName := 'UPDATE_TASK_ASSIGNMENT' ;
225 hookTable(32).hookType := 'I' ;
226 hookTable(32).processingType := 'A' ;
227
228 hookTable(33).packageName := 'JTM_COUNTERS_PUB' ;
229 hookTable(33).apiName := 'CREATE_COUNTER' ;
230 hookTable(33).hookType := 'V' ;
231 hookTable(33).processingType := 'A' ;
232
233 hookTable(34).packageName := 'JTM_COUNTERS_PUB' ;
234 hookTable(34).apiName := 'CREATE_CTR_GRP_INSTANCE' ;
235 hookTable(34).hookType := 'V' ;
236 hookTable(34).processingType := 'A' ;
237
238 hookTable(35).packageName := 'JTM_COUNTERS_PUB' ;
239 hookTable(35).apiName := 'CREATE_CTR_PROP' ;
240 hookTable(35).hookType := 'V' ;
241 hookTable(35).processingType := 'A' ;
242
243 hookTable(36).packageName := 'JTM_COUNTERS_PUB' ;
244 hookTable(36).apiName := 'DELETE_COUNTER' ;
245 hookTable(36).hookType := 'V' ;
246 hookTable(36).processingType := 'B' ;
247
248 hookTable(37).packageName := 'JTM_COUNTERS_PUB' ;
249 hookTable(37).apiName := 'DELETE_CTR_PROP' ;
250 hookTable(37).hookType := 'V' ;
251 hookTable(37).processingType := 'B' ;
252
253 hookTable(38).packageName := 'JTM_COUNTERS_PUB' ;
254 hookTable(38).apiName := 'UPDATE_COUNTER' ;
255 hookTable(38).hookType := 'V' ;
256 hookTable(38).processingType := 'A' ;
257
258 hookTable(39).packageName := 'JTM_COUNTERS_PUB' ;
259 hookTable(39).apiName := 'UPDATE_CTR_GRP' ;
260 hookTable(39).hookType := 'V' ;
261 hookTable(39).processingType := 'A' ;
262
263 hookTable(40).packageName := 'JTM_COUNTERS_PUB' ;
264 hookTable(40).apiName := 'UPDATE_CTR_PROP' ;
265 hookTable(40).hookType := 'V' ;
266 hookTable(40).processingType := 'A' ;
267
268 hookTable(41).packageName := 'JTM_CTR_CAPTURE_READING_PUB' ;
269 hookTable(41).apiName := 'CAPTURE_COUNTER_READING' ;
270 hookTable(41).hookType := 'V' ;
271 hookTable(41).processingType := 'A' ;
272
273 hookTable(42).packageName := 'JTM_CTR_CAPTURE_READING_PUB' ;
274 hookTable(42).apiName := 'CAPTURE_CTR_PROP_READING' ;
275 hookTable(42).hookType := 'V' ;
276 hookTable(42).processingType := 'A' ;
277
278 hookTable(43).packageName := 'JTM_CTR_CAPTURE_READING_PUB' ;
279 hookTable(43).apiName := 'UPDATE_COUNTER_READING' ;
280 hookTable(43).hookType := 'V' ;
281 hookTable(43).processingType := 'A' ;
282
283 hookTable(44).packageName := 'JTM_CTR_CAPTURE_READING_PUB' ;
284 hookTable(44).apiName := 'UPDATE_COUNTER_READING' ;
285 hookTable(44).hookType := 'V' ;
286 hookTable(44).processingType := 'A' ;
287
288 hookTable(45).packageName := 'JTM_ITEM_INSTANCE_PUB' ;
289 hookTable(45).apiName := 'CREATE_ITEM_INSTANCE' ;
290 hookTable(45).hookType := 'V' ;
291 hookTable(45).processingType := 'A' ;
292
293 hookTable(46).packageName := 'JTM_NOTES_PUB' ;
294 hookTable(46).apiName := 'CREATE_NOTE' ;
295 hookTable(46).hookType := 'V' ;
296 hookTable(46).processingType := 'A' ;
297
298 hookTable(47).packageName := 'JTM_NOTES_PUB' ;
299 hookTable(47).apiName := 'UPDATE_NOTE' ;
300 hookTable(47).hookType := 'V' ;
301 hookTable(47).processingType := 'A' ;
302
303 hookTable(48).packageName := 'JTM_RS_GROUP_MEMBERS_PVT' ;
304 hookTable(48).apiName := 'CREATE_RESOURCE_GROUP_MEMBERS' ;
305 hookTable(48).hookType := 'V' ;
306 hookTable(48).processingType := 'A' ;
307
308 hookTable(49).packageName := 'JTM_RS_GROUP_MEMBERS_PVT' ;
309 hookTable(49).apiName := 'DELETE_RESOURCE_GROUP_MEMBERS' ;
310 hookTable(49).hookType := 'V' ;
311 hookTable(49).processingType := 'B' ;
312
313 FOR i IN 1..hookTable.COUNT LOOP
314 OPEN c_hook ( hookTable(i).packageName,
315 hookTable(i).apiName,
316 hookTable(i).hookType,
317 hookTable(i).processingType );
318 FETCH c_hook INTO r_hook;
319 IF c_hook%FOUND THEN
320 reportStr := '-Hook registered for ' || hookTable(i).packageName || '.' ||
321 hookTable(i).apiName || ' with processing type '||hookTable(i).processingType||
322 ' to package '||r_hook.hook_package||'-';
323 JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
324 if statusStr is null or statusStr = 'SUCCESS' then
325 statusStr := 'SUCCESS';
326 end if ;
327 ELSE
328 statusStr := 'FAILURE';
329 if errStr is null then
330 errStr := 'Hook not registered for ' || hookTable(i).packageName || '.' ||
331 hookTable(i).apiName || ' with processing type '||hookTable(i).processingType;
332 else
333 errStr := errStr || ', ' || hookTable(i).packageName || '.' || hookTable(i).apiName ||
334 ' with processing type '||hookTable(i).processingType ;
335 end if ;
336 fixInfo := 'Apply latest patch then contact support (if needed).' ;
337 isFatal := 'FALSE';
338 END IF;
339 CLOSE c_hook;
340 END LOOP ;
341
342 report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
343 reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
344 END runtest;
345
346 ------------------------------------------------------------
347 -- procedure to report name back to framework
348 ------------------------------------------------------------
349 PROCEDURE getComponentName(str OUT NOCOPY VARCHAR2)
350 IS
351 BEGIN
352 str := 'User hook setup';
353 END getComponentName;
354
355 ------------------------------------------------------------
356 -- procedure to report test name back to framework
357 ------------------------------------------------------------
358 PROCEDURE getTestName(str OUT NOCOPY VARCHAR2)
359 IS
360 BEGIN
361 str := 'User hook status';
362 END getTestName;
363
364 ------------------------------------------------------------
365 -- procedure to report test description back to framework
366 ------------------------------------------------------------
367 PROCEDURE getTestDesc(str OUT NOCOPY VARCHAR2)
368 IS
369 BEGIN
370 str := 'Check Oracle Field Service / Laptop hooks';
371 END getTestDesc;
372
373 END CSL_SETUP_HOOKS;