[Home] [Help]
PACKAGE BODY: APPS.BNE_LAYOUTS_PKG
Source
1 package body BNE_LAYOUTS_PKG as
2 /* $Header: bnelayb.pls 120.2 2005/06/29 03:40:13 dvayro noship $ */
3
4 procedure INSERT_ROW (
5 X_ROWID in out NOCOPY VARCHAR2,
6 X_APPLICATION_ID in NUMBER,
7 X_LAYOUT_CODE in VARCHAR2,
8 X_OBJECT_VERSION_NUMBER in NUMBER,
9 X_STYLESHEET_APP_ID in NUMBER,
10 X_STYLESHEET_CODE in VARCHAR2,
11 X_INTEGRATOR_APP_ID in NUMBER,
12 X_INTEGRATOR_CODE in VARCHAR2,
13 X_STYLE in VARCHAR2,
14 X_STYLE_CLASS in VARCHAR2,
15 X_REPORTING_FLAG in VARCHAR2,
16 X_REPORTING_INTERFACE_APP_ID in NUMBER,
17 X_REPORTING_INTERFACE_CODE in VARCHAR2,
18 X_USER_NAME in VARCHAR2,
19 X_CREATION_DATE in DATE,
20 X_CREATED_BY in NUMBER,
21 X_LAST_UPDATE_DATE in DATE,
22 X_LAST_UPDATED_BY in NUMBER,
23 X_LAST_UPDATE_LOGIN in NUMBER,
24 X_CREATE_DOC_LIST_APP_ID in NUMBER,
25 X_CREATE_DOC_LIST_CODE in VARCHAR2
26 ) is
27 cursor C is select ROWID from BNE_LAYOUTS_B
28 where APPLICATION_ID = X_APPLICATION_ID
29 and LAYOUT_CODE = X_LAYOUT_CODE
30 ;
31 begin
32 insert into BNE_LAYOUTS_B (
33 APPLICATION_ID,
34 LAYOUT_CODE,
35 OBJECT_VERSION_NUMBER,
36 STYLESHEET_APP_ID,
37 STYLESHEET_CODE,
38 INTEGRATOR_APP_ID,
39 INTEGRATOR_CODE,
40 STYLE,
41 STYLE_CLASS,
42 REPORTING_FLAG,
43 REPORTING_INTERFACE_APP_ID,
44 REPORTING_INTERFACE_CODE,
45 CREATION_DATE,
46 CREATED_BY,
47 LAST_UPDATE_DATE,
48 LAST_UPDATED_BY,
49 LAST_UPDATE_LOGIN,
50 CREATE_DOC_LIST_APP_ID,
51 CREATE_DOC_LIST_CODE
52 ) values (
53 X_APPLICATION_ID,
54 X_LAYOUT_CODE,
55 X_OBJECT_VERSION_NUMBER,
56 X_STYLESHEET_APP_ID,
57 X_STYLESHEET_CODE,
58 X_INTEGRATOR_APP_ID,
59 X_INTEGRATOR_CODE,
60 X_STYLE,
61 X_STYLE_CLASS,
62 X_REPORTING_FLAG,
63 X_REPORTING_INTERFACE_APP_ID,
64 X_REPORTING_INTERFACE_CODE,
65 X_CREATION_DATE,
66 X_CREATED_BY,
67 X_LAST_UPDATE_DATE,
68 X_LAST_UPDATED_BY,
69 X_LAST_UPDATE_LOGIN,
70 X_CREATE_DOC_LIST_APP_ID,
71 X_CREATE_DOC_LIST_CODE
72 );
73
74 insert into BNE_LAYOUTS_TL (
75 APPLICATION_ID,
76 LAYOUT_CODE,
77 USER_NAME,
78 CREATED_BY,
79 CREATION_DATE,
80 LAST_UPDATED_BY,
81 LAST_UPDATE_LOGIN,
82 LAST_UPDATE_DATE,
83 LANGUAGE,
84 SOURCE_LANG
85 ) select
86 X_APPLICATION_ID,
87 X_LAYOUT_CODE,
88 X_USER_NAME,
89 X_CREATED_BY,
90 X_CREATION_DATE,
91 X_LAST_UPDATED_BY,
92 X_LAST_UPDATE_LOGIN,
93 X_LAST_UPDATE_DATE,
94 L.LANGUAGE_CODE,
95 userenv('LANG')
96 from FND_LANGUAGES L
97 where L.INSTALLED_FLAG in ('I', 'B')
98 and not exists
99 (select NULL
100 from BNE_LAYOUTS_TL T
101 where T.APPLICATION_ID = X_APPLICATION_ID
102 and T.LAYOUT_CODE = X_LAYOUT_CODE
103 and T.LANGUAGE = L.LANGUAGE_CODE);
104
105 open c;
106 fetch c into X_ROWID;
107 if (c%notfound) then
108 close c;
109 raise no_data_found;
110 end if;
111 close c;
112
113 end INSERT_ROW;
114
115 procedure LOCK_ROW (
116 X_APPLICATION_ID in NUMBER,
117 X_LAYOUT_CODE in VARCHAR2,
118 X_OBJECT_VERSION_NUMBER in NUMBER,
119 X_STYLESHEET_APP_ID in NUMBER,
120 X_STYLESHEET_CODE in VARCHAR2,
121 X_INTEGRATOR_APP_ID in NUMBER,
122 X_INTEGRATOR_CODE in VARCHAR2,
123 X_STYLE in VARCHAR2,
124 X_STYLE_CLASS in VARCHAR2,
125 X_REPORTING_FLAG in VARCHAR2,
126 X_REPORTING_INTERFACE_APP_ID in NUMBER,
127 X_REPORTING_INTERFACE_CODE in VARCHAR2,
128 X_USER_NAME in VARCHAR2,
129 X_CREATE_DOC_LIST_APP_ID in NUMBER,
130 X_CREATE_DOC_LIST_CODE in VARCHAR2
131 ) is
132 cursor c is select
133 OBJECT_VERSION_NUMBER,
134 STYLESHEET_APP_ID,
135 STYLESHEET_CODE,
136 INTEGRATOR_APP_ID,
137 INTEGRATOR_CODE,
138 STYLE,
139 STYLE_CLASS,
140 REPORTING_FLAG,
141 REPORTING_INTERFACE_APP_ID,
142 REPORTING_INTERFACE_CODE,
143 CREATE_DOC_LIST_APP_ID,
144 CREATE_DOC_LIST_CODE
145 from BNE_LAYOUTS_B
146 where APPLICATION_ID = X_APPLICATION_ID
147 and LAYOUT_CODE = X_LAYOUT_CODE
148 for update of APPLICATION_ID nowait;
149 recinfo c%rowtype;
150
151 cursor c1 is select
152 USER_NAME,
153 decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
154 from BNE_LAYOUTS_TL
155 where APPLICATION_ID = X_APPLICATION_ID
156 and LAYOUT_CODE = X_LAYOUT_CODE
157 and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
158 for update of APPLICATION_ID nowait;
159 begin
160 open c;
161 fetch c into recinfo;
162 if (c%notfound) then
163 close c;
164 fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
165 app_exception.raise_exception;
166 end if;
167 close c;
168 if ( ((recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER)
169 OR ((recinfo.OBJECT_VERSION_NUMBER is null) AND (X_OBJECT_VERSION_NUMBER is null)))
170 AND (recinfo.STYLESHEET_APP_ID = X_STYLESHEET_APP_ID)
171 AND (recinfo.STYLESHEET_CODE = X_STYLESHEET_CODE)
172 AND (recinfo.INTEGRATOR_APP_ID = X_INTEGRATOR_APP_ID)
173 AND (recinfo.INTEGRATOR_CODE = X_INTEGRATOR_CODE)
174 AND ((recinfo.STYLE = X_STYLE)
175 OR ((recinfo.STYLE is null) AND (X_STYLE is null)))
176 AND ((recinfo.STYLE_CLASS = X_STYLE_CLASS)
177 OR ((recinfo.STYLE_CLASS is null) AND (X_STYLE_CLASS is null)))
178 AND (recinfo.REPORTING_FLAG = X_REPORTING_FLAG)
179 AND ((recinfo.REPORTING_INTERFACE_APP_ID = X_REPORTING_INTERFACE_APP_ID)
180 OR ((recinfo.REPORTING_INTERFACE_APP_ID is null) AND (X_REPORTING_INTERFACE_APP_ID is null)))
181 AND ((recinfo.REPORTING_INTERFACE_CODE = X_REPORTING_INTERFACE_CODE)
182 OR ((recinfo.REPORTING_INTERFACE_CODE is null) AND (X_REPORTING_INTERFACE_CODE is null)))
183 AND ((recinfo.CREATE_DOC_LIST_APP_ID = X_CREATE_DOC_LIST_APP_ID)
184 OR ((recinfo.CREATE_DOC_LIST_APP_ID is null) AND (X_CREATE_DOC_LIST_APP_ID is null)))
185 AND ((recinfo.CREATE_DOC_LIST_CODE = X_CREATE_DOC_LIST_CODE)
186 OR ((recinfo.CREATE_DOC_LIST_CODE is null) AND (X_CREATE_DOC_LIST_CODE is null)))
187 ) then
188 null;
189 else
190 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
191 app_exception.raise_exception;
192 end if;
193
194 for tlinfo in c1 loop
195 if (tlinfo.BASELANG = 'Y') then
196 if ( (tlinfo.USER_NAME = X_USER_NAME)
197 ) then
198 null;
199 else
200 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
201 app_exception.raise_exception;
202 end if;
203 end if;
204 end loop;
205 return;
206 end LOCK_ROW;
207
208 procedure UPDATE_ROW (
209 X_APPLICATION_ID in NUMBER,
210 X_LAYOUT_CODE in VARCHAR2,
211 X_OBJECT_VERSION_NUMBER in NUMBER,
212 X_STYLESHEET_APP_ID in NUMBER,
213 X_STYLESHEET_CODE in VARCHAR2,
214 X_INTEGRATOR_APP_ID in NUMBER,
215 X_INTEGRATOR_CODE in VARCHAR2,
216 X_STYLE in VARCHAR2,
217 X_STYLE_CLASS in VARCHAR2,
218 X_REPORTING_FLAG in VARCHAR2,
219 X_REPORTING_INTERFACE_APP_ID in NUMBER,
220 X_REPORTING_INTERFACE_CODE in VARCHAR2,
221 X_USER_NAME in VARCHAR2,
222 X_LAST_UPDATE_DATE in DATE,
223 X_LAST_UPDATED_BY in NUMBER,
224 X_LAST_UPDATE_LOGIN in NUMBER,
225 X_CREATE_DOC_LIST_APP_ID in NUMBER,
226 X_CREATE_DOC_LIST_CODE in VARCHAR2
227 ) is
228 begin
229 update BNE_LAYOUTS_B set
230 OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
231 STYLESHEET_APP_ID = X_STYLESHEET_APP_ID,
232 STYLESHEET_CODE = X_STYLESHEET_CODE,
233 INTEGRATOR_APP_ID = X_INTEGRATOR_APP_ID,
234 INTEGRATOR_CODE = X_INTEGRATOR_CODE,
235 STYLE = X_STYLE,
236 STYLE_CLASS = X_STYLE_CLASS,
237 REPORTING_FLAG = X_REPORTING_FLAG,
238 REPORTING_INTERFACE_APP_ID = X_REPORTING_INTERFACE_APP_ID,
239 REPORTING_INTERFACE_CODE = X_REPORTING_INTERFACE_CODE,
240 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
241 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
242 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
243 CREATE_DOC_LIST_APP_ID = X_CREATE_DOC_LIST_APP_ID,
244 CREATE_DOC_LIST_CODE = X_CREATE_DOC_LIST_CODE
245 where APPLICATION_ID = X_APPLICATION_ID
246 and LAYOUT_CODE = X_LAYOUT_CODE;
247
248 if (sql%notfound) then
249 raise no_data_found;
250 end if;
251
252 update BNE_LAYOUTS_TL set
253 USER_NAME = X_USER_NAME,
254 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
255 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
256 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
257 SOURCE_LANG = userenv('LANG')
258 where APPLICATION_ID = X_APPLICATION_ID
259 and LAYOUT_CODE = X_LAYOUT_CODE
260 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
261
262 if (sql%notfound) then
263 raise no_data_found;
264 end if;
265 end UPDATE_ROW;
266
267 procedure DELETE_ROW (
268 X_APPLICATION_ID in NUMBER,
269 X_LAYOUT_CODE in VARCHAR2
270 ) is
271 begin
272 delete from BNE_LAYOUTS_TL
273 where APPLICATION_ID = X_APPLICATION_ID
274 and LAYOUT_CODE = X_LAYOUT_CODE;
275
276 if (sql%notfound) then
277 raise no_data_found;
278 end if;
279
280 delete from BNE_LAYOUTS_B
281 where APPLICATION_ID = X_APPLICATION_ID
282 and LAYOUT_CODE = X_LAYOUT_CODE;
283
284 if (sql%notfound) then
285 raise no_data_found;
286 end if;
287 end DELETE_ROW;
288
289 procedure ADD_LANGUAGE
290 is
291 begin
292 delete from BNE_LAYOUTS_TL T
293 where not exists
294 (select NULL
295 from BNE_LAYOUTS_B B
296 where B.APPLICATION_ID = T.APPLICATION_ID
297 and B.LAYOUT_CODE = T.LAYOUT_CODE
298 );
299
300 update BNE_LAYOUTS_TL T set (
301 USER_NAME
302 ) = (select
303 B.USER_NAME
304 from BNE_LAYOUTS_TL B
305 where B.APPLICATION_ID = T.APPLICATION_ID
306 and B.LAYOUT_CODE = T.LAYOUT_CODE
307 and B.LANGUAGE = T.SOURCE_LANG)
308 where (
309 T.APPLICATION_ID,
310 T.LAYOUT_CODE,
311 T.LANGUAGE
312 ) in (select
313 SUBT.APPLICATION_ID,
314 SUBT.LAYOUT_CODE,
315 SUBT.LANGUAGE
316 from BNE_LAYOUTS_TL SUBB, BNE_LAYOUTS_TL SUBT
317 where SUBB.APPLICATION_ID = SUBT.APPLICATION_ID
318 and SUBB.LAYOUT_CODE = SUBT.LAYOUT_CODE
319 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
320 and (SUBB.USER_NAME <> SUBT.USER_NAME
321 ));
322
323 insert into BNE_LAYOUTS_TL (
324 APPLICATION_ID,
325 LAYOUT_CODE,
326 USER_NAME,
327 CREATED_BY,
328 CREATION_DATE,
329 LAST_UPDATED_BY,
330 LAST_UPDATE_LOGIN,
331 LAST_UPDATE_DATE,
332 LANGUAGE,
333 SOURCE_LANG
334 ) select
335 B.APPLICATION_ID,
336 B.LAYOUT_CODE,
337 B.USER_NAME,
338 B.CREATED_BY,
339 B.CREATION_DATE,
340 B.LAST_UPDATED_BY,
341 B.LAST_UPDATE_LOGIN,
342 B.LAST_UPDATE_DATE,
343 L.LANGUAGE_CODE,
344 B.SOURCE_LANG
345 from BNE_LAYOUTS_TL B, FND_LANGUAGES L
346 where L.INSTALLED_FLAG in ('I', 'B')
347 and B.LANGUAGE = userenv('LANG')
348 and not exists
349 (select NULL
350 from BNE_LAYOUTS_TL T
351 where T.APPLICATION_ID = B.APPLICATION_ID
352 and T.LAYOUT_CODE = B.LAYOUT_CODE
353 and T.LANGUAGE = L.LANGUAGE_CODE);
354 end ADD_LANGUAGE;
355
356 --------------------------------------------------------------------------------
357 -- PROCEDURE: TRANSLATE_ROW --
358 -- --
359 -- DESCRIPTION: Load a translation into the BNE_LAYOUTS entity. --
360 -- This proc is called from the apps loader. --
361 -- --
362 -- SEE: http://www-apps.us.oracle.com/atg/plans/r115/fndloadqr.txt --
363 -- --
364 -- --
365 -- MODIFICATION HISTORY --
366 -- Date Username Description --
367 -- 1-Oct-02 DGROVES CREATED --
368 --------------------------------------------------------------------------------
369
370 procedure TRANSLATE_ROW(
371 x_layout_asn in VARCHAR2,
372 x_layout_code in VARCHAR2,
373 x_user_name in VARCHAR2,
374 x_owner in VARCHAR2,
375 x_last_update_date in VARCHAR2,
376 x_custom_mode in VARCHAR2
377 )
378 is
379 l_app_id number;
380 f_luby number; -- entity owner in file
381 f_ludate date; -- entity update date in file
382 db_luby number; -- entity owner in db
383 db_ludate date; -- entity update date in db
384 begin
385 -- translate values to IDs
386 l_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_layout_asn);
387
388 -- Translate owner to file_last_updated_by
389 f_luby := fnd_load_util.owner_id(x_owner);
390
391 -- Translate char last_update_date to date
392 f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
393 begin
394 select LAST_UPDATED_BY, LAST_UPDATE_DATE
395 into db_luby, db_ludate
396 from BNE_LAYOUTS_TL
397 where APPLICATION_ID = l_app_id
398 and LAYOUT_CODE = x_layout_code
399 and LANGUAGE = userenv('LANG');
400
401 -- Test for customization and version
402 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
403 db_ludate, x_custom_mode)) then
404
405 update BNE_LAYOUTS_TL
406 set USER_NAME = x_user_name,
407 LAST_UPDATE_DATE = f_ludate,
408 LAST_UPDATED_BY = f_luby,
409 LAST_UPDATE_LOGIN = 0,
410 SOURCE_LANG = userenv('LANG')
411 where APPLICATION_ID = l_app_id
412 AND LAYOUT_CODE = x_layout_code
413 AND userenv('LANG') in (LANGUAGE, SOURCE_LANG)
414 ;
415 end if;
416 exception
417 when no_data_found then
418 -- Do not insert missing translations, skip this row
419 null;
420 end;
421 end TRANSLATE_ROW;
422
423
424 --------------------------------------------------------------------------------
425 -- PROCEDURE: LOAD_ROW --
426 -- --
427 -- DESCRIPTION: Load a row into the BNE_LAYOUTS entity. --
428 -- This proc is called from the apps loader. --
429 -- --
430 -- SEE: http://www-apps.us.oracle.com/atg/plans/r115/fndloadqr.txt --
431 -- --
432 -- --
433 -- MODIFICATION HISTORY --
434 -- Date Username Description --
435 -- 1-Oct-02 DGROVES CREATED --
436 --------------------------------------------------------------------------------
437 procedure LOAD_ROW(
438 x_layout_asn in VARCHAR2,
439 x_layout_code in VARCHAR2,
440 x_object_version_number in VARCHAR2,
441 x_stylesheet_asn in VARCHAR2,
442 x_stylesheet_code in VARCHAR2,
443 x_integrator_asn in VARCHAR2,
447 x_reporting_flag in VARCHAR2,
444 x_integrator_code in VARCHAR2,
445 x_style in VARCHAR2,
446 x_style_class in VARCHAR2,
448 x_reporting_interface_asn in VARCHAR2,
449 x_report_interface_code in VARCHAR2,
450 x_user_name in VARCHAR2,
451 x_owner in VARCHAR2,
452 x_last_update_date in VARCHAR2,
453 x_custom_mode in VARCHAR2,
454 x_create_doc_list_asn in VARCHAR2,
455 x_create_doc_list_code in VARCHAR2
456 )
457 is
458 l_app_id number;
459 l_stylesheet_app_id number;
460 l_integrator_app_id number;
461 l_reporting_interface_app_id number;
462 l_create_doc_list_app_id number;
463 l_row_id varchar2(64);
464 f_luby number; -- entity owner in file
465 f_ludate date; -- entity update date in file
466 db_luby number; -- entity owner in db
467 db_ludate date; -- entity update date in db
468 begin
469 -- translate values to IDs
470 l_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_layout_asn);
471 l_stylesheet_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_stylesheet_asn);
472 l_integrator_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_integrator_asn);
473 l_reporting_interface_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_reporting_interface_asn);
474 l_create_doc_list_app_id := BNE_LCT_TOOLS_PKG.ASN_TO_APP_ID(x_create_doc_list_asn);
475
476 -- Translate owner to file_last_updated_by
477 f_luby := fnd_load_util.owner_id(x_owner);
478
479 -- Translate char last_update_date to date
480 f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
481 begin
482 select LAST_UPDATED_BY, LAST_UPDATE_DATE
483 into db_luby, db_ludate
484 from BNE_LAYOUTS_B
485 where APPLICATION_ID = l_app_id
486 and LAYOUT_CODE = x_layout_code;
487
488 -- Test for customization and version
489 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
490 db_ludate, x_custom_mode)) then
491 -- Update existing row
492 BNE_LAYOUTS_PKG.Update_Row(
493 X_APPLICATION_ID => l_app_id,
494 X_LAYOUT_CODE => x_layout_code,
495 X_OBJECT_VERSION_NUMBER => x_object_version_number,
496 X_STYLESHEET_APP_ID => l_stylesheet_app_id,
497 X_STYLESHEET_CODE => x_stylesheet_code,
498 X_INTEGRATOR_APP_ID => l_integrator_app_id,
499 X_INTEGRATOR_CODE => x_integrator_code,
500 X_STYLE => x_style,
501 X_STYLE_CLASS => x_style_class,
502 X_REPORTING_FLAG => x_reporting_flag,
503 X_REPORTING_INTERFACE_APP_ID => l_reporting_interface_app_id,
504 X_REPORTING_INTERFACE_CODE => x_report_interface_code,
505 X_USER_NAME => x_user_name,
506 X_LAST_UPDATE_DATE => f_ludate,
507 X_LAST_UPDATED_BY => f_luby,
508 X_LAST_UPDATE_LOGIN => 0,
509 X_CREATE_DOC_LIST_APP_ID => l_create_doc_list_app_id,
510 X_CREATE_DOC_LIST_CODE => x_create_doc_list_code
511 );
512 end if;
513 exception
514 when no_data_found then
515 -- Record doesn't exist - insert in all cases
516 BNE_LAYOUTS_PKG.Insert_Row(
517 X_ROWID => l_row_id,
518 X_APPLICATION_ID => l_app_id,
519 X_LAYOUT_CODE => x_layout_code,
520 X_OBJECT_VERSION_NUMBER => x_object_version_number,
521 X_STYLESHEET_APP_ID => l_stylesheet_app_id,
522 X_STYLESHEET_CODE => x_stylesheet_code,
523 X_INTEGRATOR_APP_ID => l_integrator_app_id,
524 X_INTEGRATOR_CODE => x_integrator_code,
525 X_STYLE => x_style,
526 X_STYLE_CLASS => x_style_class,
527 X_REPORTING_FLAG => x_reporting_flag,
528 X_REPORTING_INTERFACE_APP_ID => l_reporting_interface_app_id,
529 X_REPORTING_INTERFACE_CODE => x_report_interface_code,
530 X_USER_NAME => x_user_name,
531 X_CREATION_DATE => f_ludate,
532 X_CREATED_BY => f_luby,
533 X_LAST_UPDATE_DATE => f_ludate,
534 X_LAST_UPDATED_BY => f_luby,
535 X_LAST_UPDATE_LOGIN => 0,
536 X_CREATE_DOC_LIST_APP_ID => l_create_doc_list_app_id,
537 X_CREATE_DOC_LIST_CODE => x_create_doc_list_code
538 );
539 end;
540 end LOAD_ROW;
541
542 end BNE_LAYOUTS_PKG;