eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
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;