[Home] [Help]
PACKAGE BODY: APPS.HR_WINDOW_PROPERTIES_PKG
Source
1 package body HR_WINDOW_PROPERTIES_PKG as
2 /* $Header: hrwnplct.pkb 115.5 2002/12/11 11:24:08 raranjan noship $ */
3 -- -----------------------------------------------------------------------------
4 -- |-----------------------------< update_copies >-----------------------------|
5 -- -----------------------------------------------------------------------------
6 procedure UPDATE_COPIES (
7 X_WINDOW_PROPERTY_ID in NUMBER,
8 X_FORM_WINDOW_ID in NUMBER,
9 X_TEMPLATE_WINDOW_ID in NUMBER,
10 X_HEIGHT in NUMBER,
11 X_WIDTH in NUMBER,
12 X_X_POSITION in NUMBER,
13 X_Y_POSITION in NUMBER,
14 X_TITLE in VARCHAR2,
15 X_INFORMATION_CATEGORY in VARCHAR2,
16 X_INFORMATION1 in VARCHAR2,
17 X_INFORMATION2 in VARCHAR2,
18 X_INFORMATION3 in VARCHAR2,
19 X_INFORMATION4 in VARCHAR2,
20 X_INFORMATION5 in VARCHAR2,
21 X_INFORMATION6 in VARCHAR2,
22 X_INFORMATION7 in VARCHAR2,
23 X_INFORMATION8 in VARCHAR2,
24 X_INFORMATION9 in VARCHAR2,
25 X_INFORMATION10 in VARCHAR2,
26 X_INFORMATION11 in VARCHAR2,
27 X_INFORMATION12 in VARCHAR2,
28 X_INFORMATION13 in VARCHAR2,
29 X_INFORMATION14 in VARCHAR2,
30 X_INFORMATION15 in VARCHAR2,
31 X_INFORMATION16 in VARCHAR2,
32 X_INFORMATION17 in VARCHAR2,
33 X_INFORMATION18 in VARCHAR2,
34 X_INFORMATION19 in VARCHAR2,
35 X_INFORMATION20 in VARCHAR2,
36 X_INFORMATION21 in VARCHAR2,
37 X_INFORMATION22 in VARCHAR2,
38 X_INFORMATION23 in VARCHAR2,
39 X_INFORMATION24 in VARCHAR2,
40 X_INFORMATION25 in VARCHAR2,
41 X_INFORMATION26 in VARCHAR2,
42 X_INFORMATION27 in VARCHAR2,
43 X_INFORMATION28 in VARCHAR2,
44 X_INFORMATION29 in VARCHAR2,
45 X_INFORMATION30 in VARCHAR2,
46 X_LAST_UPDATE_DATE in DATE,
47 X_LAST_UPDATED_BY in NUMBER,
48 X_LAST_UPDATE_LOGIN in NUMBER
49 ) is
50 cursor csr_original is
51 select *
52 from HR_WINDOW_PROPERTIES_VL
53 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID;
54 l_original csr_original%rowtype;
55 cursor csr_copies is
56 select wnp.window_property_id
57 from HR_WINDOW_PROPERTIES_B wnp
58 ,HR_TEMPLATE_WINDOWS_B twn
59 ,HR_TEMPLATE_WINDOWS_B two
60 where wnp.TEMPLATE_WINDOW_ID = twn.TEMPLATE_WINDOW_ID
61 and twn.FORM_TEMPLATE_ID in (select sft.FORM_TEMPLATE_ID_TO
62 from HR_SOURCE_FORM_TEMPLATES sft
63 start with sft.FORM_TEMPLATE_ID_FROM = two.FORM_TEMPLATE_ID
64 connect by sft.FORM_TEMPLATE_ID_FROM = prior sft.FORM_TEMPLATE_ID_TO)
65 and twn.FORM_WINDOW_ID = two.FORM_WINDOW_ID
66 and two.TEMPLATE_WINDOW_ID = X_TEMPLATE_WINDOW_ID;
67 begin
68 if (X_TEMPLATE_WINDOW_ID is not null) then
69 open csr_original;
70 fetch csr_original into l_original;
71 if csr_original%found then
72 close csr_original;
73 for l_copy in csr_copies loop
74 update HR_WINDOW_PROPERTIES_B set
75 HEIGHT = decode(nvl(HEIGHT,hr_api.g_number),nvl(l_original.HEIGHT,hr_api.g_number),X_HEIGHT,HEIGHT),
76 WIDTH = decode(nvl(WIDTH,hr_api.g_number),nvl(l_original.WIDTH,hr_api.g_number),X_WIDTH,WIDTH),
77 X_POSITION = decode(nvl(X_POSITION,hr_api.g_number),nvl(l_original.X_POSITION,hr_api.g_number),X_X_POSITION,X_POSITION),
78 Y_POSITION = decode(nvl(Y_POSITION,hr_api.g_number),nvl(l_original.Y_POSITION,hr_api.g_number),X_Y_POSITION,Y_POSITION),
79 INFORMATION_CATEGORY = decode(nvl(INFORMATION_CATEGORY,hr_api.g_varchar2),nvl(l_original.INFORMATION_CATEGORY,hr_api.g_varchar2),X_INFORMATION_CATEGORY,INFORMATION_CATEGORY),
80 INFORMATION1 = decode(nvl(INFORMATION1 ,hr_api.g_varchar2),nvl(l_original.INFORMATION1 ,hr_api.g_varchar2),X_INFORMATION1 ,INFORMATION1 ),
81 INFORMATION2 = decode(nvl(INFORMATION2 ,hr_api.g_varchar2),nvl(l_original.INFORMATION2 ,hr_api.g_varchar2),X_INFORMATION2 ,INFORMATION2 ),
82 INFORMATION3 = decode(nvl(INFORMATION3 ,hr_api.g_varchar2),nvl(l_original.INFORMATION3 ,hr_api.g_varchar2),X_INFORMATION3 ,INFORMATION3 ),
83 INFORMATION4 = decode(nvl(INFORMATION4 ,hr_api.g_varchar2),nvl(l_original.INFORMATION4 ,hr_api.g_varchar2),X_INFORMATION4 ,INFORMATION4 ),
84 INFORMATION5 = decode(nvl(INFORMATION5 ,hr_api.g_varchar2),nvl(l_original.INFORMATION5 ,hr_api.g_varchar2),X_INFORMATION5 ,INFORMATION5 ),
85 INFORMATION6 = decode(nvl(INFORMATION6 ,hr_api.g_varchar2),nvl(l_original.INFORMATION6 ,hr_api.g_varchar2),X_INFORMATION6 ,INFORMATION6 ),
86 INFORMATION7 = decode(nvl(INFORMATION7 ,hr_api.g_varchar2),nvl(l_original.INFORMATION7 ,hr_api.g_varchar2),X_INFORMATION7 ,INFORMATION7 ),
87 INFORMATION8 = decode(nvl(INFORMATION8 ,hr_api.g_varchar2),nvl(l_original.INFORMATION8 ,hr_api.g_varchar2),X_INFORMATION8 ,INFORMATION8 ),
88 INFORMATION9 = decode(nvl(INFORMATION9 ,hr_api.g_varchar2),nvl(l_original.INFORMATION9 ,hr_api.g_varchar2),X_INFORMATION9 ,INFORMATION9 ),
89 INFORMATION10 = decode(nvl(INFORMATION10,hr_api.g_varchar2),nvl(l_original.INFORMATION10,hr_api.g_varchar2),X_INFORMATION10,INFORMATION10),
90 INFORMATION11 = decode(nvl(INFORMATION11,hr_api.g_varchar2),nvl(l_original.INFORMATION11,hr_api.g_varchar2),X_INFORMATION11,INFORMATION11),
91 INFORMATION12 = decode(nvl(INFORMATION12,hr_api.g_varchar2),nvl(l_original.INFORMATION12,hr_api.g_varchar2),X_INFORMATION12,INFORMATION12),
92 INFORMATION13 = decode(nvl(INFORMATION13,hr_api.g_varchar2),nvl(l_original.INFORMATION13,hr_api.g_varchar2),X_INFORMATION13,INFORMATION13),
93 INFORMATION14 = decode(nvl(INFORMATION14,hr_api.g_varchar2),nvl(l_original.INFORMATION14,hr_api.g_varchar2),X_INFORMATION14,INFORMATION14),
94 INFORMATION15 = decode(nvl(INFORMATION15,hr_api.g_varchar2),nvl(l_original.INFORMATION15,hr_api.g_varchar2),X_INFORMATION15,INFORMATION15),
95 INFORMATION16 = decode(nvl(INFORMATION16,hr_api.g_varchar2),nvl(l_original.INFORMATION16,hr_api.g_varchar2),X_INFORMATION16,INFORMATION16),
96 INFORMATION17 = decode(nvl(INFORMATION17,hr_api.g_varchar2),nvl(l_original.INFORMATION17,hr_api.g_varchar2),X_INFORMATION17,INFORMATION17),
97 INFORMATION18 = decode(nvl(INFORMATION18,hr_api.g_varchar2),nvl(l_original.INFORMATION18,hr_api.g_varchar2),X_INFORMATION18,INFORMATION18),
98 INFORMATION19 = decode(nvl(INFORMATION19,hr_api.g_varchar2),nvl(l_original.INFORMATION19,hr_api.g_varchar2),X_INFORMATION19,INFORMATION19),
99 INFORMATION20 = decode(nvl(INFORMATION20,hr_api.g_varchar2),nvl(l_original.INFORMATION20,hr_api.g_varchar2),X_INFORMATION20,INFORMATION20),
100 INFORMATION21 = decode(nvl(INFORMATION21,hr_api.g_varchar2),nvl(l_original.INFORMATION21,hr_api.g_varchar2),X_INFORMATION21,INFORMATION21),
101 INFORMATION22 = decode(nvl(INFORMATION22,hr_api.g_varchar2),nvl(l_original.INFORMATION22,hr_api.g_varchar2),X_INFORMATION22,INFORMATION22),
102 INFORMATION23 = decode(nvl(INFORMATION23,hr_api.g_varchar2),nvl(l_original.INFORMATION23,hr_api.g_varchar2),X_INFORMATION23,INFORMATION23),
103 INFORMATION24 = decode(nvl(INFORMATION24,hr_api.g_varchar2),nvl(l_original.INFORMATION24,hr_api.g_varchar2),X_INFORMATION24,INFORMATION24),
104 INFORMATION25 = decode(nvl(INFORMATION25,hr_api.g_varchar2),nvl(l_original.INFORMATION25,hr_api.g_varchar2),X_INFORMATION25,INFORMATION25),
105 INFORMATION26 = decode(nvl(INFORMATION26,hr_api.g_varchar2),nvl(l_original.INFORMATION26,hr_api.g_varchar2),X_INFORMATION26,INFORMATION26),
106 INFORMATION27 = decode(nvl(INFORMATION27,hr_api.g_varchar2),nvl(l_original.INFORMATION27,hr_api.g_varchar2),X_INFORMATION27,INFORMATION27),
107 INFORMATION28 = decode(nvl(INFORMATION28,hr_api.g_varchar2),nvl(l_original.INFORMATION28,hr_api.g_varchar2),X_INFORMATION28,INFORMATION28),
108 INFORMATION29 = decode(nvl(INFORMATION29,hr_api.g_varchar2),nvl(l_original.INFORMATION29,hr_api.g_varchar2),X_INFORMATION29,INFORMATION29),
109 INFORMATION30 = decode(nvl(INFORMATION30,hr_api.g_varchar2),nvl(l_original.INFORMATION30,hr_api.g_varchar2),X_INFORMATION30,INFORMATION30),
110 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
111 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
112 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
113 where WINDOW_PROPERTY_ID = l_copy.WINDOW_PROPERTY_ID;
114 if (sql%notfound) then
115 raise no_data_found;
116 end if;
117 update HR_WINDOW_PROPERTIES_TL set
118 TITLE = decode(nvl(TITLE,hr_api.g_varchar2),nvl(l_original.TITLE,hr_api.g_varchar2),X_TITLE,TITLE),
119 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
120 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
121 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
122 SOURCE_LANG = userenv('LANG')
123 where WINDOW_PROPERTY_ID = l_copy.WINDOW_PROPERTY_ID
124 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
125 if (sql%notfound) then
126 raise no_data_found;
127 end if;
128 end loop;
129 else
130 close csr_original;
131 end if;
132 end if;
133 end UPDATE_COPIES;
134 --
135 procedure OWNER_TO_WHO (
136 X_OWNER in VARCHAR2,
137 X_CREATION_DATE out nocopy DATE,
138 X_CREATED_BY out nocopy NUMBER,
139 X_LAST_UPDATE_DATE out nocopy DATE,
140 X_LAST_UPDATED_BY out nocopy NUMBER,
141 X_LAST_UPDATE_LOGIN out nocopy NUMBER
142 ) is
143 begin
144 if X_OWNER = 'SEED' then
145 X_CREATED_BY := 1;
146 X_LAST_UPDATED_BY := 1;
147 else
148 X_CREATED_BY := 0;
149 X_LAST_UPDATED_BY := 0;
150 end if;
151 X_CREATION_DATE := sysdate;
152 X_LAST_UPDATE_DATE := sysdate;
153 X_LAST_UPDATE_LOGIN := 0;
154 end OWNER_TO_WHO;
155 procedure INSERT_ROW (
156 X_ROWID in out nocopy VARCHAR2,
157 X_WINDOW_PROPERTY_ID in NUMBER,
158 X_INFORMATION17 in VARCHAR2,
159 X_INFORMATION18 in VARCHAR2,
160 X_INFORMATION19 in VARCHAR2,
161 X_INFORMATION20 in VARCHAR2,
162 X_INFORMATION21 in VARCHAR2,
163 X_INFORMATION22 in VARCHAR2,
164 X_INFORMATION23 in VARCHAR2,
165 X_INFORMATION24 in VARCHAR2,
166 X_INFORMATION25 in VARCHAR2,
167 X_INFORMATION26 in VARCHAR2,
168 X_INFORMATION27 in VARCHAR2,
169 X_INFORMATION28 in VARCHAR2,
170 X_INFORMATION29 in VARCHAR2,
171 X_INFORMATION30 in VARCHAR2,
172 X_X_POSITION in NUMBER,
173 X_FORM_WINDOW_ID in NUMBER,
174 X_TEMPLATE_WINDOW_ID in NUMBER,
175 X_HEIGHT in NUMBER,
176 X_WIDTH in NUMBER,
177 X_INFORMATION12 in VARCHAR2,
178 X_INFORMATION13 in VARCHAR2,
179 X_INFORMATION14 in VARCHAR2,
180 X_INFORMATION15 in VARCHAR2,
181 X_INFORMATION16 in VARCHAR2,
182 X_INFORMATION5 in VARCHAR2,
183 X_INFORMATION6 in VARCHAR2,
184 X_INFORMATION7 in VARCHAR2,
185 X_INFORMATION8 in VARCHAR2,
186 X_INFORMATION9 in VARCHAR2,
187 X_INFORMATION10 in VARCHAR2,
188 X_INFORMATION11 in VARCHAR2,
189 X_Y_POSITION in NUMBER,
190 X_INFORMATION_CATEGORY in VARCHAR2,
191 X_INFORMATION1 in VARCHAR2,
192 X_INFORMATION2 in VARCHAR2,
193 X_INFORMATION3 in VARCHAR2,
194 X_INFORMATION4 in VARCHAR2,
195 X_TITLE in VARCHAR2,
196 X_CREATION_DATE in DATE,
197 X_CREATED_BY in NUMBER,
198 X_LAST_UPDATE_DATE in DATE,
199 X_LAST_UPDATED_BY in NUMBER,
200 X_LAST_UPDATE_LOGIN in NUMBER
201 ) is
202 cursor C is select ROWID from HR_WINDOW_PROPERTIES_B
203 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID
204 ;
205 begin
206 insert into HR_WINDOW_PROPERTIES_B (
207 INFORMATION17,
208 INFORMATION18,
209 INFORMATION19,
210 INFORMATION20,
211 INFORMATION21,
212 INFORMATION22,
213 INFORMATION23,
214 INFORMATION24,
215 INFORMATION25,
216 INFORMATION26,
217 INFORMATION27,
218 INFORMATION28,
219 INFORMATION29,
220 INFORMATION30,
221 X_POSITION,
222 FORM_WINDOW_ID,
223 TEMPLATE_WINDOW_ID,
224 HEIGHT,
225 WIDTH,
226 INFORMATION12,
227 INFORMATION13,
228 INFORMATION14,
229 INFORMATION15,
230 INFORMATION16,
231 WINDOW_PROPERTY_ID,
232 INFORMATION5,
233 INFORMATION6,
234 INFORMATION7,
235 INFORMATION8,
236 INFORMATION9,
237 INFORMATION10,
238 INFORMATION11,
239 Y_POSITION,
240 INFORMATION_CATEGORY,
241 INFORMATION1,
242 INFORMATION2,
243 INFORMATION3,
244 INFORMATION4,
245 CREATION_DATE,
246 CREATED_BY,
247 LAST_UPDATE_DATE,
248 LAST_UPDATED_BY,
249 LAST_UPDATE_LOGIN
250 ) values (
251 X_INFORMATION17,
252 X_INFORMATION18,
253 X_INFORMATION19,
254 X_INFORMATION20,
255 X_INFORMATION21,
256 X_INFORMATION22,
257 X_INFORMATION23,
258 X_INFORMATION24,
259 X_INFORMATION25,
260 X_INFORMATION26,
261 X_INFORMATION27,
262 X_INFORMATION28,
263 X_INFORMATION29,
264 X_INFORMATION30,
265 X_X_POSITION,
266 X_FORM_WINDOW_ID,
267 X_TEMPLATE_WINDOW_ID,
268 X_HEIGHT,
269 X_WIDTH,
270 X_INFORMATION12,
271 X_INFORMATION13,
272 X_INFORMATION14,
273 X_INFORMATION15,
274 X_INFORMATION16,
275 X_WINDOW_PROPERTY_ID,
276 X_INFORMATION5,
277 X_INFORMATION6,
278 X_INFORMATION7,
279 X_INFORMATION8,
280 X_INFORMATION9,
281 X_INFORMATION10,
282 X_INFORMATION11,
283 X_Y_POSITION,
284 X_INFORMATION_CATEGORY,
285 X_INFORMATION1,
286 X_INFORMATION2,
287 X_INFORMATION3,
288 X_INFORMATION4,
289 X_CREATION_DATE,
290 X_CREATED_BY,
291 X_LAST_UPDATE_DATE,
292 X_LAST_UPDATED_BY,
293 X_LAST_UPDATE_LOGIN
294 );
295
296 insert into HR_WINDOW_PROPERTIES_TL (
297 WINDOW_PROPERTY_ID,
298 TITLE,
299 LAST_UPDATE_DATE,
300 LAST_UPDATED_BY,
301 LAST_UPDATE_LOGIN,
302 CREATED_BY,
303 CREATION_DATE,
304 LANGUAGE,
305 SOURCE_LANG
306 ) select
307 X_WINDOW_PROPERTY_ID,
308 X_TITLE,
309 X_LAST_UPDATE_DATE,
310 X_LAST_UPDATED_BY,
311 X_LAST_UPDATE_LOGIN,
312 X_CREATED_BY,
313 X_CREATION_DATE,
314 L.LANGUAGE_CODE,
315 userenv('LANG')
316 from FND_LANGUAGES L
317 where L.INSTALLED_FLAG in ('I', 'B')
318 and not exists
319 (select NULL
320 from HR_WINDOW_PROPERTIES_TL T
321 where T.WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID
322 and T.LANGUAGE = L.LANGUAGE_CODE);
323
324 open c;
325 fetch c into X_ROWID;
326 if (c%notfound) then
327 close c;
328 raise no_data_found;
329 end if;
330 close c;
331
332 end INSERT_ROW;
333
334 procedure LOCK_ROW (
335 X_WINDOW_PROPERTY_ID in NUMBER,
336 X_INFORMATION17 in VARCHAR2,
337 X_INFORMATION18 in VARCHAR2,
338 X_INFORMATION19 in VARCHAR2,
339 X_INFORMATION20 in VARCHAR2,
340 X_INFORMATION21 in VARCHAR2,
341 X_INFORMATION22 in VARCHAR2,
342 X_INFORMATION23 in VARCHAR2,
343 X_INFORMATION24 in VARCHAR2,
344 X_INFORMATION25 in VARCHAR2,
345 X_INFORMATION26 in VARCHAR2,
346 X_INFORMATION27 in VARCHAR2,
347 X_INFORMATION28 in VARCHAR2,
348 X_INFORMATION29 in VARCHAR2,
349 X_INFORMATION30 in VARCHAR2,
350 X_X_POSITION in NUMBER,
351 X_FORM_WINDOW_ID in NUMBER,
352 X_TEMPLATE_WINDOW_ID in NUMBER,
353 X_HEIGHT in NUMBER,
354 X_WIDTH in NUMBER,
355 X_INFORMATION12 in VARCHAR2,
356 X_INFORMATION13 in VARCHAR2,
357 X_INFORMATION14 in VARCHAR2,
358 X_INFORMATION15 in VARCHAR2,
359 X_INFORMATION16 in VARCHAR2,
360 X_INFORMATION5 in VARCHAR2,
361 X_INFORMATION6 in VARCHAR2,
362 X_INFORMATION7 in VARCHAR2,
363 X_INFORMATION8 in VARCHAR2,
364 X_INFORMATION9 in VARCHAR2,
365 X_INFORMATION10 in VARCHAR2,
366 X_INFORMATION11 in VARCHAR2,
367 X_Y_POSITION in NUMBER,
368 X_INFORMATION_CATEGORY in VARCHAR2,
369 X_INFORMATION1 in VARCHAR2,
370 X_INFORMATION2 in VARCHAR2,
371 X_INFORMATION3 in VARCHAR2,
372 X_INFORMATION4 in VARCHAR2,
373 X_TITLE in VARCHAR2
374 ) is
375 cursor c is select
376 INFORMATION17,
377 INFORMATION18,
378 INFORMATION19,
379 INFORMATION20,
380 INFORMATION21,
381 INFORMATION22,
382 INFORMATION23,
383 INFORMATION24,
384 INFORMATION25,
385 INFORMATION26,
386 INFORMATION27,
387 INFORMATION28,
388 INFORMATION29,
389 INFORMATION30,
390 X_POSITION,
391 FORM_WINDOW_ID,
392 TEMPLATE_WINDOW_ID,
393 HEIGHT,
394 WIDTH,
395 INFORMATION12,
396 INFORMATION13,
397 INFORMATION14,
398 INFORMATION15,
399 INFORMATION16,
400 INFORMATION5,
401 INFORMATION6,
402 INFORMATION7,
403 INFORMATION8,
404 INFORMATION9,
405 INFORMATION10,
406 INFORMATION11,
407 Y_POSITION,
408 INFORMATION_CATEGORY,
409 INFORMATION1,
410 INFORMATION2,
411 INFORMATION3,
412 INFORMATION4
413 from HR_WINDOW_PROPERTIES_B
414 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID
415 for update of WINDOW_PROPERTY_ID nowait;
416 recinfo c%rowtype;
417
418 cursor c1 is select
419 TITLE,
420 decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
421 from HR_WINDOW_PROPERTIES_TL
422 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID
423 and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
424 for update of WINDOW_PROPERTY_ID nowait;
425 begin
426 open c;
427 fetch c into recinfo;
428 if (c%notfound) then
429 close c;
430 fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
431 app_exception.raise_exception;
432 end if;
433 close c;
434 if ( ((recinfo.INFORMATION17 = X_INFORMATION17)
435 OR ((recinfo.INFORMATION17 is null) AND (X_INFORMATION17 is null)))
436 AND ((recinfo.INFORMATION18 = X_INFORMATION18)
437 OR ((recinfo.INFORMATION18 is null) AND (X_INFORMATION18 is null)))
438 AND ((recinfo.INFORMATION19 = X_INFORMATION19)
439 OR ((recinfo.INFORMATION19 is null) AND (X_INFORMATION19 is null)))
440 AND ((recinfo.INFORMATION20 = X_INFORMATION20)
441 OR ((recinfo.INFORMATION20 is null) AND (X_INFORMATION20 is null)))
442 AND ((recinfo.INFORMATION21 = X_INFORMATION21)
443 OR ((recinfo.INFORMATION21 is null) AND (X_INFORMATION21 is null)))
444 AND ((recinfo.INFORMATION22 = X_INFORMATION22)
445 OR ((recinfo.INFORMATION22 is null) AND (X_INFORMATION22 is null)))
446 AND ((recinfo.INFORMATION23 = X_INFORMATION23)
447 OR ((recinfo.INFORMATION23 is null) AND (X_INFORMATION23 is null)))
448 AND ((recinfo.INFORMATION24 = X_INFORMATION24)
449 OR ((recinfo.INFORMATION24 is null) AND (X_INFORMATION24 is null)))
450 AND ((recinfo.INFORMATION25 = X_INFORMATION25)
451 OR ((recinfo.INFORMATION25 is null) AND (X_INFORMATION25 is null)))
452 AND ((recinfo.INFORMATION26 = X_INFORMATION26)
453 OR ((recinfo.INFORMATION26 is null) AND (X_INFORMATION26 is null)))
454 AND ((recinfo.INFORMATION27 = X_INFORMATION27)
455 OR ((recinfo.INFORMATION27 is null) AND (X_INFORMATION27 is null)))
456 AND ((recinfo.INFORMATION28 = X_INFORMATION28)
457 OR ((recinfo.INFORMATION28 is null) AND (X_INFORMATION28 is null)))
458 AND ((recinfo.INFORMATION29 = X_INFORMATION29)
459 OR ((recinfo.INFORMATION29 is null) AND (X_INFORMATION29 is null)))
460 AND ((recinfo.INFORMATION30 = X_INFORMATION30)
461 OR ((recinfo.INFORMATION30 is null) AND (X_INFORMATION30 is null)))
462 AND ((recinfo.X_POSITION = X_X_POSITION)
463 OR ((recinfo.X_POSITION is null) AND (X_X_POSITION is null)))
464 AND ((recinfo.FORM_WINDOW_ID = X_FORM_WINDOW_ID)
465 OR ((recinfo.FORM_WINDOW_ID is null) AND (X_FORM_WINDOW_ID is null)))
466 AND ((recinfo.TEMPLATE_WINDOW_ID = X_TEMPLATE_WINDOW_ID)
467 OR ((recinfo.TEMPLATE_WINDOW_ID is null) AND (X_TEMPLATE_WINDOW_ID is null)))
468 AND ((recinfo.HEIGHT = X_HEIGHT)
469 OR ((recinfo.HEIGHT is null) AND (X_HEIGHT is null)))
470 AND ((recinfo.WIDTH = X_WIDTH)
471 OR ((recinfo.WIDTH is null) AND (X_WIDTH is null)))
472 AND ((recinfo.INFORMATION12 = X_INFORMATION12)
473 OR ((recinfo.INFORMATION12 is null) AND (X_INFORMATION12 is null)))
474 AND ((recinfo.INFORMATION13 = X_INFORMATION13)
475 OR ((recinfo.INFORMATION13 is null) AND (X_INFORMATION13 is null)))
476 AND ((recinfo.INFORMATION14 = X_INFORMATION14)
477 OR ((recinfo.INFORMATION14 is null) AND (X_INFORMATION14 is null)))
478 AND ((recinfo.INFORMATION15 = X_INFORMATION15)
479 OR ((recinfo.INFORMATION15 is null) AND (X_INFORMATION15 is null)))
480 AND ((recinfo.INFORMATION16 = X_INFORMATION16)
481 OR ((recinfo.INFORMATION16 is null) AND (X_INFORMATION16 is null)))
482 AND ((recinfo.INFORMATION5 = X_INFORMATION5)
483 OR ((recinfo.INFORMATION5 is null) AND (X_INFORMATION5 is null)))
484 AND ((recinfo.INFORMATION6 = X_INFORMATION6)
485 OR ((recinfo.INFORMATION6 is null) AND (X_INFORMATION6 is null)))
486 AND ((recinfo.INFORMATION7 = X_INFORMATION7)
487 OR ((recinfo.INFORMATION7 is null) AND (X_INFORMATION7 is null)))
488 AND ((recinfo.INFORMATION8 = X_INFORMATION8)
489 OR ((recinfo.INFORMATION8 is null) AND (X_INFORMATION8 is null)))
490 AND ((recinfo.INFORMATION9 = X_INFORMATION9)
491 OR ((recinfo.INFORMATION9 is null) AND (X_INFORMATION9 is null)))
492 AND ((recinfo.INFORMATION10 = X_INFORMATION10)
493 OR ((recinfo.INFORMATION10 is null) AND (X_INFORMATION10 is null)))
494 AND ((recinfo.INFORMATION11 = X_INFORMATION11)
495 OR ((recinfo.INFORMATION11 is null) AND (X_INFORMATION11 is null)))
496 AND ((recinfo.Y_POSITION = X_Y_POSITION)
497 OR ((recinfo.Y_POSITION is null) AND (X_Y_POSITION is null)))
498 AND ((recinfo.INFORMATION_CATEGORY = X_INFORMATION_CATEGORY)
499 OR ((recinfo.INFORMATION_CATEGORY is null) AND (X_INFORMATION_CATEGORY is null)))
500 AND ((recinfo.INFORMATION1 = X_INFORMATION1)
501 OR ((recinfo.INFORMATION1 is null) AND (X_INFORMATION1 is null)))
502 AND ((recinfo.INFORMATION2 = X_INFORMATION2)
503 OR ((recinfo.INFORMATION2 is null) AND (X_INFORMATION2 is null)))
504 AND ((recinfo.INFORMATION3 = X_INFORMATION3)
505 OR ((recinfo.INFORMATION3 is null) AND (X_INFORMATION3 is null)))
506 AND ((recinfo.INFORMATION4 = X_INFORMATION4)
507 OR ((recinfo.INFORMATION4 is null) AND (X_INFORMATION4 is null)))
508 ) then
509 null;
510 else
511 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
512 app_exception.raise_exception;
513 end if;
514
515 for tlinfo in c1 loop
516 if (tlinfo.BASELANG = 'Y') then
517 if ( ((tlinfo.TITLE = X_TITLE)
518 OR ((tlinfo.TITLE is null) AND (X_TITLE is null)))
519 ) then
520 null;
521 else
522 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
523 app_exception.raise_exception;
524 end if;
525 end if;
526 end loop;
527 return;
528 end LOCK_ROW;
529
530 procedure UPDATE_ROW (
531 X_WINDOW_PROPERTY_ID in NUMBER,
532 X_INFORMATION17 in VARCHAR2,
533 X_INFORMATION18 in VARCHAR2,
534 X_INFORMATION19 in VARCHAR2,
535 X_INFORMATION20 in VARCHAR2,
536 X_INFORMATION21 in VARCHAR2,
537 X_INFORMATION22 in VARCHAR2,
538 X_INFORMATION23 in VARCHAR2,
539 X_INFORMATION24 in VARCHAR2,
540 X_INFORMATION25 in VARCHAR2,
541 X_INFORMATION26 in VARCHAR2,
542 X_INFORMATION27 in VARCHAR2,
543 X_INFORMATION28 in VARCHAR2,
544 X_INFORMATION29 in VARCHAR2,
545 X_INFORMATION30 in VARCHAR2,
546 X_X_POSITION in NUMBER,
547 X_FORM_WINDOW_ID in NUMBER,
548 X_TEMPLATE_WINDOW_ID in NUMBER,
549 X_HEIGHT in NUMBER,
550 X_WIDTH in NUMBER,
551 X_INFORMATION12 in VARCHAR2,
552 X_INFORMATION13 in VARCHAR2,
553 X_INFORMATION14 in VARCHAR2,
554 X_INFORMATION15 in VARCHAR2,
555 X_INFORMATION16 in VARCHAR2,
556 X_INFORMATION5 in VARCHAR2,
557 X_INFORMATION6 in VARCHAR2,
558 X_INFORMATION7 in VARCHAR2,
559 X_INFORMATION8 in VARCHAR2,
560 X_INFORMATION9 in VARCHAR2,
561 X_INFORMATION10 in VARCHAR2,
562 X_INFORMATION11 in VARCHAR2,
563 X_Y_POSITION in NUMBER,
564 X_INFORMATION_CATEGORY in VARCHAR2,
565 X_INFORMATION1 in VARCHAR2,
566 X_INFORMATION2 in VARCHAR2,
567 X_INFORMATION3 in VARCHAR2,
568 X_INFORMATION4 in VARCHAR2,
569 X_TITLE in VARCHAR2,
570 X_LAST_UPDATE_DATE in DATE,
571 X_LAST_UPDATED_BY in NUMBER,
572 X_LAST_UPDATE_LOGIN in NUMBER
573 ) is
574 begin
575 update HR_WINDOW_PROPERTIES_B set
576 INFORMATION17 = X_INFORMATION17,
577 INFORMATION18 = X_INFORMATION18,
578 INFORMATION19 = X_INFORMATION19,
579 INFORMATION20 = X_INFORMATION20,
580 INFORMATION21 = X_INFORMATION21,
581 INFORMATION22 = X_INFORMATION22,
582 INFORMATION23 = X_INFORMATION23,
583 INFORMATION24 = X_INFORMATION24,
584 INFORMATION25 = X_INFORMATION25,
585 INFORMATION26 = X_INFORMATION26,
586 INFORMATION27 = X_INFORMATION27,
587 INFORMATION28 = X_INFORMATION28,
588 INFORMATION29 = X_INFORMATION29,
589 INFORMATION30 = X_INFORMATION30,
590 X_POSITION = X_X_POSITION,
591 FORM_WINDOW_ID = X_FORM_WINDOW_ID,
592 TEMPLATE_WINDOW_ID = X_TEMPLATE_WINDOW_ID,
593 HEIGHT = X_HEIGHT,
594 WIDTH = X_WIDTH,
595 INFORMATION12 = X_INFORMATION12,
596 INFORMATION13 = X_INFORMATION13,
597 INFORMATION14 = X_INFORMATION14,
598 INFORMATION15 = X_INFORMATION15,
599 INFORMATION16 = X_INFORMATION16,
600 INFORMATION5 = X_INFORMATION5,
601 INFORMATION6 = X_INFORMATION6,
602 INFORMATION7 = X_INFORMATION7,
603 INFORMATION8 = X_INFORMATION8,
604 INFORMATION9 = X_INFORMATION9,
605 INFORMATION10 = X_INFORMATION10,
606 INFORMATION11 = X_INFORMATION11,
607 Y_POSITION = X_Y_POSITION,
608 INFORMATION_CATEGORY = X_INFORMATION_CATEGORY,
609 INFORMATION1 = X_INFORMATION1,
610 INFORMATION2 = X_INFORMATION2,
611 INFORMATION3 = X_INFORMATION3,
612 INFORMATION4 = X_INFORMATION4,
613 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
614 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
615 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
616 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID;
617
618 if (sql%notfound) then
619 raise no_data_found;
620 end if;
621
622 update HR_WINDOW_PROPERTIES_TL set
623 TITLE = X_TITLE,
624 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
625 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
626 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
627 SOURCE_LANG = userenv('LANG')
628 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID
629 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
630
631 if (sql%notfound) then
632 raise no_data_found;
633 end if;
634 end UPDATE_ROW;
635
636 procedure DELETE_ROW (
637 X_WINDOW_PROPERTY_ID in NUMBER
638 ) is
639 begin
640 delete from HR_WINDOW_PROPERTIES_TL
641 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID;
642
643 if (sql%notfound) then
644 raise no_data_found;
645 end if;
646
647 delete from HR_WINDOW_PROPERTIES_B
648 where WINDOW_PROPERTY_ID = X_WINDOW_PROPERTY_ID;
649
650 if (sql%notfound) then
651 raise no_data_found;
652 end if;
653 end DELETE_ROW;
654
655 procedure ADD_LANGUAGE
656 is
657 begin
658 delete from HR_WINDOW_PROPERTIES_TL T
659 where not exists
660 (select NULL
661 from HR_WINDOW_PROPERTIES_B B
662 where B.WINDOW_PROPERTY_ID = T.WINDOW_PROPERTY_ID
663 );
664
665 update HR_WINDOW_PROPERTIES_TL T set (
666 TITLE
667 ) = (select
668 B.TITLE
669 from HR_WINDOW_PROPERTIES_TL B
670 where B.WINDOW_PROPERTY_ID = T.WINDOW_PROPERTY_ID
671 and B.LANGUAGE = T.SOURCE_LANG)
672 where (
673 T.WINDOW_PROPERTY_ID,
674 T.LANGUAGE
675 ) in (select
676 SUBT.WINDOW_PROPERTY_ID,
677 SUBT.LANGUAGE
678 from HR_WINDOW_PROPERTIES_TL SUBB, HR_WINDOW_PROPERTIES_TL SUBT
679 where SUBB.WINDOW_PROPERTY_ID = SUBT.WINDOW_PROPERTY_ID
680 and SUBB.LANGUAGE = SUBT.SOURCE_LANG
681 and (SUBB.TITLE <> SUBT.TITLE
682 or (SUBB.TITLE is null and SUBT.TITLE is not null)
683 or (SUBB.TITLE is not null and SUBT.TITLE is null)
684 ));
685
686 insert into HR_WINDOW_PROPERTIES_TL (
687 WINDOW_PROPERTY_ID,
688 TITLE,
689 LAST_UPDATE_DATE,
690 LAST_UPDATED_BY,
691 LAST_UPDATE_LOGIN,
692 CREATED_BY,
693 CREATION_DATE,
694 LANGUAGE,
695 SOURCE_LANG
696 ) select
697 B.WINDOW_PROPERTY_ID,
698 B.TITLE,
699 B.LAST_UPDATE_DATE,
700 B.LAST_UPDATED_BY,
701 B.LAST_UPDATE_LOGIN,
702 B.CREATED_BY,
703 B.CREATION_DATE,
704 L.LANGUAGE_CODE,
705 B.SOURCE_LANG
706 from HR_WINDOW_PROPERTIES_TL B, FND_LANGUAGES L
707 where L.INSTALLED_FLAG in ('I', 'B')
708 and B.LANGUAGE = userenv('LANG')
709 and not exists
710 (select NULL
711 from HR_WINDOW_PROPERTIES_TL T
712 where T.WINDOW_PROPERTY_ID = B.WINDOW_PROPERTY_ID
713 and T.LANGUAGE = L.LANGUAGE_CODE);
714 end ADD_LANGUAGE;
715
716 procedure TRANSLATE_ROW (
717 X_APPLICATION_SHORT_NAME in VARCHAR2,
718 X_FORM_NAME in VARCHAR2,
719 X_WINDOW_NAME in VARCHAR2,
720 X_TEMPLATE_NAME in VARCHAR2,
721 X_TERRITORY_SHORT_NAME in VARCHAR2,
722 X_OWNER in VARCHAR2,
723 X_TITLE in VARCHAR2) is
724 X_ROWID ROWID;
725 X_CREATION_DATE DATE;
726 X_CREATED_BY NUMBER;
727 X_LAST_UPDATE_DATE DATE;
728 X_LAST_UPDATED_BY NUMBER;
729 X_LAST_UPDATE_LOGIN NUMBER;
730 X_FORM_ID NUMBER;
731 X_APPLICATION_ID NUMBER;
732 X_FORM_WINDOW_ID NUMBER;
733 X_TEMPLATE_WINDOW_ID NUMBER;
734 X_TEMPLATE_WINDOW_CONTEXT_ID NUMBER;
735 X_WINDOW_PROPERTY_ID NUMBER;
736 begin
737
738 OWNER_TO_WHO (
739 X_OWNER,
740 X_CREATION_DATE,
741 X_CREATED_BY,
742 X_LAST_UPDATE_DATE,
743 X_LAST_UPDATED_BY,
744 X_LAST_UPDATE_LOGIN
745 );
746
747 select application_id
748 into x_application_id
749 from fnd_application
750 where application_short_name = x_application_short_name;
751
752 select form_id
753 into x_form_id
754 from fnd_form
755 where form_name = x_form_name
756 and application_id = x_application_id;
757
758 select form_window_id
759 into x_form_window_id
760 from hr_form_windows_b
761 where window_name = x_window_name
762 and application_id = x_application_id
763 and form_id = x_form_id;
764
765 IF ltrim(rtrim(x_template_name)) is not null then
766
767 select hti.template_window_id
768 into x_template_window_id
769 from hr_form_templates_b hft
770 ,hr_template_windows_b hti
771 where hti.form_window_id = x_form_window_id
772 and hti.form_template_id = hft.form_template_id
773 and hft.form_id = x_form_id
774 and hft.application_id = x_application_id
775 and ( (hft.legislation_code is null and x_territory_short_name is null)
776 or (hft.legislation_code = x_territory_short_name) )
777 and hft.template_name = x_template_name;
778
779 x_form_window_id := null;
780 ELSE
781 x_template_window_id := null;
782 END IF;
783
784 select window_property_id
785 into x_window_property_id
786 from hr_window_properties_b
787 where nvl(form_window_id,hr_api.g_number) = nvl(x_form_window_id,hr_api.g_number)
788 and nvl(template_window_id,hr_api.g_number) = nvl(x_template_window_id,hr_api.g_number);
789
790 update HR_WINDOW_PROPERTIES_TL set
791 TITLE = X_TITLE,
792 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
793 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
794 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
795 SOURCE_LANG = userenv('LANG')
796 where userenv('LANG') in (LANGUAGE,SOURCE_LANG)
797 and window_property_id = x_window_property_id;
798
799
800 end TRANSLATE_ROW;
801
802 procedure LOAD_ROW (
803 X_APPLICATION_SHORT_NAME in VARCHAR2,
804 X_FORM_NAME in VARCHAR2,
805 X_WINDOW_NAME in VARCHAR2,
806 X_TEMPLATE_NAME in VARCHAR2,
807 X_TERRITORY_SHORT_NAME in VARCHAR2,
808 X_OWNER in VARCHAR2,
809 X_HEIGHT in VARCHAR2,
810 X_WIDTH in VARCHAR2,
811 X_X_POSITION in VARCHAR2,
812 X_Y_POSITION in VARCHAR2,
813 X_INFORMATION_CATEGORY in VARCHAR2,
814 X_INFORMATION1 in VARCHAR2,
815 X_INFORMATION2 in VARCHAR2,
816 X_INFORMATION3 in VARCHAR2,
817 X_INFORMATION4 in VARCHAR2,
818 X_INFORMATION5 in VARCHAR2,
819 X_INFORMATION6 in VARCHAR2,
820 X_INFORMATION7 in VARCHAR2,
821 X_INFORMATION8 in VARCHAR2,
822 X_INFORMATION9 in VARCHAR2,
823 X_INFORMATION10 in VARCHAR2,
824 X_INFORMATION11 in VARCHAR2,
825 X_INFORMATION12 in VARCHAR2,
826 X_INFORMATION13 in VARCHAR2,
827 X_INFORMATION14 in VARCHAR2,
828 X_INFORMATION15 in VARCHAR2,
829 X_INFORMATION16 in VARCHAR2,
830 X_INFORMATION17 in VARCHAR2,
831 X_INFORMATION18 in VARCHAR2,
832 X_INFORMATION19 in VARCHAR2,
833 X_INFORMATION20 in VARCHAR2,
834 X_INFORMATION21 in VARCHAR2,
835 X_INFORMATION22 in VARCHAR2,
836 X_INFORMATION23 in VARCHAR2,
837 X_INFORMATION24 in VARCHAR2,
838 X_INFORMATION25 in VARCHAR2,
839 X_INFORMATION26 in VARCHAR2,
840 X_INFORMATION27 in VARCHAR2,
841 X_INFORMATION28 in VARCHAR2,
842 X_INFORMATION29 in VARCHAR2,
843 X_INFORMATION30 in VARCHAR2,
844 X_TITLE in VARCHAR2) is
845 X_ROWID ROWID;
846 X_CREATION_DATE DATE;
847 X_CREATED_BY NUMBER;
848 X_LAST_UPDATE_DATE DATE;
849 X_LAST_UPDATED_BY NUMBER;
850 X_LAST_UPDATE_LOGIN NUMBER;
851 X_FORM_ID NUMBER;
852 X_APPLICATION_ID NUMBER;
853 X_FORM_WINDOW_ID NUMBER;
854 X_TEMPLATE_WINDOW_ID NUMBER;
855 X_TEMPLATE_WINDOW_CONTEXT_ID NUMBER;
856 X_WINDOW_PROPERTY_ID NUMBER;
857 begin
858
859 OWNER_TO_WHO (
860 X_OWNER,
861 X_CREATION_DATE,
862 X_CREATED_BY,
863 X_LAST_UPDATE_DATE,
864 X_LAST_UPDATED_BY,
865 X_LAST_UPDATE_LOGIN
866 );
867
868 select application_id
869 into x_application_id
870 from fnd_application
871 where application_short_name = x_application_short_name;
872
873 select form_id
874 into x_form_id
875 from fnd_form
876 where form_name = x_form_name
877 and application_id = x_application_id;
878
879 select form_window_id
880 into x_form_window_id
881 from hr_form_windows_b
882 where window_name = x_window_name
883 and application_id = x_application_id
884 and form_id = x_form_id;
885
886 IF ltrim(rtrim(x_template_name)) is not null THEN
887
888 select hti.template_window_id
889 into x_template_window_id
890 from hr_form_templates_b hft
891 ,hr_template_windows_b hti
892 where hti.form_window_id = x_form_window_id
893 and hti.form_template_id = hft.form_template_id
894 and hft.form_id = x_form_id
895 and hft.application_id = x_application_id
896 and ( (hft.legislation_code is null and x_territory_short_name is null)
897 or (hft.legislation_code = x_territory_short_name) )
898 and hft.template_name = x_template_name;
899
900 x_form_window_id := null;
901 ELSE
902 x_template_window_id := null;
903
904 END IF;
905
906 begin
907 select window_property_id
908 into x_window_property_id
909 from hr_window_properties_b
910 where nvl(form_window_id,hr_api.g_number) = nvl(x_form_window_id,hr_api.g_number)
911 and nvl(template_window_id,hr_api.g_number) = nvl(x_template_window_id,hr_api.g_number);
912 exception
913 when no_data_found then
914 select hr_window_properties_b_s.nextval
915 into x_window_property_id
916 from dual;
917 end;
918
919 begin
920
921 UPDATE_COPIES (
922 X_WINDOW_PROPERTY_ID,
923 X_FORM_WINDOW_ID,
924 X_TEMPLATE_WINDOW_ID,
925 X_HEIGHT,
926 X_WIDTH,
927 X_X_POSITION,
928 X_Y_POSITION,
929 X_TITLE,
930 X_INFORMATION_CATEGORY,
931 X_INFORMATION1,
932 X_INFORMATION2,
933 X_INFORMATION3,
934 X_INFORMATION4,
935 X_INFORMATION5,
936 X_INFORMATION6,
937 X_INFORMATION7,
938 X_INFORMATION8,
939 X_INFORMATION9,
940 X_INFORMATION10,
941 X_INFORMATION11,
942 X_INFORMATION12,
943 X_INFORMATION13,
944 X_INFORMATION14,
945 X_INFORMATION15,
946 X_INFORMATION16,
947 X_INFORMATION17,
948 X_INFORMATION18,
949 X_INFORMATION19,
950 X_INFORMATION20,
951 X_INFORMATION21,
952 X_INFORMATION22,
953 X_INFORMATION23,
954 X_INFORMATION24,
955 X_INFORMATION25,
956 X_INFORMATION26,
957 X_INFORMATION27,
958 X_INFORMATION28,
959 X_INFORMATION29,
960 X_INFORMATION30,
961 X_LAST_UPDATE_DATE,
962 X_LAST_UPDATED_BY,
963 X_LAST_UPDATE_LOGIN
964 );
965
966 UPDATE_ROW (
967 X_WINDOW_PROPERTY_ID,
968 X_INFORMATION17,
969 X_INFORMATION18,
970 X_INFORMATION19,
971 X_INFORMATION20,
972 X_INFORMATION21,
973 X_INFORMATION22,
974 X_INFORMATION23,
975 X_INFORMATION24,
976 X_INFORMATION25,
977 X_INFORMATION26,
978 X_INFORMATION27,
979 X_INFORMATION28,
980 X_INFORMATION29,
981 X_INFORMATION30,
982 to_number(X_X_POSITION),
983 X_FORM_WINDOW_ID,
984 X_TEMPLATE_WINDOW_ID,
985 to_number(X_HEIGHT),
986 to_number(X_WIDTH),
987 X_INFORMATION12,
988 X_INFORMATION13,
989 X_INFORMATION14,
990 X_INFORMATION15,
991 X_INFORMATION16,
992 X_INFORMATION5,
993 X_INFORMATION6,
994 X_INFORMATION7,
995 X_INFORMATION8,
996 X_INFORMATION9,
997 X_INFORMATION10,
998 X_INFORMATION11,
999 to_number(X_Y_POSITION),
1000 X_INFORMATION_CATEGORY,
1001 X_INFORMATION1,
1002 X_INFORMATION2,
1003 X_INFORMATION3,
1004 X_INFORMATION4,
1005 X_TITLE,
1006 X_LAST_UPDATE_DATE,
1007 X_LAST_UPDATED_BY,
1008 X_LAST_UPDATE_LOGIN);
1009
1010 exception
1011 when no_data_found then
1012 INSERT_ROW (
1013 X_ROWID,
1014 X_WINDOW_PROPERTY_ID,
1015 X_INFORMATION17,
1016 X_INFORMATION18,
1017 X_INFORMATION19,
1018 X_INFORMATION20,
1019 X_INFORMATION21,
1020 X_INFORMATION22,
1021 X_INFORMATION23,
1022 X_INFORMATION24,
1023 X_INFORMATION25,
1024 X_INFORMATION26,
1025 X_INFORMATION27,
1026 X_INFORMATION28,
1027 X_INFORMATION29,
1028 X_INFORMATION30,
1029 to_number(X_X_POSITION),
1030 X_FORM_WINDOW_ID,
1031 X_TEMPLATE_WINDOW_ID,
1032 to_number(X_HEIGHT),
1033 to_number(X_WIDTH),
1034 X_INFORMATION12,
1035 X_INFORMATION13,
1036 X_INFORMATION14,
1037 X_INFORMATION15,
1038 X_INFORMATION16,
1039 X_INFORMATION5,
1040 X_INFORMATION6,
1041 X_INFORMATION7,
1042 X_INFORMATION8,
1043 X_INFORMATION9,
1044 X_INFORMATION10,
1045 X_INFORMATION11,
1046 to_number(X_Y_POSITION),
1047 X_INFORMATION_CATEGORY,
1048 X_INFORMATION1,
1049 X_INFORMATION2,
1050 X_INFORMATION3,
1051 X_INFORMATION4,
1052 X_TITLE,
1053 X_CREATION_DATE,
1054 X_CREATED_BY,
1055 X_LAST_UPDATE_DATE,
1056 X_LAST_UPDATED_BY,
1057 X_LAST_UPDATE_LOGIN);
1058 end;
1059 end LOAD_ROW;
1060 end HR_WINDOW_PROPERTIES_PKG;