[Home] [Help]
PACKAGE BODY: APPS.OZF_FUNDTHRESHOLDS_ALL_B_PKG
Source
1 PACKAGE BODY OZF_FUNDTHRESHOLDS_ALL_B_PKG as
2 /* $Header: ozftthrb.pls 115.3 2004/03/17 03:48:50 rimehrot noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- OZF_FUNDTHRESHOLDS_ALL_B_PKG
7 -- Purpose
8 --
9 -- History
10 -- 03/05/2002 mpande UPdated Added Addlanguage and TransaletROw procedure
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15
16
17 G_PKG_NAME CONSTANT VARCHAR2(30):= 'OZF_THRESHOLDS_ALL_B_PKG';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozftthrb.pls';
19
20
21 ----------------------------------------------------------
22 ---- MEDIA ----
23 ----------------------------------------------------------
24
25 -- ========================================================
26 --
27 -- NAME
28 -- createInsertBody
29 --
30 -- PURPOSE
31 --
32 -- NOTES
33 --
34 -- HISTORY
35 --
36 -- ========================================================
37 PROCEDURE Insert_Row(
38 px_threshold_id IN OUT NOCOPY NUMBER,
39 p_last_update_date DATE,
40 p_last_updated_by NUMBER,
41 p_last_update_login NUMBER,
42 p_creation_date DATE,
43 p_created_by NUMBER,
44 p_created_from VARCHAR2,
45 p_request_id NUMBER,
46 p_program_application_id NUMBER,
47 p_program_id NUMBER,
48 p_program_update_date DATE,
49 p_threshold_calendar VARCHAR2,
50 p_start_period_name VARCHAR2,
51 p_end_period_name VARCHAR2,
52 p_start_date_active DATE,
53 p_end_date_active DATE,
54 p_owner NUMBER,
55 p_enable_flag VARCHAR2,
56 p_attribute_category VARCHAR2,
57 p_attribute1 VARCHAR2,
58 p_attribute2 VARCHAR2,
59 p_attribute3 VARCHAR2,
60 p_attribute4 VARCHAR2,
61 p_attribute5 VARCHAR2,
62 p_attribute6 VARCHAR2,
63 p_attribute7 VARCHAR2,
64 p_attribute8 VARCHAR2,
65 p_attribute9 VARCHAR2,
66 p_attribute10 VARCHAR2,
67 p_attribute11 VARCHAR2,
68 p_attribute12 VARCHAR2,
69 p_attribute13 VARCHAR2,
70 p_attribute14 VARCHAR2,
71 p_attribute15 VARCHAR2,
72 p_org_id NUMBER,
73 p_security_group_id NUMBER,
74 px_object_version_number IN OUT NOCOPY NUMBER,
75 p_name VARCHAR2,
76 p_description VARCHAR2,
77 p_language VARCHAR2,
78 p_source_lang VARCHAR2,
79 p_threshold_type VARCHAR2)
80
81 IS
82 x_rowid VARCHAR2(30);
83
84
85 BEGIN
86
87
88 px_object_version_number := 1;
89
90
91 INSERT INTO OZF_THRESHOLDS_ALL_B(
92 threshold_id,
93 last_update_date,
94 last_updated_by,
95 last_update_login,
96 creation_date,
97 created_by,
98 created_from,
99 request_id,
100 program_application_id,
101 program_id,
102 program_update_date,
103 threshold_calendar,
104 start_period_name,
105 end_period_name,
106 start_date_active,
107 end_date_active,
108 owner,
109 enable_flag,
110 attribute_category,
111 attribute1,
112 attribute2,
113 attribute3,
114 attribute4,
115 attribute5,
116 attribute6,
117 attribute7,
118 attribute8,
119 attribute9,
120 attribute10,
121 attribute11,
122 attribute12,
123 attribute13,
124 attribute14,
125 attribute15,
126 org_id,
127 security_group_id,
128 object_version_number,
129 threshold_type
130 ) VALUES (
131 px_threshold_id,
132 p_last_update_date,
133 p_last_updated_by,
134 p_last_update_login,
135 p_creation_date,
136 p_created_by,
137 p_created_from,
138 p_request_id,
139 p_program_application_id,
140 p_program_id,
141 p_program_update_date,
142 p_threshold_calendar,
143 p_start_period_name,
144 p_end_period_name,
145 p_start_date_active,
146 p_end_date_active,
147 p_owner,
148 p_enable_flag,
149 p_attribute_category,
150 p_attribute1,
151 p_attribute2,
152 p_attribute3,
153 p_attribute4,
154 p_attribute5,
155 p_attribute6,
156 p_attribute7,
157 p_attribute8,
158 p_attribute9,
159 p_attribute10,
160 p_attribute11,
161 p_attribute12,
162 p_attribute13,
163 p_attribute14,
164 p_attribute15,
165 p_org_id,
166 p_security_group_id,
167 px_object_version_number,
168 p_threshold_type);
169
170 -- insert to ozf_thresholds_all_tl table
171
172
173 INSERT INTO OZF_THRESHOLDS_ALL_TL(
174 threshold_id,
175 last_update_date,
176 last_updated_by,
177 last_update_login,
178 creation_date,
179 created_by,
180 created_from,
181 request_id,
182 program_application_id,
183 program_id,
184 program_update_date,
185 name,
186 description,
187 language,
188 source_lang,
189 org_id,
190 security_group_id
191 ) VALUES (
192 px_threshold_id,
193 p_last_update_date,
194 p_last_updated_by,
195 p_last_update_login,
196 p_creation_date,
197 p_created_by,
198 p_created_from,
199 p_request_id,
200 p_program_application_id,
201 p_program_id,
202 p_program_update_date,
203 p_name,
204 p_description,
205 p_language,
206 USERENV('LANG'),
207 p_org_id,
208 p_security_group_id);
209 /*
210 INSERT INTO ozf_thresholds_all_tl
211 (threshold_id,
212 last_update_date,
213 last_updated_by,
214 last_update_login,
215 creation_date,
216 created_by,
217 created_from,
218 request_id,
219 program_application_id,
220 program_id,
221 program_update_date,
222 name,
223 description,
224 source_lang,
225 language,
226 org_id,
227 security_group_id)
228 SELECT px_threshold_id
229 , SYSDATE -- LAST_UPDATE_DATE
230 , NVL(fnd_global.user_id, -1) -- LAST_UPDATED_BY
231 ,NVL(fnd_global.conc_login_id, -1) -- LAST_UPDATE_LOGIN
232 , SYSDATE -- CREATION_DATE
233 , NVL(fnd_global.user_id, -1) -- CREATED_BY
234 , p_created_from -- CREATED_FROM
235 , fnd_global.conc_request_id -- REQUEST_ID
236 , fnd_global.prog_appl_id -- PROGRAM_APPLICATION_ID
237 ,fnd_global.conc_program_id -- PROGRAM_ID
238 , SYSDATE -- PROGRAM_UPDATE_DATE
239 , p_name
240 ,p_description
241 , USERENV('LANG')
242 , p_source_lang
243 ,TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10)) -- ORG_ID
244 ,p_security_group_id
245 FROM fnd_languages l
246 WHERE l.installed_flag IN('I', 'B')
247 AND NOT EXISTS(SELECT NULL
248 FROM ozf_thresholds_all_tl t
249 WHERE t.threshold_id = px_threshold_id
250 AND t.language = l.language_code);
251 */
252 END Insert_Row;
253
254
255 ----------------------------------------------------------
256 ---- MEDIA ----
257 ----------------------------------------------------------
258
259 -- ========================================================
260 --
261 -- NAME
262 -- createUpdateBody
263 --
264 -- PURPOSE
265 --
266 -- NOTES
267 --
268 -- HISTORY
269 --
270 -- ========================================================
271 PROCEDURE Update_Row(
272 p_threshold_id NUMBER,
273 p_last_update_date DATE,
274 p_last_updated_by NUMBER,
275 p_last_update_login NUMBER,
276 p_created_from VARCHAR2,
277 p_request_id NUMBER,
278 p_program_application_id NUMBER,
279 p_program_id NUMBER,
280 p_program_update_date DATE,
281 p_threshold_calendar VARCHAR2,
282 p_start_period_name VARCHAR2,
283 p_end_period_name VARCHAR2,
284 p_start_date_active DATE,
285 p_end_date_active DATE,
286 p_owner NUMBER,
287 p_enable_flag VARCHAR2,
288 p_attribute_category VARCHAR2,
289 p_attribute1 VARCHAR2,
290 p_attribute2 VARCHAR2,
291 p_attribute3 VARCHAR2,
292 p_attribute4 VARCHAR2,
293 p_attribute5 VARCHAR2,
294 p_attribute6 VARCHAR2,
295 p_attribute7 VARCHAR2,
296 p_attribute8 VARCHAR2,
297 p_attribute9 VARCHAR2,
298 p_attribute10 VARCHAR2,
299 p_attribute11 VARCHAR2,
300 p_attribute12 VARCHAR2,
301 p_attribute13 VARCHAR2,
302 p_attribute14 VARCHAR2,
303 p_attribute15 VARCHAR2,
304 p_org_id NUMBER,
305 p_security_group_id NUMBER,
306 px_object_version_number IN OUT NOCOPY NUMBER,
307 p_name VARCHAR2,
308 p_description VARCHAR2,
309 p_language VARCHAR2,
310 p_source_lang VARCHAR2,
311 p_threshold_type VARCHAR2)
312
313 IS
314 BEGIN
315 Update OZF_THRESHOLDS_ALL_B
316 SET
317 threshold_id = p_threshold_id,
318 last_update_date = p_last_update_date,
319 last_updated_by = p_last_updated_by,
320 last_update_login = p_last_update_login,
321 created_from = p_created_from,
322 request_id = p_request_id,
323 program_application_id = p_program_application_id,
324 program_id = p_program_id,
325 program_update_date = p_program_update_date,
326 threshold_calendar = p_threshold_calendar,
327 start_period_name = p_start_period_name,
328 end_period_name = p_end_period_name,
329 start_date_active = p_start_date_active,
330 end_date_active = p_end_date_active,
331 owner = p_owner,
332 enable_flag = p_enable_flag,
333 attribute_category = p_attribute_category,
337 attribute4 = p_attribute4,
334 attribute1 = p_attribute1,
335 attribute2 = p_attribute2,
336 attribute3 = p_attribute3,
338 attribute5 = p_attribute5,
339 attribute6 = p_attribute6,
340 attribute7 = p_attribute7,
341 attribute8 = p_attribute8,
342 attribute9 = p_attribute9,
343 attribute10 = p_attribute10,
344 attribute11 = p_attribute11,
345 attribute12 = p_attribute12,
346 attribute13 = p_attribute13,
347 attribute14 = p_attribute14,
348 attribute15 = p_attribute15,
349 -- org_id = p_org_id,
350 security_group_id = p_security_group_id,
351 object_version_number = DECODE( px_object_version_number, FND_API.g_miss_num, object_version_number+1, px_object_version_number+1),
352 threshold_type = p_threshold_type
353 WHERE THRESHOLD_ID = p_THRESHOLD_ID
354 AND object_version_number = px_object_version_number;
355
356
357 IF (SQL%NOTFOUND) THEN
358 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
359 END IF;
360
361 px_object_version_number := px_object_version_number +1;
362 -- update ozf_thresholds_all_tl table
363 Update OZF_THRESHOLDS_ALL_TL
364 SET
365 threshold_id = p_threshold_id,
366 last_update_date = p_last_update_date,
370 request_id = p_request_id,
367 last_updated_by = p_last_updated_by,
368 last_update_login = p_last_update_login,
369 created_from = p_created_from,
371 program_application_id = p_program_application_id,
372 program_id = p_program_id,
373 program_update_date = p_program_update_date,
374 name = p_name,
375 description = p_description,
376 language = p_language,
377 source_lang = p_source_lang,
378 -- org_id = p_org_id,
379 security_group_id = p_security_group_id
380 WHERE THRESHOLD_ID = p_THRESHOLD_ID;
381
382 IF (SQL%NOTFOUND) THEN
383 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
384 END IF;
385
386 END Update_Row;
387
388
389 ----------------------------------------------------------
390 ---- MEDIA ----
391 ----------------------------------------------------------
392
393 -- ========================================================
394 --
395 -- NAME
396 -- createDeleteBody
397 --
398 -- PURPOSE
399 --
400 -- NOTES
401 --
402 -- HISTORY
403 --
404 -- ========================================================
405 PROCEDURE Delete_Row(
406 p_THRESHOLD_ID NUMBER)
407 IS
408 BEGIN
409 DELETE FROM OZF_THRESHOLDS_ALL_B
410 WHERE THRESHOLD_ID = p_THRESHOLD_ID;
411
412 DELETE FROM OZF_THRESHOLDS_ALL_TL
413 WHERE THRESHOLD_ID = p_THRESHOLD_ID;
414
415 If (SQL%NOTFOUND) then
416 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
417 End If;
418 END Delete_Row ;
419
420
421
422 ----------------------------------------------------------
423 ---- MEDIA ----
424 ----------------------------------------------------------
425
426 -- ========================================================
427 --
428 -- NAME
429 -- createLockBody
430 --
431 -- PURPOSE
432 --
433 -- NOTES
434 --
435 -- HISTORY
436 --
437 -- ========================================================
438 PROCEDURE Lock_Row(
439 p_threshold_id NUMBER,
440 p_last_update_date DATE,
441 p_last_updated_by NUMBER,
442 p_last_update_login NUMBER,
443 p_creation_date DATE,
444 p_created_by NUMBER,
445 p_created_from VARCHAR2,
446 p_request_id NUMBER,
447 p_program_application_id NUMBER,
448 p_program_id NUMBER,
452 p_end_period_name VARCHAR2,
449 p_program_update_date DATE,
450 p_threshold_calendar VARCHAR2,
451 p_start_period_name VARCHAR2,
453 p_start_date_active DATE,
454 p_end_date_active DATE,
455 p_owner NUMBER,
456 p_enable_flag VARCHAR2,
457 P_attribute_category VARCHAR2,
458 p_attribute1 VARCHAR2,
459 p_attribute2 VARCHAR2,
460 p_attribute3 VARCHAR2,
461 p_attribute4 VARCHAR2,
462 p_attribute5 VARCHAR2,
463 p_attribute6 VARCHAR2,
464 p_attribute7 VARCHAR2,
465 p_attribute8 VARCHAR2,
466 p_attribute9 VARCHAR2,
467 p_attribute10 VARCHAR2,
468 p_attribute11 VARCHAR2,
469 p_attribute12 VARCHAR2,
470 p_attribute13 VARCHAR2,
471 p_attribute14 VARCHAR2,
472 p_attribute15 VARCHAR2,
473 p_org_id NUMBER,
474 p_security_group_id NUMBER,
475 p_object_version_number NUMBER)
476
477 IS
478 CURSOR C IS
479 SELECT *
480 FROM OZF_THRESHOLDS_ALL_B
481 WHERE THRESHOLD_ID = p_THRESHOLD_ID
482 FOR UPDATE of THRESHOLD_ID NOWAIT;
483 Recinfo C%ROWTYPE;
484 BEGIN
485 OPEN c;
486 FETCH c INTO Recinfo;
487 If (c%NOTFOUND) then
488 CLOSE c;
489 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
490 APP_EXCEPTION.RAISE_EXCEPTION;
491 END IF;
492 CLOSE C;
493 IF (
494 ( Recinfo.threshold_id = p_threshold_id)
495 AND ( ( Recinfo.last_update_date = p_last_update_date)
496 OR ( ( Recinfo.last_update_date IS NULL )
497 AND ( p_last_update_date IS NULL )))
498 AND ( ( Recinfo.last_updated_by = p_last_updated_by)
499 OR ( ( Recinfo.last_updated_by IS NULL )
500 AND ( p_last_updated_by IS NULL )))
501 AND ( ( Recinfo.last_update_login = p_last_update_login)
502 OR ( ( Recinfo.last_update_login IS NULL )
503 AND ( p_last_update_login IS NULL )))
504 AND ( ( Recinfo.creation_date = p_creation_date)
505 OR ( ( Recinfo.creation_date IS NULL )
506 AND ( p_creation_date IS NULL )))
507 AND ( ( Recinfo.created_by = p_created_by)
508 OR ( ( Recinfo.created_by IS NULL )
509 AND ( p_created_by IS NULL )))
510 AND ( ( Recinfo.created_from = p_created_from)
511 OR ( ( Recinfo.created_from IS NULL )
512 AND ( p_created_from IS NULL )))
513 AND ( ( Recinfo.request_id = p_request_id)
514 OR ( ( Recinfo.request_id IS NULL )
515 AND ( p_request_id IS NULL )))
516 AND ( ( Recinfo.program_application_id = p_program_application_id)
517 OR ( ( Recinfo.program_application_id IS NULL )
518 AND ( p_program_application_id IS NULL )))
519 AND ( ( Recinfo.program_id = p_program_id)
520 OR ( ( Recinfo.program_id IS NULL )
521 AND ( p_program_id IS NULL )))
522 AND ( ( Recinfo.program_update_date = p_program_update_date)
523 OR ( ( Recinfo.program_update_date IS NULL )
524 AND ( p_program_update_date IS NULL )))
525 AND ( ( Recinfo.threshold_calendar = p_threshold_calendar)
526 OR ( ( Recinfo.threshold_calendar IS NULL )
527 AND ( p_threshold_calendar IS NULL )))
528 AND ( ( Recinfo.start_period_name = p_start_period_name)
529 OR ( ( Recinfo.start_period_name IS NULL )
530 AND ( p_start_period_name IS NULL )))
531 AND ( ( Recinfo.end_period_name = p_end_period_name)
532 OR ( ( Recinfo.end_period_name IS NULL )
533 AND ( p_end_period_name IS NULL )))
534 AND ( ( Recinfo.start_date_active = p_start_date_active)
535 OR ( ( Recinfo.start_date_active IS NULL )
536 AND ( p_start_date_active IS NULL )))
537 AND ( ( Recinfo.end_date_active = p_end_date_active)
538 OR ( ( Recinfo.end_date_active IS NULL )
539 AND ( p_end_date_active IS NULL )))
540 AND ( ( Recinfo.owner = p_owner)
541 OR ( ( Recinfo.owner IS NULL )
542 AND ( p_owner IS NULL )))
543 AND ( ( Recinfo.enable_flag = p_enable_flag)
544 OR ( ( Recinfo.enable_flag IS NULL )
545 AND ( p_enable_flag IS NULL )))
546 AND ( ( Recinfo.attribute1 = p_attribute1)
547 OR ( ( Recinfo.attribute1 IS NULL )
548 AND ( p_attribute1 IS NULL )))
549 AND ( ( Recinfo.attribute2 = p_attribute2)
550 OR ( ( Recinfo.attribute2 IS NULL )
551 AND ( p_attribute2 IS NULL )))
552 AND ( ( Recinfo.attribute3 = p_attribute3)
553 OR ( ( Recinfo.attribute3 IS NULL )
554 AND ( p_attribute3 IS NULL )))
555 AND ( ( Recinfo.attribute4 = p_attribute4)
556 OR ( ( Recinfo.attribute4 IS NULL )
557 AND ( p_attribute4 IS NULL )))
558 AND ( ( Recinfo.attribute5 = p_attribute5)
559 OR ( ( Recinfo.attribute5 IS NULL )
560 AND ( p_attribute5 IS NULL )))
561 AND ( ( Recinfo.attribute6 = p_attribute6)
562 OR ( ( Recinfo.attribute6 IS NULL )
563 AND ( p_attribute6 IS NULL )))
564 AND ( ( Recinfo.attribute7 = p_attribute7)
565 OR ( ( Recinfo.attribute7 IS NULL )
566 AND ( p_attribute7 IS NULL )))
567 AND ( ( Recinfo.attribute8 = p_attribute8)
571 OR ( ( Recinfo.attribute9 IS NULL )
568 OR ( ( Recinfo.attribute8 IS NULL )
569 AND ( p_attribute8 IS NULL )))
570 AND ( ( Recinfo.attribute9 = p_attribute9)
572 AND ( p_attribute9 IS NULL )))
573 AND ( ( Recinfo.attribute10 = p_attribute10)
574 OR ( ( Recinfo.attribute10 IS NULL )
575 AND ( p_attribute10 IS NULL )))
576 AND ( ( Recinfo.attribute11 = p_attribute11)
577 OR ( ( Recinfo.attribute11 IS NULL )
578 AND ( p_attribute11 IS NULL )))
579 AND ( ( Recinfo.attribute12 = p_attribute12)
580 OR ( ( Recinfo.attribute12 IS NULL )
581 AND ( p_attribute12 IS NULL )))
582 AND ( ( Recinfo.attribute13 = p_attribute13)
583 OR ( ( Recinfo.attribute13 IS NULL )
584 AND ( p_attribute13 IS NULL )))
585 AND ( ( Recinfo.attribute14 = p_attribute14)
586 OR ( ( Recinfo.attribute14 IS NULL )
587 AND ( p_attribute14 IS NULL )))
588 AND ( ( Recinfo.attribute15 = p_attribute15)
589 OR ( ( Recinfo.attribute15 IS NULL )
590 AND ( p_attribute15 IS NULL )))
591 AND ( ( Recinfo.org_id = p_org_id)
592 OR ( ( Recinfo.org_id IS NULL )
593 AND ( p_org_id IS NULL )))
594 AND ( ( Recinfo.security_group_id = p_security_group_id)
595 OR ( ( Recinfo.security_group_id IS NULL )
596 AND ( p_security_group_id IS NULL )))
597 AND ( ( Recinfo.object_version_number = p_object_version_number)
598 OR ( ( Recinfo.object_version_number IS NULL )
599 AND ( p_object_version_number IS NULL )))
600 ) THEN
601 RETURN;
602 ELSE
603 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
604 APP_EXCEPTION.RAISE_EXCEPTION;
605 END IF;
606 END Lock_Row;
607
608 procedure ADD_LANGUAGE
609 is
610 begin
611 delete from OZF_THRESHOLDS_ALL_TL T
612 where not exists
613 (select NULL
614 from OZF_THRESHOLDS_ALL_B B
615 where B.THRESHOLD_ID = T.THRESHOLD_ID
616 );
617
618 update OZF_THRESHOLDS_ALL_TL T set (
619 NAME,
620 DESCRIPTION
621 ) = (select
622 B.NAME,
623 B.DESCRIPTION
624 from OZF_THRESHOLDS_ALL_TL B
625 where B.THRESHOLD_ID = T.THRESHOLD_ID
626 and B.LANGUAGE = T.SOURCE_LANG)
627 where (
628 T.THRESHOLD_ID,
629 T.LANGUAGE
633 from OZF_THRESHOLDS_ALL_TL SUBB, OZF_THRESHOLDS_ALL_TL SUBT
630 ) in (select
631 SUBT.THRESHOLD_ID,
632 SUBT.LANGUAGE
634 where SUBB.THRESHOLD_ID = SUBT.THRESHOLD_ID
635 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
636 and (SUBB.NAME <> SUBT.NAME
637 or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
638 or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
639 or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
640 ));
641
642 insert into OZF_THRESHOLDS_ALL_TL (
643 THRESHOLD_ID,
644 LAST_UPDATE_DATE,
645 LAST_UPDATED_BY,
646 LAST_UPDATE_LOGIN,
647 CREATION_DATE,
648 CREATED_BY,
649 CREATED_FROM,
650 REQUEST_ID,
651 PROGRAM_APPLICATION_ID,
652 PROGRAM_ID,
653 PROGRAM_UPDATE_DATE,
654 NAME,
655 DESCRIPTION,
656 LANGUAGE,
657 SOURCE_LANG
658 ) select
659 B.THRESHOLD_ID,
660 B.LAST_UPDATE_DATE,
661 B.LAST_UPDATED_BY,
662 B.LAST_UPDATE_LOGIN,
663 B.CREATION_DATE,
664 B.CREATED_BY,
665 B.CREATED_FROM,
666 B.REQUEST_ID,
667 B.PROGRAM_APPLICATION_ID,
668 B.PROGRAM_ID,
669 B.PROGRAM_UPDATE_DATE,
670 B.NAME,
671 B.DESCRIPTION,
672 L.LANGUAGE_CODE,
673 B.SOURCE_LANG
674 from OZF_THRESHOLDS_ALL_TL B, FND_LANGUAGES L
675 where L.INSTALLED_FLAG in ('I', 'B')
676 and B.LANGUAGE = userenv('LANG')
677 and not exists
678 (select NULL
679 from OZF_THRESHOLDS_ALL_TL T
680 where T.THRESHOLD_ID = B.THRESHOLD_ID
681 and T.LANGUAGE = L.LANGUAGE_CODE);
682 end ADD_LANGUAGE;
683
684 procedure TRANSLATE_ROW(
685 X_THRESHOLD_ID in NUMBER,
686 X_NAME in VARCHAR2,
687 X_DESCRIPTION in VARCHAR2,
688 X_OWNERS in VARCHAR2
689 )
690 IS
691 BEGIN
692 update OZF_THRESHOLDS_ALL_TL set
693 name = nvl(x_name, name),
694 description = nvl(x_description, description),
695 source_lang = userenv('LANG'),
696 last_update_date = sysdate,
697 last_updated_by = decode(x_owners, 'SEED', 1, 0),
698 last_update_login = 0
699 where threshold_id = x_threshold_id
700 and userenv('LANG') in (language, source_lang);
701 END TRANSLATE_ROW;
702
703
704 END OZF_FUNDTHRESHOLDS_ALL_B_PKG;