[Home] [Help]
PACKAGE BODY: APPS.FEM_DIS_PRD_TYPES_HIER_PKG
Source
1 package body FEM_DIS_PRD_TYPES_HIER_PKG as
2 /* $Header: fem_disprdty_pkb.plb 120.0 2005/10/19 19:21:07 appldev noship $ */
3 procedure INSERT_ROW (
4 X_ROWID in out nocopy VARCHAR2,
5 X_OBJECT_ID in NUMBER,
6 X_OBJECT_DEFINITION_ID in NUMBER,
7 X_LEVEL1_ID in NUMBER,
8 X_LEVEL2_ID in NUMBER,
9 X_LEVEL3_ID in NUMBER,
10 X_LEVEL4_ID in NUMBER,
11 X_LEVEL5_ID in NUMBER,
12 X_LEVEL6_ID in NUMBER,
13 X_LEVEL7_ID in NUMBER,
14 X_LEVEL8_ID in NUMBER,
15 X_LEVEL9_ID in NUMBER,
16 X_LEVEL10_ID in NUMBER,
17 X_LEVEL11_ID in NUMBER,
18 X_LEVEL12_ID in NUMBER,
19 X_LEVEL13_ID in NUMBER,
20 X_LEVEL14_ID in NUMBER,
21 X_LEVEL15_ID in NUMBER,
22 X_LEVEL16_ID in NUMBER,
23 X_LEVEL17_ID in NUMBER,
24 X_LEVEL18_ID in NUMBER,
25 X_LEVEL19_ID in NUMBER,
26 X_LEVEL20_ID in NUMBER,
27 X_LEVEL8_DISPLAY_ORDER_NUM in NUMBER,
28 X_LEVEL9_DISPLAY_ORDER_NUM in NUMBER,
29 X_LEVEL10_DISPLAY_ORDER_NUM in NUMBER,
30 X_LEVEL11_DISPLAY_ORDER_NUM in NUMBER,
31 X_LEVEL12_DISPLAY_ORDER_NUM in NUMBER,
32 X_LEVEL13_DISPLAY_ORDER_NUM in NUMBER,
33 X_LEVEL14_DISPLAY_ORDER_NUM in NUMBER,
34 X_LEVEL15_DISPLAY_ORDER_NUM in NUMBER,
35 X_LEVEL16_DISPLAY_ORDER_NUM in NUMBER,
36 X_LEVEL17_DISPLAY_ORDER_NUM in NUMBER,
37 X_LEVEL18_DISPLAY_ORDER_NUM in NUMBER,
38 X_LEVEL19_DISPLAY_ORDER_NUM in NUMBER,
39 X_LEVEL20_DISPLAY_ORDER_NUM in NUMBER,
40 X_LEVEL1_DISPLAY_CODE in VARCHAR2,
41 X_LEVEL2_DISPLAY_CODE in VARCHAR2,
42 X_LEVEL3_DISPLAY_CODE in VARCHAR2,
43 X_LEVEL4_DISPLAY_CODE in VARCHAR2,
44 X_LEVEL5_DISPLAY_CODE in VARCHAR2,
45 X_LEVEL6_DISPLAY_CODE in VARCHAR2,
46 X_LEVEL7_DISPLAY_CODE in VARCHAR2,
47 X_LEVEL8_DISPLAY_CODE in VARCHAR2,
48 X_LEVEL9_DISPLAY_CODE in VARCHAR2,
49 X_LEVEL10_DISPLAY_CODE in VARCHAR2,
50 X_LEVEL11_DISPLAY_CODE in VARCHAR2,
51 X_LEVEL12_DISPLAY_CODE in VARCHAR2,
52 X_LEVEL13_DISPLAY_CODE in VARCHAR2,
53 X_LEVEL14_DISPLAY_CODE in VARCHAR2,
54 X_LEVEL15_DISPLAY_CODE in VARCHAR2,
55 X_LEVEL16_DISPLAY_CODE in VARCHAR2,
56 X_LEVEL17_DISPLAY_CODE in VARCHAR2,
57 X_LEVEL18_DISPLAY_CODE in VARCHAR2,
58 X_LEVEL19_DISPLAY_CODE in VARCHAR2,
59 X_LEVEL20_DISPLAY_CODE in VARCHAR2,
60 X_LEVEL1_DISPLAY_ORDER_NUM in NUMBER,
61 X_LEVEL2_DISPLAY_ORDER_NUM in NUMBER,
62 X_LEVEL3_DISPLAY_ORDER_NUM in NUMBER,
63 X_LEVEL4_DISPLAY_ORDER_NUM in NUMBER,
64 X_LEVEL5_DISPLAY_ORDER_NUM in NUMBER,
65 X_LEVEL6_DISPLAY_ORDER_NUM in NUMBER,
66 X_LEVEL7_DISPLAY_ORDER_NUM in NUMBER,
67 X_OBJECT_NAME in VARCHAR2,
68 X_OBJECT_DEFINITION_NAME in VARCHAR2,
69 X_LEVEL1_NAME in VARCHAR2,
70 X_LEVEL2_NAME in VARCHAR2,
71 X_LEVEL3_NAME in VARCHAR2,
72 X_LEVEL4_NAME in VARCHAR2,
73 X_LEVEL5_NAME in VARCHAR2,
74 X_LEVEL6_NAME in VARCHAR2,
75 X_LEVEL7_NAME in VARCHAR2,
76 X_LEVEL8_NAME in VARCHAR2,
77 X_LEVEL9_NAME in VARCHAR2,
78 X_LEVEL10_NAME in VARCHAR2,
79 X_LEVEL11_NAME in VARCHAR2,
80 X_LEVEL12_NAME in VARCHAR2,
81 X_LEVEL13_NAME in VARCHAR2,
82 X_LEVEL14_NAME in VARCHAR2,
83 X_LEVEL15_NAME in VARCHAR2,
84 X_LEVEL16_NAME in VARCHAR2,
85 X_LEVEL17_NAME in VARCHAR2,
86 X_LEVEL18_NAME in VARCHAR2,
87 X_LEVEL19_NAME in VARCHAR2,
88 X_LEVEL20_NAME in VARCHAR2,
89 X_LEVEL1_DESCRIPTION in VARCHAR2,
90 X_LEVEL2_DESCRIPTION in VARCHAR2,
91 X_LEVEL3_DESCRIPTION in VARCHAR2,
92 X_LEVEL4_DESCRIPTION in VARCHAR2,
93 X_LEVEL5_DESCRIPTION in VARCHAR2,
94 X_LEVEL6_DESCRIPTION in VARCHAR2,
95 X_LEVEL7_DESCRIPTION in VARCHAR2,
96 X_LEVEL8_DESCRIPTION in VARCHAR2,
97 X_LEVEL9_DESCRIPTION in VARCHAR2,
98 X_LEVEL10_DESCRIPTION in VARCHAR2,
99 X_LEVEL11_DESCRIPTION in VARCHAR2,
100 X_LEVEL12_DESCRIPTION in VARCHAR2,
101 X_LEVEL13_DESCRIPTION in VARCHAR2,
102 X_LEVEL14_DESCRIPTION in VARCHAR2,
103 X_LEVEL15_DESCRIPTION in VARCHAR2,
104 X_LEVEL16_DESCRIPTION in VARCHAR2,
105 X_LEVEL17_DESCRIPTION in VARCHAR2,
106 X_LEVEL18_DESCRIPTION in VARCHAR2,
107 X_LEVEL19_DESCRIPTION in VARCHAR2,
108 X_LEVEL20_DESCRIPTION in VARCHAR2,
109 X_CREATION_DATE in DATE,
110 X_CREATED_BY in NUMBER,
111 X_LAST_UPDATE_DATE in DATE,
112 X_LAST_UPDATED_BY in NUMBER,
113 X_LAST_UPDATE_LOGIN in NUMBER
114 ) is
115 cursor C is select ROWID from FEM_DIS_PRD_TYPES_HIER_B
116 where OBJECT_ID = X_OBJECT_ID
117 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
118 and LEVEL1_ID = X_LEVEL1_ID
119 and LEVEL2_ID = X_LEVEL2_ID
120 and LEVEL3_ID = X_LEVEL3_ID
121 and LEVEL4_ID = X_LEVEL4_ID
122 and LEVEL5_ID = X_LEVEL5_ID
123 and LEVEL6_ID = X_LEVEL6_ID
124 and LEVEL7_ID = X_LEVEL7_ID
125 and LEVEL8_ID = X_LEVEL8_ID
126 and LEVEL9_ID = X_LEVEL9_ID
127 and LEVEL10_ID = X_LEVEL10_ID
128 and LEVEL11_ID = X_LEVEL11_ID
129 and LEVEL12_ID = X_LEVEL12_ID
130 and LEVEL13_ID = X_LEVEL13_ID
131 and LEVEL14_ID = X_LEVEL14_ID
132 and LEVEL15_ID = X_LEVEL15_ID
133 and LEVEL16_ID = X_LEVEL16_ID
134 and LEVEL17_ID = X_LEVEL17_ID
135 and LEVEL18_ID = X_LEVEL18_ID
136 and LEVEL19_ID = X_LEVEL19_ID
137 and LEVEL20_ID = X_LEVEL20_ID
138 ;
139 begin
140 insert into FEM_DIS_PRD_TYPES_HIER_B (
141 LEVEL8_DISPLAY_ORDER_NUM,
142 LEVEL9_DISPLAY_ORDER_NUM,
143 LEVEL10_DISPLAY_ORDER_NUM,
144 LEVEL11_DISPLAY_ORDER_NUM,
145 LEVEL12_DISPLAY_ORDER_NUM,
146 LEVEL13_DISPLAY_ORDER_NUM,
147 LEVEL14_DISPLAY_ORDER_NUM,
148 LEVEL15_DISPLAY_ORDER_NUM,
149 LEVEL16_DISPLAY_ORDER_NUM,
150 LEVEL17_DISPLAY_ORDER_NUM,
151 LEVEL18_DISPLAY_ORDER_NUM,
152 LEVEL19_DISPLAY_ORDER_NUM,
153 LEVEL20_DISPLAY_ORDER_NUM,
154 OBJECT_ID,
155 OBJECT_DEFINITION_ID,
156 LEVEL1_ID,
157 LEVEL2_ID,
158 LEVEL3_ID,
159 LEVEL4_ID,
160 LEVEL5_ID,
161 LEVEL6_ID,
162 LEVEL7_ID,
163 LEVEL8_ID,
164 LEVEL9_ID,
165 LEVEL10_ID,
166 LEVEL11_ID,
167 LEVEL12_ID,
168 LEVEL13_ID,
169 LEVEL14_ID,
170 LEVEL15_ID,
171 LEVEL16_ID,
172 LEVEL17_ID,
173 LEVEL18_ID,
174 LEVEL19_ID,
175 LEVEL20_ID,
176 LEVEL1_DISPLAY_CODE,
177 LEVEL2_DISPLAY_CODE,
178 LEVEL3_DISPLAY_CODE,
179 LEVEL4_DISPLAY_CODE,
180 LEVEL5_DISPLAY_CODE,
181 LEVEL6_DISPLAY_CODE,
182 LEVEL7_DISPLAY_CODE,
183 LEVEL8_DISPLAY_CODE,
184 LEVEL9_DISPLAY_CODE,
185 LEVEL10_DISPLAY_CODE,
186 LEVEL11_DISPLAY_CODE,
187 LEVEL12_DISPLAY_CODE,
188 LEVEL13_DISPLAY_CODE,
189 LEVEL14_DISPLAY_CODE,
190 LEVEL15_DISPLAY_CODE,
191 LEVEL16_DISPLAY_CODE,
192 LEVEL17_DISPLAY_CODE,
193 LEVEL18_DISPLAY_CODE,
194 LEVEL19_DISPLAY_CODE,
195 LEVEL20_DISPLAY_CODE,
196 LEVEL1_DISPLAY_ORDER_NUM,
197 LEVEL2_DISPLAY_ORDER_NUM,
198 LEVEL3_DISPLAY_ORDER_NUM,
199 LEVEL4_DISPLAY_ORDER_NUM,
200 LEVEL5_DISPLAY_ORDER_NUM,
201 LEVEL6_DISPLAY_ORDER_NUM,
202 LEVEL7_DISPLAY_ORDER_NUM,
203 CREATION_DATE,
204 CREATED_BY,
205 LAST_UPDATE_DATE,
206 LAST_UPDATED_BY,
207 LAST_UPDATE_LOGIN
208 ) values (
209 X_LEVEL8_DISPLAY_ORDER_NUM,
210 X_LEVEL9_DISPLAY_ORDER_NUM,
211 X_LEVEL10_DISPLAY_ORDER_NUM,
212 X_LEVEL11_DISPLAY_ORDER_NUM,
213 X_LEVEL12_DISPLAY_ORDER_NUM,
214 X_LEVEL13_DISPLAY_ORDER_NUM,
215 X_LEVEL14_DISPLAY_ORDER_NUM,
216 X_LEVEL15_DISPLAY_ORDER_NUM,
217 X_LEVEL16_DISPLAY_ORDER_NUM,
218 X_LEVEL17_DISPLAY_ORDER_NUM,
219 X_LEVEL18_DISPLAY_ORDER_NUM,
220 X_LEVEL19_DISPLAY_ORDER_NUM,
221 X_LEVEL20_DISPLAY_ORDER_NUM,
222 X_OBJECT_ID,
223 X_OBJECT_DEFINITION_ID,
224 X_LEVEL1_ID,
225 X_LEVEL2_ID,
226 X_LEVEL3_ID,
227 X_LEVEL4_ID,
228 X_LEVEL5_ID,
229 X_LEVEL6_ID,
230 X_LEVEL7_ID,
231 X_LEVEL8_ID,
232 X_LEVEL9_ID,
233 X_LEVEL10_ID,
234 X_LEVEL11_ID,
235 X_LEVEL12_ID,
236 X_LEVEL13_ID,
237 X_LEVEL14_ID,
238 X_LEVEL15_ID,
239 X_LEVEL16_ID,
240 X_LEVEL17_ID,
241 X_LEVEL18_ID,
242 X_LEVEL19_ID,
243 X_LEVEL20_ID,
244 X_LEVEL1_DISPLAY_CODE,
245 X_LEVEL2_DISPLAY_CODE,
246 X_LEVEL3_DISPLAY_CODE,
247 X_LEVEL4_DISPLAY_CODE,
248 X_LEVEL5_DISPLAY_CODE,
249 X_LEVEL6_DISPLAY_CODE,
250 X_LEVEL7_DISPLAY_CODE,
251 X_LEVEL8_DISPLAY_CODE,
252 X_LEVEL9_DISPLAY_CODE,
253 X_LEVEL10_DISPLAY_CODE,
254 X_LEVEL11_DISPLAY_CODE,
255 X_LEVEL12_DISPLAY_CODE,
256 X_LEVEL13_DISPLAY_CODE,
257 X_LEVEL14_DISPLAY_CODE,
258 X_LEVEL15_DISPLAY_CODE,
259 X_LEVEL16_DISPLAY_CODE,
260 X_LEVEL17_DISPLAY_CODE,
261 X_LEVEL18_DISPLAY_CODE,
262 X_LEVEL19_DISPLAY_CODE,
263 X_LEVEL20_DISPLAY_CODE,
264 X_LEVEL1_DISPLAY_ORDER_NUM,
265 X_LEVEL2_DISPLAY_ORDER_NUM,
266 X_LEVEL3_DISPLAY_ORDER_NUM,
267 X_LEVEL4_DISPLAY_ORDER_NUM,
268 X_LEVEL5_DISPLAY_ORDER_NUM,
269 X_LEVEL6_DISPLAY_ORDER_NUM,
270 X_LEVEL7_DISPLAY_ORDER_NUM,
271 X_CREATION_DATE,
272 X_CREATED_BY,
273 X_LAST_UPDATE_DATE,
274 X_LAST_UPDATED_BY,
275 X_LAST_UPDATE_LOGIN
276 );
277
278 insert into FEM_DIS_PRD_TYPES_HIER_TL (
279 LEVEL20_DESCRIPTION,
280 CREATION_DATE,
281 CREATED_BY,
282 LAST_UPDATE_DATE,
283 LAST_UPDATED_BY,
284 LAST_UPDATE_LOGIN,
285 OBJECT_ID,
286 OBJECT_DEFINITION_ID,
287 LEVEL1_ID,
288 LEVEL2_ID,
289 LEVEL3_ID,
290 LEVEL4_ID,
291 LEVEL5_ID,
292 LEVEL6_ID,
293 LEVEL7_ID,
294 LEVEL8_ID,
295 LEVEL9_ID,
296 LEVEL10_ID,
297 LEVEL11_ID,
298 LEVEL12_ID,
299 LEVEL13_ID,
300 LEVEL14_ID,
301 LEVEL15_ID,
302 LEVEL16_ID,
303 LEVEL17_ID,
304 LEVEL18_ID,
305 LEVEL19_ID,
306 LEVEL20_ID,
307 OBJECT_NAME,
308 OBJECT_DEFINITION_NAME,
309 LEVEL1_NAME,
310 LEVEL2_NAME,
311 LEVEL3_NAME,
312 LEVEL4_NAME,
313 LEVEL5_NAME,
314 LEVEL6_NAME,
315 LEVEL7_NAME,
316 LEVEL8_NAME,
317 LEVEL9_NAME,
318 LEVEL10_NAME,
319 LEVEL11_NAME,
320 LEVEL12_NAME,
321 LEVEL13_NAME,
322 LEVEL14_NAME,
323 LEVEL15_NAME,
324 LEVEL16_NAME,
325 LEVEL17_NAME,
326 LEVEL18_NAME,
327 LEVEL19_NAME,
328 LEVEL20_NAME,
329 LEVEL1_DESCRIPTION,
330 LEVEL2_DESCRIPTION,
331 LEVEL3_DESCRIPTION,
332 LEVEL4_DESCRIPTION,
333 LEVEL5_DESCRIPTION,
334 LEVEL6_DESCRIPTION,
335 LEVEL7_DESCRIPTION,
336 LEVEL8_DESCRIPTION,
337 LEVEL9_DESCRIPTION,
338 LEVEL10_DESCRIPTION,
339 LEVEL11_DESCRIPTION,
340 LEVEL12_DESCRIPTION,
341 LEVEL13_DESCRIPTION,
342 LEVEL14_DESCRIPTION,
343 LEVEL15_DESCRIPTION,
344 LEVEL16_DESCRIPTION,
345 LEVEL17_DESCRIPTION,
346 LEVEL18_DESCRIPTION,
347 LEVEL19_DESCRIPTION,
348 LANGUAGE,
349 SOURCE_LANG
350 ) select
351 X_LEVEL20_DESCRIPTION,
352 X_CREATION_DATE,
353 X_CREATED_BY,
354 X_LAST_UPDATE_DATE,
355 X_LAST_UPDATED_BY,
356 X_LAST_UPDATE_LOGIN,
357 X_OBJECT_ID,
358 X_OBJECT_DEFINITION_ID,
359 X_LEVEL1_ID,
360 X_LEVEL2_ID,
361 X_LEVEL3_ID,
362 X_LEVEL4_ID,
363 X_LEVEL5_ID,
364 X_LEVEL6_ID,
365 X_LEVEL7_ID,
366 X_LEVEL8_ID,
367 X_LEVEL9_ID,
368 X_LEVEL10_ID,
369 X_LEVEL11_ID,
370 X_LEVEL12_ID,
371 X_LEVEL13_ID,
372 X_LEVEL14_ID,
373 X_LEVEL15_ID,
374 X_LEVEL16_ID,
375 X_LEVEL17_ID,
376 X_LEVEL18_ID,
377 X_LEVEL19_ID,
378 X_LEVEL20_ID,
379 X_OBJECT_NAME,
380 X_OBJECT_DEFINITION_NAME,
381 X_LEVEL1_NAME,
382 X_LEVEL2_NAME,
383 X_LEVEL3_NAME,
384 X_LEVEL4_NAME,
385 X_LEVEL5_NAME,
386 X_LEVEL6_NAME,
387 X_LEVEL7_NAME,
388 X_LEVEL8_NAME,
389 X_LEVEL9_NAME,
390 X_LEVEL10_NAME,
391 X_LEVEL11_NAME,
392 X_LEVEL12_NAME,
393 X_LEVEL13_NAME,
394 X_LEVEL14_NAME,
395 X_LEVEL15_NAME,
396 X_LEVEL16_NAME,
397 X_LEVEL17_NAME,
398 X_LEVEL18_NAME,
399 X_LEVEL19_NAME,
400 X_LEVEL20_NAME,
401 X_LEVEL1_DESCRIPTION,
402 X_LEVEL2_DESCRIPTION,
403 X_LEVEL3_DESCRIPTION,
407 X_LEVEL7_DESCRIPTION,
404 X_LEVEL4_DESCRIPTION,
405 X_LEVEL5_DESCRIPTION,
406 X_LEVEL6_DESCRIPTION,
408 X_LEVEL8_DESCRIPTION,
409 X_LEVEL9_DESCRIPTION,
410 X_LEVEL10_DESCRIPTION,
411 X_LEVEL11_DESCRIPTION,
412 X_LEVEL12_DESCRIPTION,
413 X_LEVEL13_DESCRIPTION,
414 X_LEVEL14_DESCRIPTION,
415 X_LEVEL15_DESCRIPTION,
416 X_LEVEL16_DESCRIPTION,
417 X_LEVEL17_DESCRIPTION,
418 X_LEVEL18_DESCRIPTION,
419 X_LEVEL19_DESCRIPTION,
420 L.LANGUAGE_CODE,
421 userenv('LANG')
422 from FND_LANGUAGES L
423 where L.INSTALLED_FLAG in ('I', 'B')
424 and not exists
425 (select NULL
426 from FEM_DIS_PRD_TYPES_HIER_TL T
427 where T.OBJECT_ID = X_OBJECT_ID
428 and T.OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
429 and T.LEVEL1_ID = X_LEVEL1_ID
430 and T.LEVEL2_ID = X_LEVEL2_ID
431 and T.LEVEL3_ID = X_LEVEL3_ID
432 and T.LEVEL4_ID = X_LEVEL4_ID
433 and T.LEVEL5_ID = X_LEVEL5_ID
434 and T.LEVEL6_ID = X_LEVEL6_ID
435 and T.LEVEL7_ID = X_LEVEL7_ID
436 and T.LEVEL8_ID = X_LEVEL8_ID
437 and T.LEVEL9_ID = X_LEVEL9_ID
438 and T.LEVEL10_ID = X_LEVEL10_ID
439 and T.LEVEL11_ID = X_LEVEL11_ID
440 and T.LEVEL12_ID = X_LEVEL12_ID
441 and T.LEVEL13_ID = X_LEVEL13_ID
442 and T.LEVEL14_ID = X_LEVEL14_ID
443 and T.LEVEL15_ID = X_LEVEL15_ID
444 and T.LEVEL16_ID = X_LEVEL16_ID
445 and T.LEVEL17_ID = X_LEVEL17_ID
446 and T.LEVEL18_ID = X_LEVEL18_ID
447 and T.LEVEL19_ID = X_LEVEL19_ID
448 and T.LEVEL20_ID = X_LEVEL20_ID
449 and T.LANGUAGE = L.LANGUAGE_CODE);
450
451 open c;
452 fetch c into X_ROWID;
453 if (c%notfound) then
454 close c;
455 raise no_data_found;
456 end if;
457 close c;
458
459 end INSERT_ROW;
460
461 procedure LOCK_ROW (
462 X_OBJECT_ID in NUMBER,
463 X_OBJECT_DEFINITION_ID in NUMBER,
464 X_LEVEL1_ID in NUMBER,
465 X_LEVEL2_ID in NUMBER,
466 X_LEVEL3_ID in NUMBER,
467 X_LEVEL4_ID in NUMBER,
468 X_LEVEL5_ID in NUMBER,
469 X_LEVEL6_ID in NUMBER,
470 X_LEVEL7_ID in NUMBER,
471 X_LEVEL8_ID in NUMBER,
472 X_LEVEL9_ID in NUMBER,
473 X_LEVEL10_ID in NUMBER,
474 X_LEVEL11_ID in NUMBER,
475 X_LEVEL12_ID in NUMBER,
476 X_LEVEL13_ID in NUMBER,
477 X_LEVEL14_ID in NUMBER,
478 X_LEVEL15_ID in NUMBER,
479 X_LEVEL16_ID in NUMBER,
480 X_LEVEL17_ID in NUMBER,
481 X_LEVEL18_ID in NUMBER,
482 X_LEVEL19_ID in NUMBER,
483 X_LEVEL20_ID in NUMBER,
484 X_LEVEL8_DISPLAY_ORDER_NUM in NUMBER,
485 X_LEVEL9_DISPLAY_ORDER_NUM in NUMBER,
486 X_LEVEL10_DISPLAY_ORDER_NUM in NUMBER,
487 X_LEVEL11_DISPLAY_ORDER_NUM in NUMBER,
488 X_LEVEL12_DISPLAY_ORDER_NUM in NUMBER,
489 X_LEVEL13_DISPLAY_ORDER_NUM in NUMBER,
490 X_LEVEL14_DISPLAY_ORDER_NUM in NUMBER,
491 X_LEVEL15_DISPLAY_ORDER_NUM in NUMBER,
492 X_LEVEL16_DISPLAY_ORDER_NUM in NUMBER,
493 X_LEVEL17_DISPLAY_ORDER_NUM in NUMBER,
494 X_LEVEL18_DISPLAY_ORDER_NUM in NUMBER,
495 X_LEVEL19_DISPLAY_ORDER_NUM in NUMBER,
496 X_LEVEL20_DISPLAY_ORDER_NUM in NUMBER,
497 X_LEVEL1_DISPLAY_CODE in VARCHAR2,
498 X_LEVEL2_DISPLAY_CODE in VARCHAR2,
499 X_LEVEL3_DISPLAY_CODE in VARCHAR2,
500 X_LEVEL4_DISPLAY_CODE in VARCHAR2,
501 X_LEVEL5_DISPLAY_CODE in VARCHAR2,
502 X_LEVEL6_DISPLAY_CODE in VARCHAR2,
503 X_LEVEL7_DISPLAY_CODE in VARCHAR2,
504 X_LEVEL8_DISPLAY_CODE in VARCHAR2,
505 X_LEVEL9_DISPLAY_CODE in VARCHAR2,
506 X_LEVEL10_DISPLAY_CODE in VARCHAR2,
507 X_LEVEL11_DISPLAY_CODE in VARCHAR2,
508 X_LEVEL12_DISPLAY_CODE in VARCHAR2,
509 X_LEVEL13_DISPLAY_CODE in VARCHAR2,
510 X_LEVEL14_DISPLAY_CODE in VARCHAR2,
511 X_LEVEL15_DISPLAY_CODE in VARCHAR2,
512 X_LEVEL16_DISPLAY_CODE in VARCHAR2,
513 X_LEVEL17_DISPLAY_CODE in VARCHAR2,
514 X_LEVEL18_DISPLAY_CODE in VARCHAR2,
515 X_LEVEL19_DISPLAY_CODE in VARCHAR2,
516 X_LEVEL20_DISPLAY_CODE in VARCHAR2,
517 X_LEVEL1_DISPLAY_ORDER_NUM in NUMBER,
518 X_LEVEL2_DISPLAY_ORDER_NUM in NUMBER,
519 X_LEVEL3_DISPLAY_ORDER_NUM in NUMBER,
520 X_LEVEL4_DISPLAY_ORDER_NUM in NUMBER,
521 X_LEVEL5_DISPLAY_ORDER_NUM in NUMBER,
522 X_LEVEL6_DISPLAY_ORDER_NUM in NUMBER,
523 X_LEVEL7_DISPLAY_ORDER_NUM in NUMBER,
524 X_OBJECT_NAME in VARCHAR2,
525 X_OBJECT_DEFINITION_NAME in VARCHAR2,
526 X_LEVEL1_NAME in VARCHAR2,
527 X_LEVEL2_NAME in VARCHAR2,
528 X_LEVEL3_NAME in VARCHAR2,
529 X_LEVEL4_NAME in VARCHAR2,
530 X_LEVEL5_NAME in VARCHAR2,
531 X_LEVEL6_NAME in VARCHAR2,
532 X_LEVEL7_NAME in VARCHAR2,
533 X_LEVEL8_NAME in VARCHAR2,
534 X_LEVEL9_NAME in VARCHAR2,
535 X_LEVEL10_NAME in VARCHAR2,
536 X_LEVEL11_NAME in VARCHAR2,
537 X_LEVEL12_NAME in VARCHAR2,
538 X_LEVEL13_NAME in VARCHAR2,
539 X_LEVEL14_NAME in VARCHAR2,
540 X_LEVEL15_NAME in VARCHAR2,
541 X_LEVEL16_NAME in VARCHAR2,
542 X_LEVEL17_NAME in VARCHAR2,
543 X_LEVEL18_NAME in VARCHAR2,
544 X_LEVEL19_NAME in VARCHAR2,
545 X_LEVEL20_NAME in VARCHAR2,
546 X_LEVEL1_DESCRIPTION in VARCHAR2,
547 X_LEVEL2_DESCRIPTION in VARCHAR2,
548 X_LEVEL3_DESCRIPTION in VARCHAR2,
549 X_LEVEL4_DESCRIPTION in VARCHAR2,
550 X_LEVEL5_DESCRIPTION in VARCHAR2,
551 X_LEVEL6_DESCRIPTION in VARCHAR2,
552 X_LEVEL7_DESCRIPTION in VARCHAR2,
553 X_LEVEL8_DESCRIPTION in VARCHAR2,
554 X_LEVEL9_DESCRIPTION in VARCHAR2,
555 X_LEVEL10_DESCRIPTION in VARCHAR2,
556 X_LEVEL11_DESCRIPTION in VARCHAR2,
557 X_LEVEL12_DESCRIPTION in VARCHAR2,
558 X_LEVEL13_DESCRIPTION in VARCHAR2,
559 X_LEVEL14_DESCRIPTION in VARCHAR2,
560 X_LEVEL15_DESCRIPTION in VARCHAR2,
564 X_LEVEL19_DESCRIPTION in VARCHAR2,
561 X_LEVEL16_DESCRIPTION in VARCHAR2,
562 X_LEVEL17_DESCRIPTION in VARCHAR2,
563 X_LEVEL18_DESCRIPTION in VARCHAR2,
565 X_LEVEL20_DESCRIPTION in VARCHAR2
566 ) is
567 cursor c is select
568 LEVEL8_DISPLAY_ORDER_NUM,
569 LEVEL9_DISPLAY_ORDER_NUM,
570 LEVEL10_DISPLAY_ORDER_NUM,
571 LEVEL11_DISPLAY_ORDER_NUM,
572 LEVEL12_DISPLAY_ORDER_NUM,
573 LEVEL13_DISPLAY_ORDER_NUM,
574 LEVEL14_DISPLAY_ORDER_NUM,
575 LEVEL15_DISPLAY_ORDER_NUM,
576 LEVEL16_DISPLAY_ORDER_NUM,
577 LEVEL17_DISPLAY_ORDER_NUM,
578 LEVEL18_DISPLAY_ORDER_NUM,
579 LEVEL19_DISPLAY_ORDER_NUM,
580 LEVEL20_DISPLAY_ORDER_NUM,
581 LEVEL1_DISPLAY_CODE,
582 LEVEL2_DISPLAY_CODE,
583 LEVEL3_DISPLAY_CODE,
584 LEVEL4_DISPLAY_CODE,
585 LEVEL5_DISPLAY_CODE,
586 LEVEL6_DISPLAY_CODE,
587 LEVEL7_DISPLAY_CODE,
588 LEVEL8_DISPLAY_CODE,
589 LEVEL9_DISPLAY_CODE,
590 LEVEL10_DISPLAY_CODE,
591 LEVEL11_DISPLAY_CODE,
592 LEVEL12_DISPLAY_CODE,
593 LEVEL13_DISPLAY_CODE,
594 LEVEL14_DISPLAY_CODE,
595 LEVEL15_DISPLAY_CODE,
596 LEVEL16_DISPLAY_CODE,
597 LEVEL17_DISPLAY_CODE,
598 LEVEL18_DISPLAY_CODE,
599 LEVEL19_DISPLAY_CODE,
600 LEVEL20_DISPLAY_CODE,
601 LEVEL1_DISPLAY_ORDER_NUM,
602 LEVEL2_DISPLAY_ORDER_NUM,
603 LEVEL3_DISPLAY_ORDER_NUM,
604 LEVEL4_DISPLAY_ORDER_NUM,
605 LEVEL5_DISPLAY_ORDER_NUM,
606 LEVEL6_DISPLAY_ORDER_NUM,
607 LEVEL7_DISPLAY_ORDER_NUM
608 from FEM_DIS_PRD_TYPES_HIER_B
609 where OBJECT_ID = X_OBJECT_ID
610 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
611 and LEVEL1_ID = X_LEVEL1_ID
612 and LEVEL2_ID = X_LEVEL2_ID
613 and LEVEL3_ID = X_LEVEL3_ID
614 and LEVEL4_ID = X_LEVEL4_ID
615 and LEVEL5_ID = X_LEVEL5_ID
616 and LEVEL6_ID = X_LEVEL6_ID
617 and LEVEL7_ID = X_LEVEL7_ID
618 and LEVEL8_ID = X_LEVEL8_ID
619 and LEVEL9_ID = X_LEVEL9_ID
620 and LEVEL10_ID = X_LEVEL10_ID
621 and LEVEL11_ID = X_LEVEL11_ID
622 and LEVEL12_ID = X_LEVEL12_ID
623 and LEVEL13_ID = X_LEVEL13_ID
624 and LEVEL14_ID = X_LEVEL14_ID
625 and LEVEL15_ID = X_LEVEL15_ID
626 and LEVEL16_ID = X_LEVEL16_ID
627 and LEVEL17_ID = X_LEVEL17_ID
628 and LEVEL18_ID = X_LEVEL18_ID
629 and LEVEL19_ID = X_LEVEL19_ID
630 and LEVEL20_ID = X_LEVEL20_ID
631 for update of OBJECT_ID nowait;
632 recinfo c%rowtype;
633
634 cursor c1 is select
635 OBJECT_NAME,
636 OBJECT_DEFINITION_NAME,
637 LEVEL1_NAME,
638 LEVEL2_NAME,
639 LEVEL3_NAME,
640 LEVEL4_NAME,
641 LEVEL5_NAME,
642 LEVEL6_NAME,
643 LEVEL7_NAME,
644 LEVEL8_NAME,
645 LEVEL9_NAME,
646 LEVEL10_NAME,
647 LEVEL11_NAME,
648 LEVEL12_NAME,
649 LEVEL13_NAME,
650 LEVEL14_NAME,
651 LEVEL15_NAME,
652 LEVEL16_NAME,
653 LEVEL17_NAME,
654 LEVEL18_NAME,
655 LEVEL19_NAME,
656 LEVEL20_NAME,
657 LEVEL1_DESCRIPTION,
658 LEVEL2_DESCRIPTION,
659 LEVEL3_DESCRIPTION,
660 LEVEL4_DESCRIPTION,
661 LEVEL5_DESCRIPTION,
662 LEVEL6_DESCRIPTION,
663 LEVEL7_DESCRIPTION,
664 LEVEL8_DESCRIPTION,
665 LEVEL9_DESCRIPTION,
666 LEVEL10_DESCRIPTION,
667 LEVEL11_DESCRIPTION,
668 LEVEL12_DESCRIPTION,
669 LEVEL13_DESCRIPTION,
670 LEVEL14_DESCRIPTION,
671 LEVEL15_DESCRIPTION,
672 LEVEL16_DESCRIPTION,
673 LEVEL17_DESCRIPTION,
674 LEVEL18_DESCRIPTION,
675 LEVEL19_DESCRIPTION,
676 LEVEL20_DESCRIPTION,
677 decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
678 from FEM_DIS_PRD_TYPES_HIER_TL
679 where OBJECT_ID = X_OBJECT_ID
680 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
681 and LEVEL1_ID = X_LEVEL1_ID
682 and LEVEL2_ID = X_LEVEL2_ID
683 and LEVEL3_ID = X_LEVEL3_ID
684 and LEVEL4_ID = X_LEVEL4_ID
685 and LEVEL5_ID = X_LEVEL5_ID
686 and LEVEL6_ID = X_LEVEL6_ID
687 and LEVEL7_ID = X_LEVEL7_ID
688 and LEVEL8_ID = X_LEVEL8_ID
689 and LEVEL9_ID = X_LEVEL9_ID
690 and LEVEL10_ID = X_LEVEL10_ID
691 and LEVEL11_ID = X_LEVEL11_ID
692 and LEVEL12_ID = X_LEVEL12_ID
693 and LEVEL13_ID = X_LEVEL13_ID
694 and LEVEL14_ID = X_LEVEL14_ID
695 and LEVEL15_ID = X_LEVEL15_ID
696 and LEVEL16_ID = X_LEVEL16_ID
697 and LEVEL17_ID = X_LEVEL17_ID
698 and LEVEL18_ID = X_LEVEL18_ID
699 and LEVEL19_ID = X_LEVEL19_ID
700 and LEVEL20_ID = X_LEVEL20_ID
701 and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
702 for update of OBJECT_ID nowait;
703 begin
704 open c;
705 fetch c into recinfo;
706 if (c%notfound) then
707 close c;
708 fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
709 app_exception.raise_exception;
710 end if;
711 close c;
712 if ( (recinfo.LEVEL8_DISPLAY_ORDER_NUM = X_LEVEL8_DISPLAY_ORDER_NUM)
713 AND (recinfo.LEVEL9_DISPLAY_ORDER_NUM = X_LEVEL9_DISPLAY_ORDER_NUM)
714 AND (recinfo.LEVEL10_DISPLAY_ORDER_NUM = X_LEVEL10_DISPLAY_ORDER_NUM)
715 AND (recinfo.LEVEL11_DISPLAY_ORDER_NUM = X_LEVEL11_DISPLAY_ORDER_NUM)
716 AND (recinfo.LEVEL12_DISPLAY_ORDER_NUM = X_LEVEL12_DISPLAY_ORDER_NUM)
717 AND (recinfo.LEVEL13_DISPLAY_ORDER_NUM = X_LEVEL13_DISPLAY_ORDER_NUM)
718 AND (recinfo.LEVEL14_DISPLAY_ORDER_NUM = X_LEVEL14_DISPLAY_ORDER_NUM)
722 AND (recinfo.LEVEL18_DISPLAY_ORDER_NUM = X_LEVEL18_DISPLAY_ORDER_NUM)
719 AND (recinfo.LEVEL15_DISPLAY_ORDER_NUM = X_LEVEL15_DISPLAY_ORDER_NUM)
720 AND (recinfo.LEVEL16_DISPLAY_ORDER_NUM = X_LEVEL16_DISPLAY_ORDER_NUM)
721 AND (recinfo.LEVEL17_DISPLAY_ORDER_NUM = X_LEVEL17_DISPLAY_ORDER_NUM)
723 AND (recinfo.LEVEL19_DISPLAY_ORDER_NUM = X_LEVEL19_DISPLAY_ORDER_NUM)
724 AND (recinfo.LEVEL20_DISPLAY_ORDER_NUM = X_LEVEL20_DISPLAY_ORDER_NUM)
725 AND (recinfo.LEVEL1_DISPLAY_CODE = X_LEVEL1_DISPLAY_CODE)
726 AND (recinfo.LEVEL2_DISPLAY_CODE = X_LEVEL2_DISPLAY_CODE)
727 AND (recinfo.LEVEL3_DISPLAY_CODE = X_LEVEL3_DISPLAY_CODE)
728 AND (recinfo.LEVEL4_DISPLAY_CODE = X_LEVEL4_DISPLAY_CODE)
729 AND (recinfo.LEVEL5_DISPLAY_CODE = X_LEVEL5_DISPLAY_CODE)
730 AND (recinfo.LEVEL6_DISPLAY_CODE = X_LEVEL6_DISPLAY_CODE)
731 AND (recinfo.LEVEL7_DISPLAY_CODE = X_LEVEL7_DISPLAY_CODE)
732 AND (recinfo.LEVEL8_DISPLAY_CODE = X_LEVEL8_DISPLAY_CODE)
733 AND (recinfo.LEVEL9_DISPLAY_CODE = X_LEVEL9_DISPLAY_CODE)
734 AND (recinfo.LEVEL10_DISPLAY_CODE = X_LEVEL10_DISPLAY_CODE)
735 AND (recinfo.LEVEL11_DISPLAY_CODE = X_LEVEL11_DISPLAY_CODE)
736 AND (recinfo.LEVEL12_DISPLAY_CODE = X_LEVEL12_DISPLAY_CODE)
737 AND (recinfo.LEVEL13_DISPLAY_CODE = X_LEVEL13_DISPLAY_CODE)
738 AND (recinfo.LEVEL14_DISPLAY_CODE = X_LEVEL14_DISPLAY_CODE)
739 AND (recinfo.LEVEL15_DISPLAY_CODE = X_LEVEL15_DISPLAY_CODE)
740 AND (recinfo.LEVEL16_DISPLAY_CODE = X_LEVEL16_DISPLAY_CODE)
741 AND (recinfo.LEVEL17_DISPLAY_CODE = X_LEVEL17_DISPLAY_CODE)
742 AND (recinfo.LEVEL18_DISPLAY_CODE = X_LEVEL18_DISPLAY_CODE)
743 AND (recinfo.LEVEL19_DISPLAY_CODE = X_LEVEL19_DISPLAY_CODE)
744 AND (recinfo.LEVEL20_DISPLAY_CODE = X_LEVEL20_DISPLAY_CODE)
745 AND (recinfo.LEVEL1_DISPLAY_ORDER_NUM = X_LEVEL1_DISPLAY_ORDER_NUM)
746 AND (recinfo.LEVEL2_DISPLAY_ORDER_NUM = X_LEVEL2_DISPLAY_ORDER_NUM)
747 AND (recinfo.LEVEL3_DISPLAY_ORDER_NUM = X_LEVEL3_DISPLAY_ORDER_NUM)
748 AND (recinfo.LEVEL4_DISPLAY_ORDER_NUM = X_LEVEL4_DISPLAY_ORDER_NUM)
749 AND (recinfo.LEVEL5_DISPLAY_ORDER_NUM = X_LEVEL5_DISPLAY_ORDER_NUM)
750 AND (recinfo.LEVEL6_DISPLAY_ORDER_NUM = X_LEVEL6_DISPLAY_ORDER_NUM)
751 AND (recinfo.LEVEL7_DISPLAY_ORDER_NUM = X_LEVEL7_DISPLAY_ORDER_NUM)
752 ) then
753 null;
754 else
755 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
756 app_exception.raise_exception;
757 end if;
758
759 for tlinfo in c1 loop
760 if (tlinfo.BASELANG = 'Y') then
761 if ( (tlinfo.OBJECT_NAME = X_OBJECT_NAME)
762 AND (tlinfo.OBJECT_DEFINITION_NAME = X_OBJECT_DEFINITION_NAME)
763 AND (tlinfo.LEVEL1_NAME = X_LEVEL1_NAME)
764 AND (tlinfo.LEVEL2_NAME = X_LEVEL2_NAME)
765 AND (tlinfo.LEVEL3_NAME = X_LEVEL3_NAME)
766 AND (tlinfo.LEVEL4_NAME = X_LEVEL4_NAME)
767 AND (tlinfo.LEVEL5_NAME = X_LEVEL5_NAME)
768 AND (tlinfo.LEVEL6_NAME = X_LEVEL6_NAME)
769 AND (tlinfo.LEVEL7_NAME = X_LEVEL7_NAME)
770 AND (tlinfo.LEVEL8_NAME = X_LEVEL8_NAME)
771 AND (tlinfo.LEVEL9_NAME = X_LEVEL9_NAME)
772 AND (tlinfo.LEVEL10_NAME = X_LEVEL10_NAME)
773 AND (tlinfo.LEVEL11_NAME = X_LEVEL11_NAME)
774 AND (tlinfo.LEVEL12_NAME = X_LEVEL12_NAME)
775 AND (tlinfo.LEVEL13_NAME = X_LEVEL13_NAME)
776 AND (tlinfo.LEVEL14_NAME = X_LEVEL14_NAME)
777 AND (tlinfo.LEVEL15_NAME = X_LEVEL15_NAME)
778 AND (tlinfo.LEVEL16_NAME = X_LEVEL16_NAME)
779 AND (tlinfo.LEVEL17_NAME = X_LEVEL17_NAME)
780 AND (tlinfo.LEVEL18_NAME = X_LEVEL18_NAME)
781 AND (tlinfo.LEVEL19_NAME = X_LEVEL19_NAME)
782 AND (tlinfo.LEVEL20_NAME = X_LEVEL20_NAME)
783 AND ((tlinfo.LEVEL1_DESCRIPTION = X_LEVEL1_DESCRIPTION)
784 OR ((tlinfo.LEVEL1_DESCRIPTION is null) AND (X_LEVEL1_DESCRIPTION is null)))
785 AND ((tlinfo.LEVEL2_DESCRIPTION = X_LEVEL2_DESCRIPTION)
786 OR ((tlinfo.LEVEL2_DESCRIPTION is null) AND (X_LEVEL2_DESCRIPTION is null)))
787 AND ((tlinfo.LEVEL3_DESCRIPTION = X_LEVEL3_DESCRIPTION)
788 OR ((tlinfo.LEVEL3_DESCRIPTION is null) AND (X_LEVEL3_DESCRIPTION is null)))
789 AND ((tlinfo.LEVEL4_DESCRIPTION = X_LEVEL4_DESCRIPTION)
790 OR ((tlinfo.LEVEL4_DESCRIPTION is null) AND (X_LEVEL4_DESCRIPTION is null)))
791 AND ((tlinfo.LEVEL5_DESCRIPTION = X_LEVEL5_DESCRIPTION)
792 OR ((tlinfo.LEVEL5_DESCRIPTION is null) AND (X_LEVEL5_DESCRIPTION is null)))
793 AND ((tlinfo.LEVEL6_DESCRIPTION = X_LEVEL6_DESCRIPTION)
794 OR ((tlinfo.LEVEL6_DESCRIPTION is null) AND (X_LEVEL6_DESCRIPTION is null)))
795 AND ((tlinfo.LEVEL7_DESCRIPTION = X_LEVEL7_DESCRIPTION)
796 OR ((tlinfo.LEVEL7_DESCRIPTION is null) AND (X_LEVEL7_DESCRIPTION is null)))
797 AND ((tlinfo.LEVEL8_DESCRIPTION = X_LEVEL8_DESCRIPTION)
798 OR ((tlinfo.LEVEL8_DESCRIPTION is null) AND (X_LEVEL8_DESCRIPTION is null)))
799 AND ((tlinfo.LEVEL9_DESCRIPTION = X_LEVEL9_DESCRIPTION)
800 OR ((tlinfo.LEVEL9_DESCRIPTION is null) AND (X_LEVEL9_DESCRIPTION is null)))
801 AND ((tlinfo.LEVEL10_DESCRIPTION = X_LEVEL10_DESCRIPTION)
802 OR ((tlinfo.LEVEL10_DESCRIPTION is null) AND (X_LEVEL10_DESCRIPTION is null)))
803 AND ((tlinfo.LEVEL11_DESCRIPTION = X_LEVEL11_DESCRIPTION)
804 OR ((tlinfo.LEVEL11_DESCRIPTION is null) AND (X_LEVEL11_DESCRIPTION is null)))
805 AND ((tlinfo.LEVEL12_DESCRIPTION = X_LEVEL12_DESCRIPTION)
806 OR ((tlinfo.LEVEL12_DESCRIPTION is null) AND (X_LEVEL12_DESCRIPTION is null)))
807 AND ((tlinfo.LEVEL13_DESCRIPTION = X_LEVEL13_DESCRIPTION)
808 OR ((tlinfo.LEVEL13_DESCRIPTION is null) AND (X_LEVEL13_DESCRIPTION is null)))
809 AND ((tlinfo.LEVEL14_DESCRIPTION = X_LEVEL14_DESCRIPTION)
810 OR ((tlinfo.LEVEL14_DESCRIPTION is null) AND (X_LEVEL14_DESCRIPTION is null)))
814 OR ((tlinfo.LEVEL16_DESCRIPTION is null) AND (X_LEVEL16_DESCRIPTION is null)))
811 AND ((tlinfo.LEVEL15_DESCRIPTION = X_LEVEL15_DESCRIPTION)
812 OR ((tlinfo.LEVEL15_DESCRIPTION is null) AND (X_LEVEL15_DESCRIPTION is null)))
813 AND ((tlinfo.LEVEL16_DESCRIPTION = X_LEVEL16_DESCRIPTION)
815 AND ((tlinfo.LEVEL17_DESCRIPTION = X_LEVEL17_DESCRIPTION)
816 OR ((tlinfo.LEVEL17_DESCRIPTION is null) AND (X_LEVEL17_DESCRIPTION is null)))
817 AND ((tlinfo.LEVEL18_DESCRIPTION = X_LEVEL18_DESCRIPTION)
818 OR ((tlinfo.LEVEL18_DESCRIPTION is null) AND (X_LEVEL18_DESCRIPTION is null)))
819 AND ((tlinfo.LEVEL19_DESCRIPTION = X_LEVEL19_DESCRIPTION)
820 OR ((tlinfo.LEVEL19_DESCRIPTION is null) AND (X_LEVEL19_DESCRIPTION is null)))
821 AND ((tlinfo.LEVEL20_DESCRIPTION = X_LEVEL20_DESCRIPTION)
822 OR ((tlinfo.LEVEL20_DESCRIPTION is null) AND (X_LEVEL20_DESCRIPTION is null)))
823 ) then
824 null;
825 else
826 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
827 app_exception.raise_exception;
828 end if;
829 end if;
830 end loop;
831 return;
832 end LOCK_ROW;
833
834 procedure UPDATE_ROW (
835 X_OBJECT_ID in NUMBER,
836 X_OBJECT_DEFINITION_ID in NUMBER,
837 X_LEVEL1_ID in NUMBER,
838 X_LEVEL2_ID in NUMBER,
839 X_LEVEL3_ID in NUMBER,
840 X_LEVEL4_ID in NUMBER,
841 X_LEVEL5_ID in NUMBER,
842 X_LEVEL6_ID in NUMBER,
843 X_LEVEL7_ID in NUMBER,
844 X_LEVEL8_ID in NUMBER,
845 X_LEVEL9_ID in NUMBER,
846 X_LEVEL10_ID in NUMBER,
847 X_LEVEL11_ID in NUMBER,
848 X_LEVEL12_ID in NUMBER,
849 X_LEVEL13_ID in NUMBER,
850 X_LEVEL14_ID in NUMBER,
851 X_LEVEL15_ID in NUMBER,
852 X_LEVEL16_ID in NUMBER,
853 X_LEVEL17_ID in NUMBER,
854 X_LEVEL18_ID in NUMBER,
855 X_LEVEL19_ID in NUMBER,
856 X_LEVEL20_ID in NUMBER,
857 X_LEVEL8_DISPLAY_ORDER_NUM in NUMBER,
858 X_LEVEL9_DISPLAY_ORDER_NUM in NUMBER,
859 X_LEVEL10_DISPLAY_ORDER_NUM in NUMBER,
860 X_LEVEL11_DISPLAY_ORDER_NUM in NUMBER,
861 X_LEVEL12_DISPLAY_ORDER_NUM in NUMBER,
862 X_LEVEL13_DISPLAY_ORDER_NUM in NUMBER,
863 X_LEVEL14_DISPLAY_ORDER_NUM in NUMBER,
864 X_LEVEL15_DISPLAY_ORDER_NUM in NUMBER,
865 X_LEVEL16_DISPLAY_ORDER_NUM in NUMBER,
866 X_LEVEL17_DISPLAY_ORDER_NUM in NUMBER,
867 X_LEVEL18_DISPLAY_ORDER_NUM in NUMBER,
868 X_LEVEL19_DISPLAY_ORDER_NUM in NUMBER,
869 X_LEVEL20_DISPLAY_ORDER_NUM in NUMBER,
870 X_LEVEL1_DISPLAY_CODE in VARCHAR2,
871 X_LEVEL2_DISPLAY_CODE in VARCHAR2,
872 X_LEVEL3_DISPLAY_CODE in VARCHAR2,
873 X_LEVEL4_DISPLAY_CODE in VARCHAR2,
874 X_LEVEL5_DISPLAY_CODE in VARCHAR2,
875 X_LEVEL6_DISPLAY_CODE in VARCHAR2,
876 X_LEVEL7_DISPLAY_CODE in VARCHAR2,
877 X_LEVEL8_DISPLAY_CODE in VARCHAR2,
878 X_LEVEL9_DISPLAY_CODE in VARCHAR2,
879 X_LEVEL10_DISPLAY_CODE in VARCHAR2,
880 X_LEVEL11_DISPLAY_CODE in VARCHAR2,
881 X_LEVEL12_DISPLAY_CODE in VARCHAR2,
882 X_LEVEL13_DISPLAY_CODE in VARCHAR2,
883 X_LEVEL14_DISPLAY_CODE in VARCHAR2,
884 X_LEVEL15_DISPLAY_CODE in VARCHAR2,
885 X_LEVEL16_DISPLAY_CODE in VARCHAR2,
886 X_LEVEL17_DISPLAY_CODE in VARCHAR2,
887 X_LEVEL18_DISPLAY_CODE in VARCHAR2,
888 X_LEVEL19_DISPLAY_CODE in VARCHAR2,
889 X_LEVEL20_DISPLAY_CODE in VARCHAR2,
890 X_LEVEL1_DISPLAY_ORDER_NUM in NUMBER,
891 X_LEVEL2_DISPLAY_ORDER_NUM in NUMBER,
892 X_LEVEL3_DISPLAY_ORDER_NUM in NUMBER,
893 X_LEVEL4_DISPLAY_ORDER_NUM in NUMBER,
894 X_LEVEL5_DISPLAY_ORDER_NUM in NUMBER,
895 X_LEVEL6_DISPLAY_ORDER_NUM in NUMBER,
896 X_LEVEL7_DISPLAY_ORDER_NUM in NUMBER,
897 X_OBJECT_NAME in VARCHAR2,
898 X_OBJECT_DEFINITION_NAME in VARCHAR2,
899 X_LEVEL1_NAME in VARCHAR2,
900 X_LEVEL2_NAME in VARCHAR2,
901 X_LEVEL3_NAME in VARCHAR2,
902 X_LEVEL4_NAME in VARCHAR2,
903 X_LEVEL5_NAME in VARCHAR2,
904 X_LEVEL6_NAME in VARCHAR2,
905 X_LEVEL7_NAME in VARCHAR2,
906 X_LEVEL8_NAME in VARCHAR2,
907 X_LEVEL9_NAME in VARCHAR2,
908 X_LEVEL10_NAME in VARCHAR2,
909 X_LEVEL11_NAME in VARCHAR2,
910 X_LEVEL12_NAME in VARCHAR2,
911 X_LEVEL13_NAME in VARCHAR2,
912 X_LEVEL14_NAME in VARCHAR2,
913 X_LEVEL15_NAME in VARCHAR2,
914 X_LEVEL16_NAME in VARCHAR2,
915 X_LEVEL17_NAME in VARCHAR2,
916 X_LEVEL18_NAME in VARCHAR2,
917 X_LEVEL19_NAME in VARCHAR2,
918 X_LEVEL20_NAME in VARCHAR2,
919 X_LEVEL1_DESCRIPTION in VARCHAR2,
920 X_LEVEL2_DESCRIPTION in VARCHAR2,
921 X_LEVEL3_DESCRIPTION in VARCHAR2,
922 X_LEVEL4_DESCRIPTION in VARCHAR2,
923 X_LEVEL5_DESCRIPTION in VARCHAR2,
924 X_LEVEL6_DESCRIPTION in VARCHAR2,
925 X_LEVEL7_DESCRIPTION in VARCHAR2,
926 X_LEVEL8_DESCRIPTION in VARCHAR2,
927 X_LEVEL9_DESCRIPTION in VARCHAR2,
928 X_LEVEL10_DESCRIPTION in VARCHAR2,
929 X_LEVEL11_DESCRIPTION in VARCHAR2,
930 X_LEVEL12_DESCRIPTION in VARCHAR2,
931 X_LEVEL13_DESCRIPTION in VARCHAR2,
932 X_LEVEL14_DESCRIPTION in VARCHAR2,
933 X_LEVEL15_DESCRIPTION in VARCHAR2,
934 X_LEVEL16_DESCRIPTION in VARCHAR2,
935 X_LEVEL17_DESCRIPTION in VARCHAR2,
936 X_LEVEL18_DESCRIPTION in VARCHAR2,
937 X_LEVEL19_DESCRIPTION in VARCHAR2,
938 X_LEVEL20_DESCRIPTION in VARCHAR2,
939 X_LAST_UPDATE_DATE in DATE,
940 X_LAST_UPDATED_BY in NUMBER,
941 X_LAST_UPDATE_LOGIN in NUMBER
942 ) is
943 begin
944 update FEM_DIS_PRD_TYPES_HIER_B set
945 LEVEL8_DISPLAY_ORDER_NUM = X_LEVEL8_DISPLAY_ORDER_NUM,
946 LEVEL9_DISPLAY_ORDER_NUM = X_LEVEL9_DISPLAY_ORDER_NUM,
947 LEVEL10_DISPLAY_ORDER_NUM = X_LEVEL10_DISPLAY_ORDER_NUM,
948 LEVEL11_DISPLAY_ORDER_NUM = X_LEVEL11_DISPLAY_ORDER_NUM,
949 LEVEL12_DISPLAY_ORDER_NUM = X_LEVEL12_DISPLAY_ORDER_NUM,
953 LEVEL16_DISPLAY_ORDER_NUM = X_LEVEL16_DISPLAY_ORDER_NUM,
950 LEVEL13_DISPLAY_ORDER_NUM = X_LEVEL13_DISPLAY_ORDER_NUM,
951 LEVEL14_DISPLAY_ORDER_NUM = X_LEVEL14_DISPLAY_ORDER_NUM,
952 LEVEL15_DISPLAY_ORDER_NUM = X_LEVEL15_DISPLAY_ORDER_NUM,
954 LEVEL17_DISPLAY_ORDER_NUM = X_LEVEL17_DISPLAY_ORDER_NUM,
955 LEVEL18_DISPLAY_ORDER_NUM = X_LEVEL18_DISPLAY_ORDER_NUM,
956 LEVEL19_DISPLAY_ORDER_NUM = X_LEVEL19_DISPLAY_ORDER_NUM,
957 LEVEL20_DISPLAY_ORDER_NUM = X_LEVEL20_DISPLAY_ORDER_NUM,
958 LEVEL1_DISPLAY_CODE = X_LEVEL1_DISPLAY_CODE,
959 LEVEL2_DISPLAY_CODE = X_LEVEL2_DISPLAY_CODE,
960 LEVEL3_DISPLAY_CODE = X_LEVEL3_DISPLAY_CODE,
961 LEVEL4_DISPLAY_CODE = X_LEVEL4_DISPLAY_CODE,
962 LEVEL5_DISPLAY_CODE = X_LEVEL5_DISPLAY_CODE,
963 LEVEL6_DISPLAY_CODE = X_LEVEL6_DISPLAY_CODE,
964 LEVEL7_DISPLAY_CODE = X_LEVEL7_DISPLAY_CODE,
965 LEVEL8_DISPLAY_CODE = X_LEVEL8_DISPLAY_CODE,
966 LEVEL9_DISPLAY_CODE = X_LEVEL9_DISPLAY_CODE,
967 LEVEL10_DISPLAY_CODE = X_LEVEL10_DISPLAY_CODE,
968 LEVEL11_DISPLAY_CODE = X_LEVEL11_DISPLAY_CODE,
969 LEVEL12_DISPLAY_CODE = X_LEVEL12_DISPLAY_CODE,
970 LEVEL13_DISPLAY_CODE = X_LEVEL13_DISPLAY_CODE,
971 LEVEL14_DISPLAY_CODE = X_LEVEL14_DISPLAY_CODE,
972 LEVEL15_DISPLAY_CODE = X_LEVEL15_DISPLAY_CODE,
973 LEVEL16_DISPLAY_CODE = X_LEVEL16_DISPLAY_CODE,
974 LEVEL17_DISPLAY_CODE = X_LEVEL17_DISPLAY_CODE,
975 LEVEL18_DISPLAY_CODE = X_LEVEL18_DISPLAY_CODE,
976 LEVEL19_DISPLAY_CODE = X_LEVEL19_DISPLAY_CODE,
977 LEVEL20_DISPLAY_CODE = X_LEVEL20_DISPLAY_CODE,
978 LEVEL1_DISPLAY_ORDER_NUM = X_LEVEL1_DISPLAY_ORDER_NUM,
979 LEVEL2_DISPLAY_ORDER_NUM = X_LEVEL2_DISPLAY_ORDER_NUM,
980 LEVEL3_DISPLAY_ORDER_NUM = X_LEVEL3_DISPLAY_ORDER_NUM,
981 LEVEL4_DISPLAY_ORDER_NUM = X_LEVEL4_DISPLAY_ORDER_NUM,
982 LEVEL5_DISPLAY_ORDER_NUM = X_LEVEL5_DISPLAY_ORDER_NUM,
983 LEVEL6_DISPLAY_ORDER_NUM = X_LEVEL6_DISPLAY_ORDER_NUM,
984 LEVEL7_DISPLAY_ORDER_NUM = X_LEVEL7_DISPLAY_ORDER_NUM,
985 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
986 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
987 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
988 where OBJECT_ID = X_OBJECT_ID
989 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
990 and LEVEL1_ID = X_LEVEL1_ID
991 and LEVEL2_ID = X_LEVEL2_ID
992 and LEVEL3_ID = X_LEVEL3_ID
993 and LEVEL4_ID = X_LEVEL4_ID
994 and LEVEL5_ID = X_LEVEL5_ID
995 and LEVEL6_ID = X_LEVEL6_ID
996 and LEVEL7_ID = X_LEVEL7_ID
997 and LEVEL8_ID = X_LEVEL8_ID
998 and LEVEL9_ID = X_LEVEL9_ID
999 and LEVEL10_ID = X_LEVEL10_ID
1000 and LEVEL11_ID = X_LEVEL11_ID
1001 and LEVEL12_ID = X_LEVEL12_ID
1002 and LEVEL13_ID = X_LEVEL13_ID
1003 and LEVEL14_ID = X_LEVEL14_ID
1004 and LEVEL15_ID = X_LEVEL15_ID
1005 and LEVEL16_ID = X_LEVEL16_ID
1006 and LEVEL17_ID = X_LEVEL17_ID
1007 and LEVEL18_ID = X_LEVEL18_ID
1008 and LEVEL19_ID = X_LEVEL19_ID
1009 and LEVEL20_ID = X_LEVEL20_ID;
1010
1011 if (sql%notfound) then
1012 raise no_data_found;
1013 end if;
1014
1015 update FEM_DIS_PRD_TYPES_HIER_TL set
1016 OBJECT_NAME = X_OBJECT_NAME,
1017 OBJECT_DEFINITION_NAME = X_OBJECT_DEFINITION_NAME,
1018 LEVEL1_NAME = X_LEVEL1_NAME,
1019 LEVEL2_NAME = X_LEVEL2_NAME,
1020 LEVEL3_NAME = X_LEVEL3_NAME,
1021 LEVEL4_NAME = X_LEVEL4_NAME,
1022 LEVEL5_NAME = X_LEVEL5_NAME,
1023 LEVEL6_NAME = X_LEVEL6_NAME,
1024 LEVEL7_NAME = X_LEVEL7_NAME,
1025 LEVEL8_NAME = X_LEVEL8_NAME,
1026 LEVEL9_NAME = X_LEVEL9_NAME,
1027 LEVEL10_NAME = X_LEVEL10_NAME,
1028 LEVEL11_NAME = X_LEVEL11_NAME,
1029 LEVEL12_NAME = X_LEVEL12_NAME,
1030 LEVEL13_NAME = X_LEVEL13_NAME,
1031 LEVEL14_NAME = X_LEVEL14_NAME,
1032 LEVEL15_NAME = X_LEVEL15_NAME,
1033 LEVEL16_NAME = X_LEVEL16_NAME,
1034 LEVEL17_NAME = X_LEVEL17_NAME,
1035 LEVEL18_NAME = X_LEVEL18_NAME,
1036 LEVEL19_NAME = X_LEVEL19_NAME,
1037 LEVEL20_NAME = X_LEVEL20_NAME,
1038 LEVEL1_DESCRIPTION = X_LEVEL1_DESCRIPTION,
1039 LEVEL2_DESCRIPTION = X_LEVEL2_DESCRIPTION,
1040 LEVEL3_DESCRIPTION = X_LEVEL3_DESCRIPTION,
1041 LEVEL4_DESCRIPTION = X_LEVEL4_DESCRIPTION,
1042 LEVEL5_DESCRIPTION = X_LEVEL5_DESCRIPTION,
1043 LEVEL6_DESCRIPTION = X_LEVEL6_DESCRIPTION,
1044 LEVEL7_DESCRIPTION = X_LEVEL7_DESCRIPTION,
1045 LEVEL8_DESCRIPTION = X_LEVEL8_DESCRIPTION,
1046 LEVEL9_DESCRIPTION = X_LEVEL9_DESCRIPTION,
1047 LEVEL10_DESCRIPTION = X_LEVEL10_DESCRIPTION,
1048 LEVEL11_DESCRIPTION = X_LEVEL11_DESCRIPTION,
1049 LEVEL12_DESCRIPTION = X_LEVEL12_DESCRIPTION,
1050 LEVEL13_DESCRIPTION = X_LEVEL13_DESCRIPTION,
1051 LEVEL14_DESCRIPTION = X_LEVEL14_DESCRIPTION,
1052 LEVEL15_DESCRIPTION = X_LEVEL15_DESCRIPTION,
1053 LEVEL16_DESCRIPTION = X_LEVEL16_DESCRIPTION,
1054 LEVEL17_DESCRIPTION = X_LEVEL17_DESCRIPTION,
1055 LEVEL18_DESCRIPTION = X_LEVEL18_DESCRIPTION,
1056 LEVEL19_DESCRIPTION = X_LEVEL19_DESCRIPTION,
1057 LEVEL20_DESCRIPTION = X_LEVEL20_DESCRIPTION,
1058 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
1059 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
1060 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
1061 SOURCE_LANG = userenv('LANG')
1062 where OBJECT_ID = X_OBJECT_ID
1063 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
1064 and LEVEL1_ID = X_LEVEL1_ID
1065 and LEVEL2_ID = X_LEVEL2_ID
1066 and LEVEL3_ID = X_LEVEL3_ID
1067 and LEVEL4_ID = X_LEVEL4_ID
1068 and LEVEL5_ID = X_LEVEL5_ID
1069 and LEVEL6_ID = X_LEVEL6_ID
1070 and LEVEL7_ID = X_LEVEL7_ID
1071 and LEVEL8_ID = X_LEVEL8_ID
1072 and LEVEL9_ID = X_LEVEL9_ID
1073 and LEVEL10_ID = X_LEVEL10_ID
1074 and LEVEL11_ID = X_LEVEL11_ID
1075 and LEVEL12_ID = X_LEVEL12_ID
1076 and LEVEL13_ID = X_LEVEL13_ID
1077 and LEVEL14_ID = X_LEVEL14_ID
1078 and LEVEL15_ID = X_LEVEL15_ID
1079 and LEVEL16_ID = X_LEVEL16_ID
1083 and LEVEL20_ID = X_LEVEL20_ID
1080 and LEVEL17_ID = X_LEVEL17_ID
1081 and LEVEL18_ID = X_LEVEL18_ID
1082 and LEVEL19_ID = X_LEVEL19_ID
1084 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
1085
1086 if (sql%notfound) then
1087 raise no_data_found;
1088 end if;
1089 end UPDATE_ROW;
1090
1091 procedure DELETE_ROW (
1092 X_OBJECT_ID in NUMBER,
1093 X_OBJECT_DEFINITION_ID in NUMBER,
1094 X_LEVEL1_ID in NUMBER,
1095 X_LEVEL2_ID in NUMBER,
1096 X_LEVEL3_ID in NUMBER,
1097 X_LEVEL4_ID in NUMBER,
1098 X_LEVEL5_ID in NUMBER,
1099 X_LEVEL6_ID in NUMBER,
1100 X_LEVEL7_ID in NUMBER,
1101 X_LEVEL8_ID in NUMBER,
1102 X_LEVEL9_ID in NUMBER,
1103 X_LEVEL10_ID in NUMBER,
1104 X_LEVEL11_ID in NUMBER,
1105 X_LEVEL12_ID in NUMBER,
1106 X_LEVEL13_ID in NUMBER,
1107 X_LEVEL14_ID in NUMBER,
1108 X_LEVEL15_ID in NUMBER,
1109 X_LEVEL16_ID in NUMBER,
1110 X_LEVEL17_ID in NUMBER,
1111 X_LEVEL18_ID in NUMBER,
1112 X_LEVEL19_ID in NUMBER,
1113 X_LEVEL20_ID in NUMBER
1114 ) is
1115 begin
1116 delete from FEM_DIS_PRD_TYPES_HIER_TL
1117 where OBJECT_ID = X_OBJECT_ID
1118 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
1119 and LEVEL1_ID = X_LEVEL1_ID
1120 and LEVEL2_ID = X_LEVEL2_ID
1121 and LEVEL3_ID = X_LEVEL3_ID
1122 and LEVEL4_ID = X_LEVEL4_ID
1123 and LEVEL5_ID = X_LEVEL5_ID
1124 and LEVEL6_ID = X_LEVEL6_ID
1125 and LEVEL7_ID = X_LEVEL7_ID
1126 and LEVEL8_ID = X_LEVEL8_ID
1127 and LEVEL9_ID = X_LEVEL9_ID
1128 and LEVEL10_ID = X_LEVEL10_ID
1129 and LEVEL11_ID = X_LEVEL11_ID
1130 and LEVEL12_ID = X_LEVEL12_ID
1131 and LEVEL13_ID = X_LEVEL13_ID
1132 and LEVEL14_ID = X_LEVEL14_ID
1133 and LEVEL15_ID = X_LEVEL15_ID
1134 and LEVEL16_ID = X_LEVEL16_ID
1135 and LEVEL17_ID = X_LEVEL17_ID
1136 and LEVEL18_ID = X_LEVEL18_ID
1137 and LEVEL19_ID = X_LEVEL19_ID
1138 and LEVEL20_ID = X_LEVEL20_ID;
1139
1140 if (sql%notfound) then
1141 raise no_data_found;
1142 end if;
1143
1144 delete from FEM_DIS_PRD_TYPES_HIER_B
1145 where OBJECT_ID = X_OBJECT_ID
1146 and OBJECT_DEFINITION_ID = X_OBJECT_DEFINITION_ID
1147 and LEVEL1_ID = X_LEVEL1_ID
1148 and LEVEL2_ID = X_LEVEL2_ID
1149 and LEVEL3_ID = X_LEVEL3_ID
1150 and LEVEL4_ID = X_LEVEL4_ID
1151 and LEVEL5_ID = X_LEVEL5_ID
1152 and LEVEL6_ID = X_LEVEL6_ID
1153 and LEVEL7_ID = X_LEVEL7_ID
1154 and LEVEL8_ID = X_LEVEL8_ID
1155 and LEVEL9_ID = X_LEVEL9_ID
1156 and LEVEL10_ID = X_LEVEL10_ID
1157 and LEVEL11_ID = X_LEVEL11_ID
1158 and LEVEL12_ID = X_LEVEL12_ID
1159 and LEVEL13_ID = X_LEVEL13_ID
1160 and LEVEL14_ID = X_LEVEL14_ID
1161 and LEVEL15_ID = X_LEVEL15_ID
1162 and LEVEL16_ID = X_LEVEL16_ID
1163 and LEVEL17_ID = X_LEVEL17_ID
1164 and LEVEL18_ID = X_LEVEL18_ID
1165 and LEVEL19_ID = X_LEVEL19_ID
1166 and LEVEL20_ID = X_LEVEL20_ID;
1167
1168 if (sql%notfound) then
1169 raise no_data_found;
1170 end if;
1171 end DELETE_ROW;
1172
1173 procedure ADD_LANGUAGE
1174 is
1175 begin
1176 delete from FEM_DIS_PRD_TYPES_HIER_TL T
1177 where not exists
1178 (select NULL
1179 from FEM_DIS_PRD_TYPES_HIER_B B
1180 where B.OBJECT_ID = T.OBJECT_ID
1181 and B.OBJECT_DEFINITION_ID = T.OBJECT_DEFINITION_ID
1182 and B.LEVEL1_ID = T.LEVEL1_ID
1183 and B.LEVEL2_ID = T.LEVEL2_ID
1184 and B.LEVEL3_ID = T.LEVEL3_ID
1185 and B.LEVEL4_ID = T.LEVEL4_ID
1186 and B.LEVEL5_ID = T.LEVEL5_ID
1187 and B.LEVEL6_ID = T.LEVEL6_ID
1188 and B.LEVEL7_ID = T.LEVEL7_ID
1189 and B.LEVEL8_ID = T.LEVEL8_ID
1190 and B.LEVEL9_ID = T.LEVEL9_ID
1191 and B.LEVEL10_ID = T.LEVEL10_ID
1192 and B.LEVEL11_ID = T.LEVEL11_ID
1193 and B.LEVEL12_ID = T.LEVEL12_ID
1194 and B.LEVEL13_ID = T.LEVEL13_ID
1195 and B.LEVEL14_ID = T.LEVEL14_ID
1196 and B.LEVEL15_ID = T.LEVEL15_ID
1197 and B.LEVEL16_ID = T.LEVEL16_ID
1198 and B.LEVEL17_ID = T.LEVEL17_ID
1199 and B.LEVEL18_ID = T.LEVEL18_ID
1200 and B.LEVEL19_ID = T.LEVEL19_ID
1201 and B.LEVEL20_ID = T.LEVEL20_ID
1202 );
1203
1204 update FEM_DIS_PRD_TYPES_HIER_TL T set (
1205 OBJECT_NAME,
1206 OBJECT_DEFINITION_NAME,
1207 LEVEL1_NAME,
1208 LEVEL2_NAME,
1209 LEVEL3_NAME,
1210 LEVEL4_NAME,
1211 LEVEL5_NAME,
1212 LEVEL6_NAME,
1213 LEVEL7_NAME,
1214 LEVEL8_NAME,
1215 LEVEL9_NAME,
1216 LEVEL10_NAME,
1217 LEVEL11_NAME,
1218 LEVEL12_NAME,
1219 LEVEL13_NAME,
1220 LEVEL14_NAME,
1221 LEVEL15_NAME,
1222 LEVEL16_NAME,
1223 LEVEL17_NAME,
1224 LEVEL18_NAME,
1225 LEVEL19_NAME,
1226 LEVEL20_NAME,
1227 LEVEL1_DESCRIPTION,
1228 LEVEL2_DESCRIPTION,
1229 LEVEL3_DESCRIPTION,
1230 LEVEL4_DESCRIPTION,
1231 LEVEL5_DESCRIPTION,
1232 LEVEL6_DESCRIPTION,
1233 LEVEL7_DESCRIPTION,
1234 LEVEL8_DESCRIPTION,
1235 LEVEL9_DESCRIPTION,
1236 LEVEL10_DESCRIPTION,
1237 LEVEL11_DESCRIPTION,
1238 LEVEL12_DESCRIPTION,
1239 LEVEL13_DESCRIPTION,
1240 LEVEL14_DESCRIPTION,
1241 LEVEL15_DESCRIPTION,
1242 LEVEL16_DESCRIPTION,
1243 LEVEL17_DESCRIPTION,
1244 LEVEL18_DESCRIPTION,
1245 LEVEL19_DESCRIPTION,
1246 LEVEL20_DESCRIPTION
1247 ) = (select
1248 B.OBJECT_NAME,
1249 B.OBJECT_DEFINITION_NAME,
1250 B.LEVEL1_NAME,
1251 B.LEVEL2_NAME,
1252 B.LEVEL3_NAME,
1253 B.LEVEL4_NAME,
1254 B.LEVEL5_NAME,
1255 B.LEVEL6_NAME,
1259 B.LEVEL10_NAME,
1256 B.LEVEL7_NAME,
1257 B.LEVEL8_NAME,
1258 B.LEVEL9_NAME,
1260 B.LEVEL11_NAME,
1261 B.LEVEL12_NAME,
1262 B.LEVEL13_NAME,
1263 B.LEVEL14_NAME,
1264 B.LEVEL15_NAME,
1265 B.LEVEL16_NAME,
1266 B.LEVEL17_NAME,
1267 B.LEVEL18_NAME,
1268 B.LEVEL19_NAME,
1269 B.LEVEL20_NAME,
1270 B.LEVEL1_DESCRIPTION,
1271 B.LEVEL2_DESCRIPTION,
1272 B.LEVEL3_DESCRIPTION,
1273 B.LEVEL4_DESCRIPTION,
1274 B.LEVEL5_DESCRIPTION,
1275 B.LEVEL6_DESCRIPTION,
1276 B.LEVEL7_DESCRIPTION,
1277 B.LEVEL8_DESCRIPTION,
1278 B.LEVEL9_DESCRIPTION,
1279 B.LEVEL10_DESCRIPTION,
1280 B.LEVEL11_DESCRIPTION,
1281 B.LEVEL12_DESCRIPTION,
1282 B.LEVEL13_DESCRIPTION,
1283 B.LEVEL14_DESCRIPTION,
1284 B.LEVEL15_DESCRIPTION,
1285 B.LEVEL16_DESCRIPTION,
1286 B.LEVEL17_DESCRIPTION,
1287 B.LEVEL18_DESCRIPTION,
1288 B.LEVEL19_DESCRIPTION,
1289 B.LEVEL20_DESCRIPTION
1290 from FEM_DIS_PRD_TYPES_HIER_TL B
1291 where B.OBJECT_ID = T.OBJECT_ID
1292 and B.OBJECT_DEFINITION_ID = T.OBJECT_DEFINITION_ID
1293 and B.LEVEL1_ID = T.LEVEL1_ID
1294 and B.LEVEL2_ID = T.LEVEL2_ID
1295 and B.LEVEL3_ID = T.LEVEL3_ID
1296 and B.LEVEL4_ID = T.LEVEL4_ID
1297 and B.LEVEL5_ID = T.LEVEL5_ID
1298 and B.LEVEL6_ID = T.LEVEL6_ID
1299 and B.LEVEL7_ID = T.LEVEL7_ID
1300 and B.LEVEL8_ID = T.LEVEL8_ID
1301 and B.LEVEL9_ID = T.LEVEL9_ID
1302 and B.LEVEL10_ID = T.LEVEL10_ID
1303 and B.LEVEL11_ID = T.LEVEL11_ID
1304 and B.LEVEL12_ID = T.LEVEL12_ID
1305 and B.LEVEL13_ID = T.LEVEL13_ID
1306 and B.LEVEL14_ID = T.LEVEL14_ID
1307 and B.LEVEL15_ID = T.LEVEL15_ID
1308 and B.LEVEL16_ID = T.LEVEL16_ID
1309 and B.LEVEL17_ID = T.LEVEL17_ID
1310 and B.LEVEL18_ID = T.LEVEL18_ID
1311 and B.LEVEL19_ID = T.LEVEL19_ID
1312 and B.LEVEL20_ID = T.LEVEL20_ID
1313 and B.LANGUAGE = T.SOURCE_LANG)
1314 where (
1315 T.OBJECT_ID,
1316 T.OBJECT_DEFINITION_ID,
1317 T.LEVEL1_ID,
1318 T.LEVEL2_ID,
1319 T.LEVEL3_ID,
1320 T.LEVEL4_ID,
1321 T.LEVEL5_ID,
1322 T.LEVEL6_ID,
1323 T.LEVEL7_ID,
1324 T.LEVEL8_ID,
1325 T.LEVEL9_ID,
1326 T.LEVEL10_ID,
1327 T.LEVEL11_ID,
1328 T.LEVEL12_ID,
1329 T.LEVEL13_ID,
1330 T.LEVEL14_ID,
1331 T.LEVEL15_ID,
1332 T.LEVEL16_ID,
1333 T.LEVEL17_ID,
1334 T.LEVEL18_ID,
1335 T.LEVEL19_ID,
1336 T.LEVEL20_ID,
1337 T.LANGUAGE
1338 ) in (select
1339 SUBT.OBJECT_ID,
1340 SUBT.OBJECT_DEFINITION_ID,
1341 SUBT.LEVEL1_ID,
1342 SUBT.LEVEL2_ID,
1343 SUBT.LEVEL3_ID,
1344 SUBT.LEVEL4_ID,
1345 SUBT.LEVEL5_ID,
1346 SUBT.LEVEL6_ID,
1347 SUBT.LEVEL7_ID,
1348 SUBT.LEVEL8_ID,
1349 SUBT.LEVEL9_ID,
1350 SUBT.LEVEL10_ID,
1351 SUBT.LEVEL11_ID,
1352 SUBT.LEVEL12_ID,
1353 SUBT.LEVEL13_ID,
1354 SUBT.LEVEL14_ID,
1355 SUBT.LEVEL15_ID,
1356 SUBT.LEVEL16_ID,
1357 SUBT.LEVEL17_ID,
1358 SUBT.LEVEL18_ID,
1359 SUBT.LEVEL19_ID,
1360 SUBT.LEVEL20_ID,
1361 SUBT.LANGUAGE
1362 from FEM_DIS_PRD_TYPES_HIER_TL SUBB, FEM_DIS_PRD_TYPES_HIER_TL SUBT
1363 where SUBB.OBJECT_ID = SUBT.OBJECT_ID
1364 and SUBB.OBJECT_DEFINITION_ID = SUBT.OBJECT_DEFINITION_ID
1365 and SUBB.LEVEL1_ID = SUBT.LEVEL1_ID
1366 and SUBB.LEVEL2_ID = SUBT.LEVEL2_ID
1367 and SUBB.LEVEL3_ID = SUBT.LEVEL3_ID
1368 and SUBB.LEVEL4_ID = SUBT.LEVEL4_ID
1369 and SUBB.LEVEL5_ID = SUBT.LEVEL5_ID
1370 and SUBB.LEVEL6_ID = SUBT.LEVEL6_ID
1371 and SUBB.LEVEL7_ID = SUBT.LEVEL7_ID
1372 and SUBB.LEVEL8_ID = SUBT.LEVEL8_ID
1373 and SUBB.LEVEL9_ID = SUBT.LEVEL9_ID
1374 and SUBB.LEVEL10_ID = SUBT.LEVEL10_ID
1375 and SUBB.LEVEL11_ID = SUBT.LEVEL11_ID
1376 and SUBB.LEVEL12_ID = SUBT.LEVEL12_ID
1377 and SUBB.LEVEL13_ID = SUBT.LEVEL13_ID
1378 and SUBB.LEVEL14_ID = SUBT.LEVEL14_ID
1379 and SUBB.LEVEL15_ID = SUBT.LEVEL15_ID
1380 and SUBB.LEVEL16_ID = SUBT.LEVEL16_ID
1381 and SUBB.LEVEL17_ID = SUBT.LEVEL17_ID
1382 and SUBB.LEVEL18_ID = SUBT.LEVEL18_ID
1383 and SUBB.LEVEL19_ID = SUBT.LEVEL19_ID
1384 and SUBB.LEVEL20_ID = SUBT.LEVEL20_ID
1385 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1386 and (SUBB.OBJECT_NAME <> SUBT.OBJECT_NAME
1387 or SUBB.OBJECT_DEFINITION_NAME <> SUBT.OBJECT_DEFINITION_NAME
1388 or SUBB.LEVEL1_NAME <> SUBT.LEVEL1_NAME
1389 or SUBB.LEVEL2_NAME <> SUBT.LEVEL2_NAME
1390 or SUBB.LEVEL3_NAME <> SUBT.LEVEL3_NAME
1391 or SUBB.LEVEL4_NAME <> SUBT.LEVEL4_NAME
1392 or SUBB.LEVEL5_NAME <> SUBT.LEVEL5_NAME
1393 or SUBB.LEVEL6_NAME <> SUBT.LEVEL6_NAME
1394 or SUBB.LEVEL7_NAME <> SUBT.LEVEL7_NAME
1395 or SUBB.LEVEL8_NAME <> SUBT.LEVEL8_NAME
1396 or SUBB.LEVEL9_NAME <> SUBT.LEVEL9_NAME
1397 or SUBB.LEVEL10_NAME <> SUBT.LEVEL10_NAME
1398 or SUBB.LEVEL11_NAME <> SUBT.LEVEL11_NAME
1399 or SUBB.LEVEL12_NAME <> SUBT.LEVEL12_NAME
1400 or SUBB.LEVEL13_NAME <> SUBT.LEVEL13_NAME
1401 or SUBB.LEVEL14_NAME <> SUBT.LEVEL14_NAME
1402 or SUBB.LEVEL15_NAME <> SUBT.LEVEL15_NAME
1403 or SUBB.LEVEL16_NAME <> SUBT.LEVEL16_NAME
1404 or SUBB.LEVEL17_NAME <> SUBT.LEVEL17_NAME
1405 or SUBB.LEVEL18_NAME <> SUBT.LEVEL18_NAME
1406 or SUBB.LEVEL19_NAME <> SUBT.LEVEL19_NAME
1407 or SUBB.LEVEL20_NAME <> SUBT.LEVEL20_NAME
1408 or SUBB.LEVEL1_DESCRIPTION <> SUBT.LEVEL1_DESCRIPTION
1412 or (SUBB.LEVEL2_DESCRIPTION is null and SUBT.LEVEL2_DESCRIPTION is not null)
1409 or (SUBB.LEVEL1_DESCRIPTION is null and SUBT.LEVEL1_DESCRIPTION is not null)
1410 or (SUBB.LEVEL1_DESCRIPTION is not null and SUBT.LEVEL1_DESCRIPTION is null)
1411 or SUBB.LEVEL2_DESCRIPTION <> SUBT.LEVEL2_DESCRIPTION
1413 or (SUBB.LEVEL2_DESCRIPTION is not null and SUBT.LEVEL2_DESCRIPTION is null)
1414 or SUBB.LEVEL3_DESCRIPTION <> SUBT.LEVEL3_DESCRIPTION
1415 or (SUBB.LEVEL3_DESCRIPTION is null and SUBT.LEVEL3_DESCRIPTION is not null)
1416 or (SUBB.LEVEL3_DESCRIPTION is not null and SUBT.LEVEL3_DESCRIPTION is null)
1417 or SUBB.LEVEL4_DESCRIPTION <> SUBT.LEVEL4_DESCRIPTION
1418 or (SUBB.LEVEL4_DESCRIPTION is null and SUBT.LEVEL4_DESCRIPTION is not null)
1419 or (SUBB.LEVEL4_DESCRIPTION is not null and SUBT.LEVEL4_DESCRIPTION is null)
1420 or SUBB.LEVEL5_DESCRIPTION <> SUBT.LEVEL5_DESCRIPTION
1421 or (SUBB.LEVEL5_DESCRIPTION is null and SUBT.LEVEL5_DESCRIPTION is not null)
1422 or (SUBB.LEVEL5_DESCRIPTION is not null and SUBT.LEVEL5_DESCRIPTION is null)
1423 or SUBB.LEVEL6_DESCRIPTION <> SUBT.LEVEL6_DESCRIPTION
1424 or (SUBB.LEVEL6_DESCRIPTION is null and SUBT.LEVEL6_DESCRIPTION is not null)
1425 or (SUBB.LEVEL6_DESCRIPTION is not null and SUBT.LEVEL6_DESCRIPTION is null)
1426 or SUBB.LEVEL7_DESCRIPTION <> SUBT.LEVEL7_DESCRIPTION
1427 or (SUBB.LEVEL7_DESCRIPTION is null and SUBT.LEVEL7_DESCRIPTION is not null)
1428 or (SUBB.LEVEL7_DESCRIPTION is not null and SUBT.LEVEL7_DESCRIPTION is null)
1429 or SUBB.LEVEL8_DESCRIPTION <> SUBT.LEVEL8_DESCRIPTION
1430 or (SUBB.LEVEL8_DESCRIPTION is null and SUBT.LEVEL8_DESCRIPTION is not null)
1431 or (SUBB.LEVEL8_DESCRIPTION is not null and SUBT.LEVEL8_DESCRIPTION is null)
1432 or SUBB.LEVEL9_DESCRIPTION <> SUBT.LEVEL9_DESCRIPTION
1433 or (SUBB.LEVEL9_DESCRIPTION is null and SUBT.LEVEL9_DESCRIPTION is not null)
1434 or (SUBB.LEVEL9_DESCRIPTION is not null and SUBT.LEVEL9_DESCRIPTION is null)
1435 or SUBB.LEVEL10_DESCRIPTION <> SUBT.LEVEL10_DESCRIPTION
1436 or (SUBB.LEVEL10_DESCRIPTION is null and SUBT.LEVEL10_DESCRIPTION is not null)
1437 or (SUBB.LEVEL10_DESCRIPTION is not null and SUBT.LEVEL10_DESCRIPTION is null)
1438 or SUBB.LEVEL11_DESCRIPTION <> SUBT.LEVEL11_DESCRIPTION
1439 or (SUBB.LEVEL11_DESCRIPTION is null and SUBT.LEVEL11_DESCRIPTION is not null)
1440 or (SUBB.LEVEL11_DESCRIPTION is not null and SUBT.LEVEL11_DESCRIPTION is null)
1441 or SUBB.LEVEL12_DESCRIPTION <> SUBT.LEVEL12_DESCRIPTION
1442 or (SUBB.LEVEL12_DESCRIPTION is null and SUBT.LEVEL12_DESCRIPTION is not null)
1443 or (SUBB.LEVEL12_DESCRIPTION is not null and SUBT.LEVEL12_DESCRIPTION is null)
1444 or SUBB.LEVEL13_DESCRIPTION <> SUBT.LEVEL13_DESCRIPTION
1445 or (SUBB.LEVEL13_DESCRIPTION is null and SUBT.LEVEL13_DESCRIPTION is not null)
1446 or (SUBB.LEVEL13_DESCRIPTION is not null and SUBT.LEVEL13_DESCRIPTION is null)
1447 or SUBB.LEVEL14_DESCRIPTION <> SUBT.LEVEL14_DESCRIPTION
1448 or (SUBB.LEVEL14_DESCRIPTION is null and SUBT.LEVEL14_DESCRIPTION is not null)
1449 or (SUBB.LEVEL14_DESCRIPTION is not null and SUBT.LEVEL14_DESCRIPTION is null)
1450 or SUBB.LEVEL15_DESCRIPTION <> SUBT.LEVEL15_DESCRIPTION
1451 or (SUBB.LEVEL15_DESCRIPTION is null and SUBT.LEVEL15_DESCRIPTION is not null)
1452 or (SUBB.LEVEL15_DESCRIPTION is not null and SUBT.LEVEL15_DESCRIPTION is null)
1453 or SUBB.LEVEL16_DESCRIPTION <> SUBT.LEVEL16_DESCRIPTION
1454 or (SUBB.LEVEL16_DESCRIPTION is null and SUBT.LEVEL16_DESCRIPTION is not null)
1455 or (SUBB.LEVEL16_DESCRIPTION is not null and SUBT.LEVEL16_DESCRIPTION is null)
1456 or SUBB.LEVEL17_DESCRIPTION <> SUBT.LEVEL17_DESCRIPTION
1457 or (SUBB.LEVEL17_DESCRIPTION is null and SUBT.LEVEL17_DESCRIPTION is not null)
1458 or (SUBB.LEVEL17_DESCRIPTION is not null and SUBT.LEVEL17_DESCRIPTION is null)
1459 or SUBB.LEVEL18_DESCRIPTION <> SUBT.LEVEL18_DESCRIPTION
1460 or (SUBB.LEVEL18_DESCRIPTION is null and SUBT.LEVEL18_DESCRIPTION is not null)
1461 or (SUBB.LEVEL18_DESCRIPTION is not null and SUBT.LEVEL18_DESCRIPTION is null)
1462 or SUBB.LEVEL19_DESCRIPTION <> SUBT.LEVEL19_DESCRIPTION
1463 or (SUBB.LEVEL19_DESCRIPTION is null and SUBT.LEVEL19_DESCRIPTION is not null)
1464 or (SUBB.LEVEL19_DESCRIPTION is not null and SUBT.LEVEL19_DESCRIPTION is null)
1465 or SUBB.LEVEL20_DESCRIPTION <> SUBT.LEVEL20_DESCRIPTION
1466 or (SUBB.LEVEL20_DESCRIPTION is null and SUBT.LEVEL20_DESCRIPTION is not null)
1467 or (SUBB.LEVEL20_DESCRIPTION is not null and SUBT.LEVEL20_DESCRIPTION is null)
1468 ));
1469
1470 insert into FEM_DIS_PRD_TYPES_HIER_TL (
1471 LEVEL20_DESCRIPTION,
1472 CREATION_DATE,
1473 CREATED_BY,
1474 LAST_UPDATE_DATE,
1475 LAST_UPDATED_BY,
1476 LAST_UPDATE_LOGIN,
1477 OBJECT_ID,
1478 OBJECT_DEFINITION_ID,
1479 LEVEL1_ID,
1480 LEVEL2_ID,
1481 LEVEL3_ID,
1482 LEVEL4_ID,
1483 LEVEL5_ID,
1484 LEVEL6_ID,
1485 LEVEL7_ID,
1486 LEVEL8_ID,
1487 LEVEL9_ID,
1488 LEVEL10_ID,
1489 LEVEL11_ID,
1490 LEVEL12_ID,
1491 LEVEL13_ID,
1492 LEVEL14_ID,
1493 LEVEL15_ID,
1494 LEVEL16_ID,
1495 LEVEL17_ID,
1496 LEVEL18_ID,
1497 LEVEL19_ID,
1498 LEVEL20_ID,
1499 OBJECT_NAME,
1500 OBJECT_DEFINITION_NAME,
1501 LEVEL1_NAME,
1502 LEVEL2_NAME,
1503 LEVEL3_NAME,
1504 LEVEL4_NAME,
1505 LEVEL5_NAME,
1506 LEVEL6_NAME,
1507 LEVEL7_NAME,
1508 LEVEL8_NAME,
1509 LEVEL9_NAME,
1510 LEVEL10_NAME,
1511 LEVEL11_NAME,
1512 LEVEL12_NAME,
1513 LEVEL13_NAME,
1514 LEVEL14_NAME,
1515 LEVEL15_NAME,
1516 LEVEL16_NAME,
1517 LEVEL17_NAME,
1518 LEVEL18_NAME,
1519 LEVEL19_NAME,
1520 LEVEL20_NAME,
1521 LEVEL1_DESCRIPTION,
1522 LEVEL2_DESCRIPTION,
1523 LEVEL3_DESCRIPTION,
1524 LEVEL4_DESCRIPTION,
1528 LEVEL8_DESCRIPTION,
1525 LEVEL5_DESCRIPTION,
1526 LEVEL6_DESCRIPTION,
1527 LEVEL7_DESCRIPTION,
1529 LEVEL9_DESCRIPTION,
1530 LEVEL10_DESCRIPTION,
1531 LEVEL11_DESCRIPTION,
1532 LEVEL12_DESCRIPTION,
1533 LEVEL13_DESCRIPTION,
1534 LEVEL14_DESCRIPTION,
1535 LEVEL15_DESCRIPTION,
1536 LEVEL16_DESCRIPTION,
1537 LEVEL17_DESCRIPTION,
1538 LEVEL18_DESCRIPTION,
1539 LEVEL19_DESCRIPTION,
1540 LANGUAGE,
1541 SOURCE_LANG
1542 ) select /*+ ORDERED */
1543 B.LEVEL20_DESCRIPTION,
1544 B.CREATION_DATE,
1545 B.CREATED_BY,
1546 B.LAST_UPDATE_DATE,
1547 B.LAST_UPDATED_BY,
1548 B.LAST_UPDATE_LOGIN,
1549 B.OBJECT_ID,
1550 B.OBJECT_DEFINITION_ID,
1551 B.LEVEL1_ID,
1552 B.LEVEL2_ID,
1553 B.LEVEL3_ID,
1554 B.LEVEL4_ID,
1555 B.LEVEL5_ID,
1556 B.LEVEL6_ID,
1557 B.LEVEL7_ID,
1558 B.LEVEL8_ID,
1559 B.LEVEL9_ID,
1560 B.LEVEL10_ID,
1561 B.LEVEL11_ID,
1562 B.LEVEL12_ID,
1563 B.LEVEL13_ID,
1564 B.LEVEL14_ID,
1565 B.LEVEL15_ID,
1566 B.LEVEL16_ID,
1567 B.LEVEL17_ID,
1568 B.LEVEL18_ID,
1569 B.LEVEL19_ID,
1570 B.LEVEL20_ID,
1571 B.OBJECT_NAME,
1572 B.OBJECT_DEFINITION_NAME,
1573 B.LEVEL1_NAME,
1574 B.LEVEL2_NAME,
1575 B.LEVEL3_NAME,
1576 B.LEVEL4_NAME,
1577 B.LEVEL5_NAME,
1578 B.LEVEL6_NAME,
1579 B.LEVEL7_NAME,
1580 B.LEVEL8_NAME,
1581 B.LEVEL9_NAME,
1582 B.LEVEL10_NAME,
1583 B.LEVEL11_NAME,
1584 B.LEVEL12_NAME,
1585 B.LEVEL13_NAME,
1586 B.LEVEL14_NAME,
1587 B.LEVEL15_NAME,
1588 B.LEVEL16_NAME,
1589 B.LEVEL17_NAME,
1590 B.LEVEL18_NAME,
1591 B.LEVEL19_NAME,
1592 B.LEVEL20_NAME,
1593 B.LEVEL1_DESCRIPTION,
1594 B.LEVEL2_DESCRIPTION,
1595 B.LEVEL3_DESCRIPTION,
1596 B.LEVEL4_DESCRIPTION,
1597 B.LEVEL5_DESCRIPTION,
1598 B.LEVEL6_DESCRIPTION,
1599 B.LEVEL7_DESCRIPTION,
1600 B.LEVEL8_DESCRIPTION,
1601 B.LEVEL9_DESCRIPTION,
1602 B.LEVEL10_DESCRIPTION,
1603 B.LEVEL11_DESCRIPTION,
1604 B.LEVEL12_DESCRIPTION,
1605 B.LEVEL13_DESCRIPTION,
1606 B.LEVEL14_DESCRIPTION,
1607 B.LEVEL15_DESCRIPTION,
1608 B.LEVEL16_DESCRIPTION,
1609 B.LEVEL17_DESCRIPTION,
1610 B.LEVEL18_DESCRIPTION,
1611 B.LEVEL19_DESCRIPTION,
1612 L.LANGUAGE_CODE,
1613 B.SOURCE_LANG
1614 from FEM_DIS_PRD_TYPES_HIER_TL B, FND_LANGUAGES L
1615 where L.INSTALLED_FLAG in ('I', 'B')
1616 and B.LANGUAGE = userenv('LANG')
1617 and not exists
1618 (select NULL
1619 from FEM_DIS_PRD_TYPES_HIER_TL T
1620 where T.OBJECT_ID = B.OBJECT_ID
1621 and T.OBJECT_DEFINITION_ID = B.OBJECT_DEFINITION_ID
1622 and T.LEVEL1_ID = B.LEVEL1_ID
1623 and T.LEVEL2_ID = B.LEVEL2_ID
1624 and T.LEVEL3_ID = B.LEVEL3_ID
1625 and T.LEVEL4_ID = B.LEVEL4_ID
1626 and T.LEVEL5_ID = B.LEVEL5_ID
1627 and T.LEVEL6_ID = B.LEVEL6_ID
1628 and T.LEVEL7_ID = B.LEVEL7_ID
1629 and T.LEVEL8_ID = B.LEVEL8_ID
1630 and T.LEVEL9_ID = B.LEVEL9_ID
1631 and T.LEVEL10_ID = B.LEVEL10_ID
1632 and T.LEVEL11_ID = B.LEVEL11_ID
1633 and T.LEVEL12_ID = B.LEVEL12_ID
1634 and T.LEVEL13_ID = B.LEVEL13_ID
1635 and T.LEVEL14_ID = B.LEVEL14_ID
1636 and T.LEVEL15_ID = B.LEVEL15_ID
1637 and T.LEVEL16_ID = B.LEVEL16_ID
1638 and T.LEVEL17_ID = B.LEVEL17_ID
1639 and T.LEVEL18_ID = B.LEVEL18_ID
1640 and T.LEVEL19_ID = B.LEVEL19_ID
1641 and T.LEVEL20_ID = B.LEVEL20_ID
1642 and T.LANGUAGE = L.LANGUAGE_CODE);
1643 end ADD_LANGUAGE;
1644 PROCEDURE TRANSLATE_ROW(
1645 x_OBJECT_ID in number,
1646 x_OBJECT_DEFINITION_ID in number,
1647 x_LEVEL1_ID in number,
1648 x_LEVEL2_ID in number,
1649 x_LEVEL3_ID in number,
1650 x_LEVEL4_ID in number,
1651 x_LEVEL5_ID in number,
1652 x_LEVEL6_ID in number,
1653 x_LEVEL7_ID in number,
1654 x_LEVEL8_ID in number,
1655 x_LEVEL9_ID in number,
1656 x_LEVEL10_ID in number,
1657 x_LEVEL11_ID in number,
1658 x_LEVEL12_ID in number,
1659 x_LEVEL13_ID in number,
1660 x_LEVEL14_ID in number,
1661 x_LEVEL15_ID in number,
1662 x_LEVEL16_ID in number,
1663 x_LEVEL17_ID in number,
1664 x_LEVEL18_ID in number,
1665 x_LEVEL19_ID in number,
1666 x_LEVEL20_ID in number,
1667 x_owner in varchar2,
1668 x_last_update_date in varchar2,
1669 x_OBJECT_NAME in varchar2,
1670 x_OBJECT_DEFINITION_NAME in varchar2,
1671 x_LEVEL1_NAME in varchar2,
1672 x_LEVEL2_NAME in varchar2,
1673 x_LEVEL3_NAME in varchar2,
1674 x_LEVEL4_NAME in varchar2,
1675 x_LEVEL5_NAME in varchar2,
1676 x_LEVEL6_NAME in varchar2,
1677 x_LEVEL7_NAME in varchar2,
1678 x_LEVEL8_NAME in varchar2,
1679 x_LEVEL9_NAME in varchar2,
1680 x_LEVEL10_NAME in varchar2,
1681 x_LEVEL11_NAME in varchar2,
1682 x_LEVEL12_NAME in varchar2,
1683 x_LEVEL13_NAME in varchar2,
1684 x_LEVEL14_NAME in varchar2,
1685 x_LEVEL15_NAME in varchar2,
1686 x_LEVEL16_NAME in varchar2,
1687 x_LEVEL17_NAME in varchar2,
1688 x_LEVEL18_NAME in varchar2,
1689 x_LEVEL19_NAME in varchar2,
1690 x_LEVEL20_NAME in varchar2,
1691 x_custom_mode in varchar2) is
1692
1693 owner_id number;
1694 ludate date;
1695 row_id varchar2(64);
1699 db_ludate date; -- entity update date in db
1696 f_luby number; -- entity owner in file
1697 f_ludate date; -- entity update date in file
1698 db_luby number; -- entity owner in db
1700 begin
1701
1702
1703 -- Translate owner to file_last_updated_by
1704 f_luby := fnd_load_util.owner_id(x_owner);
1705
1706 -- Translate char last_update_date to date
1707 f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
1708 begin
1709 select LAST_UPDATED_BY, LAST_UPDATE_DATE
1710 into db_luby, db_ludate
1711 from FEM_DIS_PRD_TYPES_HIER_TL
1712 where OBJECT_ID = x_OBJECT_ID
1713 and OBJECT_DEFINITION_ID = x_OBJECT_DEFINITION_ID
1714 and LEVEL1_ID = x_LEVEL1_ID
1715 and LEVEL2_ID = x_LEVEL2_ID
1716 and LEVEL3_ID = x_LEVEL3_ID
1717 and LEVEL4_ID = x_LEVEL4_ID
1718 and LEVEL5_ID = x_LEVEL5_ID
1719 and LEVEL6_ID = x_LEVEL6_ID
1720 and LEVEL7_ID = x_LEVEL7_ID
1721 and LEVEL8_ID = x_LEVEL8_ID
1722 and LEVEL9_ID = x_LEVEL9_ID
1723 and LEVEL10_ID = x_LEVEL10_ID
1724 and LEVEL11_ID = x_LEVEL11_ID
1725 and LEVEL12_ID = x_LEVEL12_ID
1726 and LEVEL13_ID = x_LEVEL13_ID
1727 and LEVEL14_ID = x_LEVEL14_ID
1728 and LEVEL15_ID = x_LEVEL15_ID
1729 and LEVEL16_ID = x_LEVEL16_ID
1730 and LEVEL17_ID = x_LEVEL17_ID
1731 and LEVEL18_ID = x_LEVEL18_ID
1732 and LEVEL19_ID = x_LEVEL19_ID
1733 and LEVEL20_ID = x_LEVEL20_ID
1734 and LANGUAGE = userenv('LANG');
1735
1736 -- Test for customization and version
1737 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
1738 db_ludate, x_custom_mode)) then
1739 -- Update translations for this language
1740 update FEM_DIS_PRD_TYPES_HIER_TL set
1741 OBJECT_NAME = nvl(x_OBJECT_NAME, OBJECT_NAME),
1742 OBJECT_DEFINITION_NAME = nvl(x_OBJECT_DEFINITION_NAME, OBJECT_DEFINITION_NAME),
1743 LEVEL1_NAME = nvl(x_LEVEL1_NAME, LEVEL1_NAME),
1744 LEVEL2_NAME = nvl(x_LEVEL2_NAME, LEVEL2_NAME),
1745 LEVEL3_NAME = nvl(x_LEVEL3_NAME, LEVEL3_NAME),
1746 LEVEL4_NAME = nvl(x_LEVEL4_NAME, LEVEL4_NAME),
1747 LEVEL5_NAME = nvl(x_LEVEL5_NAME, LEVEL5_NAME),
1748 LEVEL6_NAME = nvl(x_LEVEL6_NAME, LEVEL6_NAME),
1749 LEVEL7_NAME = nvl(x_LEVEL7_NAME, LEVEL7_NAME),
1750 LEVEL8_NAME = nvl(x_LEVEL8_NAME, LEVEL8_NAME),
1751 LEVEL9_NAME = nvl(x_LEVEL9_NAME, LEVEL9_NAME),
1752 LEVEL10_NAME = nvl(x_LEVEL10_NAME, LEVEL10_NAME),
1753 LEVEL11_NAME = nvl(x_LEVEL11_NAME, LEVEL11_NAME),
1754 LEVEL12_NAME = nvl(x_LEVEL12_NAME, LEVEL12_NAME),
1755 LEVEL13_NAME = nvl(x_LEVEL13_NAME, LEVEL13_NAME),
1756 LEVEL14_NAME = nvl(x_LEVEL14_NAME, LEVEL14_NAME),
1757 LEVEL15_NAME = nvl(x_LEVEL15_NAME, LEVEL15_NAME),
1758 LEVEL16_NAME = nvl(x_LEVEL16_NAME, LEVEL16_NAME),
1759 LEVEL17_NAME = nvl(x_LEVEL17_NAME, LEVEL17_NAME),
1760 LEVEL18_NAME = nvl(x_LEVEL18_NAME, LEVEL18_NAME),
1761 LEVEL19_NAME = nvl(x_LEVEL19_NAME, LEVEL19_NAME),
1762 LEVEL20_NAME = nvl(x_LEVEL20_NAME, LEVEL20_NAME),
1763 LAST_UPDATE_DATE = f_ludate,
1764 LAST_UPDATED_BY = f_luby,
1765 LAST_UPDATE_LOGIN = 0,
1766 SOURCE_LANG = userenv('LANG')
1767 where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
1768 and OBJECT_ID = x_OBJECT_ID
1769 and OBJECT_DEFINITION_ID = x_OBJECT_DEFINITION_ID
1770 and LEVEL1_ID = x_LEVEL1_ID
1771 and LEVEL2_ID = x_LEVEL2_ID
1772 and LEVEL3_ID = x_LEVEL3_ID
1773 and LEVEL4_ID = x_LEVEL4_ID
1774 and LEVEL5_ID = x_LEVEL5_ID
1775 and LEVEL6_ID = x_LEVEL6_ID
1776 and LEVEL7_ID = x_LEVEL7_ID
1777 and LEVEL8_ID = x_LEVEL8_ID
1778 and LEVEL9_ID = x_LEVEL9_ID
1779 and LEVEL10_ID = x_LEVEL10_ID
1780 and LEVEL11_ID = x_LEVEL11_ID
1781 and LEVEL12_ID = x_LEVEL12_ID
1782 and LEVEL13_ID = x_LEVEL13_ID
1783 and LEVEL14_ID = x_LEVEL14_ID
1784 and LEVEL15_ID = x_LEVEL15_ID
1785 and LEVEL16_ID = x_LEVEL16_ID
1786 and LEVEL17_ID = x_LEVEL17_ID
1787 and LEVEL18_ID = x_LEVEL18_ID
1788 and LEVEL19_ID = x_LEVEL19_ID
1789 and LEVEL20_ID = x_LEVEL20_ID;
1790 end if;
1791 exception
1792 when no_data_found then
1793 -- Do not insert missing translations, skip this row
1794 null;
1795 end;
1796 end TRANSLATE_ROW;
1797
1798
1799 end FEM_DIS_PRD_TYPES_HIER_PKG;