[Home] [Help]
PACKAGE BODY: APPS.FA_ADDITIONS_PKG
Source
4 PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
1 PACKAGE BODY FA_ADDITIONS_PKG as
2 /* $Header: faxiadb.pls 120.8 2009/04/10 07:35:48 deemitta ship $ */
3
5 X_Asset_Id IN OUT NOCOPY NUMBER,
6 X_Asset_Number IN OUT NOCOPY VARCHAR2,
7 X_Asset_Key_Ccid NUMBER DEFAULT NULL,
8 X_Current_Units NUMBER,
9 X_Asset_Type VARCHAR2,
10 X_Tag_Number VARCHAR2 DEFAULT NULL,
11 X_Description VARCHAR2,
12 X_Asset_Category_Id NUMBER,
13 X_Parent_Asset_Id NUMBER DEFAULT NULL,
14 X_Manufacturer_Name VARCHAR2 DEFAULT NULL,
15 X_Serial_Number VARCHAR2 DEFAULT NULL,
16 X_Model_Number VARCHAR2 DEFAULT NULL,
17 X_Property_Type_Code VARCHAR2 DEFAULT NULL,
18 X_Property_1245_1250_Code VARCHAR2 DEFAULT NULL,
19 X_In_Use_Flag VARCHAR2,
20 X_Owned_Leased VARCHAR2,
21 X_New_Used VARCHAR2,
22 X_Unit_Adjustment_Flag VARCHAR2,
23 X_Add_Cost_Je_Flag VARCHAR2,
24 X_Attribute1 VARCHAR2 DEFAULT NULL,
25 X_Attribute2 VARCHAR2 DEFAULT NULL,
26 X_Attribute3 VARCHAR2 DEFAULT NULL,
27 X_Attribute4 VARCHAR2 DEFAULT NULL,
28 X_Attribute5 VARCHAR2 DEFAULT NULL,
29 X_Attribute6 VARCHAR2 DEFAULT NULL,
30 X_Attribute7 VARCHAR2 DEFAULT NULL,
31 X_Attribute8 VARCHAR2 DEFAULT NULL,
32 X_Attribute9 VARCHAR2 DEFAULT NULL,
36 X_Attribute13 VARCHAR2 DEFAULT NULL,
33 X_Attribute10 VARCHAR2 DEFAULT NULL,
34 X_Attribute11 VARCHAR2 DEFAULT NULL,
35 X_Attribute12 VARCHAR2 DEFAULT NULL,
37 X_Attribute14 VARCHAR2 DEFAULT NULL,
38 X_Attribute15 VARCHAR2 DEFAULT NULL,
39 X_Attribute16 VARCHAR2 DEFAULT NULL,
40 X_Attribute17 VARCHAR2 DEFAULT NULL,
41 X_Attribute18 VARCHAR2 DEFAULT NULL,
42 X_Attribute19 VARCHAR2 DEFAULT NULL,
43 X_Attribute20 VARCHAR2 DEFAULT NULL,
44 X_Attribute21 VARCHAR2 DEFAULT NULL,
45 X_Attribute22 VARCHAR2 DEFAULT NULL,
46 X_Attribute23 VARCHAR2 DEFAULT NULL,
47 X_Attribute24 VARCHAR2 DEFAULT NULL,
48 X_Attribute25 VARCHAR2 DEFAULT NULL,
49 X_Attribute26 VARCHAR2 DEFAULT NULL,
50 X_Attribute27 VARCHAR2 DEFAULT NULL,
51 X_Attribute28 VARCHAR2 DEFAULT NULL,
52 X_Attribute29 VARCHAR2 DEFAULT NULL,
53 X_Attribute30 VARCHAR2 DEFAULT NULL,
54 X_Attribute_Category_Code VARCHAR2,
55 X_gf_Attribute1 VARCHAR2 DEFAULT NULL,
56 X_gf_Attribute2 VARCHAR2 DEFAULT NULL,
57 X_gf_Attribute3 VARCHAR2 DEFAULT NULL,
58 X_gf_Attribute4 VARCHAR2 DEFAULT NULL,
59 X_gf_Attribute5 VARCHAR2 DEFAULT NULL,
60 X_gf_Attribute6 VARCHAR2 DEFAULT NULL,
61 X_gf_Attribute7 VARCHAR2 DEFAULT NULL,
62 X_gf_Attribute8 VARCHAR2 DEFAULT NULL,
63 X_gf_Attribute9 VARCHAR2 DEFAULT NULL,
64 X_gf_Attribute10 VARCHAR2 DEFAULT NULL,
65 X_gf_Attribute11 VARCHAR2 DEFAULT NULL,
66 X_gf_Attribute12 VARCHAR2 DEFAULT NULL,
67 X_gf_Attribute13 VARCHAR2 DEFAULT NULL,
68 X_gf_Attribute14 VARCHAR2 DEFAULT NULL,
69 X_gf_Attribute15 VARCHAR2 DEFAULT NULL,
70 X_gf_Attribute16 VARCHAR2 DEFAULT NULL,
71 X_gf_Attribute17 VARCHAR2 DEFAULT NULL,
72 X_gf_Attribute18 VARCHAR2 DEFAULT NULL,
73 X_gf_Attribute19 VARCHAR2 DEFAULT NULL,
74 X_gf_Attribute20 VARCHAR2 DEFAULT NULL,
75 X_gf_Attribute_Category_Code VARCHAR2 DEFAULT NULL,
76 X_Context VARCHAR2 DEFAULT NULL,
77 X_Lease_Id NUMBER DEFAULT NULL,
78 X_Inventorial VARCHAR2,
79 X_Commitment VARCHAR2 DEFAULT NULL,
80 X_Investment_Law VARCHAR2 DEFAULT NULL,
81 X_Status VARCHAR2 DEFAULT NULL,
82 X_Last_Update_Date DATE,
83 X_Last_Updated_By NUMBER,
84 X_Created_By NUMBER DEFAULT NULL,
85 X_Creation_Date DATE DEFAULT NULL,
86 X_Last_Update_Login NUMBER DEFAULT NULL,
87 X_Calling_Fn VARCHAR2
88 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
89
90 h_error_message varchar2(255);
91
92 CURSOR C IS SELECT rowid FROM fa_additions_B
93 WHERE asset_id = X_Asset_Id;
94 CURSOR C2 IS SELECT fa_additions_s.nextval FROM sys.dual;
95
96 l_attribute15 varchar2(150);
97
98 BEGIN
99
100 if (X_Asset_Id is NULL) then
101 OPEN C2;
102 FETCH C2 INTO X_Asset_Id;
103 CLOSE C2;
104 end if;
105
106 X_asset_number := nvl(X_asset_number, to_char(X_asset_id));
107
108 if (fa_cache_pkg.fa_crl_enabled) then
109 l_attribute15 := X_Status;
110 else
111 l_attribute15 := X_attribute15;
112 end if;
113
114 INSERT INTO fa_additions_B(
115 asset_id,
116 asset_number,
117 asset_key_ccid,
118 current_units,
119 asset_type,
120 tag_number,
121 /* description, */
122 asset_category_id,
123 parent_asset_id,
124 manufacturer_name,
125 serial_number,
126 model_number,
127 property_type_code,
128 property_1245_1250_code,
129 in_use_flag,
130 owned_leased,
131 new_used,
132 unit_adjustment_flag,
133 add_cost_je_flag,
134 attribute1,
135 attribute2,
136 attribute3,
137 attribute4,
138 attribute5,
139 attribute6,
140 attribute7,
141 attribute8,
142 attribute9,
146 attribute13,
143 attribute10,
144 attribute11,
145 attribute12,
147 attribute14,
148 attribute15,
149 attribute16,
150 attribute17,
151 attribute18,
152 attribute19,
153 attribute20,
154 attribute21,
155 attribute22,
156 attribute23,
157 attribute24,
158 attribute25,
159 attribute26,
160 attribute27,
161 attribute28,
162 attribute29,
163 attribute30,
164 attribute_category_code,
165 global_attribute1,
166 global_attribute2,
167 global_attribute3,
168 global_attribute4,
169 global_attribute5,
170 global_attribute6,
171 global_attribute7,
172 global_attribute8,
173 global_attribute9,
174 global_attribute10,
175 global_attribute11,
176 global_attribute12,
177 global_attribute13,
178 global_attribute14,
179 global_attribute15,
180 global_attribute16,
181 global_attribute17,
182 global_attribute18,
183 global_attribute19,
184 global_attribute20,
185 global_attribute_category,
186 context,
187 lease_id,
188 inventorial,
189 commitment,
190 investment_law,
191 last_update_date,
192 last_updated_by,
193 created_by,
194 creation_date,
195 last_update_login
196 ) VALUES (
197 X_Asset_Id,
198 X_Asset_Number,
199 X_Asset_Key_Ccid,
200 X_Current_Units,
201 X_Asset_Type,
202 X_Tag_Number,
203 /* X_Description, */
204 X_Asset_Category_Id,
205 X_Parent_Asset_Id,
206 X_Manufacturer_Name,
207 X_Serial_Number,
208 X_Model_Number,
209 X_Property_Type_Code,
210 X_Property_1245_1250_Code,
211 X_In_Use_Flag,
212 X_Owned_Leased,
213 X_New_Used,
214 X_Unit_Adjustment_Flag,
215 X_Add_Cost_Je_Flag,
216 X_Attribute1,
217 X_Attribute2,
218 X_Attribute3,
219 X_Attribute4,
220 X_Attribute5,
221 X_Attribute6,
222 X_Attribute7,
223 X_Attribute8,
224 X_Attribute9,
225 X_Attribute10,
226 X_Attribute11,
227 X_Attribute12,
228 X_Attribute13,
229 X_Attribute14,
230 l_Attribute15,
231 X_Attribute16,
232 X_Attribute17,
233 X_Attribute18,
234 X_Attribute19,
235 X_Attribute20,
236 X_Attribute21,
237 X_Attribute22,
238 X_Attribute23,
239 X_Attribute24,
240 X_Attribute25,
241 X_Attribute26,
242 X_Attribute27,
243 X_Attribute28,
244 X_Attribute29,
245 X_Attribute30,
246 X_Attribute_Category_Code,
247 X_gf_Attribute1,
248 X_gf_Attribute2,
249 X_gf_Attribute3,
250 X_gf_Attribute4,
251 X_gf_Attribute5,
252 X_gf_Attribute6,
253 X_gf_Attribute7,
254 X_gf_Attribute8,
255 X_gf_Attribute9,
256 X_gf_Attribute10,
257 X_gf_Attribute11,
258 X_gf_Attribute12,
259 X_gf_Attribute13,
260 X_gf_Attribute14,
261 X_gf_Attribute15,
262 X_gf_Attribute16,
263 X_gf_Attribute17,
264 X_gf_Attribute18,
265 X_gf_Attribute19,
266 X_gf_Attribute20,
267 X_gf_Attribute_Category_Code,
268 X_Context,
269 X_Lease_Id,
270 X_Inventorial,
271 X_Commitment,
272 X_Investment_law,
273 X_Last_Update_Date,
274 X_Last_Updated_By,
275 X_Created_By,
276 X_Creation_Date,
277 X_Last_Update_Login
278 );
279 insert into FA_ADDITIONS_TL (
280 LAST_UPDATED_BY,
281 CREATED_BY,
282 CREATION_DATE,
283 LAST_UPDATE_LOGIN,
284 ASSET_ID,
285 DESCRIPTION,
286 LAST_UPDATE_DATE,
287 LANGUAGE,
288 SOURCE_LANG
289 ) select
290 X_LAST_UPDATED_BY,
291 X_CREATED_BY,
292 X_CREATION_DATE,
293 X_LAST_UPDATE_LOGIN,
294 X_ASSET_ID,
295 X_DESCRIPTION,
296 X_LAST_UPDATE_DATE,
297 L.LANGUAGE_CODE,
298 userenv('LANG')
299 from FND_LANGUAGES L
300 where L.INSTALLED_FLAG in ('I', 'B')
301 and not exists
302 (select NULL
306
303 from FA_ADDITIONS_TL T
304 where T.ASSET_ID = X_ASSET_ID
305 and T.LANGUAGE = L.LANGUAGE_CODE);
307
308 /* REMOVING FOR SECURITY BY BOOK
309 OPEN C;
310 FETCH C INTO X_Rowid;
311 if (C%NOTFOUND) then
312 CLOSE C;
313 Raise NO_DATA_FOUND;
314 end if;
315 CLOSE C;
316 */
317
318 exception
319 when dup_val_on_index then
320 h_error_message := SQLERRM;
321
322 if instr (h_error_message, 'FA_ADDITIONS_B_U2') <> 0 then
323 FA_SRVR_MSG.add_message(
324 CALLING_FN => 'fa_additions_pkg.insert_row',
325 NAME => 'FA_ADD_ASSET_NUMBER_EXISTS',
326 TOKEN1 => 'ASSET_NUMBER',
327 VALUE1 => X_Asset_Number, p_log_level_rec => p_log_level_rec);
328 FA_SRVR_MSG.ADD_SQL_ERROR (
329 CALLING_FN => 'fa_additions_pkg.insert_row', p_log_level_rec => p_log_level_rec);
330 raise;
331
332 elsif instr (h_error_message, 'FA_ADDITIONS_B_U3') <> 0 then
333 FA_SRVR_MSG.add_message(
334 CALLING_FN => 'fa_additions_pkg.insert_row',
335 NAME => 'FA_ADD_TAG_NUMBER_EXISTS',
336 TOKEN1 => 'TAG_NUMBER',
337 VALUE1 => X_Tag_Number, p_log_level_rec => p_log_level_rec);
338 FA_SRVR_MSG.ADD_SQL_ERROR (
339 CALLING_FN => 'fa_additions_pkg.insert_row', p_log_level_rec => p_log_level_rec);
340 raise;
341
342 else
343 FA_SRVR_MSG.ADD_SQL_ERROR (
344 CALLING_FN => 'fa_additions_pkg.insert_row', p_log_level_rec => p_log_level_rec);
345 raise;
346
347 end if;
348
349 when others then
350 FA_SRVR_MSG.ADD_SQL_ERROR (
351 CALLING_FN => 'fa_additions_pkg.insert_row', p_log_level_rec => p_log_level_rec);
352 raise;
353
354 END Insert_Row;
355
356
357 PROCEDURE Lock_Row(X_Rowid VARCHAR2,
358 X_Asset_Id NUMBER,
359 X_Asset_Number VARCHAR2,
360 X_Asset_Key_Ccid NUMBER DEFAULT NULL,
361 X_Current_Units NUMBER,
362 X_Asset_Type VARCHAR2,
363 X_Tag_Number VARCHAR2 DEFAULT NULL,
364 X_Description VARCHAR2,
365 X_Asset_Category_Id NUMBER,
366 X_Parent_Asset_Id NUMBER DEFAULT NULL,
367 X_Manufacturer_Name VARCHAR2 DEFAULT NULL,
368 X_Serial_Number VARCHAR2 DEFAULT NULL,
369 X_Model_Number VARCHAR2 DEFAULT NULL,
370 X_Property_Type_Code VARCHAR2 DEFAULT NULL,
371 X_Property_1245_1250_Code VARCHAR2 DEFAULT NULL,
372 X_In_Use_Flag VARCHAR2,
373 X_Owned_Leased VARCHAR2,
374 X_New_Used VARCHAR2,
375 X_Unit_Adjustment_Flag VARCHAR2,
376 X_Add_Cost_Je_Flag VARCHAR2,
377 X_Attribute1 VARCHAR2 DEFAULT NULL,
378 X_Attribute2 VARCHAR2 DEFAULT NULL,
379 X_Attribute3 VARCHAR2 DEFAULT NULL,
380 X_Attribute4 VARCHAR2 DEFAULT NULL,
381 X_Attribute5 VARCHAR2 DEFAULT NULL,
382 X_Attribute6 VARCHAR2 DEFAULT NULL,
383 X_Attribute7 VARCHAR2 DEFAULT NULL,
384 X_Attribute8 VARCHAR2 DEFAULT NULL,
385 X_Attribute9 VARCHAR2 DEFAULT NULL,
386 X_Attribute10 VARCHAR2 DEFAULT NULL,
387 X_Attribute11 VARCHAR2 DEFAULT NULL,
388 X_Attribute12 VARCHAR2 DEFAULT NULL,
389 X_Attribute13 VARCHAR2 DEFAULT NULL,
390 X_Attribute14 VARCHAR2 DEFAULT NULL,
391 X_Attribute15 VARCHAR2 DEFAULT NULL,
392 X_Attribute16 VARCHAR2 DEFAULT NULL,
393 X_Attribute17 VARCHAR2 DEFAULT NULL,
394 X_Attribute18 VARCHAR2 DEFAULT NULL,
395 X_Attribute19 VARCHAR2 DEFAULT NULL,
396 X_Attribute20 VARCHAR2 DEFAULT NULL,
397 X_Attribute21 VARCHAR2 DEFAULT NULL,
398 X_Attribute22 VARCHAR2 DEFAULT NULL,
399 X_Attribute23 VARCHAR2 DEFAULT NULL,
400 X_Attribute24 VARCHAR2 DEFAULT NULL,
401 X_Attribute25 VARCHAR2 DEFAULT NULL,
402 X_Attribute26 VARCHAR2 DEFAULT NULL,
403 X_Attribute27 VARCHAR2 DEFAULT NULL,
404 X_Attribute28 VARCHAR2 DEFAULT NULL,
405 X_Attribute29 VARCHAR2 DEFAULT NULL,
406 X_Attribute30 VARCHAR2 DEFAULT NULL,
407 X_Attribute_Category_Code VARCHAR2,
408 X_Context VARCHAR2 DEFAULT NULL,
412 X_Investment_Law VARCHAR2 DEFAULT NULL,
409 X_Lease_Id NUMBER DEFAULT NULL,
410 X_Inventorial VARCHAR2,
411 X_Commitment VARCHAR2 DEFAULT NULL,
413 X_Calling_Fn VARCHAR2
414 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
415 CURSOR C IS
416 SELECT *
417 FROM fa_additions_b
418 WHERE rowid = X_Rowid
419 FOR UPDATE of Asset_Id NOWAIT;
420 Recinfo C%ROWTYPE;
421
422 cursor c1 is
423 select description,decode(language,userenv('LANG'),'Y','N') BASELANG
424 from fa_additions_tl
425 where asset_id = x_asset_id
426 and userenv('LANG') in (LANGUAGE,SOURCE_LANG)
427 for update of asset_id nowait;
428
429 BEGIN
430 OPEN C;
431 FETCH C INTO Recinfo;
432 if (C%NOTFOUND) then
433 CLOSE C;
434 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
435 APP_EXCEPTION.Raise_Exception;
436 end if;
437 CLOSE C;
438
439 if (
440 (Recinfo.asset_id = X_Asset_Id)
441 AND (Recinfo.asset_number = X_Asset_Number)
442 AND ( (Recinfo.asset_key_ccid = X_Asset_Key_Ccid)
443 OR ( (Recinfo.asset_key_ccid IS NULL)
444 AND (X_Asset_Key_Ccid IS NULL)))
445 AND (Recinfo.current_units = X_Current_Units)
446 AND (Recinfo.asset_type = X_Asset_Type)
447 AND ( (Recinfo.tag_number = X_Tag_Number)
448 OR ( (Recinfo.tag_number IS NULL)
449 AND (X_Tag_Number IS NULL)))
450 /* AND (Recinfo.description = X_Description) */
451 AND (Recinfo.asset_category_id = X_Asset_Category_Id)
452 AND ( (Recinfo.parent_asset_id = X_Parent_Asset_Id)
453 OR ( (Recinfo.parent_asset_id IS NULL)
454 AND (X_Parent_Asset_Id IS NULL)))
455 AND ( (Recinfo.manufacturer_name = X_Manufacturer_Name)
456 OR ( (Recinfo.manufacturer_name IS NULL)
457 AND (X_Manufacturer_Name IS NULL)))
458 AND ( (Recinfo.serial_number = X_Serial_Number)
459 OR ( (Recinfo.serial_number IS NULL)
460 AND (X_Serial_Number IS NULL)))
461 AND ( (Recinfo.model_number = X_Model_Number)
462 OR ( (Recinfo.model_number IS NULL)
463 AND (X_Model_Number IS NULL)))
464 AND ( (Recinfo.property_type_code = X_Property_Type_Code)
465 OR ( (Recinfo.property_type_code IS NULL)
466 AND (X_Property_Type_Code IS NULL)))
467 AND ( (Recinfo.property_1245_1250_code = X_Property_1245_1250_Code
468 )
469 OR ( (Recinfo.property_1245_1250_code IS NULL)
470 AND (X_Property_1245_1250_Code IS NULL)))
471 AND (Recinfo.in_use_flag = X_In_Use_Flag)
472 AND (Recinfo.owned_leased = X_Owned_Leased)
473 AND (Recinfo.new_used = X_New_Used)
474 AND ( (Recinfo.commitment = X_Commitment)
475 OR ( (Recinfo.commitment IS NULL)
476 AND (X_Commitment IS NULL)))
477 AND ( (Recinfo.investment_law = X_Investment_law)
478 OR ( (Recinfo.investment_law IS NULL)
479 AND (X_Investment_Law IS NULL)))
480 AND (Recinfo.unit_adjustment_flag = X_Unit_Adjustment_Flag)
481 AND (Recinfo.add_cost_je_flag = X_Add_Cost_Je_Flag)
482 AND ( (Recinfo.attribute1 = X_Attribute1)
483 OR ( (Recinfo.attribute1 IS NULL)
484 AND (X_Attribute1 IS NULL)))
485 AND ( (Recinfo.attribute2 = X_Attribute2)
486 OR ( (Recinfo.attribute2 IS NULL)
487 AND (X_Attribute2 IS NULL)))
488 AND ( (Recinfo.attribute3 = X_Attribute3)
489 OR ( (Recinfo.attribute3 IS NULL)
490 AND (X_Attribute3 IS NULL)))
491 AND ( (Recinfo.attribute4 = X_Attribute4)
492 OR ( (Recinfo.attribute4 IS NULL)
493 AND (X_Attribute4 IS NULL)))
494 AND ( (Recinfo.attribute5 = X_Attribute5)
495 OR ( (Recinfo.attribute5 IS NULL)
496 AND (X_Attribute5 IS NULL)))
497 AND ( (Recinfo.attribute6 = X_Attribute6)
498 OR ( (Recinfo.attribute6 IS NULL)
499 AND (X_Attribute6 IS NULL)))
500 AND ( (Recinfo.attribute7 = X_Attribute7)
501 OR ( (Recinfo.attribute7 IS NULL)
502 AND (X_Attribute7 IS NULL)))
503 AND ( (Recinfo.attribute8 = X_Attribute8)
504 OR ( (Recinfo.attribute8 IS NULL)
505 AND (X_Attribute8 IS NULL)))
506 AND ( (Recinfo.attribute9 = X_Attribute9)
507 OR ( (Recinfo.attribute9 IS NULL)
508 AND (X_Attribute9 IS NULL)))
509 AND ( (Recinfo.attribute10 = X_Attribute10)
510 OR ( (Recinfo.attribute10 IS NULL)
511 AND (X_Attribute10 IS NULL)))
512 AND ( (Recinfo.attribute11 = X_Attribute11)
513 OR ( (Recinfo.attribute11 IS NULL)
514 AND (X_Attribute11 IS NULL)))
515 AND ( (Recinfo.attribute12 = X_Attribute12)
516 OR ( (Recinfo.attribute12 IS NULL)
517 AND (X_Attribute12 IS NULL)))
518 AND ( (Recinfo.attribute13 = X_Attribute13)
519 OR ( (Recinfo.attribute13 IS NULL)
520 AND (X_Attribute13 IS NULL)))
521 AND ( (Recinfo.attribute14 = X_Attribute14)
522 OR ( (Recinfo.attribute14 IS NULL)
526 AND (X_Attribute15 IS NULL)))
523 AND (X_Attribute14 IS NULL)))
524 AND ( (Recinfo.attribute15 = X_Attribute15)
525 OR ( (Recinfo.attribute15 IS NULL)
527 AND ( (Recinfo.attribute16 = X_Attribute16)
528 OR ( (Recinfo.attribute16 IS NULL)
529 AND (X_Attribute16 IS NULL)))
530 AND ( (Recinfo.attribute17 = X_Attribute17)
531 OR ( (Recinfo.attribute17 IS NULL)
532 AND (X_Attribute17 IS NULL)))
533 AND ( (Recinfo.attribute18 = X_Attribute18)
534 OR ( (Recinfo.attribute18 IS NULL)
535 AND (X_Attribute18 IS NULL)))
536 AND ( (Recinfo.attribute19 = X_Attribute19)
537 OR ( (Recinfo.attribute19 IS NULL)
538 AND (X_Attribute19 IS NULL)))
539 AND ( (Recinfo.attribute20 = X_Attribute20)
540 OR ( (Recinfo.attribute20 IS NULL)
541 AND (X_Attribute20 IS NULL)))
542 AND ( (Recinfo.attribute21 = X_Attribute21)
543 OR ( (Recinfo.attribute21 IS NULL)
544 AND (X_Attribute21 IS NULL)))
545 AND ( (Recinfo.attribute22 = X_Attribute22)
546 OR ( (Recinfo.attribute22 IS NULL)
547 AND (X_Attribute22 IS NULL)))
548 AND ( (Recinfo.attribute23 = X_Attribute23)
549 OR ( (Recinfo.attribute23 IS NULL)
550 AND (X_Attribute23 IS NULL)))
551 AND ( (Recinfo.attribute24 = X_Attribute24)
552 OR ( (Recinfo.attribute24 IS NULL)
553 AND (X_Attribute24 IS NULL)))
554 AND ( (Recinfo.attribute25 = X_Attribute25)
555 OR ( (Recinfo.attribute25 IS NULL)
556 AND (X_Attribute25 IS NULL)))
557 AND ( (Recinfo.attribute26 = X_Attribute26)
558 OR ( (Recinfo.attribute26 IS NULL)
559 AND (X_Attribute26 IS NULL)))
560 AND ( (Recinfo.attribute27 = X_Attribute27)
561 OR ( (Recinfo.attribute27 IS NULL)
562 AND (X_Attribute27 IS NULL)))
563 AND ( (Recinfo.attribute28 = X_Attribute28)
564 OR ( (Recinfo.attribute28 IS NULL)
565 AND (X_Attribute28 IS NULL)))
566 AND ( (Recinfo.attribute29 = X_Attribute29)
567 OR ( (Recinfo.attribute29 IS NULL)
568 AND (X_Attribute29 IS NULL)))
569 AND ( (Recinfo.attribute30 = X_Attribute30)
570 OR ( (Recinfo.attribute30 IS NULL)
571 AND (X_Attribute30 IS NULL)))
572 AND (Recinfo.attribute_category_code = X_Attribute_Category_Code)
573 AND ( (Recinfo.context = X_Context)
574 OR ( (Recinfo.context IS NULL)
575 AND (X_Context IS NULL)))
576 AND ( (Recinfo.lease_id = X_Lease_Id)
577 OR ( (Recinfo.lease_id IS NULL)
578 AND (X_Lease_Id IS NULL)))
579 ) then
580 return;
581 else
582 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
583 APP_EXCEPTION.Raise_Exception;
584 end if;
585
586 for tlinfo in c1 loop
587 if (tlinfo.BASELANG = 'Y') then
588 if (tlinfo.DESCRIPTION = X_DESCRIPTION) then
589 return;
590 else
591 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
592 app_exception.raise_exception;
593 end if;
594 end if;
595 end loop;
596
597 END Lock_Row;
598
599
600
601 -- syoung: added x_return_status.
602 PROCEDURE Update_Row(X_Rowid VARCHAR2 DEFAULT NULL,
603 X_Asset_Id NUMBER DEFAULT NULL,
604 X_Asset_Number VARCHAR2 DEFAULT NULL,
605 X_Asset_Key_Ccid NUMBER DEFAULT NULL,
606 X_Current_Units NUMBER DEFAULT NULL,
607 X_Asset_Type VARCHAR2 DEFAULT NULL,
608 X_Tag_Number VARCHAR2 DEFAULT NULL,
609 X_Description VARCHAR2 DEFAULT NULL,
610 X_Asset_Category_Id NUMBER DEFAULT NULL,
611 X_Parent_Asset_Id NUMBER DEFAULT NULL,
612 X_Manufacturer_Name VARCHAR2 DEFAULT NULL,
613 X_Serial_Number VARCHAR2 DEFAULT NULL,
614 X_Model_Number VARCHAR2 DEFAULT NULL,
615 X_Property_Type_Code VARCHAR2 DEFAULT NULL,
616 X_Property_1245_1250_Code VARCHAR2 DEFAULT NULL,
617 X_In_Use_Flag VARCHAR2 DEFAULT NULL,
618 X_Owned_Leased VARCHAR2 DEFAULT NULL,
619 X_New_Used VARCHAR2 DEFAULT NULL,
620 X_Unit_Adjustment_Flag VARCHAR2 DEFAULT NULL,
621 X_Add_Cost_Je_Flag VARCHAR2 DEFAULT NULL,
622 X_Attribute1 VARCHAR2 DEFAULT NULL,
623 X_Attribute2 VARCHAR2 DEFAULT NULL,
624 X_Attribute3 VARCHAR2 DEFAULT NULL,
625 X_Attribute4 VARCHAR2 DEFAULT NULL,
626 X_Attribute5 VARCHAR2 DEFAULT NULL,
627 X_Attribute6 VARCHAR2 DEFAULT NULL,
628 X_Attribute7 VARCHAR2 DEFAULT NULL,
632 X_Attribute11 VARCHAR2 DEFAULT NULL,
629 X_Attribute8 VARCHAR2 DEFAULT NULL,
630 X_Attribute9 VARCHAR2 DEFAULT NULL,
631 X_Attribute10 VARCHAR2 DEFAULT NULL,
633 X_Attribute12 VARCHAR2 DEFAULT NULL,
634 X_Attribute13 VARCHAR2 DEFAULT NULL,
635 X_Attribute14 VARCHAR2 DEFAULT NULL,
636 X_Attribute15 VARCHAR2 DEFAULT NULL,
637 X_Attribute16 VARCHAR2 DEFAULT NULL,
638 X_Attribute17 VARCHAR2 DEFAULT NULL,
639 X_Attribute18 VARCHAR2 DEFAULT NULL,
640 X_Attribute19 VARCHAR2 DEFAULT NULL,
641 X_Attribute20 VARCHAR2 DEFAULT NULL,
642 X_Attribute21 VARCHAR2 DEFAULT NULL,
643 X_Attribute22 VARCHAR2 DEFAULT NULL,
644 X_Attribute23 VARCHAR2 DEFAULT NULL,
645 X_Attribute24 VARCHAR2 DEFAULT NULL,
646 X_Attribute25 VARCHAR2 DEFAULT NULL,
647 X_Attribute26 VARCHAR2 DEFAULT NULL,
648 X_Attribute27 VARCHAR2 DEFAULT NULL,
649 X_Attribute28 VARCHAR2 DEFAULT NULL,
650 X_Attribute29 VARCHAR2 DEFAULT NULL,
651 X_Attribute30 VARCHAR2 DEFAULT NULL,
652 X_Attribute_Category_Code VARCHAR2 DEFAULT NULL,
653 X_gf_Attribute1 VARCHAR2 DEFAULT NULL,
654 X_gf_Attribute2 VARCHAR2 DEFAULT NULL,
655 X_gf_Attribute3 VARCHAR2 DEFAULT NULL,
656 X_gf_Attribute4 VARCHAR2 DEFAULT NULL,
657 X_gf_Attribute5 VARCHAR2 DEFAULT NULL,
658 X_gf_Attribute6 VARCHAR2 DEFAULT NULL,
659 X_gf_Attribute7 VARCHAR2 DEFAULT NULL,
660 X_gf_Attribute8 VARCHAR2 DEFAULT NULL,
661 X_gf_Attribute9 VARCHAR2 DEFAULT NULL,
662 X_gf_Attribute10 VARCHAR2 DEFAULT NULL,
663 X_gf_Attribute11 VARCHAR2 DEFAULT NULL,
664 X_gf_Attribute12 VARCHAR2 DEFAULT NULL,
665 X_gf_Attribute13 VARCHAR2 DEFAULT NULL,
666 X_gf_Attribute14 VARCHAR2 DEFAULT NULL,
667 X_gf_Attribute15 VARCHAR2 DEFAULT NULL,
668 X_gf_Attribute16 VARCHAR2 DEFAULT NULL,
669 X_gf_Attribute17 VARCHAR2 DEFAULT NULL,
670 X_gf_Attribute18 VARCHAR2 DEFAULT NULL,
671 X_gf_Attribute19 VARCHAR2 DEFAULT NULL,
672 X_gf_Attribute20 VARCHAR2 DEFAULT NULL,
673 X_gf_Attribute_Category_Code VARCHAR2 DEFAULT NULL,
674 X_Context VARCHAR2 DEFAULT NULL,
675 X_Lease_Id NUMBER DEFAULT NULL,
676 X_Inventorial VARCHAR2 DEFAULT NULL,
677 X_Commitment VARCHAR2 DEFAULT NULL,
678 X_Investment_Law VARCHAR2 DEFAULT NULL,
679 X_Status VARCHAR2 DEFAULT NULL,
680 X_Last_Update_Date DATE DEFAULT NULL,
681 X_Last_Updated_By NUMBER DEFAULT NULL,
682 X_Last_Update_Login NUMBER DEFAULT NULL,
683 X_Return_Status OUT NOCOPY BOOLEAN,
684 X_Calling_Fn VARCHAR2
685
686 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
687
688 l_asset_id number;
689 l_rowid rowid;
690 l_temp_attribute15 varchar2(150);
691
692 BEGIN
693 if (X_Rowid is NULL) then
694 select rowid
695 into l_rowid
696 from fa_additions_b
697 where asset_id = X_Asset_Id;
698 else
699 l_rowid := X_Rowid;
700 end if;
701
702 if (fa_cache_pkg.fa_crl_enabled) then
703 l_temp_attribute15 := X_Status;
704 else
705 l_temp_attribute15 := X_attribute15;
706 end if;
707
708 UPDATE fa_additions_b
709 SET
710 asset_id = decode(X_Asset_Id,
711 NULL, asset_id,
712 FND_API.G_MISS_NUM, NULL,
713 X_Asset_Id),
714 asset_number = decode(X_Asset_Number,
715 NULL, asset_number,
716 FND_API.G_MISS_CHAR, NULL,
717 X_Asset_Number),
718 asset_key_ccid = decode(X_Asset_Key_Ccid,
719 NULL, asset_key_ccid,
720 FND_API.G_MISS_NUM, NULL,
721 X_Asset_Key_Ccid),
722 current_units = decode(X_Current_Units,
723 NULL, current_units,
727 NULL, asset_type,
724 FND_API.G_MISS_NUM, NULL,
725 X_Current_Units),
726 asset_type = decode(X_Asset_Type,
728 FND_API.G_MISS_CHAR, NULL,
729 X_Asset_Type),
730 tag_number = decode(X_Tag_Number,
731 NULL, tag_number,
732 FND_API.G_MISS_CHAR, NULL,
733 X_Tag_Number),
734 asset_category_id = decode(X_Asset_Category_Id,
735 NULL, asset_category_id,
736 FND_API.G_MISS_NUM, NULL,
737 X_Asset_Category_Id),
738 parent_asset_id = decode(X_Parent_Asset_Id,
739 NULL, parent_asset_id,
740 FND_API.G_MISS_NUM, NULL,
741 X_Parent_Asset_Id),
742 manufacturer_name = decode(X_Manufacturer_Name,
743 NULL, manufacturer_name,
744 FND_API.G_MISS_CHAR, NULL,
745 X_Manufacturer_Name),
746 serial_number = decode(X_Serial_Number,
747 NULL, serial_number,
748 FND_API.G_MISS_CHAR, NULL,
749 X_Serial_Number),
750 model_number = decode(X_Model_Number,
751 NULL, model_number,
752 FND_API.G_MISS_CHAR, NULL,
753 X_Model_Number),
754 property_type_code = decode(X_Property_Type_Code,
755 NULL, property_type_code,
756 FND_API.G_MISS_CHAR, NULL,
757 X_Property_Type_Code),
758 property_1245_1250_code = decode(X_Property_1245_1250_Code,
759 NULL, property_1245_1250_code,
760 FND_API.G_MISS_CHAR, NULL,
761 X_Property_1245_1250_Code),
762 in_use_flag = decode(X_In_Use_Flag,
763 NULL, in_use_flag,
764 FND_API.G_MISS_CHAR, NULL,
765 X_In_Use_Flag),
766 owned_leased = decode(X_Owned_Leased,
767 NULL, owned_leased,
768 FND_API.G_MISS_CHAR, NULL,
769 X_Owned_Leased),
770 new_used = decode(X_New_Used,
771 NULL, new_used,
772 FND_API.G_MISS_CHAR, NULL,
773 X_New_Used),
774 unit_adjustment_flag = decode(X_Unit_Adjustment_Flag,
775 NULL, unit_adjustment_flag,
776 FND_API.G_MISS_CHAR, NULL,
777 X_Unit_Adjustment_Flag),
778 add_cost_je_flag = decode(X_Add_Cost_Je_Flag,
779 NULL, add_cost_je_flag,
780 FND_API.G_MISS_CHAR, NULL,
781 X_Add_Cost_Je_Flag),
782 attribute1 = decode(X_Attribute1,
783 NULL, attribute1,
784 FND_API.G_MISS_CHAR, NULL,
785 X_Attribute1),
786 attribute2 = decode(X_Attribute2,
787 NULL, attribute2,
788 FND_API.G_MISS_CHAR, NULL,
789 X_Attribute2),
790 attribute3 = decode(X_Attribute3,
791 NULL, attribute3,
792 FND_API.G_MISS_CHAR, NULL,
793 X_Attribute3),
794 attribute4 = decode(X_Attribute4,
795 NULL, attribute4,
796 FND_API.G_MISS_CHAR, NULL,
797 X_Attribute4),
798 attribute5 = decode(X_Attribute5,
799 NULL, attribute5,
800 FND_API.G_MISS_CHAR, NULL,
801 X_Attribute5),
802 attribute6 = decode(X_Attribute6,
803 NULL, attribute6,
804 FND_API.G_MISS_CHAR, NULL,
805 X_Attribute6),
806 attribute7 = decode(X_Attribute7,
807 NULL, attribute7,
808 FND_API.G_MISS_CHAR, NULL,
812 FND_API.G_MISS_CHAR, NULL,
809 X_Attribute7),
810 attribute8 = decode(X_Attribute8,
811 NULL, attribute8,
813 X_Attribute8),
814 attribute9 = decode(X_Attribute9,
815 NULL, attribute9,
816 FND_API.G_MISS_CHAR, NULL,
817 X_Attribute9),
818 attribute10 = decode(X_Attribute10,
819 NULL, attribute10,
820 FND_API.G_MISS_CHAR, NULL,
821 X_Attribute10),
822 attribute11 = decode(X_Attribute11,
823 NULL, attribute11,
824 FND_API.G_MISS_CHAR, NULL,
825 X_Attribute11),
826 attribute12 = decode(X_Attribute12,
827 NULL, attribute12,
828 FND_API.G_MISS_CHAR, NULL,
829 X_Attribute12),
830 attribute13 = decode(X_Attribute13,
831 NULL, attribute13,
832 FND_API.G_MISS_CHAR, NULL,
833 X_Attribute13),
834 attribute14 = decode(X_Attribute14,
835 NULL, attribute14,
836 FND_API.G_MISS_CHAR, NULL,
837 X_Attribute14),
838 attribute15 = decode(l_temp_attribute15,
839 NULL, attribute15,
840 FND_API.G_MISS_CHAR,
841 NULL,
842 l_temp_attribute15),
843 attribute16 = decode(X_Attribute16,
844 NULL, attribute16,
845 FND_API.G_MISS_CHAR, NULL,
846 X_Attribute16),
847 attribute17 = decode(X_Attribute17,
848 NULL, attribute17,
849 FND_API.G_MISS_CHAR, NULL,
850 X_Attribute17),
851 attribute18 = decode(X_Attribute18,
852 NULL, attribute18,
853 FND_API.G_MISS_CHAR, NULL,
854 X_Attribute18),
855 attribute19 = decode(X_Attribute19,
856 NULL, attribute19,
857 FND_API.G_MISS_CHAR, NULL,
858 X_Attribute19),
859 attribute20 = decode(X_Attribute20,
860 NULL, attribute20,
861 FND_API.G_MISS_CHAR, NULL,
862 X_Attribute20),
863 attribute21 = decode(X_Attribute21,
864 NULL, attribute21,
865 FND_API.G_MISS_CHAR, NULL,
866 X_Attribute21),
867 attribute22 = decode(X_Attribute22,
868 NULL, attribute22,
869 FND_API.G_MISS_CHAR, NULL,
870 X_Attribute22),
871 attribute23 = decode(X_Attribute23,
872 NULL, attribute23,
873 FND_API.G_MISS_CHAR, NULL,
874 X_Attribute23),
875 attribute24 = decode(X_Attribute24,
876 NULL, attribute24,
877 FND_API.G_MISS_CHAR, NULL,
878 X_Attribute24),
879 attribute25 = decode(X_Attribute25,
880 NULL, attribute25,
881 FND_API.G_MISS_CHAR, NULL,
882 X_Attribute25),
883 attribute26 = decode(X_Attribute26,
884 NULL, attribute26,
885 FND_API.G_MISS_CHAR, NULL,
886 X_Attribute26),
887 attribute27 = decode(X_Attribute27,
888 NULL, attribute27,
889 FND_API.G_MISS_CHAR, NULL,
890 X_Attribute27),
891 attribute28 = decode(X_Attribute28,
892 NULL, attribute28,
893 FND_API.G_MISS_CHAR, NULL,
894 X_Attribute28),
898 X_Attribute29),
895 attribute29 = decode(X_Attribute29,
896 NULL, attribute29,
897 FND_API.G_MISS_CHAR, NULL,
899 attribute30 = decode(X_Attribute30,
900 NULL, attribute30,
901 FND_API.G_MISS_CHAR, NULL,
902 X_Attribute30),
903 attribute_category_code = decode(X_Attribute_Category_Code,
904 NULL, attribute_category_code,
905 FND_API.G_MISS_CHAR, NULL,
906 X_Attribute_Category_Code),
907 global_attribute1 = decode(X_gf_Attribute1,
908 NULL, global_attribute1,
909 FND_API.G_MISS_CHAR, NULL,
910 X_gf_Attribute1),
911 global_attribute2 = decode(X_gf_Attribute2,
912 NULL, global_attribute2,
913 FND_API.G_MISS_CHAR, NULL,
914 X_gf_Attribute2),
915 global_attribute3 = decode(X_gf_Attribute3,
916 NULL, global_attribute3,
917 FND_API.G_MISS_CHAR, NULL,
918 X_gf_Attribute3),
919 global_attribute4 = decode(X_gf_Attribute4,
920 NULL, global_attribute4,
921 FND_API.G_MISS_CHAR, NULL,
922 X_gf_Attribute4),
923 global_attribute5 = decode(X_gf_Attribute5,
924 NULL, global_attribute5,
925 FND_API.G_MISS_CHAR, NULL,
926 X_gf_Attribute5),
927 global_attribute6 = decode(X_gf_Attribute6,
928 NULL, global_attribute6,
929 FND_API.G_MISS_CHAR, NULL,
930 X_gf_Attribute6),
931 global_attribute7 = decode(X_gf_Attribute7,
932 NULL, global_attribute7,
933 FND_API.G_MISS_CHAR, NULL,
934 X_gf_Attribute7),
935 global_attribute8 = decode(X_gf_Attribute8,
936 NULL, global_attribute8,
937 FND_API.G_MISS_CHAR, NULL,
938 X_gf_Attribute8),
939 global_attribute9 = decode(X_gf_Attribute9,
940 NULL, global_attribute9,
941 FND_API.G_MISS_CHAR, NULL,
942 X_gf_Attribute9),
943 global_attribute10 = decode(X_gf_Attribute10,
944 NULL, global_attribute10,
945 FND_API.G_MISS_CHAR, NULL,
946 X_gf_Attribute10),
947 global_attribute11 = decode(X_gf_Attribute11,
948 NULL, global_attribute11,
949 FND_API.G_MISS_CHAR, NULL,
950 X_gf_Attribute11),
951 global_attribute12 = decode(X_gf_Attribute12,
952 NULL, global_attribute12,
953 FND_API.G_MISS_CHAR, NULL,
954 X_gf_Attribute12),
955 global_attribute13 = decode(X_gf_Attribute13,
956 NULL, global_attribute13,
957 FND_API.G_MISS_CHAR, NULL,
958 X_gf_Attribute13),
959 global_attribute14 = decode(X_gf_Attribute14,
960 NULL, global_attribute14,
961 FND_API.G_MISS_CHAR, NULL,
962 X_gf_Attribute14),
963 global_attribute15 = decode(X_gf_Attribute15,
964 NULL, global_attribute15,
965 FND_API.G_MISS_CHAR, NULL,
966 X_gf_Attribute15),
967 global_attribute16 = decode(X_gf_Attribute16,
968 NULL, global_attribute16,
969 FND_API.G_MISS_CHAR, NULL,
970 X_gf_Attribute16),
971 global_attribute17 = decode(X_gf_Attribute17,
972 NULL, global_attribute17,
973 FND_API.G_MISS_CHAR, NULL,
974 X_gf_Attribute17),
975 global_attribute18 = decode(X_gf_Attribute18,
976 NULL, global_attribute18,
977 FND_API.G_MISS_CHAR, NULL,
981 FND_API.G_MISS_CHAR, NULL,
978 X_gf_Attribute18),
979 global_attribute19 = decode(X_gf_Attribute19,
980 NULL, global_attribute19,
982 X_gf_Attribute19),
983 global_attribute20 = decode(X_gf_Attribute20,
984 NULL, global_attribute20,
985 FND_API.G_MISS_CHAR, NULL,
986 X_gf_Attribute20),
987 global_attribute_category = decode(X_gf_Attribute_category_code,
988 NULL,
989 global_attribute_category,
990 FND_API.G_MISS_CHAR, NULL,
991 X_gf_Attribute_category_code),
992 context = decode(X_Context,
993 NULL, context,
994 FND_API.G_MISS_CHAR, NULL,
995 X_Context),
996 lease_id = decode(X_Lease_Id,
997 NULL, lease_id,
998 FND_API.G_MISS_NUM, NULL,
999 X_Lease_Id),
1000 inventorial = decode(X_Inventorial,
1001 NULL, inventorial,
1002 FND_API.G_MISS_CHAR, NULL,
1003 X_Inventorial),
1004 commitment = decode(X_Commitment,
1005 NULL, commitment,
1006 FND_API.G_MISS_CHAR, NULL,
1007 X_commitment),
1008 investment_law = decode(X_investment_law,
1009 NULL, investment_law,
1010 FND_API.G_MISS_CHAR, NULL,
1011 X_investment_law),
1012 last_update_date = decode(X_Last_Update_Date,
1013 NULL, last_update_date,
1014 X_Last_Update_Date),
1015 last_updated_by = decode(X_Last_Updated_By,
1016 NULL, last_updated_by,
1017 FND_API.G_MISS_NUM, NULL,
1018 X_Last_Updated_By),
1019 last_update_login = decode(X_Last_Update_Login,
1020 NULL, last_update_login,
1021 FND_API.G_MISS_NUM, NULL,
1022 X_Last_Update_Login)
1023 WHERE rowid = l_rowid;
1024
1025 if (SQL%NOTFOUND) then
1026 Raise NO_DATA_FOUND;
1027 end if;
1028
1029 if (X_asset_id is NULL) then
1030 select asset_id
1031 into l_asset_id
1032 from fa_additions
1033 where rowid = X_rowid;
1034 else
1035 l_asset_id := X_asset_id;
1036 end if;
1037
1038 update FA_ADDITIONS_TL set
1039 DESCRIPTION = decode(X_DESCRIPTION,
1040 NULL, description,
1041 FND_API.G_MISS_CHAR, NULL,
1042 X_description),
1043 LAST_UPDATE_DATE = decode(X_LAST_UPDATE_DATE,
1044 NULL, last_update_date,
1045 X_LAST_UPDATE_DATE),
1046 LAST_UPDATED_BY = decode(X_LAST_UPDATED_BY,
1047 NULL, last_updated_by,
1048 FND_API.G_MISS_NUM, NULL,
1049 X_LAST_UPDATED_BY),
1050 LAST_UPDATE_LOGIN = decode(X_LAST_UPDATE_LOGIN,
1051 NULL, last_update_login,
1052 FND_API.G_MISS_NUM, NULL,
1053 X_LAST_UPDATE_LOGIN),
1054 SOURCE_LANG = userenv('LANG')
1055 where ASSET_ID = L_ASSET_ID
1056 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
1057
1058 if (SQL%NOTFOUND) then
1059 raise no_data_found;
1060 end if;
1061
1062 X_Return_Status := TRUE;
1063
1064 exception
1065 when others then
1066 FA_SRVR_MSG.Add_SQL_Error(
1067 CALLING_FN => 'FA_ADDITIONS_PKG.Update_Row', p_log_level_rec => p_log_level_rec);
1068 X_Return_Status := FALSE;
1069 raise;
1070 END Update_Row;
1071
1072 PROCEDURE Delete_Row(X_Rowid VARCHAR2,
1073 X_Asset_Id number,
1074 X_calling_Fn VARCHAR2, p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
1075
1076 -- CURSOR C IS SELECT asset_id FROM fa_additions_B
1077 -- WHERE rowid = X_Rowid;
1078 h_asset_id number(15);
1079 BEGIN
1080
1081 -- OPEN C;
1082 -- FETCH C INTO h_asset_id;
1083 -- CLOSE C;
1084
1085 delete from FA_ADDITIONS_TL
1086 where ASSET_ID = X_asset_id;
1087
1088 if (sql%notfound) then
1089 raise no_data_found;
1090 end if;
1091
1092 DELETE FROM fa_additions_b
1093 WHERE asset_id = X_asset_id;
1097 end if;
1094
1095 if (SQL%NOTFOUND) then
1096 Raise NO_DATA_FOUND;
1098
1099 exception
1100 when others then
1101 FA_SRVR_MSG.ADD_SQL_ERROR (
1102 CALLING_FN => 'fa_additions_pkg.delete_row', p_log_level_rec => p_log_level_rec);
1103 raise;
1104
1105 END Delete_Row;
1106
1107
1108
1109 PROCEDURE Update_Units(X_Asset_Id NUMBER,
1110 X_Calling_Fn VARCHAR2, p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
1111 BEGIN
1112 UPDATE fa_additions_b
1113 SET current_units = (select units from fa_asset_history
1114 where asset_id = X_Asset_Id
1115 and date_ineffective is null)
1116 WHERE asset_id = X_Asset_Id;
1117 if (SQL%NOTFOUND) then
1118 Raise NO_DATA_FOUND;
1119 end if;
1120
1121 exception
1122 when others then
1123 FA_SRVR_MSG.ADD_SQL_ERROR (
1124 CALLING_FN => 'fa_additions_pkg.update_units', p_log_level_rec => p_log_level_rec);
1125 raise;
1126
1127 END Update_Units;
1128
1129 -- new procedure for mls (multi-lingual support)
1130 -- following procedures either add new rows or
1131 -- repair old rows in fa_addtions_tl table
1132 -- which stores translation info.
1133
1134 PROCEDURE ADD_LANGUAGE is
1135
1136 BEGIN
1137
1138 -- delete from tl table if same asset doesn't exist in base table
1139 delete from FA_ADDITIONS_TL T
1140 where not exists
1141 (select NULL
1142 from FA_ADDITIONS_B B
1143 where B.ASSET_ID = T.ASSET_ID
1144 );
1145
1146 -- repair description in tl table
1147 update FA_ADDITIONS_TL T
1148 set (DESCRIPTION) =
1149 (select B.DESCRIPTION
1150 from FA_ADDITIONS_TL B
1151 where B.ASSET_ID = T.ASSET_ID
1152 and B.LANGUAGE = T.SOURCE_LANG)
1153 where (T.ASSET_ID, T.LANGUAGE) in
1154 (select SUBT.ASSET_ID,
1155 SUBT.LANGUAGE
1156 from FA_ADDITIONS_TL SUBB, FA_ADDITIONS_TL SUBT
1157 where SUBB.ASSET_ID = SUBT.ASSET_ID
1158 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1159 and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION));
1160
1161 -- insert new row into fa_additions_tl for new language
1162
1163 insert into FA_ADDITIONS_TL (
1164 LAST_UPDATED_BY,
1165 CREATED_BY,
1166 CREATION_DATE,
1167 LAST_UPDATE_LOGIN,
1168 ASSET_ID,
1169 DESCRIPTION,
1170 LAST_UPDATE_DATE,
1171 LANGUAGE,
1172 SOURCE_LANG)
1173 select
1174 B.LAST_UPDATED_BY,
1175 B.CREATED_BY,
1176 B.CREATION_DATE,
1177 B.LAST_UPDATE_LOGIN,
1178 B.ASSET_ID,
1179 B.DESCRIPTION,
1180 B.LAST_UPDATE_DATE,
1181 L.LANGUAGE_CODE,
1182 B.SOURCE_LANG
1183 from FA_ADDITIONS_TL B, FND_LANGUAGES L
1184 where L.INSTALLED_FLAG in ('I', 'B')
1185 and B.LANGUAGE = userenv('LANG')
1186 and not exists
1187 (select NULL
1188 from FA_ADDITIONS_TL T
1189 where T.ASSET_ID = B.ASSET_ID
1190 and T.LANGUAGE = L.LANGUAGE_CODE);
1191 end ADD_LANGUAGE;
1192
1193 PROCEDURE LOAD_ROW(
1194 X_Asset_Id IN NUMBER,
1195 X_Asset_Number IN VARCHAR2,
1196 X_Asset_Key_Ccid IN NUMBER DEFAULT NULL,
1197 X_Current_Units IN NUMBER,
1198 X_Asset_Type IN VARCHAR2,
1199 X_Tag_Number IN VARCHAR2 DEFAULT NULL,
1200 X_Description IN VARCHAR2,
1201 X_Asset_Category_Id IN NUMBER,
1202 X_Parent_Asset_Id IN NUMBER DEFAULT NULL,
1203 X_Manufacturer_Name IN VARCHAR2 DEFAULT NULL,
1204 X_Serial_Number IN VARCHAR2 DEFAULT NULL,
1205 X_Model_Number IN VARCHAR2 DEFAULT NULL,
1206 X_Property_Type_Code IN VARCHAR2 DEFAULT NULL,
1207 X_Property_1245_1250_Code IN VARCHAR2 DEFAULT NULL,
1208 X_In_Use_Flag IN VARCHAR2,
1209 X_Owned_Leased IN VARCHAR2,
1210 X_New_Used IN VARCHAR2,
1211 X_Unit_Adjustment_Flag IN VARCHAR2,
1212 X_Add_Cost_Je_Flag IN VARCHAR2,
1213 X_Attribute1 IN VARCHAR2 DEFAULT NULL,
1214 X_Attribute2 IN VARCHAR2 DEFAULT NULL,
1215 X_Attribute3 IN VARCHAR2 DEFAULT NULL,
1216 X_Attribute4 IN VARCHAR2 DEFAULT NULL,
1217 X_Attribute5 IN VARCHAR2 DEFAULT NULL,
1218 X_Attribute6 IN VARCHAR2 DEFAULT NULL,
1219 X_Attribute7 IN VARCHAR2 DEFAULT NULL,
1220 X_Attribute8 IN VARCHAR2 DEFAULT NULL,
1221 X_Attribute9 IN VARCHAR2 DEFAULT NULL,
1225 X_Attribute13 IN VARCHAR2 DEFAULT NULL,
1222 X_Attribute10 IN VARCHAR2 DEFAULT NULL,
1223 X_Attribute11 IN VARCHAR2 DEFAULT NULL,
1224 X_Attribute12 IN VARCHAR2 DEFAULT NULL,
1226 X_Attribute14 IN VARCHAR2 DEFAULT NULL,
1227 X_Attribute15 IN VARCHAR2 DEFAULT NULL,
1228 X_Attribute16 IN VARCHAR2 DEFAULT NULL,
1229 X_Attribute17 IN VARCHAR2 DEFAULT NULL,
1230 X_Attribute18 IN VARCHAR2 DEFAULT NULL,
1231 X_Attribute19 IN VARCHAR2 DEFAULT NULL,
1232 X_Attribute20 IN VARCHAR2 DEFAULT NULL,
1233 X_Attribute21 IN VARCHAR2 DEFAULT NULL,
1234 X_Attribute22 IN VARCHAR2 DEFAULT NULL,
1235 X_Attribute23 IN VARCHAR2 DEFAULT NULL,
1236 X_Attribute24 IN VARCHAR2 DEFAULT NULL,
1237 X_Attribute25 IN VARCHAR2 DEFAULT NULL,
1238 X_Attribute26 IN VARCHAR2 DEFAULT NULL,
1239 X_Attribute27 IN VARCHAR2 DEFAULT NULL,
1240 X_Attribute28 IN VARCHAR2 DEFAULT NULL,
1241 X_Attribute29 IN VARCHAR2 DEFAULT NULL,
1242 X_Attribute30 IN VARCHAR2 DEFAULT NULL,
1243 X_Attribute_Category_Code IN VARCHAR2,
1244 X_Context IN VARCHAR2 DEFAULT NULL,
1245 X_Lease_Id IN NUMBER DEFAULT NULL,
1246 X_Inventorial IN VARCHAR2,
1247 X_Commitment IN VARCHAR2 DEFAULT NULL,
1248 X_Investment_Law IN VARCHAR2 DEFAULT NULL,
1249 X_Status IN VARCHAR2 DEFAULT NULL,
1250 X_gf_Attribute1 IN VARCHAR2 DEFAULT NULL,
1251 X_gf_Attribute2 IN VARCHAR2 DEFAULT NULL,
1252 X_gf_Attribute3 IN VARCHAR2 DEFAULT NULL,
1253 X_gf_Attribute4 IN VARCHAR2 DEFAULT NULL,
1254 X_gf_Attribute5 IN VARCHAR2 DEFAULT NULL,
1255 X_gf_Attribute6 IN VARCHAR2 DEFAULT NULL,
1256 X_gf_Attribute7 IN VARCHAR2 DEFAULT NULL,
1257 X_gf_Attribute8 IN VARCHAR2 DEFAULT NULL,
1258 X_gf_Attribute9 IN VARCHAR2 DEFAULT NULL,
1259 X_gf_Attribute10 IN VARCHAR2 DEFAULT NULL,
1260 X_gf_Attribute11 IN VARCHAR2 DEFAULT NULL,
1261 X_gf_Attribute12 IN VARCHAR2 DEFAULT NULL,
1262 X_gf_Attribute13 IN VARCHAR2 DEFAULT NULL,
1263 X_gf_Attribute14 IN VARCHAR2 DEFAULT NULL,
1264 X_gf_Attribute15 IN VARCHAR2 DEFAULT NULL,
1265 X_gf_Attribute16 IN VARCHAR2 DEFAULT NULL,
1266 X_gf_Attribute17 IN VARCHAR2 DEFAULT NULL,
1267 X_gf_Attribute18 IN VARCHAR2 DEFAULT NULL,
1268 X_gf_Attribute19 IN VARCHAR2 DEFAULT NULL,
1269 X_gf_Attribute20 IN VARCHAR2 DEFAULT NULL,
1270 X_gf_Attribute_Category IN VARCHAR2 DEFAULT NULL
1271 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
1272
1273 h_asset_id number;
1274 h_asset_number varchar2(15);
1275 h_record_exists number(15);
1276
1277 user_id number;
1278 row_id varchar2(64);
1279 return_status boolean;
1280
1281 begin
1282
1283 h_asset_id := X_Asset_Id;
1284 h_asset_number := X_Asset_Number;
1285
1286 -- No SEED data. All custom.
1287 user_id := 0;
1288
1289 select count(*)
1290 into h_record_exists
1291 from fa_additions_b
1292 where asset_id = X_Asset_Id;
1293
1294 if (h_record_exists > 0) then
1295
1296 fa_additions_pkg.Update_Row(
1297 X_Asset_Id => h_asset_id,
1298 X_Asset_Number => h_asset_number,
1299 X_Asset_Key_Ccid => X_Asset_Key_Ccid,
1300 X_Current_Units => X_Current_Units,
1301 X_Asset_Type => X_Asset_Type,
1302 X_Tag_Number => X_Tag_Number,
1303 X_Description => X_Description,
1304 X_Asset_Category_Id => X_Asset_Category_Id,
1305 X_Parent_Asset_Id => X_Parent_Asset_Id,
1306 X_Manufacturer_Name => X_Manufacturer_Name,
1307 X_Serial_Number => X_Serial_Number,
1308 X_Model_Number => X_Model_Number,
1309 X_Property_Type_Code => X_Property_Type_Code,
1310 X_Property_1245_1250_Code => X_Property_1245_1250_Code,
1311 X_In_Use_Flag => X_In_Use_Flag,
1312 X_Owned_Leased => X_Owned_Leased,
1313 X_New_Used => X_New_Used,
1314 X_Unit_Adjustment_Flag => X_Unit_Adjustment_Flag,
1315 X_Add_Cost_Je_Flag => X_Add_Cost_Je_Flag,
1316 X_Attribute1 => X_Attribute1,
1317 X_Attribute2 => X_Attribute2,
1321 X_Attribute6 => X_Attribute6,
1318 X_Attribute3 => X_Attribute3,
1319 X_Attribute4 => X_Attribute4,
1320 X_Attribute5 => X_Attribute5,
1322 X_Attribute7 => X_Attribute7,
1323 X_Attribute8 => X_Attribute8,
1324 X_Attribute9 => X_Attribute9,
1325 X_Attribute10 => X_Attribute10,
1326 X_Attribute11 => X_Attribute11,
1327 X_Attribute12 => X_Attribute12,
1328 X_Attribute13 => X_Attribute13,
1329 X_Attribute14 => X_Attribute14,
1330 X_Attribute15 => X_Attribute15,
1331 X_Attribute16 => X_Attribute16,
1332 X_Attribute17 => X_Attribute17,
1333 X_Attribute18 => X_Attribute18,
1334 X_Attribute19 => X_Attribute19,
1335 X_Attribute20 => X_Attribute20,
1336 X_Attribute21 => X_Attribute21,
1337 X_Attribute22 => X_Attribute22,
1338 X_Attribute23 => X_Attribute23,
1339 X_Attribute24 => X_Attribute24,
1340 X_Attribute25 => X_Attribute25,
1341 X_Attribute26 => X_Attribute26,
1342 X_Attribute27 => X_Attribute27,
1343 X_Attribute28 => X_Attribute28,
1344 X_Attribute29 => X_Attribute29,
1345 X_Attribute30 => X_Attribute30,
1346 X_Attribute_Category_Code => X_Attribute_Category_Code,
1347 X_gf_Attribute1 => X_gf_Attribute1,
1348 X_gf_Attribute2 => X_gf_Attribute2,
1349 X_gf_Attribute3 => X_gf_Attribute3,
1350 X_gf_Attribute4 => X_gf_Attribute4,
1351 X_gf_Attribute5 => X_gf_Attribute5,
1352 X_gf_Attribute6 => X_gf_Attribute6,
1353 X_gf_Attribute7 => X_gf_Attribute7,
1354 X_gf_Attribute8 => X_gf_Attribute8,
1355 X_gf_Attribute9 => X_gf_Attribute9,
1356 X_gf_Attribute10 => X_gf_Attribute10,
1357 X_gf_Attribute11 => X_gf_Attribute11,
1358 X_gf_Attribute12 => X_gf_Attribute12,
1359 X_gf_Attribute13 => X_gf_Attribute13,
1360 X_gf_Attribute14 => X_gf_Attribute14,
1361 X_gf_Attribute15 => X_gf_Attribute15,
1362 X_gf_Attribute16 => X_gf_Attribute16,
1363 X_gf_Attribute17 => X_gf_Attribute17,
1364 X_gf_Attribute18 => X_gf_Attribute18,
1365 X_gf_Attribute19 => X_gf_Attribute19,
1366 X_gf_Attribute20 => X_gf_Attribute20,
1367 X_gf_Attribute_Category_Code => X_gf_Attribute_Category,
1368 X_Context => X_Context,
1369 X_Lease_Id => X_Lease_Id,
1370 X_Inventorial => X_Inventorial,
1371 X_Commitment => X_Commitment,
1372 X_Investment_Law => X_Investment_Law,
1373 X_Status => X_Status,
1374 X_Last_Update_Date => sysdate,
1375 X_Last_Updated_By => user_id,
1376 X_Last_Update_Login => 0,
1377 X_Return_Status => return_status,
1378 X_Calling_Fn => 'fa_additions_pkg.load_row'
1379 , p_log_level_rec => p_log_level_rec);
1380 else
1381 fa_additions_pkg.Insert_Row(
1382 X_Rowid => row_id,
1383 X_Asset_Id => h_asset_id,
1384 X_Asset_Number => h_asset_number,
1385 X_Asset_Key_Ccid => X_Asset_Key_Ccid,
1386 X_Current_Units => X_Current_Units,
1387 X_Asset_Type => X_Asset_Type,
1388 X_Tag_Number => X_Tag_Number,
1389 X_Description => X_Description,
1390 X_Asset_Category_Id => X_Asset_Category_Id,
1391 X_Parent_Asset_Id => X_Parent_Asset_Id,
1392 X_Manufacturer_Name => X_Manufacturer_Name,
1393 X_Serial_Number => X_Serial_Number,
1394 X_Model_Number => X_Model_Number,
1395 X_Property_Type_Code => X_Property_Type_Code,
1396 X_Property_1245_1250_Code => X_Property_1245_1250_Code,
1397 X_In_Use_Flag => X_In_Use_Flag,
1398 X_Owned_Leased => X_Owned_Leased,
1399 X_New_Used => X_New_Used,
1400 X_Unit_Adjustment_Flag => X_Unit_Adjustment_Flag,
1401 X_Add_Cost_Je_Flag => X_Add_Cost_Je_Flag,
1402 X_Attribute1 => X_Attribute1,
1403 X_Attribute2 => X_Attribute2,
1404 X_Attribute3 => X_Attribute3,
1405 X_Attribute4 => X_Attribute4,
1406 X_Attribute5 => X_Attribute5,
1407 X_Attribute6 => X_Attribute6,
1408 X_Attribute7 => X_Attribute7,
1409 X_Attribute8 => X_Attribute8,
1410 X_Attribute9 => X_Attribute9,
1411 X_Attribute10 => X_Attribute10,
1412 X_Attribute11 => X_Attribute11,
1413 X_Attribute12 => X_Attribute12,
1414 X_Attribute13 => X_Attribute13,
1415 X_Attribute14 => X_Attribute14,
1416 X_Attribute15 => X_Attribute15,
1417 X_Attribute16 => X_Attribute16,
1421 X_Attribute20 => X_Attribute20,
1418 X_Attribute17 => X_Attribute17,
1419 X_Attribute18 => X_Attribute18,
1420 X_Attribute19 => X_Attribute19,
1422 X_Attribute21 => X_Attribute21,
1423 X_Attribute22 => X_Attribute22,
1424 X_Attribute23 => X_Attribute23,
1425 X_Attribute24 => X_Attribute24,
1426 X_Attribute25 => X_Attribute25,
1427 X_Attribute26 => X_Attribute26,
1428 X_Attribute27 => X_Attribute27,
1429 X_Attribute28 => X_Attribute28,
1430 X_Attribute29 => X_Attribute29,
1431 X_Attribute30 => X_Attribute30,
1432 X_Attribute_Category_Code => X_Attribute_Category_Code,
1433 X_gf_Attribute1 => X_gf_Attribute1,
1434 X_gf_Attribute2 => X_gf_Attribute2,
1435 X_gf_Attribute3 => X_gf_Attribute3,
1436 X_gf_Attribute4 => X_gf_Attribute4,
1437 X_gf_Attribute5 => X_gf_Attribute5,
1438 X_gf_Attribute6 => X_gf_Attribute6,
1439 X_gf_Attribute7 => X_gf_Attribute7,
1440 X_gf_Attribute8 => X_gf_Attribute8,
1441 X_gf_Attribute9 => X_gf_Attribute9,
1442 X_gf_Attribute10 => X_gf_Attribute10,
1443 X_gf_Attribute11 => X_gf_Attribute11,
1444 X_gf_Attribute12 => X_gf_Attribute12,
1445 X_gf_Attribute13 => X_gf_Attribute13,
1446 X_gf_Attribute14 => X_gf_Attribute14,
1447 X_gf_Attribute15 => X_gf_Attribute15,
1448 X_gf_Attribute16 => X_gf_Attribute16,
1449 X_gf_Attribute17 => X_gf_Attribute17,
1450 X_gf_Attribute18 => X_gf_Attribute18,
1451 X_gf_Attribute19 => X_gf_Attribute19,
1452 X_gf_Attribute20 => X_gf_Attribute20,
1453 X_gf_Attribute_Category_Code => X_gf_Attribute_Category,
1454 X_Context => X_Context,
1455 X_Lease_Id => X_Lease_Id,
1456 X_Inventorial => X_Inventorial,
1457 X_Commitment => X_Commitment,
1458 X_Investment_Law => X_Investment_Law,
1459 X_Status => X_Status,
1460 X_Last_Update_Date => sysdate,
1461 X_Last_Updated_By => user_id,
1462 X_Created_By => user_id,
1463 X_Creation_Date => sysdate,
1464 X_Last_Update_Login => 0,
1465 X_Calling_Fn => 'fa_additions_pkg.load_row'
1466 , p_log_level_rec => p_log_level_rec);
1467 end if;
1468
1469 exception
1470 when others then
1471 FA_SRVR_MSG.ADD_SQL_ERROR (
1472 CALLING_FN => 'fa_additions_pkg.load_row', p_log_level_rec => p_log_level_rec);
1473 raise;
1474
1478 PROCEDURE LOAD_ROW (
1475 end LOAD_ROW;
1476
1477 /*Bug 8355119 overloading function for release specific signatures*/
1479 X_Custom_Mode IN VARCHAR2,
1480 X_Asset_Id IN NUMBER,
1481 X_Owner IN VARCHAR2,
1482 X_Last_Update_Date IN DATE,
1483 X_Asset_Number IN VARCHAR2,
1484 X_Asset_Key_Ccid IN NUMBER DEFAULT NULL,
1485 X_Current_Units IN NUMBER,
1486 X_Asset_Type IN VARCHAR2,
1487 X_Tag_Number IN VARCHAR2 DEFAULT NULL,
1488 X_Description IN VARCHAR2,
1489 X_Asset_Category_Id IN NUMBER,
1490 X_Parent_Asset_Id IN NUMBER DEFAULT NULL,
1491 X_Manufacturer_Name IN VARCHAR2 DEFAULT NULL,
1492 X_Serial_Number IN VARCHAR2 DEFAULT NULL,
1493 X_Model_Number IN VARCHAR2 DEFAULT NULL,
1494 X_Property_Type_Code IN VARCHAR2 DEFAULT NULL,
1495 X_Property_1245_1250_Code IN VARCHAR2 DEFAULT NULL,
1496 X_In_Use_Flag IN VARCHAR2,
1497 X_Owned_Leased IN VARCHAR2,
1498 X_New_Used IN VARCHAR2,
1499 X_Unit_Adjustment_Flag IN VARCHAR2,
1500 X_Add_Cost_Je_Flag IN VARCHAR2,
1501 X_Attribute1 IN VARCHAR2 DEFAULT NULL,
1502 X_Attribute2 IN VARCHAR2 DEFAULT NULL,
1503 X_Attribute3 IN VARCHAR2 DEFAULT NULL,
1504 X_Attribute4 IN VARCHAR2 DEFAULT NULL,
1505 X_Attribute5 IN VARCHAR2 DEFAULT NULL,
1506 X_Attribute6 IN VARCHAR2 DEFAULT NULL,
1507 X_Attribute7 IN VARCHAR2 DEFAULT NULL,
1508 X_Attribute8 IN VARCHAR2 DEFAULT NULL,
1509 X_Attribute9 IN VARCHAR2 DEFAULT NULL,
1510 X_Attribute10 IN VARCHAR2 DEFAULT NULL,
1511 X_Attribute11 IN VARCHAR2 DEFAULT NULL,
1512 X_Attribute12 IN VARCHAR2 DEFAULT NULL,
1513 X_Attribute13 IN VARCHAR2 DEFAULT NULL,
1514 X_Attribute14 IN VARCHAR2 DEFAULT NULL,
1515 X_Attribute15 IN VARCHAR2 DEFAULT NULL,
1516 X_Attribute16 IN VARCHAR2 DEFAULT NULL,
1517 X_Attribute17 IN VARCHAR2 DEFAULT NULL,
1518 X_Attribute18 IN VARCHAR2 DEFAULT NULL,
1519 X_Attribute19 IN VARCHAR2 DEFAULT NULL,
1520 X_Attribute20 IN VARCHAR2 DEFAULT NULL,
1521 X_Attribute21 IN VARCHAR2 DEFAULT NULL,
1522 X_Attribute22 IN VARCHAR2 DEFAULT NULL,
1523 X_Attribute23 IN VARCHAR2 DEFAULT NULL,
1524 X_Attribute24 IN VARCHAR2 DEFAULT NULL,
1525 X_Attribute25 IN VARCHAR2 DEFAULT NULL,
1526 X_Attribute26 IN VARCHAR2 DEFAULT NULL,
1527 X_Attribute27 IN VARCHAR2 DEFAULT NULL,
1528 X_Attribute28 IN VARCHAR2 DEFAULT NULL,
1529 X_Attribute29 IN VARCHAR2 DEFAULT NULL,
1530 X_Attribute30 IN VARCHAR2 DEFAULT NULL,
1531 X_Attribute_Category_Code IN VARCHAR2,
1532 X_Context IN VARCHAR2 DEFAULT NULL,
1533 X_Lease_Id IN NUMBER DEFAULT NULL,
1534 X_Inventorial IN VARCHAR2,
1535 X_Commitment IN VARCHAR2 DEFAULT NULL,
1536 X_Investment_Law IN VARCHAR2 DEFAULT NULL,
1537 X_Status IN VARCHAR2 DEFAULT NULL,
1538 X_gf_Attribute1 IN VARCHAR2 DEFAULT NULL,
1539 X_gf_Attribute2 IN VARCHAR2 DEFAULT NULL,
1540 X_gf_Attribute3 IN VARCHAR2 DEFAULT NULL,
1541 X_gf_Attribute4 IN VARCHAR2 DEFAULT NULL,
1542 X_gf_Attribute5 IN VARCHAR2 DEFAULT NULL,
1543 X_gf_Attribute6 IN VARCHAR2 DEFAULT NULL,
1544 X_gf_Attribute7 IN VARCHAR2 DEFAULT NULL,
1545 X_gf_Attribute8 IN VARCHAR2 DEFAULT NULL,
1546 X_gf_Attribute9 IN VARCHAR2 DEFAULT NULL,
1547 X_gf_Attribute10 IN VARCHAR2 DEFAULT NULL,
1548 X_gf_Attribute11 IN VARCHAR2 DEFAULT NULL,
1549 X_gf_Attribute12 IN VARCHAR2 DEFAULT NULL,
1550 X_gf_Attribute13 IN VARCHAR2 DEFAULT NULL,
1551 X_gf_Attribute14 IN VARCHAR2 DEFAULT NULL,
1552 X_gf_Attribute15 IN VARCHAR2 DEFAULT NULL,
1553 X_gf_Attribute16 IN VARCHAR2 DEFAULT NULL,
1554 X_gf_Attribute17 IN VARCHAR2 DEFAULT NULL,
1558 X_gf_Attribute_Category IN VARCHAR2 DEFAULT NULL,
1555 X_gf_Attribute18 IN VARCHAR2 DEFAULT NULL,
1556 X_gf_Attribute19 IN VARCHAR2 DEFAULT NULL,
1557 X_gf_Attribute20 IN VARCHAR2 DEFAULT NULL,
1559 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1560
1561 h_asset_id number;
1562 h_asset_number varchar2(15);
1563 h_record_exists number(15);
1564
1565 user_id number;
1566 row_id varchar2(64);
1567 return_status boolean;
1568
1569 db_last_updated_by number;
1570 db_last_update_date date;
1571
1572 begin
1573
1574 h_asset_id := X_Asset_Id;
1575 h_asset_number := X_Asset_Number;
1576
1577 user_id := fnd_load_util.owner_id (X_Owner);
1578
1579 select count(*)
1580 into h_record_exists
1581 from fa_additions_b
1582 where asset_id = X_Asset_Id;
1583
1584 if (h_record_exists > 0) then
1585
1586 select last_updated_by, last_update_date
1587 into db_last_updated_by, db_last_update_date
1588 from fa_additions_b
1589 where asset_id = X_Asset_Id;
1590
1591 if (fnd_load_util.upload_test(user_id, x_last_update_date,
1592 db_last_updated_by, db_last_update_date,
1593 X_CUSTOM_MODE
1594 )) then
1595
1596 fa_additions_pkg.Update_Row(
1597 X_Asset_Id => h_asset_id,
1598 X_Asset_Number => h_asset_number,
1599 X_Asset_Key_Ccid => X_Asset_Key_Ccid,
1600 X_Current_Units => X_Current_Units,
1601 X_Asset_Type => X_Asset_Type,
1602 X_Tag_Number => X_Tag_Number,
1603 X_Description => X_Description,
1604 X_Asset_Category_Id => X_Asset_Category_Id,
1605 X_Parent_Asset_Id => X_Parent_Asset_Id,
1606 X_Manufacturer_Name => X_Manufacturer_Name,
1607 X_Serial_Number => X_Serial_Number,
1608 X_Model_Number => X_Model_Number,
1609 X_Property_Type_Code => X_Property_Type_Code,
1610 X_Property_1245_1250_Code => X_Property_1245_1250_Code,
1611 X_In_Use_Flag => X_In_Use_Flag,
1612 X_Owned_Leased => X_Owned_Leased,
1613 X_New_Used => X_New_Used,
1614 X_Unit_Adjustment_Flag => X_Unit_Adjustment_Flag,
1615 X_Add_Cost_Je_Flag => X_Add_Cost_Je_Flag,
1616 X_Attribute1 => X_Attribute1,
1617 X_Attribute2 => X_Attribute2,
1618 X_Attribute3 => X_Attribute3,
1619 X_Attribute4 => X_Attribute4,
1620 X_Attribute5 => X_Attribute5,
1621 X_Attribute6 => X_Attribute6,
1622 X_Attribute7 => X_Attribute7,
1623 X_Attribute8 => X_Attribute8,
1624 X_Attribute9 => X_Attribute9,
1625 X_Attribute10 => X_Attribute10,
1626 X_Attribute11 => X_Attribute11,
1627 X_Attribute12 => X_Attribute12,
1628 X_Attribute13 => X_Attribute13,
1629 X_Attribute14 => X_Attribute14,
1630 X_Attribute15 => X_Attribute15,
1631 X_Attribute16 => X_Attribute16,
1632 X_Attribute17 => X_Attribute17,
1633 X_Attribute18 => X_Attribute18,
1634 X_Attribute19 => X_Attribute19,
1635 X_Attribute20 => X_Attribute20,
1636 X_Attribute21 => X_Attribute21,
1637 X_Attribute22 => X_Attribute22,
1638 X_Attribute23 => X_Attribute23,
1639 X_Attribute24 => X_Attribute24,
1640 X_Attribute25 => X_Attribute25,
1641 X_Attribute26 => X_Attribute26,
1642 X_Attribute27 => X_Attribute27,
1643 X_Attribute28 => X_Attribute28,
1644 X_Attribute29 => X_Attribute29,
1645 X_Attribute30 => X_Attribute30,
1646 X_Attribute_Category_Code => X_Attribute_Category_Code,
1647 X_gf_Attribute1 => X_gf_Attribute1,
1648 X_gf_Attribute2 => X_gf_Attribute2,
1649 X_gf_Attribute3 => X_gf_Attribute3,
1650 X_gf_Attribute4 => X_gf_Attribute4,
1651 X_gf_Attribute5 => X_gf_Attribute5,
1652 X_gf_Attribute6 => X_gf_Attribute6,
1653 X_gf_Attribute7 => X_gf_Attribute7,
1654 X_gf_Attribute8 => X_gf_Attribute8,
1655 X_gf_Attribute9 => X_gf_Attribute9,
1656 X_gf_Attribute10 => X_gf_Attribute10,
1657 X_gf_Attribute11 => X_gf_Attribute11,
1658 X_gf_Attribute12 => X_gf_Attribute12,
1659 X_gf_Attribute13 => X_gf_Attribute13,
1660 X_gf_Attribute14 => X_gf_Attribute14,
1661 X_gf_Attribute15 => X_gf_Attribute15,
1662 X_gf_Attribute16 => X_gf_Attribute16,
1663 X_gf_Attribute17 => X_gf_Attribute17,
1664 X_gf_Attribute18 => X_gf_Attribute18,
1665 X_gf_Attribute19 => X_gf_Attribute19,
1669 X_Lease_Id => X_Lease_Id,
1666 X_gf_Attribute20 => X_gf_Attribute20,
1667 X_gf_Attribute_Category_Code => X_gf_Attribute_Category,
1668 X_Context => X_Context,
1670 X_Inventorial => X_Inventorial,
1671 X_Commitment => X_Commitment,
1672 X_Investment_Law => X_Investment_Law,
1673 X_Status => X_Status,
1674 X_Last_Update_Date => sysdate,
1675 X_Last_Updated_By => user_id,
1676 X_Last_Update_Login => 0,
1677 X_Return_Status => return_status,
1678 X_Calling_Fn => 'fa_additions_pkg.load_row',
1679 p_log_level_rec => p_log_level_rec);
1680 end if;
1681
1682 else
1683 fa_additions_pkg.Insert_Row(
1684 X_Rowid => row_id,
1685 X_Asset_Id => h_asset_id,
1686 X_Asset_Number => h_asset_number,
1687 X_Asset_Key_Ccid => X_Asset_Key_Ccid,
1688 X_Current_Units => X_Current_Units,
1689 X_Asset_Type => X_Asset_Type,
1690 X_Tag_Number => X_Tag_Number,
1691 X_Description => X_Description,
1692 X_Asset_Category_Id => X_Asset_Category_Id,
1693 X_Parent_Asset_Id => X_Parent_Asset_Id,
1694 X_Manufacturer_Name => X_Manufacturer_Name,
1695 X_Serial_Number => X_Serial_Number,
1696 X_Model_Number => X_Model_Number,
1697 X_Property_Type_Code => X_Property_Type_Code,
1698 X_Property_1245_1250_Code => X_Property_1245_1250_Code,
1699 X_In_Use_Flag => X_In_Use_Flag,
1700 X_Owned_Leased => X_Owned_Leased,
1701 X_New_Used => X_New_Used,
1702 X_Unit_Adjustment_Flag => X_Unit_Adjustment_Flag,
1703 X_Add_Cost_Je_Flag => X_Add_Cost_Je_Flag,
1704 X_Attribute1 => X_Attribute1,
1705 X_Attribute2 => X_Attribute2,
1706 X_Attribute3 => X_Attribute3,
1707 X_Attribute4 => X_Attribute4,
1708 X_Attribute5 => X_Attribute5,
1709 X_Attribute6 => X_Attribute6,
1710 X_Attribute7 => X_Attribute7,
1711 X_Attribute8 => X_Attribute8,
1712 X_Attribute9 => X_Attribute9,
1713 X_Attribute10 => X_Attribute10,
1714 X_Attribute11 => X_Attribute11,
1715 X_Attribute12 => X_Attribute12,
1716 X_Attribute13 => X_Attribute13,
1717 X_Attribute14 => X_Attribute14,
1718 X_Attribute15 => X_Attribute15,
1719 X_Attribute16 => X_Attribute16,
1720 X_Attribute17 => X_Attribute17,
1721 X_Attribute18 => X_Attribute18,
1722 X_Attribute19 => X_Attribute19,
1723 X_Attribute20 => X_Attribute20,
1724 X_Attribute21 => X_Attribute21,
1725 X_Attribute22 => X_Attribute22,
1726 X_Attribute23 => X_Attribute23,
1727 X_Attribute24 => X_Attribute24,
1728 X_Attribute25 => X_Attribute25,
1729 X_Attribute26 => X_Attribute26,
1730 X_Attribute27 => X_Attribute27,
1731 X_Attribute28 => X_Attribute28,
1732 X_Attribute29 => X_Attribute29,
1733 X_Attribute30 => X_Attribute30,
1734 X_Attribute_Category_Code => X_Attribute_Category_Code,
1735 X_gf_Attribute1 => X_gf_Attribute1,
1736 X_gf_Attribute2 => X_gf_Attribute2,
1737 X_gf_Attribute3 => X_gf_Attribute3,
1738 X_gf_Attribute4 => X_gf_Attribute4,
1739 X_gf_Attribute5 => X_gf_Attribute5,
1740 X_gf_Attribute6 => X_gf_Attribute6,
1741 X_gf_Attribute7 => X_gf_Attribute7,
1742 X_gf_Attribute8 => X_gf_Attribute8,
1743 X_gf_Attribute9 => X_gf_Attribute9,
1744 X_gf_Attribute10 => X_gf_Attribute10,
1745 X_gf_Attribute11 => X_gf_Attribute11,
1746 X_gf_Attribute12 => X_gf_Attribute12,
1747 X_gf_Attribute13 => X_gf_Attribute13,
1748 X_gf_Attribute14 => X_gf_Attribute14,
1749 X_gf_Attribute15 => X_gf_Attribute15,
1750 X_gf_Attribute16 => X_gf_Attribute16,
1751 X_gf_Attribute17 => X_gf_Attribute17,
1752 X_gf_Attribute18 => X_gf_Attribute18,
1753 X_gf_Attribute19 => X_gf_Attribute19,
1754 X_gf_Attribute20 => X_gf_Attribute20,
1755 X_gf_Attribute_Category_Code => X_gf_Attribute_Category,
1756 X_Context => X_Context,
1757 X_Lease_Id => X_Lease_Id,
1758 X_Inventorial => X_Inventorial,
1759 X_Commitment => X_Commitment,
1760 X_Investment_Law => X_Investment_Law,
1761 X_Status => X_Status,
1762 X_Last_Update_Date => sysdate,
1763 X_Last_Updated_By => user_id,
1764 X_Created_By => user_id,
1765 X_Creation_Date => sysdate,
1766 X_Last_Update_Login => 0,
1767 X_Calling_Fn => 'fa_additions_pkg.load_row'
1771 EXCEPTION
1768 ,p_log_level_rec => p_log_level_rec);
1769 end if;
1770
1772 when others then
1773 FA_SRVR_MSG.ADD_SQL_ERROR (
1774 CALLING_FN => 'fa_additions_pkg.load_row'
1775 ,p_log_level_rec => p_log_level_rec);
1776 raise;
1777
1778 end LOAD_ROW;
1779
1780
1781 PROCEDURE TRANSLATE_ROW(
1782 X_Asset_Id IN NUMBER,
1783 X_Description IN VARCHAR2
1784 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) IS
1785
1786 begin
1787
1788 update FA_ADDITIONS_TL set
1789 DESCRIPTION = nvl(X_Description, DESCRIPTION),
1790 LAST_UPDATE_DATE = sysdate,
1791 LAST_UPDATED_BY = 0,
1792 LAST_UPDATE_LOGIN = 0,
1793 SOURCE_LANG = userenv('LANG')
1794 where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
1795 and ASSET_ID = X_Asset_ID;
1796
1797 exception
1798 when no_data_found then null;
1799
1800 when others then
1801 FA_SRVR_MSG.ADD_SQL_ERROR (
1802 CALLING_FN => 'fa_additions_pkg.translate_row', p_log_level_rec => p_log_level_rec);
1803 raise;
1804
1805 end TRANSLATE_ROW;
1806
1807 /*Bug 8355119 overloading function for release specific signatures*/
1808 PROCEDURE TRANSLATE_ROW(
1809 X_Custom_Mode IN VARCHAR2,
1810 X_Asset_Id IN NUMBER,
1811 X_Owner IN VARCHAR2,
1812 X_Last_Update_Date IN DATE,
1813 X_Description IN VARCHAR2,
1814 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1815
1816 user_id number;
1817
1818 db_last_updated_by number;
1819 db_last_update_date date;
1820
1821 BEGIN
1822
1823 select last_updated_by, last_update_date
1824 into db_last_updated_by, db_last_update_date
1825 from fa_additions_tl
1826 where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
1827 and asset_id = X_Asset_ID;
1828
1829 user_id := fnd_load_util.owner_id (X_Owner);
1830
1831 if (fnd_load_util.upload_test(user_id, x_last_update_date,
1832 db_last_updated_by, db_last_update_date,
1833 X_CUSTOM_MODE )) then
1834
1835 update FA_ADDITIONS_TL set
1836 DESCRIPTION = nvl(X_Description, DESCRIPTION),
1837 LAST_UPDATE_DATE = sysdate,
1838 LAST_UPDATED_BY = 0,
1839 LAST_UPDATE_LOGIN = 0,
1840 SOURCE_LANG = userenv('LANG')
1841 where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
1842 and ASSET_ID = X_Asset_ID;
1843
1844 end if;
1845
1846 EXCEPTION
1847 when no_data_found then null;
1848
1849 when others then
1850 FA_SRVR_MSG.ADD_SQL_ERROR (
1851 CALLING_FN => 'fa_additions_pkg.translate_row'
1852 ,p_log_level_rec => p_log_level_rec);
1853 raise;
1854
1855 END TRANSLATE_ROW;
1856
1857 /*bug 8355119 adding R12 specific funtion LOAD_SEED_ROW*/
1858
1859 PROCEDURE LOAD_SEED_ROW (
1860 x_upload_mode IN VARCHAR2,
1861 x_custom_mode IN VARCHAR2,
1862 x_asset_id IN NUMBER,
1863 x_owner IN VARCHAR2,
1864 x_last_update_date IN DATE,
1865 x_asset_number IN VARCHAR2,
1866 x_asset_key_ccid IN NUMBER,
1867 x_current_units IN NUMBER,
1868 x_asset_type IN VARCHAR2,
1869 x_tag_number IN VARCHAR2,
1870 x_description IN VARCHAR2,
1871 x_asset_category_id IN NUMBER,
1872 x_parent_asset_id IN NUMBER,
1873 x_manufacturer_name IN VARCHAR2,
1874 x_serial_number IN VARCHAR2,
1875 x_model_number IN VARCHAR2,
1876 x_property_type_code IN VARCHAR2,
1877 x_property_1245_1250_code IN VARCHAR2,
1878 x_in_use_flag IN VARCHAR2,
1879 x_owned_leased IN VARCHAR2,
1880 x_new_used IN VARCHAR2,
1881 x_unit_adjustment_flag IN VARCHAR2,
1882 x_add_cost_je_flag IN VARCHAR2,
1883 x_attribute1 IN VARCHAR2,
1884 x_attribute2 IN VARCHAR2,
1885 x_attribute3 IN VARCHAR2,
1886 x_attribute4 IN VARCHAR2,
1887 x_attribute5 IN VARCHAR2,
1888 x_attribute6 IN VARCHAR2,
1889 x_attribute7 IN VARCHAR2,
1890 x_attribute8 IN VARCHAR2,
1891 x_attribute9 IN VARCHAR2,
1892 x_attribute10 IN VARCHAR2,
1893 x_attribute11 IN VARCHAR2,
1894 x_attribute12 IN VARCHAR2,
1895 x_attribute13 IN VARCHAR2,
1896 x_attribute14 IN VARCHAR2,
1897 x_attribute15 IN VARCHAR2,
1898 x_attribute16 IN VARCHAR2,
1899 x_attribute17 IN VARCHAR2,
1900 x_attribute18 IN VARCHAR2,
1901 x_attribute19 IN VARCHAR2,
1902 x_attribute20 IN VARCHAR2,
1903 x_attribute21 IN VARCHAR2,
1904 x_attribute22 IN VARCHAR2,
1905 x_attribute23 IN VARCHAR2,
1906 x_attribute24 IN VARCHAR2,
1910 x_attribute28 IN VARCHAR2,
1907 x_attribute25 IN VARCHAR2,
1908 x_attribute26 IN VARCHAR2,
1909 x_attribute27 IN VARCHAR2,
1911 x_attribute29 IN VARCHAR2,
1912 x_attribute30 IN VARCHAR2,
1913 x_attribute_category_code IN VARCHAR2,
1914 x_context IN VARCHAR2,
1915 x_lease_id IN NUMBER,
1916 x_inventorial IN VARCHAR2,
1917 x_commitment IN VARCHAR2,
1918 x_investment_law IN VARCHAR2,
1919 x_gf_attribute1 IN VARCHAR2,
1920 x_gf_attribute2 IN VARCHAR2,
1921 x_gf_attribute3 IN VARCHAR2,
1922 x_gf_attribute4 IN VARCHAR2,
1923 x_gf_attribute5 IN VARCHAR2,
1924 x_gf_attribute6 IN VARCHAR2,
1925 x_gf_attribute7 IN VARCHAR2,
1926 x_gf_attribute8 IN VARCHAR2,
1927 x_gf_attribute9 IN VARCHAR2,
1928 x_gf_attribute10 IN VARCHAR2,
1929 x_gf_attribute11 IN VARCHAR2,
1930 x_gf_attribute12 IN VARCHAR2,
1931 x_gf_attribute13 IN VARCHAR2,
1932 x_gf_attribute14 IN VARCHAR2,
1933 x_gf_attribute15 IN VARCHAR2,
1934 x_gf_attribute16 IN VARCHAR2,
1935 x_gf_attribute17 IN VARCHAR2,
1936 x_gf_attribute18 IN VARCHAR2,
1937 x_gf_attribute19 IN VARCHAR2,
1938 x_gf_attribute20 IN VARCHAR2,
1939 x_gf_attribute_category IN VARCHAR2
1940 ,p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1941
1942 BEGIN
1943
1944 if (x_upload_mode = 'NLS') then
1945 fa_additions_pkg.TRANSLATE_ROW (
1946 x_custom_mode => x_custom_mode,
1947 x_asset_id => x_asset_id,
1948 x_owner => x_owner,
1949 x_last_update_date => x_last_update_date,
1950 x_description => x_description
1951 ,p_log_level_rec => p_log_level_rec);
1952 else
1953 fa_additions_pkg.LOAD_ROW (
1954 x_custom_mode => x_custom_mode,
1955 x_asset_id => x_asset_id,
1956 x_owner => x_owner,
1957 x_last_update_date => x_last_update_date,
1958 x_asset_number => x_asset_number,
1959 x_asset_key_ccid => x_asset_key_ccid,
1960 x_current_units => x_current_units,
1961 x_asset_type => x_asset_type,
1962 x_tag_number => x_tag_number,
1963 x_description => x_description,
1964 x_asset_category_id => x_asset_category_id,
1965 x_parent_asset_id => x_parent_asset_id,
1966 x_manufacturer_name => x_manufacturer_name,
1967 x_serial_number => x_serial_number,
1968 x_model_number => x_model_number,
1969 x_property_type_code => x_property_type_code,
1970 x_property_1245_1250_code => x_property_1245_1250_code,
1971 x_in_use_flag => x_in_use_flag,
1972 x_owned_leased => x_owned_leased,
1973 x_new_used => x_new_used,
1974 x_unit_adjustment_flag => x_unit_adjustment_flag,
1975 x_add_cost_je_flag => x_add_cost_je_flag,
1976 x_attribute1 => x_attribute1,
1977 x_attribute2 => x_attribute2,
1978 x_attribute3 => x_attribute3,
1979 x_attribute4 => x_attribute4,
1980 x_attribute5 => x_attribute5,
1981 x_attribute6 => x_attribute6,
1982 x_attribute7 => x_attribute7,
1983 x_attribute8 => x_attribute8,
1984 x_attribute9 => x_attribute9,
1985 x_attribute10 => x_attribute10,
1986 x_attribute11 => x_attribute11,
1987 x_attribute12 => x_attribute12,
1988 x_attribute13 => x_attribute13,
1989 x_attribute14 => x_attribute14,
1990 x_attribute15 => x_attribute15,
1991 x_attribute16 => x_attribute16,
1992 x_attribute17 => x_attribute17,
1993 x_attribute18 => x_attribute18,
1994 x_attribute19 => x_attribute19,
1995 x_attribute20 => x_attribute20,
1996 x_attribute21 => x_attribute21,
1997 x_attribute22 => x_attribute22,
1998 x_attribute23 => x_attribute23,
1999 x_attribute24 => x_attribute24,
2000 x_attribute25 => x_attribute25,
2001 x_attribute26 => x_attribute26,
2002 x_attribute27 => x_attribute27,
2003 x_attribute28 => x_attribute28,
2004 x_attribute29 => x_attribute29,
2005 x_attribute30 => x_attribute30,
2006 x_attribute_category_code => x_attribute_category_code,
2007 x_context => x_context,
2008 x_lease_id => x_lease_id,
2009 x_inventorial => x_inventorial,
2010 x_commitment => x_commitment,
2011 x_investment_law => x_investment_law,
2012 x_gf_attribute1 => x_gf_attribute1,
2013 x_gf_attribute2 => x_gf_attribute2,
2014 x_gf_attribute3 => x_gf_attribute3,
2015 x_gf_attribute4 => x_gf_attribute4,
2016 x_gf_attribute5 => x_gf_attribute5,
2017 x_gf_attribute6 => x_gf_attribute6,
2018 x_gf_attribute7 => x_gf_attribute7,
2019 x_gf_attribute8 => x_gf_attribute8,
2020 x_gf_attribute9 => x_gf_attribute9,
2021 x_gf_attribute10 => x_gf_attribute10,
2022 x_gf_attribute11 => x_gf_attribute11,
2023 x_gf_attribute12 => x_gf_attribute12,
2024 x_gf_attribute13 => x_gf_attribute13,
2025 x_gf_attribute14 => x_gf_attribute14,
2026 x_gf_attribute15 => x_gf_attribute15,
2027 x_gf_attribute16 => x_gf_attribute16,
2028 x_gf_attribute17 => x_gf_attribute17,
2029 x_gf_attribute18 => x_gf_attribute18,
2030 x_gf_attribute19 => x_gf_attribute19,
2031 x_gf_attribute20 => x_gf_attribute20,
2032 x_gf_attribute_category => x_gf_attribute_category
2033 ,p_log_level_rec => p_log_level_rec);
2034 end if;
2035
2036 END LOAD_SEED_ROW;
2037
2038 END FA_ADDITIONS_PKG;