[Home] [Help]
PACKAGE BODY: APPS.FND_CURRENCIES_PKG
Source
1 package body FND_CURRENCIES_PKG as
2 /* $Header: AFNLDCXB.pls 120.6 2007/08/27 22:59:59 jvalenti ship $ */
3
4 procedure INSERT_ROW (
5 X_ROWID in out NOCOPY VARCHAR2,
6 X_CURRENCY_CODE in VARCHAR2,
7 X_DERIVE_EFFECTIVE in DATE,
8 X_DERIVE_TYPE in VARCHAR2,
9 X_GLOBAL_ATTRIBUTE7 in VARCHAR2,
10 X_GLOBAL_ATTRIBUTE8 in VARCHAR2,
11 X_GLOBAL_ATTRIBUTE9 in VARCHAR2,
12 X_GLOBAL_ATTRIBUTE10 in VARCHAR2,
13 X_GLOBAL_ATTRIBUTE11 in VARCHAR2,
14 X_GLOBAL_ATTRIBUTE12 in VARCHAR2,
15 X_GLOBAL_ATTRIBUTE13 in VARCHAR2,
16 X_GLOBAL_ATTRIBUTE14 in VARCHAR2,
17 X_GLOBAL_ATTRIBUTE15 in VARCHAR2,
18 X_GLOBAL_ATTRIBUTE16 in VARCHAR2,
19 X_GLOBAL_ATTRIBUTE17 in VARCHAR2,
20 X_GLOBAL_ATTRIBUTE18 in VARCHAR2,
21 X_GLOBAL_ATTRIBUTE19 in VARCHAR2,
22 X_GLOBAL_ATTRIBUTE20 in VARCHAR2,
23 X_DERIVE_FACTOR in NUMBER,
24 X_ENABLED_FLAG in VARCHAR2,
25 X_CURRENCY_FLAG in VARCHAR2,
26 X_ISSUING_TERRITORY_CODE in VARCHAR2,
27 X_PRECISION in NUMBER,
28 X_EXTENDED_PRECISION in NUMBER,
29 X_SYMBOL in VARCHAR2,
30 X_START_DATE_ACTIVE in DATE,
31 X_END_DATE_ACTIVE in DATE,
32 X_MINIMUM_ACCOUNTABLE_UNIT in NUMBER,
33 X_CONTEXT in VARCHAR2,
34 X_ATTRIBUTE1 in VARCHAR2,
35 X_ATTRIBUTE2 in VARCHAR2,
36 X_ATTRIBUTE3 in VARCHAR2,
37 X_ATTRIBUTE4 in VARCHAR2,
38 X_ATTRIBUTE5 in VARCHAR2,
39 X_ATTRIBUTE6 in VARCHAR2,
40 X_ATTRIBUTE7 in VARCHAR2,
41 X_ATTRIBUTE8 in VARCHAR2,
42 X_ATTRIBUTE9 in VARCHAR2,
43 X_ATTRIBUTE10 in VARCHAR2,
44 X_ATTRIBUTE11 in VARCHAR2,
45 X_ATTRIBUTE12 in VARCHAR2,
46 X_ATTRIBUTE13 in VARCHAR2,
47 X_ATTRIBUTE14 in VARCHAR2,
48 X_ATTRIBUTE15 in VARCHAR2,
49 X_ISO_FLAG in VARCHAR2,
50 X_GLOBAL_ATTRIBUTE_CATEGORY in VARCHAR2,
51 X_GLOBAL_ATTRIBUTE1 in VARCHAR2,
52 X_GLOBAL_ATTRIBUTE2 in VARCHAR2,
53 X_GLOBAL_ATTRIBUTE3 in VARCHAR2,
54 X_GLOBAL_ATTRIBUTE4 in VARCHAR2,
55 X_GLOBAL_ATTRIBUTE5 in VARCHAR2,
56 X_GLOBAL_ATTRIBUTE6 in VARCHAR2,
57 X_NAME in VARCHAR2,
58 X_DESCRIPTION in VARCHAR2,
59 X_CREATION_DATE in DATE,
60 X_CREATED_BY in NUMBER,
61 X_LAST_UPDATE_DATE in DATE,
62 X_LAST_UPDATED_BY in NUMBER,
63 X_LAST_UPDATE_LOGIN in NUMBER
64 ) is
65 cursor C is select ROWID from FND_CURRENCIES
66 where CURRENCY_CODE = X_CURRENCY_CODE
67 ;
68 begin
69 insert into FND_CURRENCIES (
70 DERIVE_EFFECTIVE,
71 DERIVE_TYPE,
72 GLOBAL_ATTRIBUTE7,
73 GLOBAL_ATTRIBUTE8,
74 GLOBAL_ATTRIBUTE9,
75 GLOBAL_ATTRIBUTE10,
76 GLOBAL_ATTRIBUTE11,
77 GLOBAL_ATTRIBUTE12,
78 GLOBAL_ATTRIBUTE13,
79 GLOBAL_ATTRIBUTE14,
80 GLOBAL_ATTRIBUTE15,
81 GLOBAL_ATTRIBUTE16,
82 GLOBAL_ATTRIBUTE17,
83 GLOBAL_ATTRIBUTE18,
84 GLOBAL_ATTRIBUTE19,
85 GLOBAL_ATTRIBUTE20,
86 DERIVE_FACTOR,
87 CURRENCY_CODE,
88 ENABLED_FLAG,
89 CURRENCY_FLAG,
90 ISSUING_TERRITORY_CODE,
91 PRECISION,
92 EXTENDED_PRECISION,
93 SYMBOL,
94 START_DATE_ACTIVE,
95 END_DATE_ACTIVE,
96 MINIMUM_ACCOUNTABLE_UNIT,
97 CONTEXT,
98 ATTRIBUTE1,
99 ATTRIBUTE2,
100 ATTRIBUTE3,
101 ATTRIBUTE4,
102 ATTRIBUTE5,
103 ATTRIBUTE6,
104 ATTRIBUTE7,
105 ATTRIBUTE8,
106 ATTRIBUTE9,
107 ATTRIBUTE10,
108 ATTRIBUTE11,
109 ATTRIBUTE12,
110 ATTRIBUTE13,
111 ATTRIBUTE14,
112 ATTRIBUTE15,
113 ISO_FLAG,
114 GLOBAL_ATTRIBUTE_CATEGORY,
115 GLOBAL_ATTRIBUTE1,
116 GLOBAL_ATTRIBUTE2,
117 GLOBAL_ATTRIBUTE3,
118 GLOBAL_ATTRIBUTE4,
119 GLOBAL_ATTRIBUTE5,
120 GLOBAL_ATTRIBUTE6,
121 CREATION_DATE,
122 CREATED_BY,
123 LAST_UPDATE_DATE,
124 LAST_UPDATED_BY,
125 LAST_UPDATE_LOGIN
126 ) values (
127 X_DERIVE_EFFECTIVE,
128 X_DERIVE_TYPE,
129 X_GLOBAL_ATTRIBUTE7,
130 X_GLOBAL_ATTRIBUTE8,
131 X_GLOBAL_ATTRIBUTE9,
132 X_GLOBAL_ATTRIBUTE10,
133 X_GLOBAL_ATTRIBUTE11,
134 X_GLOBAL_ATTRIBUTE12,
135 X_GLOBAL_ATTRIBUTE13,
136 X_GLOBAL_ATTRIBUTE14,
137 X_GLOBAL_ATTRIBUTE15,
138 X_GLOBAL_ATTRIBUTE16,
139 X_GLOBAL_ATTRIBUTE17,
140 X_GLOBAL_ATTRIBUTE18,
141 X_GLOBAL_ATTRIBUTE19,
142 X_GLOBAL_ATTRIBUTE20,
143 X_DERIVE_FACTOR,
144 X_CURRENCY_CODE,
145 X_ENABLED_FLAG,
146 X_CURRENCY_FLAG,
147 X_ISSUING_TERRITORY_CODE,
148 NVL(X_PRECISION,0),
149 X_EXTENDED_PRECISION,
150 X_SYMBOL,
151 X_START_DATE_ACTIVE,
152 X_END_DATE_ACTIVE,
153 X_MINIMUM_ACCOUNTABLE_UNIT,
154 X_CONTEXT,
155 X_ATTRIBUTE1,
156 X_ATTRIBUTE2,
157 X_ATTRIBUTE3,
158 X_ATTRIBUTE4,
159 X_ATTRIBUTE5,
160 X_ATTRIBUTE6,
161 X_ATTRIBUTE7,
162 X_ATTRIBUTE8,
163 X_ATTRIBUTE9,
164 X_ATTRIBUTE10,
165 X_ATTRIBUTE11,
166 X_ATTRIBUTE12,
167 X_ATTRIBUTE13,
168 X_ATTRIBUTE14,
169 X_ATTRIBUTE15,
170 X_ISO_FLAG,
171 X_GLOBAL_ATTRIBUTE_CATEGORY,
172 X_GLOBAL_ATTRIBUTE1,
173 X_GLOBAL_ATTRIBUTE2,
174 X_GLOBAL_ATTRIBUTE3,
175 X_GLOBAL_ATTRIBUTE4,
176 X_GLOBAL_ATTRIBUTE5,
177 X_GLOBAL_ATTRIBUTE6,
178 X_CREATION_DATE,
179 X_CREATED_BY,
180 X_LAST_UPDATE_DATE,
181 X_LAST_UPDATED_BY,
182 X_LAST_UPDATE_LOGIN
183 );
184
185 insert into FND_CURRENCIES_TL (
186 CURRENCY_CODE,
187 NAME,
188 DESCRIPTION,
189 CREATED_BY,
190 CREATION_DATE,
191 LAST_UPDATED_BY,
192 LAST_UPDATE_DATE,
193 LAST_UPDATE_LOGIN,
194 LANGUAGE,
195 SOURCE_LANG
196 ) select
197 X_CURRENCY_CODE,
198 X_NAME,
199 X_DESCRIPTION,
200 X_CREATED_BY,
201 X_CREATION_DATE,
202 X_LAST_UPDATED_BY,
203 X_LAST_UPDATE_DATE,
204 X_LAST_UPDATE_LOGIN,
205 L.LANGUAGE_CODE,
206 userenv('LANG')
207 from FND_LANGUAGES L
208 where L.INSTALLED_FLAG in ('I', 'B')
209 and not exists
210 (select NULL
211 from FND_CURRENCIES_TL T
212 where T.CURRENCY_CODE = X_CURRENCY_CODE
213 and T.LANGUAGE = L.LANGUAGE_CODE);
214
215 open c;
216 fetch c into X_ROWID;
217 if (c%notfound) then
218 close c;
219 raise no_data_found;
220 end if;
221 close c;
222 end INSERT_ROW;
223
224 procedure LOCK_ROW (
225 X_CURRENCY_CODE in VARCHAR2,
226 X_DERIVE_EFFECTIVE in DATE,
227 X_DERIVE_TYPE in VARCHAR2,
228 X_GLOBAL_ATTRIBUTE7 in VARCHAR2,
229 X_GLOBAL_ATTRIBUTE8 in VARCHAR2,
230 X_GLOBAL_ATTRIBUTE9 in VARCHAR2,
231 X_GLOBAL_ATTRIBUTE10 in VARCHAR2,
232 X_GLOBAL_ATTRIBUTE11 in VARCHAR2,
233 X_GLOBAL_ATTRIBUTE12 in VARCHAR2,
234 X_GLOBAL_ATTRIBUTE13 in VARCHAR2,
235 X_GLOBAL_ATTRIBUTE14 in VARCHAR2,
236 X_GLOBAL_ATTRIBUTE15 in VARCHAR2,
237 X_GLOBAL_ATTRIBUTE16 in VARCHAR2,
238 X_GLOBAL_ATTRIBUTE17 in VARCHAR2,
239 X_GLOBAL_ATTRIBUTE18 in VARCHAR2,
240 X_GLOBAL_ATTRIBUTE19 in VARCHAR2,
241 X_GLOBAL_ATTRIBUTE20 in VARCHAR2,
242 X_DERIVE_FACTOR in NUMBER,
243 X_ENABLED_FLAG in VARCHAR2,
244 X_CURRENCY_FLAG in VARCHAR2,
245 X_ISSUING_TERRITORY_CODE in VARCHAR2,
246 X_PRECISION in NUMBER,
247 X_EXTENDED_PRECISION in NUMBER,
248 X_SYMBOL in VARCHAR2,
249 X_START_DATE_ACTIVE in DATE,
250 X_END_DATE_ACTIVE in DATE,
251 X_MINIMUM_ACCOUNTABLE_UNIT in NUMBER,
252 X_CONTEXT in VARCHAR2,
253 X_ATTRIBUTE1 in VARCHAR2,
254 X_ATTRIBUTE2 in VARCHAR2,
255 X_ATTRIBUTE3 in VARCHAR2,
256 X_ATTRIBUTE4 in VARCHAR2,
257 X_ATTRIBUTE5 in VARCHAR2,
258 X_ATTRIBUTE6 in VARCHAR2,
259 X_ATTRIBUTE7 in VARCHAR2,
260 X_ATTRIBUTE8 in VARCHAR2,
261 X_ATTRIBUTE9 in VARCHAR2,
262 X_ATTRIBUTE10 in VARCHAR2,
263 X_ATTRIBUTE11 in VARCHAR2,
264 X_ATTRIBUTE12 in VARCHAR2,
265 X_ATTRIBUTE13 in VARCHAR2,
266 X_ATTRIBUTE14 in VARCHAR2,
267 X_ATTRIBUTE15 in VARCHAR2,
268 X_ISO_FLAG in VARCHAR2,
269 X_GLOBAL_ATTRIBUTE_CATEGORY in VARCHAR2,
270 X_GLOBAL_ATTRIBUTE1 in VARCHAR2,
271 X_GLOBAL_ATTRIBUTE2 in VARCHAR2,
272 X_GLOBAL_ATTRIBUTE3 in VARCHAR2,
273 X_GLOBAL_ATTRIBUTE4 in VARCHAR2,
274 X_GLOBAL_ATTRIBUTE5 in VARCHAR2,
275 X_GLOBAL_ATTRIBUTE6 in VARCHAR2,
276 X_NAME in VARCHAR2,
277 X_DESCRIPTION in VARCHAR2
278 ) is
279 cursor c is select
280 DERIVE_EFFECTIVE,
281 DERIVE_TYPE,
282 GLOBAL_ATTRIBUTE7,
283 GLOBAL_ATTRIBUTE8,
284 GLOBAL_ATTRIBUTE9,
285 GLOBAL_ATTRIBUTE10,
286 GLOBAL_ATTRIBUTE11,
287 GLOBAL_ATTRIBUTE12,
288 GLOBAL_ATTRIBUTE13,
289 GLOBAL_ATTRIBUTE14,
290 GLOBAL_ATTRIBUTE15,
291 GLOBAL_ATTRIBUTE16,
292 GLOBAL_ATTRIBUTE17,
293 GLOBAL_ATTRIBUTE18,
294 GLOBAL_ATTRIBUTE19,
295 GLOBAL_ATTRIBUTE20,
296 DERIVE_FACTOR,
297 ENABLED_FLAG,
298 CURRENCY_FLAG,
299 ISSUING_TERRITORY_CODE,
300 PRECISION,
301 EXTENDED_PRECISION,
302 SYMBOL,
303 START_DATE_ACTIVE,
304 END_DATE_ACTIVE,
305 MINIMUM_ACCOUNTABLE_UNIT,
306 CONTEXT,
307 ATTRIBUTE1,
308 ATTRIBUTE2,
309 ATTRIBUTE3,
310 ATTRIBUTE4,
311 ATTRIBUTE5,
312 ATTRIBUTE6,
313 ATTRIBUTE7,
314 ATTRIBUTE8,
315 ATTRIBUTE9,
316 ATTRIBUTE10,
317 ATTRIBUTE11,
318 ATTRIBUTE12,
319 ATTRIBUTE13,
320 ATTRIBUTE14,
321 ATTRIBUTE15,
322 ISO_FLAG,
323 GLOBAL_ATTRIBUTE_CATEGORY,
324 GLOBAL_ATTRIBUTE1,
325 GLOBAL_ATTRIBUTE2,
326 GLOBAL_ATTRIBUTE3,
327 GLOBAL_ATTRIBUTE4,
328 GLOBAL_ATTRIBUTE5,
329 GLOBAL_ATTRIBUTE6
330 from FND_CURRENCIES
331 where CURRENCY_CODE = X_CURRENCY_CODE
332 for update of CURRENCY_CODE nowait;
333 recinfo c%rowtype;
334
335 cursor c1 is select
336 NAME,
337 DESCRIPTION
338 from FND_CURRENCIES_TL
339 where CURRENCY_CODE = X_CURRENCY_CODE
340 and LANGUAGE = userenv('LANG')
341 for update of CURRENCY_CODE nowait;
342 tlinfo c1%rowtype;
343
344 begin
345 open c;
346 fetch c into recinfo;
347 if (c%notfound) then
348 close c;
349 fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
350 app_exception.raise_exception;
351 end if;
352 close c;
353 if ( ((recinfo.DERIVE_EFFECTIVE = X_DERIVE_EFFECTIVE)
354 OR ((recinfo.DERIVE_EFFECTIVE is null) AND (X_DERIVE_EFFECTIVE is null)))
355 AND ((recinfo.DERIVE_TYPE = X_DERIVE_TYPE)
356 OR ((recinfo.DERIVE_TYPE is null) AND (X_DERIVE_TYPE is null)))
357 AND ((recinfo.GLOBAL_ATTRIBUTE7 = X_GLOBAL_ATTRIBUTE7)
358 OR ((recinfo.GLOBAL_ATTRIBUTE7 is null) AND (X_GLOBAL_ATTRIBUTE7 is null)))
359 AND ((recinfo.GLOBAL_ATTRIBUTE8 = X_GLOBAL_ATTRIBUTE8)
360 OR ((recinfo.GLOBAL_ATTRIBUTE8 is null) AND (X_GLOBAL_ATTRIBUTE8 is null)))
361 AND ((recinfo.GLOBAL_ATTRIBUTE9 = X_GLOBAL_ATTRIBUTE9)
362 OR ((recinfo.GLOBAL_ATTRIBUTE9 is null) AND (X_GLOBAL_ATTRIBUTE9 is null)))
363 AND ((recinfo.GLOBAL_ATTRIBUTE10 = X_GLOBAL_ATTRIBUTE10)
364 OR ((recinfo.GLOBAL_ATTRIBUTE10 is null) AND (X_GLOBAL_ATTRIBUTE10 is null)))
365 AND ((recinfo.GLOBAL_ATTRIBUTE11 = X_GLOBAL_ATTRIBUTE11)
366 OR ((recinfo.GLOBAL_ATTRIBUTE11 is null) AND (X_GLOBAL_ATTRIBUTE11 is null)))
367 AND ((recinfo.GLOBAL_ATTRIBUTE12 = X_GLOBAL_ATTRIBUTE12)
368 OR ((recinfo.GLOBAL_ATTRIBUTE12 is null) AND (X_GLOBAL_ATTRIBUTE12 is null)))
369 AND ((recinfo.GLOBAL_ATTRIBUTE13 = X_GLOBAL_ATTRIBUTE13)
370 OR ((recinfo.GLOBAL_ATTRIBUTE13 is null) AND (X_GLOBAL_ATTRIBUTE13 is null)))
371 AND ((recinfo.GLOBAL_ATTRIBUTE14 = X_GLOBAL_ATTRIBUTE14)
372 OR ((recinfo.GLOBAL_ATTRIBUTE14 is null) AND (X_GLOBAL_ATTRIBUTE14 is null)))
373 AND ((recinfo.GLOBAL_ATTRIBUTE15 = X_GLOBAL_ATTRIBUTE15)
374 OR ((recinfo.GLOBAL_ATTRIBUTE15 is null) AND (X_GLOBAL_ATTRIBUTE15 is null)))
375 AND ((recinfo.GLOBAL_ATTRIBUTE16 = X_GLOBAL_ATTRIBUTE16)
376 OR ((recinfo.GLOBAL_ATTRIBUTE16 is null) AND (X_GLOBAL_ATTRIBUTE16 is null)))
377 AND ((recinfo.GLOBAL_ATTRIBUTE17 = X_GLOBAL_ATTRIBUTE17)
378 OR ((recinfo.GLOBAL_ATTRIBUTE17 is null) AND (X_GLOBAL_ATTRIBUTE17 is null)))
379 AND ((recinfo.GLOBAL_ATTRIBUTE18 = X_GLOBAL_ATTRIBUTE18)
380 OR ((recinfo.GLOBAL_ATTRIBUTE18 is null) AND (X_GLOBAL_ATTRIBUTE18 is null)))
381 AND ((recinfo.GLOBAL_ATTRIBUTE19 = X_GLOBAL_ATTRIBUTE19)
382 OR ((recinfo.GLOBAL_ATTRIBUTE19 is null) AND (X_GLOBAL_ATTRIBUTE19 is null)))
383 AND ((recinfo.GLOBAL_ATTRIBUTE20 = X_GLOBAL_ATTRIBUTE20)
384 OR ((recinfo.GLOBAL_ATTRIBUTE20 is null) AND (X_GLOBAL_ATTRIBUTE20 is null)))
385 AND ((recinfo.DERIVE_FACTOR = X_DERIVE_FACTOR)
386 OR ((recinfo.DERIVE_FACTOR is null) AND (X_DERIVE_FACTOR is null)))
387 AND (recinfo.ENABLED_FLAG = X_ENABLED_FLAG)
388 AND (recinfo.CURRENCY_FLAG = X_CURRENCY_FLAG)
389 AND ((recinfo.ISSUING_TERRITORY_CODE = X_ISSUING_TERRITORY_CODE)
390 OR ((recinfo.ISSUING_TERRITORY_CODE is null) AND (X_ISSUING_TERRITORY_CODE is null)))
391 AND ((recinfo.PRECISION = X_PRECISION)
392 OR ((recinfo.PRECISION is null) AND (X_PRECISION is null)))
393 AND ((recinfo.EXTENDED_PRECISION = X_EXTENDED_PRECISION)
394 OR ((recinfo.EXTENDED_PRECISION is null) AND (X_EXTENDED_PRECISION is null)))
395 AND ((recinfo.SYMBOL = X_SYMBOL)
396 OR ((recinfo.SYMBOL is null) AND (X_SYMBOL is null)))
397 AND ((recinfo.START_DATE_ACTIVE = X_START_DATE_ACTIVE)
398 OR ((recinfo.START_DATE_ACTIVE is null) AND (X_START_DATE_ACTIVE is null)))
399 AND ((recinfo.END_DATE_ACTIVE = X_END_DATE_ACTIVE)
400 OR ((recinfo.END_DATE_ACTIVE is null) AND (X_END_DATE_ACTIVE is null)))
401 AND ((recinfo.MINIMUM_ACCOUNTABLE_UNIT = X_MINIMUM_ACCOUNTABLE_UNIT)
402 OR ((recinfo.MINIMUM_ACCOUNTABLE_UNIT is null) AND (X_MINIMUM_ACCOUNTABLE_UNIT is null)))
403 AND ((recinfo.CONTEXT = X_CONTEXT)
407 AND ((recinfo.ATTRIBUTE2 = X_ATTRIBUTE2)
404 OR ((recinfo.CONTEXT is null) AND (X_CONTEXT is null)))
405 AND ((recinfo.ATTRIBUTE1 = X_ATTRIBUTE1)
406 OR ((recinfo.ATTRIBUTE1 is null) AND (X_ATTRIBUTE1 is null)))
408 OR ((recinfo.ATTRIBUTE2 is null) AND (X_ATTRIBUTE2 is null)))
409 AND ((recinfo.ATTRIBUTE3 = X_ATTRIBUTE3)
410 OR ((recinfo.ATTRIBUTE3 is null) AND (X_ATTRIBUTE3 is null)))
411 AND ((recinfo.ATTRIBUTE4 = X_ATTRIBUTE4)
412 OR ((recinfo.ATTRIBUTE4 is null) AND (X_ATTRIBUTE4 is null)))
413 AND ((recinfo.ATTRIBUTE5 = X_ATTRIBUTE5)
414 OR ((recinfo.ATTRIBUTE5 is null) AND (X_ATTRIBUTE5 is null)))
415 AND ((recinfo.ATTRIBUTE6 = X_ATTRIBUTE6)
416 OR ((recinfo.ATTRIBUTE6 is null) AND (X_ATTRIBUTE6 is null)))
417 AND ((recinfo.ATTRIBUTE7 = X_ATTRIBUTE7)
418 OR ((recinfo.ATTRIBUTE7 is null) AND (X_ATTRIBUTE7 is null)))
419 AND ((recinfo.ATTRIBUTE8 = X_ATTRIBUTE8)
420 OR ((recinfo.ATTRIBUTE8 is null) AND (X_ATTRIBUTE8 is null)))
421 AND ((recinfo.ATTRIBUTE9 = X_ATTRIBUTE9)
422 OR ((recinfo.ATTRIBUTE9 is null) AND (X_ATTRIBUTE9 is null)))
423 AND ((recinfo.ATTRIBUTE10 = X_ATTRIBUTE10)
424 OR ((recinfo.ATTRIBUTE10 is null) AND (X_ATTRIBUTE10 is null)))
425 AND ((recinfo.ATTRIBUTE11 = X_ATTRIBUTE11)
426 OR ((recinfo.ATTRIBUTE11 is null) AND (X_ATTRIBUTE11 is null)))
427 AND ((recinfo.ATTRIBUTE12 = X_ATTRIBUTE12)
428 OR ((recinfo.ATTRIBUTE12 is null) AND (X_ATTRIBUTE12 is null)))
429 AND ((recinfo.ATTRIBUTE13 = X_ATTRIBUTE13)
430 OR ((recinfo.ATTRIBUTE13 is null) AND (X_ATTRIBUTE13 is null)))
431 AND ((recinfo.ATTRIBUTE14 = X_ATTRIBUTE14)
432 OR ((recinfo.ATTRIBUTE14 is null) AND (X_ATTRIBUTE14 is null)))
433 AND ((recinfo.ATTRIBUTE15 = X_ATTRIBUTE15)
434 OR ((recinfo.ATTRIBUTE15 is null) AND (X_ATTRIBUTE15 is null)))
435 AND (recinfo.ISO_FLAG = X_ISO_FLAG)
436 AND ((recinfo.GLOBAL_ATTRIBUTE_CATEGORY = X_GLOBAL_ATTRIBUTE_CATEGORY)
437 OR ((recinfo.GLOBAL_ATTRIBUTE_CATEGORY is null) AND (X_GLOBAL_ATTRIBUTE_CATEGORY is null)))
438 AND ((recinfo.GLOBAL_ATTRIBUTE1 = X_GLOBAL_ATTRIBUTE1)
439 OR ((recinfo.GLOBAL_ATTRIBUTE1 is null) AND (X_GLOBAL_ATTRIBUTE1 is null)))
440 AND ((recinfo.GLOBAL_ATTRIBUTE2 = X_GLOBAL_ATTRIBUTE2)
441 OR ((recinfo.GLOBAL_ATTRIBUTE2 is null) AND (X_GLOBAL_ATTRIBUTE2 is null)))
442 AND ((recinfo.GLOBAL_ATTRIBUTE3 = X_GLOBAL_ATTRIBUTE3)
443 OR ((recinfo.GLOBAL_ATTRIBUTE3 is null) AND (X_GLOBAL_ATTRIBUTE3 is null)))
444 AND ((recinfo.GLOBAL_ATTRIBUTE4 = X_GLOBAL_ATTRIBUTE4)
445 OR ((recinfo.GLOBAL_ATTRIBUTE4 is null) AND (X_GLOBAL_ATTRIBUTE4 is null)))
446 AND ((recinfo.GLOBAL_ATTRIBUTE5 = X_GLOBAL_ATTRIBUTE5)
447 OR ((recinfo.GLOBAL_ATTRIBUTE5 is null) AND (X_GLOBAL_ATTRIBUTE5 is null)))
448 AND ((recinfo.GLOBAL_ATTRIBUTE6 = X_GLOBAL_ATTRIBUTE6)
449 OR ((recinfo.GLOBAL_ATTRIBUTE6 is null) AND (X_GLOBAL_ATTRIBUTE6 is null)))
450 ) then
451 null;
452 else
453 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
454 app_exception.raise_exception;
455 end if;
456
457 open c1;
458 fetch c1 into tlinfo;
459 if (c1%notfound) then
460 close c1;
461 return;
462 end if;
463 close c1;
464
465 if ( (tlinfo.NAME = X_NAME)
466 AND ((tlinfo.DESCRIPTION = X_DESCRIPTION)
467 OR ((tlinfo.DESCRIPTION is null) AND (X_DESCRIPTION is null)))
468 ) then
469 null;
470 else
471 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
472 app_exception.raise_exception;
473 end if;
474 return;
475 end LOCK_ROW;
476
477 procedure UPDATE_ROW (
478 X_CURRENCY_CODE in VARCHAR2,
479 X_DERIVE_EFFECTIVE in DATE,
480 X_DERIVE_TYPE in VARCHAR2,
481 X_GLOBAL_ATTRIBUTE7 in VARCHAR2,
482 X_GLOBAL_ATTRIBUTE8 in VARCHAR2,
483 X_GLOBAL_ATTRIBUTE9 in VARCHAR2,
484 X_GLOBAL_ATTRIBUTE10 in VARCHAR2,
485 X_GLOBAL_ATTRIBUTE11 in VARCHAR2,
486 X_GLOBAL_ATTRIBUTE12 in VARCHAR2,
487 X_GLOBAL_ATTRIBUTE13 in VARCHAR2,
488 X_GLOBAL_ATTRIBUTE14 in VARCHAR2,
489 X_GLOBAL_ATTRIBUTE15 in VARCHAR2,
490 X_GLOBAL_ATTRIBUTE16 in VARCHAR2,
491 X_GLOBAL_ATTRIBUTE17 in VARCHAR2,
492 X_GLOBAL_ATTRIBUTE18 in VARCHAR2,
493 X_GLOBAL_ATTRIBUTE19 in VARCHAR2,
494 X_GLOBAL_ATTRIBUTE20 in VARCHAR2,
495 X_DERIVE_FACTOR in NUMBER,
496 X_ENABLED_FLAG in VARCHAR2,
497 X_CURRENCY_FLAG in VARCHAR2,
498 X_ISSUING_TERRITORY_CODE in VARCHAR2,
499 X_PRECISION in NUMBER,
500 X_EXTENDED_PRECISION in NUMBER,
501 X_SYMBOL in VARCHAR2,
502 X_START_DATE_ACTIVE in DATE,
503 X_END_DATE_ACTIVE in DATE,
504 X_MINIMUM_ACCOUNTABLE_UNIT in NUMBER,
505 X_CONTEXT in VARCHAR2,
506 X_ATTRIBUTE1 in VARCHAR2,
507 X_ATTRIBUTE2 in VARCHAR2,
508 X_ATTRIBUTE3 in VARCHAR2,
509 X_ATTRIBUTE4 in VARCHAR2,
510 X_ATTRIBUTE5 in VARCHAR2,
511 X_ATTRIBUTE6 in VARCHAR2,
512 X_ATTRIBUTE7 in VARCHAR2,
513 X_ATTRIBUTE8 in VARCHAR2,
514 X_ATTRIBUTE9 in VARCHAR2,
515 X_ATTRIBUTE10 in VARCHAR2,
516 X_ATTRIBUTE11 in VARCHAR2,
517 X_ATTRIBUTE12 in VARCHAR2,
518 X_ATTRIBUTE13 in VARCHAR2,
519 X_ATTRIBUTE14 in VARCHAR2,
520 X_ATTRIBUTE15 in VARCHAR2,
521 X_ISO_FLAG in VARCHAR2,
525 X_GLOBAL_ATTRIBUTE3 in VARCHAR2,
522 X_GLOBAL_ATTRIBUTE_CATEGORY in VARCHAR2,
523 X_GLOBAL_ATTRIBUTE1 in VARCHAR2,
524 X_GLOBAL_ATTRIBUTE2 in VARCHAR2,
526 X_GLOBAL_ATTRIBUTE4 in VARCHAR2,
527 X_GLOBAL_ATTRIBUTE5 in VARCHAR2,
528 X_GLOBAL_ATTRIBUTE6 in VARCHAR2,
529 X_NAME in VARCHAR2,
530 X_DESCRIPTION in VARCHAR2,
531 X_LAST_UPDATE_DATE in DATE,
532 X_LAST_UPDATED_BY in NUMBER,
533 X_LAST_UPDATE_LOGIN in NUMBER
534 ) is
535 begin
536
537 update FND_CURRENCIES set
538 DERIVE_EFFECTIVE = X_DERIVE_EFFECTIVE,
539 DERIVE_TYPE = X_DERIVE_TYPE,
540 GLOBAL_ATTRIBUTE7 = X_GLOBAL_ATTRIBUTE7,
541 GLOBAL_ATTRIBUTE8 = X_GLOBAL_ATTRIBUTE8,
542 GLOBAL_ATTRIBUTE9 = X_GLOBAL_ATTRIBUTE9,
543 GLOBAL_ATTRIBUTE10 = X_GLOBAL_ATTRIBUTE10,
544 GLOBAL_ATTRIBUTE11 = X_GLOBAL_ATTRIBUTE11,
545 GLOBAL_ATTRIBUTE12 = X_GLOBAL_ATTRIBUTE12,
546 GLOBAL_ATTRIBUTE13 = X_GLOBAL_ATTRIBUTE13,
547 GLOBAL_ATTRIBUTE14 = X_GLOBAL_ATTRIBUTE14,
548 GLOBAL_ATTRIBUTE15 = X_GLOBAL_ATTRIBUTE15,
549 GLOBAL_ATTRIBUTE16 = X_GLOBAL_ATTRIBUTE16,
550 GLOBAL_ATTRIBUTE17 = X_GLOBAL_ATTRIBUTE17,
551 GLOBAL_ATTRIBUTE18 = X_GLOBAL_ATTRIBUTE18,
552 GLOBAL_ATTRIBUTE19 = X_GLOBAL_ATTRIBUTE19,
553 GLOBAL_ATTRIBUTE20 = X_GLOBAL_ATTRIBUTE20,
554 DERIVE_FACTOR = X_DERIVE_FACTOR,
555 ENABLED_FLAG = X_ENABLED_FLAG,
556 CURRENCY_FLAG = X_CURRENCY_FLAG,
557 ISSUING_TERRITORY_CODE = X_ISSUING_TERRITORY_CODE,
558 PRECISION = NVL(X_PRECISION,0),
559 EXTENDED_PRECISION = X_EXTENDED_PRECISION,
560 SYMBOL = X_SYMBOL,
561 START_DATE_ACTIVE = X_START_DATE_ACTIVE,
562 END_DATE_ACTIVE = X_END_DATE_ACTIVE,
563 MINIMUM_ACCOUNTABLE_UNIT = X_MINIMUM_ACCOUNTABLE_UNIT,
564 CONTEXT = X_CONTEXT,
565 ATTRIBUTE1 = X_ATTRIBUTE1,
566 ATTRIBUTE2 = X_ATTRIBUTE2,
567 ATTRIBUTE3 = X_ATTRIBUTE3,
568 ATTRIBUTE4 = X_ATTRIBUTE4,
569 ATTRIBUTE5 = X_ATTRIBUTE5,
570 ATTRIBUTE6 = X_ATTRIBUTE6,
571 ATTRIBUTE7 = X_ATTRIBUTE7,
572 ATTRIBUTE8 = X_ATTRIBUTE8,
573 ATTRIBUTE9 = X_ATTRIBUTE9,
574 ATTRIBUTE10 = X_ATTRIBUTE10,
575 ATTRIBUTE11 = X_ATTRIBUTE11,
576 ATTRIBUTE12 = X_ATTRIBUTE12,
577 ATTRIBUTE13 = X_ATTRIBUTE13,
578 ATTRIBUTE14 = X_ATTRIBUTE14,
579 ATTRIBUTE15 = X_ATTRIBUTE15,
580 ISO_FLAG = X_ISO_FLAG,
581 GLOBAL_ATTRIBUTE_CATEGORY = X_GLOBAL_ATTRIBUTE_CATEGORY,
582 GLOBAL_ATTRIBUTE1 = X_GLOBAL_ATTRIBUTE1,
583 GLOBAL_ATTRIBUTE2 = X_GLOBAL_ATTRIBUTE2,
584 GLOBAL_ATTRIBUTE3 = X_GLOBAL_ATTRIBUTE3,
585 GLOBAL_ATTRIBUTE4 = X_GLOBAL_ATTRIBUTE4,
586 GLOBAL_ATTRIBUTE5 = X_GLOBAL_ATTRIBUTE5,
587 GLOBAL_ATTRIBUTE6 = X_GLOBAL_ATTRIBUTE6,
588 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
589 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
590 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
591 where CURRENCY_CODE = X_CURRENCY_CODE;
592
593 if (sql%notfound) then
594 raise no_data_found;
595 end if;
596
597 update FND_CURRENCIES_TL set
598 NAME = X_NAME,
599 DESCRIPTION = X_DESCRIPTION,
600 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
601 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
602 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
603 SOURCE_LANG = userenv('LANG')
604 where CURRENCY_CODE = X_CURRENCY_CODE
605 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
606
607 if (sql%notfound) then
608 raise no_data_found;
609 end if;
610 end UPDATE_ROW;
611
612 procedure DELETE_ROW (
613 X_CURRENCY_CODE in VARCHAR2
614 ) is
615 begin
616 delete from FND_CURRENCIES
617 where CURRENCY_CODE = X_CURRENCY_CODE;
618
619 if (sql%notfound) then
620 raise no_data_found;
621 end if;
622
623 delete from FND_CURRENCIES_TL
624 where CURRENCY_CODE = X_CURRENCY_CODE;
625
626 if (sql%notfound) then
627 raise no_data_found;
628 end if;
629 end DELETE_ROW;
630
631 procedure ADD_LANGUAGE
632 is
633 begin
634
635 /* Mar/19/03 requested by Ric Ginsberg */
636 /* The following delete and update statements are commented out */
637 /* as a quick workaround to fix the time-consuming table handler issue */
638 /* Eventually we'll need to turn them into a separate fix_language procedure */
639 /*
640
641 delete from FND_CURRENCIES_TL T
642 where not exists
643 (select NULL
644 from FND_CURRENCIES B
645 where B.CURRENCY_CODE = T.CURRENCY_CODE
646 );
647
648 update FND_CURRENCIES_TL T set (
649 NAME,
650 DESCRIPTION
651 ) = (select
652 B.NAME,
653 B.DESCRIPTION
654 from FND_CURRENCIES_TL B
655 where B.CURRENCY_CODE = T.CURRENCY_CODE
656 and B.LANGUAGE = T.SOURCE_LANG)
657 where (
658 T.CURRENCY_CODE,
659 T.LANGUAGE
660 ) in (select
661 SUBT.CURRENCY_CODE,
662 SUBT.LANGUAGE
663 from FND_CURRENCIES_TL SUBB, FND_CURRENCIES_TL SUBT
664 where SUBB.CURRENCY_CODE = SUBT.CURRENCY_CODE
665 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
666 and (SUBB.NAME <> SUBT.NAME
667 or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
671 */
668 or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
669 or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
670 ));
672
673 insert into FND_CURRENCIES_TL (
674 CURRENCY_CODE,
675 NAME,
676 DESCRIPTION,
677 CREATED_BY,
678 CREATION_DATE,
679 LAST_UPDATED_BY,
680 LAST_UPDATE_DATE,
681 LAST_UPDATE_LOGIN,
682 LANGUAGE,
683 SOURCE_LANG
684 ) select
685 B.CURRENCY_CODE,
686 B.NAME,
687 B.DESCRIPTION,
688 B.CREATED_BY,
689 B.CREATION_DATE,
690 B.LAST_UPDATED_BY,
691 B.LAST_UPDATE_DATE,
692 B.LAST_UPDATE_LOGIN,
693 L.LANGUAGE_CODE,
694 B.SOURCE_LANG
695 from FND_CURRENCIES_TL B, FND_LANGUAGES L
696 where L.INSTALLED_FLAG in ('I', 'B')
697 and B.LANGUAGE = userenv('LANG')
698 and not exists
699 (select NULL
700 from FND_CURRENCIES_TL T
701 where T.CURRENCY_CODE = B.CURRENCY_CODE
702 and T.LANGUAGE = L.LANGUAGE_CODE);
703 end ADD_LANGUAGE;
704
705
706 procedure TRANSLATE_ROW(
707 X_CURRENCY_CODE in varchar2,
708 X_NAME in varchar2,
709 X_DESCRIPTION in varchar2,
710 X_OWNER in varchar2) is
711 begin
712 TRANSLATE_ROW (
713 X_CURRENCY_CODE => X_CURRENCY_CODE ,
714 X_NAME => X_NAME ,
715 X_DESCRIPTION => X_DESCRIPTION,
716 X_OWNER => X_OWNER,
717 X_LAST_UPDATE_DATE => null,
718 X_CUSTOM_MODE => null);
719 end TRANSLATE_ROW;
720
721 procedure LOAD_ROW (
722 X_CURRENCY_CODE in VARCHAR2,
723 X_DERIVE_EFFECTIVE in DATE,
724 X_DERIVE_TYPE in VARCHAR2,
725 X_GLOBAL_ATTRIBUTE1 in VARCHAR2,
726 X_GLOBAL_ATTRIBUTE2 in VARCHAR2,
727 X_GLOBAL_ATTRIBUTE3 in VARCHAR2,
728 X_GLOBAL_ATTRIBUTE4 in VARCHAR2,
729 X_GLOBAL_ATTRIBUTE5 in VARCHAR2,
730 X_GLOBAL_ATTRIBUTE6 in VARCHAR2,
731 X_GLOBAL_ATTRIBUTE7 in VARCHAR2,
732 X_GLOBAL_ATTRIBUTE8 in VARCHAR2,
733 X_GLOBAL_ATTRIBUTE9 in VARCHAR2,
734 X_GLOBAL_ATTRIBUTE10 in VARCHAR2,
735 X_GLOBAL_ATTRIBUTE11 in VARCHAR2,
736 X_GLOBAL_ATTRIBUTE12 in VARCHAR2,
737 X_GLOBAL_ATTRIBUTE13 in VARCHAR2,
738 X_GLOBAL_ATTRIBUTE14 in VARCHAR2,
739 X_GLOBAL_ATTRIBUTE15 in VARCHAR2,
740 X_GLOBAL_ATTRIBUTE16 in VARCHAR2,
741 X_GLOBAL_ATTRIBUTE17 in VARCHAR2,
742 X_GLOBAL_ATTRIBUTE18 in VARCHAR2,
743 X_GLOBAL_ATTRIBUTE19 in VARCHAR2,
744 X_GLOBAL_ATTRIBUTE20 in VARCHAR2,
745 X_DERIVE_FACTOR in NUMBER,
746 X_ENABLED_FLAG in VARCHAR2,
747 X_CURRENCY_FLAG in VARCHAR2,
748 X_ISSUING_TERRITORY_CODE in VARCHAR2,
749 X_PRECISION in NUMBER,
750 X_EXTENDED_PRECISION in NUMBER,
751 X_SYMBOL in VARCHAR2,
752 X_START_DATE_ACTIVE in DATE,
753 X_END_DATE_ACTIVE in DATE,
754 X_MINIMUM_ACCOUNTABLE_UNIT in NUMBER,
755 X_CONTEXT in VARCHAR2,
756 X_ATTRIBUTE1 in VARCHAR2,
757 X_ATTRIBUTE2 in VARCHAR2,
758 X_ATTRIBUTE3 in VARCHAR2,
759 X_ATTRIBUTE4 in VARCHAR2,
760 X_ATTRIBUTE5 in VARCHAR2,
761 X_ATTRIBUTE6 in VARCHAR2,
762 X_ATTRIBUTE7 in VARCHAR2,
763 X_ATTRIBUTE8 in VARCHAR2,
764 X_ATTRIBUTE9 in VARCHAR2,
765 X_ATTRIBUTE10 in VARCHAR2,
766 X_ATTRIBUTE11 in VARCHAR2,
767 X_ATTRIBUTE12 in VARCHAR2,
768 X_ATTRIBUTE13 in VARCHAR2,
769 X_ATTRIBUTE14 in VARCHAR2,
770 X_ATTRIBUTE15 in VARCHAR2,
771 X_ISO_FLAG in VARCHAR2,
772 X_GLOBAL_ATTRIBUTE_CATEGORY in VARCHAR2,
773 X_NAME in VARCHAR2,
774 X_DESCRIPTION in VARCHAR2,
775 X_OWNER in VARCHAR2)
776 is
777 begin
778 LOAD_ROW (
779 X_CURRENCY_CODE => X_CURRENCY_CODE ,
780 X_DERIVE_EFFECTIVE => X_DERIVE_EFFECTIVE ,
781 X_DERIVE_TYPE => X_DERIVE_TYPE ,
782 X_GLOBAL_ATTRIBUTE1 => X_GLOBAL_ATTRIBUTE1 ,
783 X_GLOBAL_ATTRIBUTE2 => X_GLOBAL_ATTRIBUTE2 ,
784 X_GLOBAL_ATTRIBUTE3 => X_GLOBAL_ATTRIBUTE3 ,
785 X_GLOBAL_ATTRIBUTE4 => X_GLOBAL_ATTRIBUTE4,
786 X_GLOBAL_ATTRIBUTE5 => X_GLOBAL_ATTRIBUTE5,
787 X_GLOBAL_ATTRIBUTE6 => X_GLOBAL_ATTRIBUTE6,
788 X_GLOBAL_ATTRIBUTE7 => X_GLOBAL_ATTRIBUTE7,
789 X_GLOBAL_ATTRIBUTE8 => X_GLOBAL_ATTRIBUTE8,
790 X_GLOBAL_ATTRIBUTE9 => X_GLOBAL_ATTRIBUTE9,
791 X_GLOBAL_ATTRIBUTE10 => X_GLOBAL_ATTRIBUTE10,
792 X_GLOBAL_ATTRIBUTE11 => X_GLOBAL_ATTRIBUTE11,
793 X_GLOBAL_ATTRIBUTE12 => X_GLOBAL_ATTRIBUTE12,
794 X_GLOBAL_ATTRIBUTE13 => X_GLOBAL_ATTRIBUTE13,
795 X_GLOBAL_ATTRIBUTE14=> X_GLOBAL_ATTRIBUTE14,
796 X_GLOBAL_ATTRIBUTE15 => X_GLOBAL_ATTRIBUTE15,
797 X_GLOBAL_ATTRIBUTE16 => X_GLOBAL_ATTRIBUTE16,
798 X_GLOBAL_ATTRIBUTE17 => X_GLOBAL_ATTRIBUTE17,
799 X_GLOBAL_ATTRIBUTE18 => X_GLOBAL_ATTRIBUTE18,
800 X_GLOBAL_ATTRIBUTE19 => X_GLOBAL_ATTRIBUTE19,
801 X_GLOBAL_ATTRIBUTE20 => X_GLOBAL_ATTRIBUTE20,
802 X_DERIVE_FACTOR => X_DERIVE_FACTOR,
803 X_ENABLED_FLAG => X_ENABLED_FLAG,
804 X_CURRENCY_FLAG => X_CURRENCY_FLAG,
805 X_ISSUING_TERRITORY_CODE => X_ISSUING_TERRITORY_CODE ,
806 X_PRECISION => X_PRECISION,
807 X_EXTENDED_PRECISION => X_EXTENDED_PRECISION,
808 X_SYMBOL => X_SYMBOL,
809 X_START_DATE_ACTIVE => X_START_DATE_ACTIVE,
810 X_END_DATE_ACTIVE => X_END_DATE_ACTIVE,
811 X_MINIMUM_ACCOUNTABLE_UNIT => X_MINIMUM_ACCOUNTABLE_UNIT,
815 X_ATTRIBUTE3 => X_ATTRIBUTE3,
812 X_CONTEXT => X_CONTEXT,
813 X_ATTRIBUTE1 => X_ATTRIBUTE1,
814 X_ATTRIBUTE2 => X_ATTRIBUTE2,
816 X_ATTRIBUTE4 => X_ATTRIBUTE4,
817 X_ATTRIBUTE5 => X_ATTRIBUTE5,
818 X_ATTRIBUTE6 => X_ATTRIBUTE6,
819 X_ATTRIBUTE7 => X_ATTRIBUTE7,
820 X_ATTRIBUTE8 => X_ATTRIBUTE8,
821 X_ATTRIBUTE9 => X_ATTRIBUTE9,
822 X_ATTRIBUTE10 => X_ATTRIBUTE10,
823 X_ATTRIBUTE11 => X_ATTRIBUTE11,
824 X_ATTRIBUTE12 => X_ATTRIBUTE12,
825 X_ATTRIBUTE13 => X_ATTRIBUTE13,
826 X_ATTRIBUTE14 => X_ATTRIBUTE14,
827 X_ATTRIBUTE15 => X_ATTRIBUTE15,
828 X_ISO_FLAG => X_ISO_FLAG,
829 X_GLOBAL_ATTRIBUTE_CATEGORY => X_GLOBAL_ATTRIBUTE_CATEGORY,
830 X_NAME => X_NAME,
831 X_DESCRIPTION => X_DESCRIPTION,
832 X_OWNER => X_OWNER,
833 X_LAST_UPDATE_DATE => null,
834 X_CUSTOM_MODE => null);
835
836 end LOAD_ROW;
837
838
839 procedure TRANSLATE_ROW(
840 X_CURRENCY_CODE in varchar2,
841 X_NAME in varchar2,
842 X_DESCRIPTION in varchar2,
843 X_OWNER in varchar2,
844 X_LAST_UPDATE_DATE in VARCHAR2,
845 X_CUSTOM_MODE in VARCHAR2
846 ) is
847 f_luby number; -- entity owner in file
848 f_ludate date; -- entity update date in file
849 db_luby number; -- entity owner in db
850 db_ludate date; -- entity update date in db
851
852 begin
853 -- Translate owner to file_last_updated_by
854 f_luby := fnd_load_util.owner_id(x_owner);
855
856 -- Translate char last_update_date to date
857 f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
858
859 select last_updated_by, last_update_date
860 into db_luby, db_ludate
861 from FND_CURRENCIES_TL
862 where CURRENCY_CODE = X_CURRENCY_CODE
863 and language = userenv('LANG');
864
865 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
866 db_ludate, X_CUSTOM_MODE)) then
867 update fnd_currencies_tl set
868 NAME= X_NAME,
869 DESCRIPTION= X_DESCRIPTION,
870 LAST_UPDATE_DATE = f_ludate,
871 LAST_UPDATED_BY = f_luby,
872 LAST_UPDATE_LOGIN = 0,
873 SOURCE_LANG = userenv('LANG')
874 where CURRENCY_CODE = X_CURRENCY_CODE
875 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
876 end if;
877 end TRANSLATE_ROW;
878
879 procedure LOAD_ROW (
880 X_CURRENCY_CODE in VARCHAR2,
881 X_DERIVE_EFFECTIVE in DATE,
882 X_DERIVE_TYPE in VARCHAR2,
883 X_GLOBAL_ATTRIBUTE1 in VARCHAR2,
884 X_GLOBAL_ATTRIBUTE2 in VARCHAR2,
885 X_GLOBAL_ATTRIBUTE3 in VARCHAR2,
886 X_GLOBAL_ATTRIBUTE4 in VARCHAR2,
887 X_GLOBAL_ATTRIBUTE5 in VARCHAR2,
888 X_GLOBAL_ATTRIBUTE6 in VARCHAR2,
889 X_GLOBAL_ATTRIBUTE7 in VARCHAR2,
890 X_GLOBAL_ATTRIBUTE8 in VARCHAR2,
891 X_GLOBAL_ATTRIBUTE9 in VARCHAR2,
892 X_GLOBAL_ATTRIBUTE10 in VARCHAR2,
893 X_GLOBAL_ATTRIBUTE11 in VARCHAR2,
894 X_GLOBAL_ATTRIBUTE12 in VARCHAR2,
895 X_GLOBAL_ATTRIBUTE13 in VARCHAR2,
896 X_GLOBAL_ATTRIBUTE14 in VARCHAR2,
897 X_GLOBAL_ATTRIBUTE15 in VARCHAR2,
898 X_GLOBAL_ATTRIBUTE16 in VARCHAR2,
899 X_GLOBAL_ATTRIBUTE17 in VARCHAR2,
900 X_GLOBAL_ATTRIBUTE18 in VARCHAR2,
901 X_GLOBAL_ATTRIBUTE19 in VARCHAR2,
902 X_GLOBAL_ATTRIBUTE20 in VARCHAR2,
903 X_DERIVE_FACTOR in NUMBER,
904 X_ENABLED_FLAG in VARCHAR2,
905 X_CURRENCY_FLAG in VARCHAR2,
906 X_ISSUING_TERRITORY_CODE in VARCHAR2,
907 X_PRECISION in NUMBER,
908 X_EXTENDED_PRECISION in NUMBER,
909 X_SYMBOL in VARCHAR2,
910 X_START_DATE_ACTIVE in DATE,
911 X_END_DATE_ACTIVE in DATE,
912 X_MINIMUM_ACCOUNTABLE_UNIT in NUMBER,
913 X_CONTEXT in VARCHAR2,
914 X_ATTRIBUTE1 in VARCHAR2,
915 X_ATTRIBUTE2 in VARCHAR2,
916 X_ATTRIBUTE3 in VARCHAR2,
917 X_ATTRIBUTE4 in VARCHAR2,
918 X_ATTRIBUTE5 in VARCHAR2,
919 X_ATTRIBUTE6 in VARCHAR2,
920 X_ATTRIBUTE7 in VARCHAR2,
921 X_ATTRIBUTE8 in VARCHAR2,
922 X_ATTRIBUTE9 in VARCHAR2,
923 X_ATTRIBUTE10 in VARCHAR2,
924 X_ATTRIBUTE11 in VARCHAR2,
925 X_ATTRIBUTE12 in VARCHAR2,
926 X_ATTRIBUTE13 in VARCHAR2,
927 X_ATTRIBUTE14 in VARCHAR2,
928 X_ATTRIBUTE15 in VARCHAR2,
929 X_ISO_FLAG in VARCHAR2,
930 X_GLOBAL_ATTRIBUTE_CATEGORY in VARCHAR2,
931 X_NAME in VARCHAR2,
932 X_DESCRIPTION in VARCHAR2,
933 X_OWNER in VARCHAR2,
934 X_LAST_UPDATE_DATE in VARCHAR2,
935 X_CUSTOM_MODE in VARCHAR2
936 )
937 is
938 f_luby number; -- entity owner in file
939 f_ludate date; -- entity update date in file
940 db_luby number; -- entity owner in db
941 db_ludate date; -- entity update date in db
942 X_ROWID VARCHAR2(64);
943 user_id NUMBER;
944
945 -- Bug4493112 - Moved this variables from update_row to load_row.
946
947 L_DERIVE_EFFECTIVE DATE;
948 L_DERIVE_TYPE VARCHAR2(8);
949 L_GLOBAL_ATTRIBUTE7 VARCHAR2(150);
950 L_GLOBAL_ATTRIBUTE8 VARCHAR2(150);
951 L_GLOBAL_ATTRIBUTE9 VARCHAR2(150);
952 L_GLOBAL_ATTRIBUTE10 VARCHAR2(150);
953 L_GLOBAL_ATTRIBUTE11 VARCHAR2(150);
954 L_GLOBAL_ATTRIBUTE12 VARCHAR2(150);
955 L_GLOBAL_ATTRIBUTE13 VARCHAR2(150);
956 L_GLOBAL_ATTRIBUTE14 VARCHAR2(150);
957 L_GLOBAL_ATTRIBUTE15 VARCHAR2(150);
958 L_GLOBAL_ATTRIBUTE16 VARCHAR2(150);
959 L_GLOBAL_ATTRIBUTE17 VARCHAR2(150);
963 L_DERIVE_FACTOR NUMBER;
960 L_GLOBAL_ATTRIBUTE18 VARCHAR2(150);
961 L_GLOBAL_ATTRIBUTE19 VARCHAR2(150);
962 L_GLOBAL_ATTRIBUTE20 VARCHAR2(150);
964 L_ISSUING_TERRITORY_CODE VARCHAR2(2);
965 L_PRECISION NUMBER;
966 L_EXTENDED_PRECISION NUMBER;
967 L_SYMBOL VARCHAR2(12);
968 L_START_DATE_ACTIVE DATE;
969 L_END_DATE_ACTIVE DATE;
970 L_MINIMUM_ACCOUNTABLE_UNIT NUMBER;
971 L_CONTEXT VARCHAR2(80);
972 L_ATTRIBUTE1 VARCHAR2(150);
973 L_ATTRIBUTE2 VARCHAR2(150);
974 L_ATTRIBUTE3 VARCHAR2(150);
975 L_ATTRIBUTE4 VARCHAR2(150);
976 L_ATTRIBUTE5 VARCHAR2(150);
977 L_ATTRIBUTE6 VARCHAR2(150);
978 L_ATTRIBUTE7 VARCHAR2(150);
979 L_ATTRIBUTE8 VARCHAR2(150);
980 L_ATTRIBUTE9 VARCHAR2(150);
981 L_ATTRIBUTE10 VARCHAR2(150);
982 L_ATTRIBUTE11 VARCHAR2(150);
983 L_ATTRIBUTE12 VARCHAR2(150);
984 L_ATTRIBUTE13 VARCHAR2(150);
985 L_ATTRIBUTE14 VARCHAR2(150);
986 L_ATTRIBUTE15 VARCHAR2(150);
987 L_GLOBAL_ATTRIBUTE_CATEGORY VARCHAR2(150);
988 L_GLOBAL_ATTRIBUTE1 VARCHAR2(150);
989 L_GLOBAL_ATTRIBUTE2 VARCHAR2(150);
990 L_GLOBAL_ATTRIBUTE3 VARCHAR2(150);
991 L_GLOBAL_ATTRIBUTE4 VARCHAR2(150);
992 L_GLOBAL_ATTRIBUTE5 VARCHAR2(150);
993 L_GLOBAL_ATTRIBUTE6 VARCHAR2(150);
994
995
996 begin
997
998 -- Translate owner to file_last_updated_by
999 f_luby := fnd_load_util.owner_id(x_owner);
1000
1001 -- Translate char last_update_date to date
1002 f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
1003
1004 begin
1005
1006 select last_updated_by, last_update_date
1007 into db_luby, db_ludate
1008 from FND_CURRENCIES
1009 where CURRENCY_CODE = X_CURRENCY_CODE;
1010
1011
1012 -- Bug4493112 Moved decode select statement from update_row to load_row.
1013 -- Bug4648984 Moved code inside of exception block so no data found is
1014 -- handled.
1015
1016 select
1017 decode(x_issuing_territory_code, fnd_currencies_pkg.null_char, null,
1018 null, u.issuing_territory_code,
1019 x_issuing_territory_code),
1020 decode(x_precision, fnd_currencies_pkg.null_number, null,
1021 null, u.precision,
1022 x_precision),
1023 decode(x_extended_precision, fnd_currencies_pkg.null_number, null,
1024 null, u.extended_precision,
1025 x_extended_precision),
1026 decode(x_symbol, fnd_currencies_pkg.null_char, null,
1027 null, u.symbol,
1028 x_symbol),
1029 decode(x_start_date_active, fnd_currencies_pkg.null_date, null,
1030 null, u.start_date_active,
1031 x_start_date_active),
1032 decode(x_end_date_active, fnd_currencies_pkg.null_date, null,
1033 null, u.end_date_active,
1034 x_end_date_active),
1035 decode(x_minimum_accountable_unit, fnd_currencies_pkg.null_number,
1036 null,
1037 null, u.minimum_accountable_unit,
1038 x_minimum_accountable_unit),
1039 decode(x_context, fnd_currencies_pkg.null_char, null,
1040 null, u.context,
1041 x_context),
1042 decode(x_attribute1, fnd_currencies_pkg.null_char, null,
1043 null, u.attribute1,
1044 x_attribute1),
1045 decode(x_attribute2, fnd_currencies_pkg.null_char, null,
1046 null, u.attribute2,
1047 x_attribute2),
1048 decode(x_attribute3, fnd_currencies_pkg.null_char, null,
1049 null, u.attribute3,
1050 x_attribute3),
1051 decode(x_attribute4, fnd_currencies_pkg.null_char, null,
1052 null, u.attribute4,
1053 x_attribute4),
1054 decode(x_attribute5, fnd_currencies_pkg.null_char, null,
1055 null, u.attribute5,
1056 x_attribute5),
1057 decode(x_attribute6, fnd_currencies_pkg.null_char, null,
1058 null, u.attribute6,
1059 x_attribute6),
1060 decode(x_attribute7, fnd_currencies_pkg.null_char, null,
1061 null, u.attribute7,
1062 x_attribute7),
1063 decode(x_attribute8, fnd_currencies_pkg.null_char, null,
1064 null, u.attribute8,
1065 x_attribute8),
1066 decode(x_attribute9, fnd_currencies_pkg.null_char, null,
1067 null, u.attribute9,
1068 x_attribute9),
1069 decode(x_attribute10, fnd_currencies_pkg.null_char, null,
1070 null, u.attribute10,
1071 x_attribute10),
1072 decode(x_attribute11, fnd_currencies_pkg.null_char, null,
1073 null, u.attribute11,
1074 x_attribute11),
1075 decode(x_attribute12, fnd_currencies_pkg.null_char, null,
1076 null, u.attribute12,
1077 x_attribute12),
1078 decode(x_attribute13, fnd_currencies_pkg.null_char, null,
1079 null, u.attribute13,
1080 x_attribute13),
1081 decode(x_attribute14, fnd_currencies_pkg.null_char, null,
1085 null, u.attribute15,
1082 null, u.attribute14,
1083 x_attribute14),
1084 decode(x_attribute15, fnd_currencies_pkg.null_char, null,
1086 x_attribute15),
1087 decode(x_global_attribute_category, fnd_currencies_pkg.null_char,
1088 null,
1089 null, u.global_attribute_category,
1090 x_global_attribute_category),
1091 decode(x_global_attribute1, fnd_currencies_pkg.null_char, null,
1092 null, u.global_attribute1,
1093 x_global_attribute1),
1094 decode(x_global_attribute2, fnd_currencies_pkg.null_char, null,
1095 null, u.global_attribute2,
1096 x_global_attribute2),
1097 decode(x_global_attribute3, fnd_currencies_pkg.null_char, null,
1098 null, u.global_attribute3,
1099 x_global_attribute3),
1100 decode(x_global_attribute4, fnd_currencies_pkg.null_char, null,
1101 null, u.global_attribute4,
1102 x_global_attribute4),
1103 decode(x_global_attribute5, fnd_currencies_pkg.null_char, null,
1104 null, u.global_attribute5,
1105 x_global_attribute5),
1106 decode(x_global_attribute6, fnd_currencies_pkg.null_char, null,
1107 null, u.global_attribute6,
1108 x_global_attribute6),
1109 decode(x_global_attribute7, fnd_currencies_pkg.null_char, null,
1110 null, u.global_attribute7,
1111 x_global_attribute7),
1112 decode(x_global_attribute8, fnd_currencies_pkg.null_char, null,
1113 null, u.global_attribute8,
1114 x_global_attribute8),
1115 decode(x_global_attribute9, fnd_currencies_pkg.null_char, null,
1116 null, u.global_attribute9,
1117 x_global_attribute9),
1118 decode(x_global_attribute10, fnd_currencies_pkg.null_char, null,
1119 null, u.global_attribute10,
1120 x_global_attribute10),
1121 decode(x_global_attribute11, fnd_currencies_pkg.null_char, null,
1122 null, u.global_attribute11,
1123 x_global_attribute11),
1124 decode(x_global_attribute12, fnd_currencies_pkg.null_char, null,
1125 null, u.global_attribute12,
1126 x_global_attribute12),
1127 decode(x_global_attribute13, fnd_currencies_pkg.null_char, null,
1128 null, u.global_attribute13,
1129 x_global_attribute13),
1130 decode(x_global_attribute14, fnd_currencies_pkg.null_char, null,
1131 null, u.global_attribute14,
1132 x_global_attribute14),
1133 decode(x_global_attribute15, fnd_currencies_pkg.null_char, null,
1134 null, u.global_attribute15,
1135 x_global_attribute15),
1136 decode(x_global_attribute16, fnd_currencies_pkg.null_char, null,
1137 null, u.global_attribute16,
1138 x_global_attribute16),
1139 decode(x_global_attribute17, fnd_currencies_pkg.null_char, null,
1140 null, u.global_attribute17,
1141 x_global_attribute17),
1142 decode(x_global_attribute18, fnd_currencies_pkg.null_char, null,
1143 null, u.global_attribute18,
1144 x_global_attribute18),
1145 decode(x_global_attribute19, fnd_currencies_pkg.null_char, null,
1146 null, u.global_attribute19,
1147 x_global_attribute19),
1148 decode(x_global_attribute20, fnd_currencies_pkg.null_char, null,
1149 null, u.global_attribute20,
1150 x_global_attribute20),
1151 decode(X_DERIVE_EFFECTIVE, fnd_currencies_pkg.null_date, null,
1152 null, u.DERIVE_EFFECTIVE,
1153 X_DERIVE_EFFECTIVE),
1154 decode(x_derive_type, fnd_currencies_pkg.null_char, null,
1155 null, u.derive_type,
1156 x_derive_type),
1157 decode(x_derive_factor, fnd_currencies_pkg.null_number, null,
1158 null, u.derive_factor,
1159 x_derive_factor)
1160 into L_ISSUING_TERRITORY_CODE, L_PRECISION, L_EXTENDED_PRECISION,
1161 L_SYMBOL, L_START_DATE_ACTIVE, L_END_DATE_ACTIVE,
1162 L_MINIMUM_ACCOUNTABLE_UNIT, L_CONTEXT,
1163 L_ATTRIBUTE1, L_ATTRIBUTE2, L_ATTRIBUTE3, L_ATTRIBUTE4,
1164 L_ATTRIBUTE5, L_ATTRIBUTE6, L_ATTRIBUTE7, L_ATTRIBUTE8,
1165 L_ATTRIBUTE9,L_ATTRIBUTE10, L_ATTRIBUTE11, L_ATTRIBUTE12,
1166 L_ATTRIBUTE13,L_ATTRIBUTE14, L_ATTRIBUTE15,
1167 L_GLOBAL_ATTRIBUTE_CATEGORY,
1168 L_GLOBAL_ATTRIBUTE1, L_GLOBAL_ATTRIBUTE2, L_GLOBAL_ATTRIBUTE3,
1169 L_GLOBAL_ATTRIBUTE4, L_GLOBAL_ATTRIBUTE5, L_GLOBAL_ATTRIBUTE6,
1170 L_GLOBAL_ATTRIBUTE7,L_GLOBAL_ATTRIBUTE8, L_GLOBAL_ATTRIBUTE9,
1171 L_GLOBAL_ATTRIBUTE10,L_GLOBAL_ATTRIBUTE11, L_GLOBAL_ATTRIBUTE12,
1172 L_GLOBAL_ATTRIBUTE13,L_GLOBAL_ATTRIBUTE14, L_GLOBAL_ATTRIBUTE15,
1173 L_GLOBAL_ATTRIBUTE16,L_GLOBAL_ATTRIBUTE17, L_GLOBAL_ATTRIBUTE18,
1174 L_GLOBAL_ATTRIBUTE19,L_GLOBAL_ATTRIBUTE20,
1175 L_DERIVE_EFFECTIVE, L_DERIVE_TYPE, L_DERIVE_FACTOR
1176 from FND_CURRENCIES U
1177 where CURRENCY_CODE = X_CURRENCY_CODE;
1178
1179 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
1180 db_ludate, X_CUSTOM_MODE)) then
1181
1182 -- Bug4493112 Modified calls to UPDATE_ROW AND INSERT_ROW to use local
1183 -- variables.
1184
1185 FND_CURRENCIES_PKG.UPDATE_ROW(
1186 X_CURRENCY_CODE,
1187 L_DERIVE_EFFECTIVE,
1188 L_DERIVE_TYPE,
1189 L_GLOBAL_ATTRIBUTE7,
1190 L_GLOBAL_ATTRIBUTE8,
1191 L_GLOBAL_ATTRIBUTE9,
1192 L_GLOBAL_ATTRIBUTE10,
1193 L_GLOBAL_ATTRIBUTE11,
1194 L_GLOBAL_ATTRIBUTE12,
1195 L_GLOBAL_ATTRIBUTE13,
1196 L_GLOBAL_ATTRIBUTE14,
1197 L_GLOBAL_ATTRIBUTE15,
1198 L_GLOBAL_ATTRIBUTE16,
1199 L_GLOBAL_ATTRIBUTE17,
1200 L_GLOBAL_ATTRIBUTE18,
1201 L_GLOBAL_ATTRIBUTE19,
1202 L_GLOBAL_ATTRIBUTE20,
1203 L_DERIVE_FACTOR,
1204 X_ENABLED_FLAG,
1205 X_CURRENCY_FLAG,
1206 L_ISSUING_TERRITORY_CODE,
1207 L_PRECISION,
1211 L_END_DATE_ACTIVE,
1208 L_EXTENDED_PRECISION,
1209 L_SYMBOL,
1210 L_START_DATE_ACTIVE,
1212 L_MINIMUM_ACCOUNTABLE_UNIT,
1213 L_CONTEXT,
1214 L_ATTRIBUTE1,
1215 L_ATTRIBUTE2,
1216 L_ATTRIBUTE3,
1217 L_ATTRIBUTE4,
1218 L_ATTRIBUTE5,
1219 L_ATTRIBUTE6,
1220 L_ATTRIBUTE7,
1221 L_ATTRIBUTE8,
1222 L_ATTRIBUTE9,
1223 L_ATTRIBUTE10,
1224 L_ATTRIBUTE11,
1225 L_ATTRIBUTE12,
1226 L_ATTRIBUTE13,
1227 L_ATTRIBUTE14,
1228 L_ATTRIBUTE15,
1229 X_ISO_FLAG,
1230 L_GLOBAL_ATTRIBUTE_CATEGORY,
1231 L_GLOBAL_ATTRIBUTE1,
1232 L_GLOBAL_ATTRIBUTE2,
1233 L_GLOBAL_ATTRIBUTE3,
1234 L_GLOBAL_ATTRIBUTE4,
1235 L_GLOBAL_ATTRIBUTE5,
1236 L_GLOBAL_ATTRIBUTE6,
1237 X_NAME,
1238 X_DESCRIPTION,
1239 f_ludate,
1240 f_luby,
1241 0);
1242 end if;
1243
1244 EXCEPTION
1245 WHEN no_data_found then
1246
1247 FND_CURRENCIES_PKG.INSERT_ROW(
1248 X_ROWID,
1249 X_CURRENCY_CODE,
1250 X_DERIVE_EFFECTIVE, --bug6317914 removed to_date
1251 X_DERIVE_TYPE,
1252 X_GLOBAL_ATTRIBUTE7,
1253 X_GLOBAL_ATTRIBUTE8,
1254 X_GLOBAL_ATTRIBUTE9,
1255 X_GLOBAL_ATTRIBUTE10,
1256 X_GLOBAL_ATTRIBUTE11,
1257 X_GLOBAL_ATTRIBUTE12,
1258 X_GLOBAL_ATTRIBUTE13,
1259 X_GLOBAL_ATTRIBUTE14,
1260 X_GLOBAL_ATTRIBUTE15,
1261 X_GLOBAL_ATTRIBUTE16,
1262 X_GLOBAL_ATTRIBUTE17,
1263 X_GLOBAL_ATTRIBUTE18,
1264 X_GLOBAL_ATTRIBUTE19,
1265 X_GLOBAL_ATTRIBUTE20,
1266 X_DERIVE_FACTOR,
1267 X_ENABLED_FLAG,
1268 X_CURRENCY_FLAG,
1269 X_ISSUING_TERRITORY_CODE,
1270 X_PRECISION,
1271 X_EXTENDED_PRECISION,
1272 X_SYMBOL,
1273 X_START_DATE_ACTIVE, --bug6317914 removed to_date
1274 X_END_DATE_ACTIVE, --bug6317914 removed to_date
1275 X_MINIMUM_ACCOUNTABLE_UNIT,
1276 X_CONTEXT,
1277 X_ATTRIBUTE1,
1278 X_ATTRIBUTE2,
1279 X_ATTRIBUTE3,
1280 X_ATTRIBUTE4,
1281 X_ATTRIBUTE5,
1282 X_ATTRIBUTE6,
1283 X_ATTRIBUTE7,
1284 X_ATTRIBUTE8,
1285 X_ATTRIBUTE9,
1286 X_ATTRIBUTE10,
1287 X_ATTRIBUTE11,
1288 X_ATTRIBUTE12,
1289 X_ATTRIBUTE13,
1290 X_ATTRIBUTE14,
1291 X_ATTRIBUTE15,
1292 X_ISO_FLAG,
1293 X_GLOBAL_ATTRIBUTE_CATEGORY,
1294 X_GLOBAL_ATTRIBUTE1,
1295 X_GLOBAL_ATTRIBUTE2,
1296 X_GLOBAL_ATTRIBUTE3,
1297 X_GLOBAL_ATTRIBUTE4,
1298 X_GLOBAL_ATTRIBUTE5,
1299 X_GLOBAL_ATTRIBUTE6,
1300 X_NAME,
1301 X_DESCRIPTION,
1302 f_ludate,
1303 f_luby,
1304 f_ludate,
1305 f_luby,
1306 0);
1307 end;
1308 end LOAD_ROW;
1309
1310 end FND_CURRENCIES_PKG;