[Home] [Help]
PACKAGE BODY: APPS.HR_KI_INT_LOAD_API
Source
1 Package Body HR_KI_INT_LOAD_API as
2 /* $Header: hrkiintl.pkb 120.1 2006/06/27 16:03:22 avarri noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(31) := 'HR_KI_INT_LOAD_API';
7 --
8
9
10 procedure UPDATE_ROW (
11 X_INTEGRATION_ID in NUMBER
12 ,X_PARTY_TYPE in VARCHAR2
13 ,X_PARTY_NAME in VARCHAR2
14 ,X_PARTY_SITE_NAME in VARCHAR2
15 ,X_TRANSACTION_TYPE in VARCHAR2
16 ,X_TRANSACTION_SUBTYPE in VARCHAR2
17 ,X_STANDARD_CODE in VARCHAR2
18 ,X_EXT_TRANS_TYPE in VARCHAR2
19 ,X_EXT_TRANS_SUBTYPE in VARCHAR2
20 ,X_TRANS_DIRECTION in VARCHAR2
21 ,X_URL in VARCHAR2
22 ,X_SYNCHED in VARCHAR2
23 ,X_APPLICATION_NAME in VARCHAR2
24 ,X_APPLICATION_TYPE in VARCHAR2
25 ,X_APPLICATION_URL in VARCHAR2
26 ,X_LOGOUT_URL in VARCHAR2
27 ,X_USER_FIELD in VARCHAR2
28 ,X_PASSWORD_FIELD in VARCHAR2
29 ,X_AUTHENTICATION_NEEDED in VARCHAR2
30 ,X_FIELD_NAME1 in VARCHAR2
31 ,X_FIELD_VALUE1 in VARCHAR2
32 ,X_FIELD_NAME2 in VARCHAR2
33 ,X_FIELD_VALUE2 in VARCHAR2
34 ,X_FIELD_NAME3 in VARCHAR2
35 ,X_FIELD_VALUE3 in VARCHAR2
36 ,X_FIELD_NAME4 in VARCHAR2
37 ,X_FIELD_VALUE4 in VARCHAR2
38 ,X_FIELD_NAME5 in VARCHAR2
39 ,X_FIELD_VALUE5 in VARCHAR2
40 ,X_FIELD_NAME6 in VARCHAR2
41 ,X_FIELD_VALUE6 in VARCHAR2
42 ,X_FIELD_NAME7 in VARCHAR2
43 ,X_FIELD_VALUE7 in VARCHAR2
44 ,X_FIELD_NAME8 in VARCHAR2
45 ,X_FIELD_VALUE8 in VARCHAR2
46 ,X_FIELD_NAME9 in VARCHAR2
47 ,X_FIELD_VALUE9 in VARCHAR2
48 ,X_PARTNER_NAME in VARCHAR2
49 ,X_SERVICE_NAME in VARCHAR2
50 ,X_LAST_UPDATE_DATE in DATE
51 ,X_LAST_UPDATED_BY in NUMBER
52 ,X_LAST_UPDATE_LOGIN in NUMBER
53 ,X_OBJECT_VERSION_NUMBER in NUMBER
54
55 ) is
56
57 begin
58
59
60 update HR_KI_INTEGRATIONS
61 set
62 PARTY_TYPE = X_PARTY_TYPE
63 ,PARTY_NAME = X_PARTY_NAME
64 ,PARTY_SITE_NAME = X_PARTY_SITE_NAME
65 ,TRANSACTION_TYPE = X_TRANSACTION_TYPE
66 ,TRANSACTION_SUBTYPE = X_TRANSACTION_SUBTYPE
67 ,STANDARD_CODE = X_STANDARD_CODE
68 ,EXT_TRANS_TYPE = X_EXT_TRANS_TYPE
69 ,EXT_TRANS_SUBTYPE = X_EXT_TRANS_SUBTYPE
70 ,TRANS_DIRECTION = X_TRANS_DIRECTION
71 ,URL = X_URL
72 ,SYNCHED = X_SYNCHED
73 ,APPLICATION_NAME = X_APPLICATION_NAME
74 ,APPLICATION_TYPE = X_APPLICATION_TYPE
75 ,APPLICATION_URL = X_APPLICATION_URL
76 ,LOGOUT_URL = X_LOGOUT_URL
77 ,USER_FIELD = X_USER_FIELD
78 ,PASSWORD_FIELD = X_PASSWORD_FIELD
79 ,AUTHENTICATION_NEEDED = X_AUTHENTICATION_NEEDED
80 ,FIELD_NAME1 = X_FIELD_NAME1
81 ,FIELD_VALUE1 = X_FIELD_VALUE1
82 ,FIELD_NAME2 = X_FIELD_NAME2
83 ,FIELD_VALUE2 = X_FIELD_VALUE2
84 ,FIELD_NAME3 = X_FIELD_NAME3
85 ,FIELD_VALUE3 = X_FIELD_VALUE3
86 ,FIELD_NAME4 = X_FIELD_NAME4
87 ,FIELD_VALUE4 = X_FIELD_VALUE4
88 ,FIELD_NAME5 = X_FIELD_NAME5
89 ,FIELD_VALUE5 = X_FIELD_VALUE5
90 ,FIELD_NAME6 = X_FIELD_NAME6
91 ,FIELD_VALUE6 = X_FIELD_VALUE6
92 ,FIELD_NAME7 = X_FIELD_NAME7
93 ,FIELD_VALUE7 = X_FIELD_VALUE7
94 ,FIELD_NAME8 = X_FIELD_NAME8
95 ,FIELD_VALUE8 = X_FIELD_VALUE8
96 ,FIELD_NAME9 = X_FIELD_NAME9
97 ,FIELD_VALUE9 = X_FIELD_VALUE9
98 ,LAST_UPDATE_DATE = X_LAST_UPDATE_DATE
99 ,LAST_UPDATED_BY = X_LAST_UPDATED_BY
100 ,LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
101 ,OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER+1
102 where
103 INTEGRATION_ID = X_INTEGRATION_ID;
104
105 --Update TL table
106 update HR_KI_INTEGRATIONS_TL set
107 PARTNER_NAME = X_PARTNER_NAME,
108 SERVICE_NAME = X_SERVICE_NAME,
109 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
110 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
111 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
112 SOURCE_LANG = userenv('LANG')
113 where INTEGRATION_ID = X_INTEGRATION_ID
114 and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
115
116 if (sql%notfound) then
117
118 insert into HR_KI_INTEGRATIONS_TL (
119 INTEGRATION_ID,
120 PARTNER_NAME,
121 SERVICE_NAME,
122 CREATED_BY,
123 CREATION_DATE,
124 LAST_UPDATED_BY,
125 LAST_UPDATE_DATE,
126 LAST_UPDATE_LOGIN,
127 LANGUAGE,
128 SOURCE_LANG
129 ) select
130 X_INTEGRATION_ID,
131 X_PARTNER_NAME,
132 X_SERVICE_NAME,
133 1 ,
134 SYSDATE,
135 X_LAST_UPDATED_BY,
136 X_LAST_UPDATE_DATE,
137 X_LAST_UPDATE_LOGIN,
138 L.LANGUAGE_CODE,
139 userenv('LANG')
140 from FND_LANGUAGES L
141 where L.INSTALLED_FLAG in ('I', 'B')
142 and not exists
143 (select NULL
144 from HR_KI_INTEGRATIONS_TL T
145 where T.integration_id = X_integration_id
146 and T.LANGUAGE = L.LANGUAGE_CODE);
147
148 end if;
149
150 end UPDATE_ROW;
151
152
153 procedure INSERT_ROW (
154 X_ROWID in out nocopy VARCHAR2
155 ,X_INTEGRATION_ID in out nocopy NUMBER
156 ,X_INTEGRATION_KEY in VARCHAR2
157 ,X_PARTY_TYPE in VARCHAR2
158 ,X_PARTY_NAME in VARCHAR2
159 ,X_PARTY_SITE_NAME in VARCHAR2
160 ,X_TRANSACTION_TYPE in VARCHAR2
161 ,X_TRANSACTION_SUBTYPE in VARCHAR2
162 ,X_STANDARD_CODE in VARCHAR2
163 ,X_EXT_TRANS_TYPE in VARCHAR2
164 ,X_EXT_TRANS_SUBTYPE in VARCHAR2
165 ,X_TRANS_DIRECTION in VARCHAR2
166 ,X_URL in VARCHAR2
167 ,X_SYNCHED in VARCHAR2
168 ,X_APPLICATION_NAME in VARCHAR2
169 ,X_APPLICATION_TYPE in VARCHAR2
170 ,X_APPLICATION_URL in VARCHAR2
171 ,X_LOGOUT_URL in VARCHAR2
172 ,X_USER_FIELD in VARCHAR2
173 ,X_PASSWORD_FIELD in VARCHAR2
174 ,X_AUTHENTICATION_NEEDED in VARCHAR2
175 ,X_FIELD_NAME1 in VARCHAR2
176 ,X_FIELD_VALUE1 in VARCHAR2
177 ,X_FIELD_NAME2 in VARCHAR2
178 ,X_FIELD_VALUE2 in VARCHAR2
179 ,X_FIELD_NAME3 in VARCHAR2
180 ,X_FIELD_VALUE3 in VARCHAR2
181 ,X_FIELD_NAME4 in VARCHAR2
182 ,X_FIELD_VALUE4 in VARCHAR2
183 ,X_FIELD_NAME5 in VARCHAR2
184 ,X_FIELD_VALUE5 in VARCHAR2
185 ,X_FIELD_NAME6 in VARCHAR2
186 ,X_FIELD_VALUE6 in VARCHAR2
187 ,X_FIELD_NAME7 in VARCHAR2
188 ,X_FIELD_VALUE7 in VARCHAR2
189 ,X_FIELD_NAME8 in VARCHAR2
190 ,X_FIELD_VALUE8 in VARCHAR2
191 ,X_FIELD_NAME9 in VARCHAR2
192 ,X_FIELD_VALUE9 in VARCHAR2
193 ,X_PARTNER_NAME in VARCHAR2
194 ,X_SERVICE_NAME in VARCHAR2
195 ,X_CREATED_BY in NUMBER
196 ,X_CREATION_DATE in DATE
197 ,X_LAST_UPDATE_DATE in DATE
198 ,X_LAST_UPDATED_BY in NUMBER
199 ,X_LAST_UPDATE_LOGIN in NUMBER
200
201
202 ) is
203
204 cursor C is select ROWID from HR_KI_INTEGRATIONS
205 where integration_id = X_INTEGRATION_ID;
206
207 begin
208
209 select HR_KI_INTEGRATIONS_S.NEXTVAL into X_INTEGRATION_ID from sys.dual;
210
211 insert into HR_KI_INTEGRATIONS (
212 INTEGRATION_ID,
213 INTEGRATION_KEY,
214 PARTY_TYPE,
215 PARTY_NAME,
216 PARTY_SITE_NAME,
217 TRANSACTION_TYPE,
218 TRANSACTION_SUBTYPE,
219 STANDARD_CODE,
220 EXT_TRANS_TYPE,
221 EXT_TRANS_SUBTYPE,
222 TRANS_DIRECTION,
223 URL,
224 SYNCHED,
225 APPLICATION_NAME,
226 APPLICATION_TYPE,
227 APPLICATION_URL,
228 LOGOUT_URL,
229 USER_FIELD,
230 PASSWORD_FIELD,
231 AUTHENTICATION_NEEDED,
232 FIELD_NAME1,
233 FIELD_VALUE1,
234 FIELD_NAME2,
235 FIELD_VALUE2,
236 FIELD_NAME3,
237 FIELD_VALUE3,
238 FIELD_NAME4,
239 FIELD_VALUE4,
240 FIELD_NAME5,
241 FIELD_VALUE5,
242 FIELD_NAME6,
243 FIELD_VALUE6,
244 FIELD_NAME7,
245 FIELD_VALUE7,
246 FIELD_NAME8,
247 FIELD_VALUE8,
248 FIELD_NAME9,
249 FIELD_VALUE9,
250 CREATION_DATE,
251 CREATED_BY,
252 LAST_UPDATE_DATE,
253 LAST_UPDATED_BY,
254 LAST_UPDATE_LOGIN,
255 OBJECT_VERSION_NUMBER
256 ) values (
257 X_INTEGRATION_ID
258 ,X_INTEGRATION_KEY
259 ,X_PARTY_TYPE
260 ,X_PARTY_NAME
261 ,X_PARTY_SITE_NAME
262 ,X_TRANSACTION_TYPE
263 ,X_TRANSACTION_SUBTYPE
264 ,X_STANDARD_CODE
265 ,X_EXT_TRANS_TYPE
266 ,X_EXT_TRANS_SUBTYPE
267 ,X_TRANS_DIRECTION
268 ,X_URL
269 ,X_SYNCHED
270 ,X_APPLICATION_NAME
271 ,X_APPLICATION_TYPE
272 ,X_APPLICATION_URL
273 ,X_LOGOUT_URL
274 ,X_USER_FIELD
275 ,X_PASSWORD_FIELD
276 ,X_AUTHENTICATION_NEEDED
277 ,X_FIELD_NAME1
278 ,X_FIELD_VALUE1
279 ,X_FIELD_NAME2
280 ,X_FIELD_VALUE2
281 ,X_FIELD_NAME3
282 ,X_FIELD_VALUE3
283 ,X_FIELD_NAME4
284 ,X_FIELD_VALUE4
285 ,X_FIELD_NAME5
286 ,X_FIELD_VALUE5
287 ,X_FIELD_NAME6
288 ,X_FIELD_VALUE6
289 ,X_FIELD_NAME7
290 ,X_FIELD_VALUE7
291 ,X_FIELD_NAME8
292 ,X_FIELD_VALUE8
293 ,X_FIELD_NAME9
294 ,X_FIELD_VALUE9
295 ,X_CREATION_DATE
296 ,X_CREATED_BY
297 ,X_LAST_UPDATE_DATE
298 ,X_LAST_UPDATED_BY
299 ,X_LAST_UPDATE_LOGIN
300 ,1
301 );
302
303
304 insert into HR_KI_INTEGRATIONS_TL (
305 INTEGRATION_ID,
306 PARTNER_NAME,
307 SERVICE_NAME,
308 CREATED_BY,
309 CREATION_DATE,
310 LAST_UPDATED_BY,
311 LAST_UPDATE_DATE,
312 LAST_UPDATE_LOGIN,
313 LANGUAGE,
314 SOURCE_LANG
315 ) select
316 X_INTEGRATION_ID,
317 X_PARTNER_NAME,
318 X_SERVICE_NAME,
319 X_CREATED_BY,
320 X_CREATION_DATE,
321 X_LAST_UPDATED_BY,
322 X_LAST_UPDATE_DATE,
323 X_LAST_UPDATE_LOGIN,
324 L.LANGUAGE_CODE,
325 userenv('LANG')
326 from FND_LANGUAGES L
327 where L.INSTALLED_FLAG in ('I', 'B')
328 and not exists
329 (select NULL
330 from HR_KI_INTEGRATIONS_TL T
331 where T.integration_id = X_integration_id
332 and T.LANGUAGE = L.LANGUAGE_CODE);
333
334 open c;
335 fetch c into X_ROWID;
336 if (c%notfound) then
337 close c;
338 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
339 hr_utility.set_message_token('PROCEDURE',
340 'HR_KI_INTEGRATIONS.insert_row');
341 hr_utility.set_message_token('STEP','1');
342 hr_utility.raise_error;
343 end if;
344 close c;
345
346
347 end INSERT_ROW;
348
349 procedure LOAD_ROW
350 (
351 X_INTEGRATION_KEY in VARCHAR2,
352 X_PARTY_TYPE in VARCHAR2,
353 X_PARTY_NAME in VARCHAR2,
354 X_PARTY_SITE_NAME in VARCHAR2,
355 X_TRANSACTION_TYPE in VARCHAR2,
356 X_TRANSACTION_SUBTYPE in VARCHAR2,
357 X_STANDARD_CODE in VARCHAR2,
358 X_EXT_TRANS_TYPE in VARCHAR2,
359 X_EXT_TRANS_SUBTYPE in VARCHAR2,
360 X_TRANS_DIRECTION in VARCHAR2,
361 X_URL in VARCHAR2,
362 X_SYNCHED in VARCHAR2,
363 X_APPLICATION_NAME in VARCHAR2,
364 X_APPLICATION_TYPE in VARCHAR2,
365 X_APPLICATION_URL in VARCHAR2,
366 X_LOGOUT_URL in VARCHAR2,
367 X_USER_FIELD in VARCHAR2,
368 X_PASSWORD_FIELD in VARCHAR2,
369 X_AUTHENTICATION_NEEDED in VARCHAR2,
370 X_FIELD_NAME1 in VARCHAR2,
371 X_FIELD_VALUE1 in VARCHAR2,
372 X_FIELD_NAME2 in VARCHAR2,
373 X_FIELD_VALUE2 in VARCHAR2,
374 X_FIELD_NAME3 in VARCHAR2,
375 X_FIELD_VALUE3 in VARCHAR2,
376 X_FIELD_NAME4 in VARCHAR2,
377 X_FIELD_VALUE4 in VARCHAR2,
378 X_FIELD_NAME5 in VARCHAR2,
379 X_FIELD_VALUE5 in VARCHAR2,
380 X_FIELD_NAME6 in VARCHAR2,
381 X_FIELD_VALUE6 in VARCHAR2,
382 X_FIELD_NAME7 in VARCHAR2,
383 X_FIELD_VALUE7 in VARCHAR2,
384 X_FIELD_NAME8 in VARCHAR2,
385 X_FIELD_VALUE8 in VARCHAR2,
386 X_FIELD_NAME9 in VARCHAR2,
387 X_FIELD_VALUE9 in VARCHAR2,
388 X_PARTNER_NAME in VARCHAR2,
389 X_SERVICE_NAME in VARCHAR2,
390 X_LAST_UPDATE_DATE in VARCHAR2,
391 X_CUSTOM_MODE in VARCHAR2,
392 X_OWNER in VARCHAR2
393
394 )
395 is
396 l_proc VARCHAR2(31) := 'HR_KI_INT_LOAD_API.LOAD_ROW';
397 l_rowid rowid;
398 l_created_by HR_KI_INTEGRATIONS.created_by%TYPE := 0;
399 l_creation_date HR_KI_INTEGRATIONS.creation_date%TYPE := SYSDATE;
400 l_last_update_date HR_KI_INTEGRATIONS.last_update_date%TYPE := SYSDATE;
401 l_last_updated_by HR_KI_INTEGRATIONS.last_updated_by%TYPE := 0;
402 l_last_update_login HR_KI_INTEGRATIONS.last_update_login%TYPE := 0;
403 l_integration_id HR_KI_INTEGRATIONS.integration_id%TYPE;
404 l_object_version_number HR_KI_INTEGRATIONS.object_version_number%TYPE;
405 l_synched HR_KI_INTEGRATIONS.synched%TYPE;
406
407 db_luby number; -- entity owner in db
408 db_ludate date; -- entity update date in db
409
410
411
412 CURSOR C_APPL IS
413 select integration_id,object_version_number
414 from HR_KI_INTEGRATIONS
415 where upper(integration_key) = upper(X_INTEGRATION_KEY);
416
417 begin
418 --
419 -- added for 5354277
420 hr_general.g_data_migrator_mode := 'Y';
421 --
422 -- Translate owner to file_last_updated_by
423 l_last_updated_by := fnd_load_util.owner_id(X_OWNER);
424 l_created_by := fnd_load_util.owner_id(X_OWNER);
425
426 -- Translate char last_update_date to date
427 l_last_update_date := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD hh24:mi:ss'), sysdate);
428
429
430 --Setting the synch flag
431 --When we are inserting /updating data in integrations table via loaders,we will set
432 --the synched flag to N for SSO and ECX type of integrations
433 --For URL it will be always set to Y
434 if X_URL is not null then
435 l_synched := 'Y';
436 else
437 l_synched := 'N';
438 end if;
439
440 -- Update or insert row as appropriate
441
442 OPEN C_APPL;
443 FETCH C_APPL INTO l_integration_id,l_object_version_number;
444
445
446 if C_APPL%notfound then
447 close C_APPL;
448 INSERT_ROW
449 (
450 X_ROWID => l_rowid
451 ,X_INTEGRATION_ID => l_integration_id
452 ,X_INTEGRATION_KEY => X_INTEGRATION_KEY
453 ,X_PARTY_TYPE => X_PARTY_TYPE
454 ,X_PARTY_NAME => X_PARTY_NAME
455 ,X_PARTY_SITE_NAME => X_PARTY_SITE_NAME
456 ,X_TRANSACTION_TYPE => X_TRANSACTION_TYPE
457 ,X_TRANSACTION_SUBTYPE => X_TRANSACTION_SUBTYPE
458 ,X_STANDARD_CODE => X_STANDARD_CODE
459 ,X_EXT_TRANS_TYPE => X_EXT_TRANS_TYPE
460 ,X_EXT_TRANS_SUBTYPE => X_EXT_TRANS_SUBTYPE
461 ,X_TRANS_DIRECTION => X_TRANS_DIRECTION
462 ,X_URL => X_URL
463 ,X_SYNCHED => l_synched
464 ,X_APPLICATION_NAME => X_APPLICATION_NAME
465 ,X_APPLICATION_TYPE => X_APPLICATION_TYPE
466 ,X_APPLICATION_URL => X_APPLICATION_URL
467 ,X_LOGOUT_URL => X_LOGOUT_URL
468 ,X_USER_FIELD => X_USER_FIELD
469 ,X_PASSWORD_FIELD => X_PASSWORD_FIELD
470 ,X_AUTHENTICATION_NEEDED => X_AUTHENTICATION_NEEDED
471 ,X_FIELD_NAME1 => X_FIELD_NAME1
472 ,X_FIELD_VALUE1 => X_FIELD_VALUE1
473 ,X_FIELD_NAME2 => X_FIELD_NAME2
474 ,X_FIELD_VALUE2 => X_FIELD_VALUE2
475 ,X_FIELD_NAME3 => X_FIELD_NAME3
476 ,X_FIELD_VALUE3 => X_FIELD_VALUE3
477 ,X_FIELD_NAME4 => X_FIELD_NAME4
478 ,X_FIELD_VALUE4 => X_FIELD_VALUE4
479 ,X_FIELD_NAME5 => X_FIELD_NAME5
480 ,X_FIELD_VALUE5 => X_FIELD_VALUE5
481 ,X_FIELD_NAME6 => X_FIELD_NAME6
482 ,X_FIELD_VALUE6 => X_FIELD_VALUE6
483 ,X_FIELD_NAME7 => X_FIELD_NAME7
484 ,X_FIELD_VALUE7 => X_FIELD_VALUE7
485 ,X_FIELD_NAME8 => X_FIELD_NAME8
486 ,X_FIELD_VALUE8 => X_FIELD_VALUE8
487 ,X_FIELD_NAME9 => X_FIELD_NAME9
488 ,X_FIELD_VALUE9 => X_FIELD_VALUE9
489 ,X_PARTNER_NAME => X_PARTNER_NAME
490 ,X_SERVICE_NAME => X_SERVICE_NAME
491 ,X_CREATED_BY => l_created_by
492 ,X_CREATION_DATE => l_creation_date
493 ,X_LAST_UPDATE_DATE => l_last_update_date
494 ,X_LAST_UPDATED_BY => l_last_updated_by
495 ,X_LAST_UPDATE_LOGIN => l_last_update_login
496 );
497
498
499 else
500 close C_APPL;
501 --start of update part
502 select LAST_UPDATED_BY, LAST_UPDATE_DATE
503 into db_luby, db_ludate
504 from HR_KI_INTEGRATIONS
505 where integration_id = l_integration_id;
506
507
508 if (fnd_load_util.upload_test(l_last_updated_by, l_last_update_date, db_luby,
509 db_ludate, X_CUSTOM_MODE)) then
510
511 UPDATE_ROW
512 (
513 X_INTEGRATION_ID => l_integration_id
514 ,X_PARTY_TYPE => X_PARTY_TYPE
515 ,X_PARTY_NAME => X_PARTY_NAME
516 ,X_PARTY_SITE_NAME => X_PARTY_SITE_NAME
517 ,X_TRANSACTION_TYPE => X_TRANSACTION_TYPE
518 ,X_TRANSACTION_SUBTYPE => X_TRANSACTION_SUBTYPE
519 ,X_STANDARD_CODE => X_STANDARD_CODE
520 ,X_EXT_TRANS_TYPE => X_EXT_TRANS_TYPE
521 ,X_EXT_TRANS_SUBTYPE => X_EXT_TRANS_SUBTYPE
522 ,X_TRANS_DIRECTION => X_TRANS_DIRECTION
523 ,X_URL => X_URL
524 ,X_SYNCHED => l_synched
525 ,X_APPLICATION_NAME => X_APPLICATION_NAME
526 ,X_APPLICATION_TYPE => X_APPLICATION_TYPE
527 ,X_APPLICATION_URL => X_APPLICATION_URL
528 ,X_LOGOUT_URL => X_LOGOUT_URL
529 ,X_USER_FIELD => X_USER_FIELD
530 ,X_PASSWORD_FIELD => X_PASSWORD_FIELD
531 ,X_AUTHENTICATION_NEEDED => X_AUTHENTICATION_NEEDED
532 ,X_FIELD_NAME1 => X_FIELD_NAME1
533 ,X_FIELD_VALUE1 => X_FIELD_VALUE1
534 ,X_FIELD_NAME2 => X_FIELD_NAME2
535 ,X_FIELD_VALUE2 => X_FIELD_VALUE2
536 ,X_FIELD_NAME3 => X_FIELD_NAME3
537 ,X_FIELD_VALUE3 => X_FIELD_VALUE3
538 ,X_FIELD_NAME4 => X_FIELD_NAME4
539 ,X_FIELD_VALUE4 => X_FIELD_VALUE4
540 ,X_FIELD_NAME5 => X_FIELD_NAME5
541 ,X_FIELD_VALUE5 => X_FIELD_VALUE5
542 ,X_FIELD_NAME6 => X_FIELD_NAME6
543 ,X_FIELD_VALUE6 => X_FIELD_VALUE6
544 ,X_FIELD_NAME7 => X_FIELD_NAME7
545 ,X_FIELD_VALUE7 => X_FIELD_VALUE7
546 ,X_FIELD_NAME8 => X_FIELD_NAME8
547 ,X_FIELD_VALUE8 => X_FIELD_VALUE8
548 ,X_FIELD_NAME9 => X_FIELD_NAME9
549 ,X_FIELD_VALUE9 => X_FIELD_VALUE9
550 ,X_PARTNER_NAME => X_PARTNER_NAME
551 ,X_SERVICE_NAME => X_SERVICE_NAME
552 ,X_LAST_UPDATE_DATE => l_last_update_date
553 ,X_LAST_UPDATED_BY => l_last_updated_by
554 ,X_LAST_UPDATE_LOGIN => l_last_update_login
555 ,X_OBJECT_VERSION_NUMBER => l_object_version_number
556 );
557
558 end if;
559
560 end if;
561
562 --
563 end LOAD_ROW;
564
565 procedure TRANSLATE_ROW
566 (
567 X_INTEGRATION_KEY in varchar2,
568 X_PARTNER_NAME in VARCHAR2,
569 X_SERVICE_NAME in VARCHAR2,
570 X_OWNER in varchar2,
571 X_CUSTOM_MODE in varchar2,
572 X_LAST_UPDATE_DATE in varchar2
573 )
574 is
575 l_integration_id HR_KI_INTEGRATIONS.integration_id%TYPE;
576
577 f_luby number; -- entity owner in file
578 f_ludate date; -- entity update date in file
579 db_luby number; -- entity owner in db
580 db_ludate date; -- entity update date in db
581
582
583 begin
584 --
585 -- added for 5354277
586 hr_general.g_data_migrator_mode := 'Y';
587 --
588
589 select integration_id into l_integration_id
590 from HR_KI_INTEGRATIONS
591 where upper(integration_key) = upper(X_INTEGRATION_KEY);
592
593
594 -- Translate owner to file_last_updated_by
595 f_luby := fnd_load_util.owner_id(X_OWNER);
596
597 -- Translate char last_update_date to date
598 f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD hh24:mi:ss'), sysdate);
599
600 begin
601 select LAST_UPDATED_BY, LAST_UPDATE_DATE
602 into db_luby, db_ludate
603 from HR_KI_INTEGRATIONS_TL
604 where
605 LANGUAGE = userenv('LANG')
606 and integration_id = l_integration_id;
607
608 -- Test for customization and version
609 if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
610 db_ludate,X_CUSTOM_MODE)) then
611
612 UPDATE HR_KI_INTEGRATIONS_TL
613 SET
614 PARTNER_NAME = X_PARTNER_NAME,
615 SERVICE_NAME = X_SERVICE_NAME,
616 LAST_UPDATE_DATE = f_ludate ,
617 LAST_UPDATED_BY = f_luby,
618 LAST_UPDATE_LOGIN = 0,
619 SOURCE_LANG = userenv('LANG')
620 where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
621 and integration_id = l_integration_id;
622
623 end if;
624 exception
625 when no_data_found then
626 -- Do not insert missing translations, skip this row
627 null;
628 end;
629
630 end TRANSLATE_ROW;
631
632 END HR_KI_INT_LOAD_API;