DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_CREATE_RU_EMPLOYEE

Source


1 package body hrdpp_CREATE_RU_EMPLOYEE as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2007/01/03 23:01:29
4  * Generated for API: HR_RU_EMPLOYEE_API.CREATE_RU_EMPLOYEE
5  */
6 --
7 dh constant date := hr_api.g_date;
8 nh constant number := hr_api.g_number;
9 vh constant varchar2(64) := hr_api.g_varchar2;
10 c_sot constant date := to_date('01010001','DDMMYYYY');
11 cn constant varchar2(32) := '<NULL>';
12 dn constant date := null;
13 nn constant number := null;
14 vn constant varchar2(1) := null;
15 --
16 function dc(p in date) return varchar2 is
17 begin
18 if p<c_sot then
19  if p<>trunc(p) then
20   return to_char(p,'SYYYY/MM/DD HH24:MI:SS');
21  end if;
22  return to_char(p,'SYYYY/MM/DD');
23 elsif p<>trunc(p) then
24  return to_char(p,'YYYY/MM/DD HH24:MI:SS');
25 end if;
26 return to_char(p,'YYYY/MM/DD');
27 end dc;
28 function d(p in varchar2) return date is
29 begin
30 if length(p)=10 then
31 return to_date(p,'YYYY/MM/DD');
32 elsif length(p)=19 then
33 return to_date(p,'YYYY/MM/DD HH24:MI:SS');
34 elsif length(p)=11 then
35 return to_date(p,'SYYYY/MM/DD');
36 elsif length(p)=20 then
37 return to_date(p,'SYYYY/MM/DD HH24:MI:SS');
38 end if;
39 -- Try default format as last resort.
40 return to_date(p,'YYYY/MM/DD');
41 end d;
42 function n(p in varchar2) return number is
43 begin
44 return to_number(p);
45 end n;
46 function dd(p in date,i in varchar2)
47 return varchar2 is
48 begin
49 if upper(i) = 'N' then return dc(p);
50 else return cn; end if;
51 end dd;
52 function nd(p in number,i in varchar2)
53 return varchar2 is
54 begin
55 if upper(i) = 'N' then return to_char(p);
56 else return cn; end if;
57 end nd;
58 --
59 procedure iuk
60 (p_batch_line_id  in number,
61 p_user_key_value in varchar2,
62 p_unique_key_id  in number)
63 is
64 begin
65 hr_data_pump.entry('ins_user_key');
66 insert into hr_pump_batch_line_user_keys
67 (user_key_id, batch_line_id,user_key_value,unique_key_id)
68 values
69 (hr_pump_batch_line_user_keys_s.nextval,
70 p_batch_line_id,
71 p_user_key_value,
72 p_unique_key_id);
73 hr_data_pump.exit('ins_user_key');
74 end iuk;
75 --
76 procedure insert_batch_lines
77 (p_batch_id      in number
78 ,p_data_pump_batch_line_id in number default null
79 ,p_data_pump_business_grp_name in varchar2 default null
80 ,p_user_sequence in number default null
81 ,p_link_value    in number default null
82 ,P_HIRE_DATE in date
83 ,P_LAST_NAME in varchar2
84 ,P_SEX in varchar2
85 ,P_COMMENTS in varchar2 default null
86 ,P_DATE_EMPLOYEE_DATA_VERIFIED in date default null
87 ,P_DATE_OF_BIRTH in date default null
88 ,P_EMAIL_ADDRESS in varchar2 default null
89 ,P_EMPLOYEE_NUMBER in varchar2
90 ,P_EXPENSE_CHECK_SEND_TO_ADDRES in varchar2 default null
91 ,P_FIRST_NAME in varchar2
92 ,P_KNOWN_AS in varchar2 default null
93 ,P_MARITAL_STATUS in varchar2 default null
94 ,P_MIDDLE_NAMES in varchar2 default null
95 ,P_NATIONALITY in varchar2 default null
96 ,P_INN in varchar2 default null
97 ,P_PREVIOUS_LAST_NAME in varchar2 default null
98 ,P_REGISTERED_DISABLED_FLAG in varchar2 default null
99 ,P_TITLE in varchar2 default null
100 ,P_WORK_TELEPHONE in varchar2 default null
101 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
102 ,P_ATTRIBUTE1 in varchar2 default null
103 ,P_ATTRIBUTE2 in varchar2 default null
104 ,P_ATTRIBUTE3 in varchar2 default null
105 ,P_ATTRIBUTE4 in varchar2 default null
106 ,P_ATTRIBUTE5 in varchar2 default null
107 ,P_ATTRIBUTE6 in varchar2 default null
108 ,P_ATTRIBUTE7 in varchar2 default null
109 ,P_ATTRIBUTE8 in varchar2 default null
110 ,P_ATTRIBUTE9 in varchar2 default null
111 ,P_ATTRIBUTE10 in varchar2 default null
112 ,P_ATTRIBUTE11 in varchar2 default null
113 ,P_ATTRIBUTE12 in varchar2 default null
114 ,P_ATTRIBUTE13 in varchar2 default null
115 ,P_ATTRIBUTE14 in varchar2 default null
116 ,P_ATTRIBUTE15 in varchar2 default null
117 ,P_ATTRIBUTE16 in varchar2 default null
118 ,P_ATTRIBUTE17 in varchar2 default null
119 ,P_ATTRIBUTE18 in varchar2 default null
120 ,P_ATTRIBUTE19 in varchar2 default null
121 ,P_ATTRIBUTE20 in varchar2 default null
122 ,P_ATTRIBUTE21 in varchar2 default null
123 ,P_ATTRIBUTE22 in varchar2 default null
124 ,P_ATTRIBUTE23 in varchar2 default null
125 ,P_ATTRIBUTE24 in varchar2 default null
126 ,P_ATTRIBUTE25 in varchar2 default null
127 ,P_ATTRIBUTE26 in varchar2 default null
128 ,P_ATTRIBUTE27 in varchar2 default null
129 ,P_ATTRIBUTE28 in varchar2 default null
130 ,P_ATTRIBUTE29 in varchar2 default null
131 ,P_ATTRIBUTE30 in varchar2 default null
132 ,P_PLACE_OF_BIRTH in varchar2 default null
133 ,P_REFERENCES in varchar2 default null
134 ,P_LOCAL_COEFFICIENT in varchar2 default null
135 ,P_CITIZENSHIP in varchar2
136 ,P_MILITARY_DOC in varchar2 default null
137 ,P_RESERVE_CATEGORY in varchar2 default null
138 ,P_MILITARY_RANK in varchar2 default null
139 ,P_MILITARY_PROFILE in varchar2 default null
140 ,P_MILITARY_REG_CODE in varchar2 default null
141 ,P_MIL_SRVC_READINESS_CATEGORY in varchar2 default null
142 ,P_MILITARY_COMMISSARIAT in varchar2 default null
143 ,P_QUITTING_MARK in varchar2 default null
144 ,P_MILITARY_UNIT_NUMBER in varchar2 default null
145 ,P_MILITARY_REG_TYPE in varchar2 default null
146 ,P_MILITARY_REG_DETAILS in varchar2 default null
147 ,P_PENSION_FUND_NUMBER in varchar2 default null
148 ,P_DATE_OF_DEATH in date default null
149 ,P_BACKGROUND_CHECK_STATUS in varchar2 default null
150 ,P_BACKGROUND_DATE_CHECK in date default null
151 ,P_BLOOD_TYPE in varchar2 default null
152 ,P_FAST_PATH_EMPLOYEE in varchar2 default null
153 ,P_FTE_CAPACITY in number default null
154 ,P_HONORS in varchar2 default null
155 ,P_INTERNAL_LOCATION in varchar2 default null
156 ,P_LAST_MEDICAL_TEST_BY in varchar2 default null
157 ,P_LAST_MEDICAL_TEST_DATE in date default null
158 ,P_MAILSTOP in varchar2 default null
159 ,P_OFFICE_NUMBER in varchar2 default null
160 ,P_ON_MILITARY_SERVICE in varchar2 default null
161 ,P_GENITIVE_LAST_NAME in varchar2 default null
162 ,P_PROJECTED_START_DATE in date default null
163 ,P_RESUME_EXISTS in varchar2 default null
164 ,P_RESUME_LAST_UPDATED in date default null
165 ,P_SECOND_PASSPORT_EXISTS in varchar2 default null
166 ,P_STUDENT_STATUS in varchar2 default null
167 ,P_WORK_SCHEDULE in varchar2 default null
168 ,P_SUFFIX in varchar2 default null
169 ,P_RECEIPT_OF_DEATH_CERT_DATE in date default null
170 ,P_COORD_BEN_MED_PLN_NO in varchar2 default null
171 ,P_COORD_BEN_NO_CVG_FLAG in varchar2 default null
172 ,P_COORD_BEN_MED_EXT_ER in varchar2 default null
173 ,P_COORD_BEN_MED_PL_NAME in varchar2 default null
174 ,P_COORD_BEN_MED_INSR_CRR_NAME in varchar2 default null
175 ,P_COORD_BEN_MED_INSR_CRR_IDENT in varchar2 default null
176 ,P_COORD_BEN_MED_CVG_STRT_DT in date default null
177 ,P_COORD_BEN_MED_CVG_END_DT in date default null
178 ,P_USES_TOBACCO_FLAG in varchar2 default null
179 ,P_DPDNT_ADOPTION_DATE in date default null
180 ,P_DPDNT_VLNTRY_SVCE_FLAG in varchar2 default null
181 ,P_ORIGINAL_DATE_OF_HIRE in date default null
182 ,P_ADJUSTED_SVC_DATE in date default null
183 ,P_TOWN_OF_BIRTH in varchar2 default null
184 ,P_REGION_OF_BIRTH in varchar2 default null
185 ,P_COUNTRY_OF_BIRTH in varchar2 default null
186 ,P_GLOBAL_PERSON_ID in varchar2 default null
187 ,P_PARTY_ID in number default null
188 ,P_PERSON_USER_KEY in varchar2
189 ,P_ASSIGNMENT_USER_KEY in varchar2
190 ,P_USER_PERSON_TYPE in varchar2 default null
191 ,P_LANGUAGE_CODE in varchar2 default null
192 ,P_VENDOR_NAME in varchar2 default null
193 ,P_CORRESPONDENCE_LANGUAGE in varchar2 default null
194 ,P_BENEFIT_GROUP in varchar2 default null) is
195 blid number := p_data_pump_batch_line_id;
196 begin
197 if blid is not null then
198 delete from hr_pump_batch_lines where batch_line_id = blid;
199 delete from hr_pump_batch_exceptions
200 where source_type = 'BATCH_LINE' and source_id = blid;
201 end if;
202 insert into hr_pump_batch_lines
203 (batch_id
204 ,batch_line_id
205 ,business_group_name
206 ,api_module_id
207 ,line_status
208 ,user_sequence
209 ,link_value
210 ,pval001
211 ,pval002
212 ,pval003
213 ,pval004
214 ,pval005
215 ,pval006
216 ,pval007
217 ,pval008
218 ,pval009
219 ,pval010
220 ,pval011
221 ,pval012
222 ,pval013
223 ,pval014
224 ,pval015
225 ,pval016
226 ,pval017
227 ,pval018
228 ,pval019
229 ,pval020
230 ,pval021
231 ,pval022
232 ,pval023
233 ,pval024
234 ,pval025
235 ,pval026
236 ,pval027
237 ,pval028
238 ,pval029
239 ,pval030
240 ,pval031
241 ,pval032
242 ,pval033
243 ,pval034
244 ,pval035
245 ,pval036
246 ,pval037
247 ,pval038
248 ,pval039
249 ,pval040
250 ,pval041
251 ,pval042
252 ,pval043
253 ,pval044
254 ,pval045
255 ,pval046
256 ,pval047
257 ,pval048
258 ,pval049
259 ,pval050
260 ,pval051
261 ,pval052
262 ,pval053
263 ,pval054
264 ,pval055
265 ,pval056
266 ,pval057
267 ,pval058
268 ,pval059
269 ,pval060
270 ,pval061
271 ,pval062
272 ,pval063
273 ,pval064
274 ,pval065
275 ,pval066
276 ,pval067
277 ,pval068
278 ,pval069
279 ,pval070
280 ,pval071
281 ,pval072
282 ,pval073
283 ,pval074
284 ,pval075
285 ,pval076
286 ,pval077
287 ,pval078
288 ,pval079
289 ,pval080
290 ,pval081
291 ,pval082
292 ,pval083
293 ,pval084
294 ,pval085
295 ,pval086
296 ,pval087
297 ,pval088
298 ,pval089
299 ,pval090
300 ,pval091
301 ,pval092
302 ,pval093
303 ,pval094
304 ,pval095
305 ,pval096
306 ,pval097
307 ,pval098
308 ,pval099
309 ,pval100
310 ,pval101
311 ,pval102
312 ,pval103
313 ,pval104
314 ,pval105
315 ,pval106
316 ,pval107
317 ,pval108
318 ,pval120
319 ,pval121
320 ,pval122
321 ,pval123
322 ,pval124)
323 values
324 (p_batch_id
325 ,nvl(blid,hr_pump_batch_lines_s.nextval)
326 ,p_data_pump_business_grp_name
327 ,3874
328 ,'U'
329 ,p_user_sequence
330 ,p_link_value
331 ,dc(P_HIRE_DATE)
332 ,P_LAST_NAME
333 ,P_SEX
334 ,P_COMMENTS
335 ,dc(P_DATE_EMPLOYEE_DATA_VERIFIED)
336 ,dc(P_DATE_OF_BIRTH)
337 ,P_EMAIL_ADDRESS
338 ,P_EMPLOYEE_NUMBER
339 ,P_EXPENSE_CHECK_SEND_TO_ADDRES
340 ,P_FIRST_NAME
341 ,P_KNOWN_AS
342 ,P_MARITAL_STATUS
343 ,P_MIDDLE_NAMES
344 ,P_NATIONALITY
345 ,P_INN
346 ,P_PREVIOUS_LAST_NAME
347 ,P_REGISTERED_DISABLED_FLAG
348 ,P_TITLE
349 ,P_WORK_TELEPHONE
350 ,P_ATTRIBUTE_CATEGORY
351 ,P_ATTRIBUTE1
352 ,P_ATTRIBUTE2
353 ,P_ATTRIBUTE3
354 ,P_ATTRIBUTE4
355 ,P_ATTRIBUTE5
356 ,P_ATTRIBUTE6
357 ,P_ATTRIBUTE7
358 ,P_ATTRIBUTE8
359 ,P_ATTRIBUTE9
360 ,P_ATTRIBUTE10
361 ,P_ATTRIBUTE11
362 ,P_ATTRIBUTE12
363 ,P_ATTRIBUTE13
364 ,P_ATTRIBUTE14
365 ,P_ATTRIBUTE15
366 ,P_ATTRIBUTE16
367 ,P_ATTRIBUTE17
368 ,P_ATTRIBUTE18
369 ,P_ATTRIBUTE19
370 ,P_ATTRIBUTE20
371 ,P_ATTRIBUTE21
372 ,P_ATTRIBUTE22
373 ,P_ATTRIBUTE23
374 ,P_ATTRIBUTE24
375 ,P_ATTRIBUTE25
376 ,P_ATTRIBUTE26
377 ,P_ATTRIBUTE27
378 ,P_ATTRIBUTE28
379 ,P_ATTRIBUTE29
380 ,P_ATTRIBUTE30
381 ,P_PLACE_OF_BIRTH
382 ,P_REFERENCES
383 ,P_LOCAL_COEFFICIENT
384 ,P_CITIZENSHIP
385 ,P_MILITARY_DOC
386 ,P_RESERVE_CATEGORY
387 ,P_MILITARY_RANK
388 ,P_MILITARY_PROFILE
389 ,P_MILITARY_REG_CODE
390 ,P_MIL_SRVC_READINESS_CATEGORY
391 ,P_MILITARY_COMMISSARIAT
392 ,P_QUITTING_MARK
396 ,P_PENSION_FUND_NUMBER
393 ,P_MILITARY_UNIT_NUMBER
394 ,P_MILITARY_REG_TYPE
395 ,P_MILITARY_REG_DETAILS
397 ,dc(P_DATE_OF_DEATH)
398 ,P_BACKGROUND_CHECK_STATUS
399 ,dc(P_BACKGROUND_DATE_CHECK)
400 ,P_BLOOD_TYPE
401 ,P_FAST_PATH_EMPLOYEE
402 ,P_FTE_CAPACITY
403 ,P_HONORS
404 ,P_INTERNAL_LOCATION
405 ,P_LAST_MEDICAL_TEST_BY
406 ,dc(P_LAST_MEDICAL_TEST_DATE)
407 ,P_MAILSTOP
408 ,P_OFFICE_NUMBER
409 ,P_ON_MILITARY_SERVICE
410 ,P_GENITIVE_LAST_NAME
411 ,dc(P_PROJECTED_START_DATE)
412 ,P_RESUME_EXISTS
413 ,dc(P_RESUME_LAST_UPDATED)
414 ,P_SECOND_PASSPORT_EXISTS
415 ,P_STUDENT_STATUS
416 ,P_WORK_SCHEDULE
417 ,P_SUFFIX
418 ,dc(P_RECEIPT_OF_DEATH_CERT_DATE)
419 ,P_COORD_BEN_MED_PLN_NO
420 ,P_COORD_BEN_NO_CVG_FLAG
421 ,P_COORD_BEN_MED_EXT_ER
422 ,P_COORD_BEN_MED_PL_NAME
423 ,P_COORD_BEN_MED_INSR_CRR_NAME
424 ,P_COORD_BEN_MED_INSR_CRR_IDENT
425 ,dc(P_COORD_BEN_MED_CVG_STRT_DT)
426 ,dc(P_COORD_BEN_MED_CVG_END_DT)
427 ,P_USES_TOBACCO_FLAG
428 ,dc(P_DPDNT_ADOPTION_DATE)
429 ,P_DPDNT_VLNTRY_SVCE_FLAG
430 ,dc(P_ORIGINAL_DATE_OF_HIRE)
431 ,dc(P_ADJUSTED_SVC_DATE)
432 ,P_TOWN_OF_BIRTH
433 ,P_REGION_OF_BIRTH
434 ,P_COUNTRY_OF_BIRTH
435 ,P_GLOBAL_PERSON_ID
436 ,P_PARTY_ID
437 ,P_PERSON_USER_KEY
438 ,P_ASSIGNMENT_USER_KEY
439 ,P_USER_PERSON_TYPE
440 ,P_LANGUAGE_CODE
441 ,P_VENDOR_NAME
442 ,P_CORRESPONDENCE_LANGUAGE
443 ,P_BENEFIT_GROUP);
444 end insert_batch_lines;
445 --
446 procedure call
447 (p_business_group_id in number,
448 p_batch_line_id     in number) is
449 cursor cr is
450 select l.rowid myrowid,
451 decode(l.pval001,cn,dn,d(l.pval001)) p1,
452 decode(l.pval002,cn,vn,l.pval002) p2,
453 decode(l.pval003,cn,vn,
454  hr_pump_get.gl(l.pval003,'SEX',dn,l.pval121)) p3,
455 decode(l.pval004,cn,vn,vn,vn,l.pval004) p4,
456 l.pval004 d4,
457 decode(l.pval005,cn,dn,vn,dn,d(l.pval005)) p5,
458 l.pval005 d5,
459 decode(l.pval006,cn,dn,vn,dn,d(l.pval006)) p6,
460 l.pval006 d6,
461 decode(l.pval007,cn,vn,vn,vn,l.pval007) p7,
462 l.pval007 d7,
463 decode(l.pval008,cn,vn,l.pval008) p8,
464 decode(l.pval009,cn,vn,vn,vn,l.pval009) p9,
465 l.pval009 d9,
466 decode(l.pval010,cn,vn,l.pval010) p10,
467 decode(l.pval011,cn,vn,vn,vn,l.pval011) p11,
468 l.pval011 d11,
469 decode(l.pval012,cn,vn,vn,vn,
470  hr_pump_get.gl(l.pval012,'MAR_STATUS',dn,l.pval121)) p12,
471 l.pval012 d12,
472 decode(l.pval013,cn,vn,vn,vn,l.pval013) p13,
473 l.pval013 d13,
474 decode(l.pval014,cn,vn,vn,vn,
475  hr_pump_get.gl(l.pval014,'NATIONALITY',dn,l.pval121)) p14,
476 l.pval014 d14,
477 decode(l.pval015,cn,vn,vn,vn,l.pval015) p15,
478 l.pval015 d15,
479 decode(l.pval016,cn,vn,vn,vn,l.pval016) p16,
480 l.pval016 d16,
481 decode(l.pval017,cn,vn,vn,vn,
482  hr_pump_get.gl(l.pval017,'YES_NO',dn,l.pval121)) p17,
483 l.pval017 d17,
484 decode(l.pval018,cn,vn,vn,vn,
485  hr_pump_get.gl(l.pval018,'TITLE',dn,l.pval121)) p18,
486 l.pval018 d18,
487 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
488 l.pval019 d19,
489 decode(l.pval020,cn,vn,vn,vn,l.pval020) p20,
490 l.pval020 d20,
491 decode(l.pval021,cn,vn,vn,vn,l.pval021) p21,
492 l.pval021 d21,
493 decode(l.pval022,cn,vn,vn,vn,l.pval022) p22,
494 l.pval022 d22,
495 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
496 l.pval023 d23,
497 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
498 l.pval024 d24,
499 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
500 l.pval025 d25,
501 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
502 l.pval026 d26,
503 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
504 l.pval027 d27,
505 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
506 l.pval028 d28,
507 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
508 l.pval029 d29,
509 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
510 l.pval030 d30,
511 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
512 l.pval031 d31,
513 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
514 l.pval032 d32,
515 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
516 l.pval033 d33,
517 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
518 l.pval034 d34,
519 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
520 l.pval035 d35,
521 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
522 l.pval036 d36,
523 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
524 l.pval037 d37,
525 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
526 l.pval038 d38,
527 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
528 l.pval039 d39,
529 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
530 l.pval040 d40,
531 decode(l.pval041,cn,vn,vn,vn,l.pval041) p41,
532 l.pval041 d41,
533 decode(l.pval042,cn,vn,vn,vn,l.pval042) p42,
534 l.pval042 d42,
535 decode(l.pval043,cn,vn,vn,vn,l.pval043) p43,
536 l.pval043 d43,
537 decode(l.pval044,cn,vn,vn,vn,l.pval044) p44,
538 l.pval044 d44,
539 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
540 l.pval045 d45,
541 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
542 l.pval046 d46,
543 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
544 l.pval047 d47,
545 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
546 l.pval048 d48,
547 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
548 l.pval049 d49,
549 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
550 l.pval050 d50,
551 decode(l.pval051,cn,vn,vn,vn,
552  hr_pump_get.gl(l.pval051,'RU_OKATO',dn,l.pval121)) p51,
553 l.pval051 d51,
554 decode(l.pval052,cn,vn,vn,vn,l.pval052) p52,
555 l.pval052 d52,
556 decode(l.pval053,cn,vn,vn,vn,l.pval053) p53,
557 l.pval053 d53,
558 decode(l.pval054,cn,vn,
559  hr_pump_get.gl(l.pval054,'RU_CITIZENSHIP',dn,l.pval121)) p54,
560 decode(l.pval055,cn,vn,vn,vn,
564  hr_pump_get.gl(l.pval056,'RU_RESERVE_CATEGORY',dn,l.pval121)) p56,
561  hr_pump_get.gl(l.pval055,'RU_MILITARY_DOC_TYPE',dn,l.pval121)) p55,
562 l.pval055 d55,
563 decode(l.pval056,cn,vn,vn,vn,
565 l.pval056 d56,
566 decode(l.pval057,cn,vn,vn,vn,
567  hr_pump_get.gl(l.pval057,'RU_MILITARY_RANK',dn,l.pval121)) p57,
568 l.pval057 d57,
569 decode(l.pval058,cn,vn,vn,vn,
570  hr_pump_get.gl(l.pval058,'RU_MILITARY_PROFILE',dn,l.pval121)) p58,
571 l.pval058 d58,
572 decode(l.pval059,cn,vn,vn,vn,l.pval059) p59,
573 l.pval059 d59,
574 decode(l.pval060,cn,vn,vn,vn,
575  hr_pump_get.gl(l.pval060,'RU_MILITARY_SERVICE_READINESS_CATEGORY',dn,l.pval121)) p60,
576 l.pval060 d60,
577 decode(l.pval061,cn,vn,vn,vn,l.pval061) p61,
578 l.pval061 d61,
579 decode(l.pval062,cn,vn,vn,vn,
580  hr_pump_get.gl(l.pval062,'RU_QUITTING_MARK',dn,l.pval121)) p62,
581 l.pval062 d62,
582 decode(l.pval063,cn,vn,vn,vn,l.pval063) p63,
583 l.pval063 d63,
584 decode(l.pval064,cn,vn,vn,vn,l.pval064) p64,
585 l.pval064 d64,
586 decode(l.pval065,cn,vn,vn,vn,l.pval065) p65,
587 l.pval065 d65,
588 decode(l.pval066,cn,vn,vn,vn,l.pval066) p66,
589 l.pval066 d66,
590 decode(l.pval067,cn,dn,vn,dn,d(l.pval067)) p67,
591 l.pval067 d67,
592 decode(l.pval068,cn,vn,vn,vn,
593  hr_pump_get.gl(l.pval068,'YES_NO',dn,l.pval121)) p68,
594 l.pval068 d68,
595 decode(l.pval069,cn,dn,vn,dn,d(l.pval069)) p69,
596 l.pval069 d69,
597 decode(l.pval070,cn,vn,vn,vn,
598  hr_pump_get.gl(l.pval070,'BLOOD_TYPE',dn,l.pval121)) p70,
599 l.pval070 d70,
600 decode(l.pval071,cn,vn,vn,vn,l.pval071) p71,
601 l.pval071 d71,
602 decode(l.pval072,cn,nn,vn,nn,n(l.pval072)) p72,
603 l.pval072 d72,
604 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
605 l.pval073 d73,
606 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
607 l.pval074 d74,
608 decode(l.pval075,cn,vn,vn,vn,l.pval075) p75,
609 l.pval075 d75,
610 decode(l.pval076,cn,dn,vn,dn,d(l.pval076)) p76,
611 l.pval076 d76,
612 decode(l.pval077,cn,vn,vn,vn,l.pval077) p77,
613 l.pval077 d77,
614 decode(l.pval078,cn,vn,vn,vn,l.pval078) p78,
615 l.pval078 d78,
616 decode(l.pval079,cn,vn,vn,vn,
617  hr_pump_get.gl(l.pval079,'YES_NO',dn,l.pval121)) p79,
618 l.pval079 d79,
619 decode(l.pval080,cn,vn,vn,vn,l.pval080) p80,
620 l.pval080 d80,
621 decode(l.pval081,cn,dn,vn,dn,d(l.pval081)) p81,
622 l.pval081 d81,
623 decode(l.pval082,cn,vn,vn,vn,
624  hr_pump_get.gl(l.pval082,'YES_NO',dn,l.pval121)) p82,
625 l.pval082 d82,
626 decode(l.pval083,cn,dn,vn,dn,d(l.pval083)) p83,
627 l.pval083 d83,
628 decode(l.pval084,cn,vn,vn,vn,
629  hr_pump_get.gl(l.pval084,'YES_NO',dn,l.pval121)) p84,
630 l.pval084 d84,
631 decode(l.pval085,cn,vn,vn,vn,
632  hr_pump_get.gl(l.pval085,'STUDENT_STATUS',dn,l.pval121)) p85,
633 l.pval085 d85,
634 decode(l.pval086,cn,vn,vn,vn,
635  hr_pump_get.gl(l.pval086,'WORK_SCHEDULE',dn,l.pval121)) p86,
636 l.pval086 d86,
637 decode(l.pval087,cn,vn,vn,vn,l.pval087) p87,
638 l.pval087 d87,
639 decode(l.pval088,cn,dn,vn,dn,d(l.pval088)) p88,
640 l.pval088 d88,
641 decode(l.pval089,cn,vn,vn,vn,l.pval089) p89,
642 l.pval089 d89,
643 decode(l.pval090,cn,vn,vn,'N',
644  hr_pump_get.gl(l.pval090,'YES_NO',dn,l.pval121)) p90,
645 l.pval090 d90,
646 decode(l.pval091,cn,vn,vn,vn,l.pval091) p91,
647 l.pval091 d91,
648 decode(l.pval092,cn,vn,vn,vn,l.pval092) p92,
649 l.pval092 d92,
650 decode(l.pval093,cn,vn,vn,vn,l.pval093) p93,
651 l.pval093 d93,
652 decode(l.pval094,cn,vn,vn,vn,l.pval094) p94,
653 l.pval094 d94,
654 decode(l.pval095,cn,dn,vn,dn,d(l.pval095)) p95,
655 l.pval095 d95,
656 decode(l.pval096,cn,dn,vn,dn,d(l.pval096)) p96,
657 l.pval096 d96,
658 decode(l.pval097,cn,vn,vn,vn,
659  hr_pump_get.gl(l.pval097,'TOBACCO_USER',dn,l.pval121)) p97,
660 l.pval097 d97,
661 decode(l.pval098,cn,dn,vn,dn,d(l.pval098)) p98,
662 l.pval098 d98,
663 decode(l.pval099,cn,vn,vn,'N',
664  hr_pump_get.gl(l.pval099,'YES_NO',dn,l.pval121)) p99,
665 l.pval099 d99,
666 decode(l.pval100,cn,dn,vn,dn,d(l.pval100)) p100,
667 l.pval100 d100,
668 decode(l.pval101,cn,dn,vn,dn,d(l.pval101)) p101,
669 l.pval101 d101,
670 decode(l.pval102,cn,vn,vn,vn,l.pval102) p102,
671 l.pval102 d102,
672 decode(l.pval103,cn,vn,vn,vn,l.pval103) p103,
673 l.pval103 d103,
674 decode(l.pval104,cn,vn,vn,vn,l.pval104) p104,
675 l.pval104 d104,
676 decode(l.pval105,cn,vn,vn,vn,l.pval105) p105,
677 l.pval105 d105,
678 decode(l.pval106,cn,nn,vn,nn,n(l.pval106)) p106,
679 l.pval106 d106,
680 l.pval107 p107,
681 l.pval108 p108,
682 l.pval109 p109,
683 l.pval110 p110,
684 decode(l.pval111,cn,dn,d(l.pval111)) p111,
685 decode(l.pval112,cn,dn,d(l.pval112)) p112,
686 l.pval113 p113,
687 l.pval114 p114,
688 l.pval115 p115,
689 l.pval116 p116,
690 l.pval117 p117,
691 l.pval118 p118,
692 l.pval119 p119,
693 decode(l.pval120,cn,vn,vn,vn,l.pval120) p120,
694 l.pval120 d120,
695 decode(l.pval121,cn,vn,vn,vn,l.pval121) p121,
696 l.pval121 d121,
697 decode(l.pval122,cn,vn,vn,vn,l.pval122) p122,
698 l.pval122 d122,
699 decode(l.pval123,cn,vn,vn,vn,l.pval123) p123,
700 l.pval123 d123,
701 decode(l.pval124,cn,vn,vn,vn,l.pval124) p124,
702 l.pval124 d124
703 from hr_pump_batch_lines l
704 where l.batch_line_id = p_batch_line_id;
705 --
706 c cr%rowtype;
707 l_validate boolean := false;
708 L_PERSON_ID number;
709 L_ASSIGNMENT_ID number;
710 L_NAME_COMBINATION_WARNING boolean;
711 L_ASSIGN_PAYROLL_WARNING boolean;
712 L_ORIG_HIRE_WARNING boolean;
713 L_PERSON_TYPE_ID number;
714 L_VENDOR_ID number;
715 L_CORRESPONDENCE_LANGUAGE varchar2(2000);
716 L_BENEFIT_GROUP_ID number;
717 --
718 begin
719 hr_data_pump.entry('call');
720 open cr;
724 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
721 fetch cr into c;
722 if cr%notfound then
723 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
725 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
726 hr_utility.set_message_token('VALUE',p_batch_line_id);
727 hr_utility.raise_error;
728 end if;
729 --
730 if c.p120 is null or
731 c.p121 is null then
732 L_PERSON_TYPE_ID:=nn;
733 else
734 L_PERSON_TYPE_ID := 
735 hr_pump_get.get_person_type_id
736 (P_USER_PERSON_TYPE => c.p120
737 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
738 ,P_LANGUAGE_CODE => c.p121);
739 end if;
740 --
741 if c.p122 is null then
742 L_VENDOR_ID:=nn;
743 else
744 L_VENDOR_ID := 
745 hr_pump_get.get_vendor_id
746 (P_VENDOR_NAME => c.p122);
747 end if;
748 --
749 if c.p123 is null then
750 L_CORRESPONDENCE_LANGUAGE:=vn;
751 else
752 L_CORRESPONDENCE_LANGUAGE := 
753 hr_pump_get.GET_CORRESPONDENCE_LANGUAGE
754 (P_CORRESPONDENCE_LANGUAGE => c.p123);
755 end if;
756 --
757 if c.p124 is null then
758 L_BENEFIT_GROUP_ID:=nn;
759 else
760 L_BENEFIT_GROUP_ID := 
761 hr_pump_get.get_benefit_group_id
762 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
763 ,P_BENEFIT_GROUP => c.p124);
764 end if;
765 --
766 hr_data_pump.api_trc_on;
767 HR_RU_EMPLOYEE_API.CREATE_RU_EMPLOYEE
768 (p_validate => l_validate
769 ,P_HIRE_DATE => c.p1
770 ,p_business_group_id => p_business_group_id
771 ,P_LAST_NAME => c.p2
772 ,P_SEX => c.p3
773 ,P_PERSON_TYPE_ID => L_PERSON_TYPE_ID
774 ,P_COMMENTS => c.p4
775 ,P_DATE_EMPLOYEE_DATA_VERIFIED => c.p5
776 ,P_DATE_OF_BIRTH => c.p6
777 ,P_EMAIL_ADDRESS => c.p7
778 ,P_EMPLOYEE_NUMBER => c.p8
779 ,P_EXPENSE_CHECK_SEND_TO_ADDRES => c.p9
780 ,P_FIRST_NAME => c.p10
781 ,P_KNOWN_AS => c.p11
782 ,P_MARITAL_STATUS => c.p12
783 ,P_MIDDLE_NAMES => c.p13
784 ,P_NATIONALITY => c.p14
785 ,P_INN => c.p15
786 ,P_PREVIOUS_LAST_NAME => c.p16
787 ,P_REGISTERED_DISABLED_FLAG => c.p17
788 ,P_TITLE => c.p18
789 ,P_VENDOR_ID => L_VENDOR_ID
790 ,P_WORK_TELEPHONE => c.p19
791 ,P_ATTRIBUTE_CATEGORY => c.p20
792 ,P_ATTRIBUTE1 => c.p21
793 ,P_ATTRIBUTE2 => c.p22
794 ,P_ATTRIBUTE3 => c.p23
795 ,P_ATTRIBUTE4 => c.p24
796 ,P_ATTRIBUTE5 => c.p25
797 ,P_ATTRIBUTE6 => c.p26
798 ,P_ATTRIBUTE7 => c.p27
799 ,P_ATTRIBUTE8 => c.p28
800 ,P_ATTRIBUTE9 => c.p29
801 ,P_ATTRIBUTE10 => c.p30
802 ,P_ATTRIBUTE11 => c.p31
803 ,P_ATTRIBUTE12 => c.p32
804 ,P_ATTRIBUTE13 => c.p33
805 ,P_ATTRIBUTE14 => c.p34
806 ,P_ATTRIBUTE15 => c.p35
807 ,P_ATTRIBUTE16 => c.p36
808 ,P_ATTRIBUTE17 => c.p37
809 ,P_ATTRIBUTE18 => c.p38
810 ,P_ATTRIBUTE19 => c.p39
811 ,P_ATTRIBUTE20 => c.p40
812 ,P_ATTRIBUTE21 => c.p41
813 ,P_ATTRIBUTE22 => c.p42
814 ,P_ATTRIBUTE23 => c.p43
815 ,P_ATTRIBUTE24 => c.p44
816 ,P_ATTRIBUTE25 => c.p45
817 ,P_ATTRIBUTE26 => c.p46
818 ,P_ATTRIBUTE27 => c.p47
819 ,P_ATTRIBUTE28 => c.p48
820 ,P_ATTRIBUTE29 => c.p49
821 ,P_ATTRIBUTE30 => c.p50
822 ,P_PLACE_OF_BIRTH => c.p51
823 ,P_REFERENCES => c.p52
824 ,P_LOCAL_COEFFICIENT => c.p53
825 ,P_CITIZENSHIP => c.p54
826 ,P_MILITARY_DOC => c.p55
827 ,P_RESERVE_CATEGORY => c.p56
828 ,P_MILITARY_RANK => c.p57
829 ,P_MILITARY_PROFILE => c.p58
830 ,P_MILITARY_REG_CODE => c.p59
831 ,P_MIL_SRVC_READINESS_CATEGORY => c.p60
832 ,P_MILITARY_COMMISSARIAT => c.p61
833 ,P_QUITTING_MARK => c.p62
834 ,P_MILITARY_UNIT_NUMBER => c.p63
835 ,P_MILITARY_REG_TYPE => c.p64
836 ,P_MILITARY_REG_DETAILS => c.p65
837 ,P_PENSION_FUND_NUMBER => c.p66
838 ,P_DATE_OF_DEATH => c.p67
839 ,P_BACKGROUND_CHECK_STATUS => c.p68
840 ,P_BACKGROUND_DATE_CHECK => c.p69
841 ,P_BLOOD_TYPE => c.p70
842 ,P_CORRESPONDENCE_LANGUAGE => L_CORRESPONDENCE_LANGUAGE
843 ,P_FAST_PATH_EMPLOYEE => c.p71
844 ,P_FTE_CAPACITY => c.p72
845 ,P_HONORS => c.p73
846 ,P_INTERNAL_LOCATION => c.p74
847 ,P_LAST_MEDICAL_TEST_BY => c.p75
848 ,P_LAST_MEDICAL_TEST_DATE => c.p76
849 ,P_MAILSTOP => c.p77
850 ,P_OFFICE_NUMBER => c.p78
851 ,P_ON_MILITARY_SERVICE => c.p79
852 ,P_GENITIVE_LAST_NAME => c.p80
853 ,P_PROJECTED_START_DATE => c.p81
854 ,P_RESUME_EXISTS => c.p82
855 ,P_RESUME_LAST_UPDATED => c.p83
856 ,P_SECOND_PASSPORT_EXISTS => c.p84
857 ,P_STUDENT_STATUS => c.p85
858 ,P_WORK_SCHEDULE => c.p86
859 ,P_SUFFIX => c.p87
860 ,P_BENEFIT_GROUP_ID => L_BENEFIT_GROUP_ID
861 ,P_RECEIPT_OF_DEATH_CERT_DATE => c.p88
862 ,P_COORD_BEN_MED_PLN_NO => c.p89
863 ,P_COORD_BEN_NO_CVG_FLAG => c.p90
864 ,P_COORD_BEN_MED_EXT_ER => c.p91
865 ,P_COORD_BEN_MED_PL_NAME => c.p92
866 ,P_COORD_BEN_MED_INSR_CRR_NAME => c.p93
867 ,P_COORD_BEN_MED_INSR_CRR_IDENT => c.p94
868 ,P_COORD_BEN_MED_CVG_STRT_DT => c.p95
869 ,P_COORD_BEN_MED_CVG_END_DT => c.p96
870 ,P_USES_TOBACCO_FLAG => c.p97
871 ,P_DPDNT_ADOPTION_DATE => c.p98
872 ,P_DPDNT_VLNTRY_SVCE_FLAG => c.p99
873 ,P_ORIGINAL_DATE_OF_HIRE => c.p100
874 ,P_ADJUSTED_SVC_DATE => c.p101
875 ,P_TOWN_OF_BIRTH => c.p102
876 ,P_REGION_OF_BIRTH => c.p103
877 ,P_COUNTRY_OF_BIRTH => c.p104
878 ,P_GLOBAL_PERSON_ID => c.p105
879 ,P_PARTY_ID => c.p106
880 ,P_PERSON_ID => L_PERSON_ID
881 ,P_ASSIGNMENT_ID => L_ASSIGNMENT_ID
882 ,P_PER_OBJECT_VERSION_NUMBER => c.p109
883 ,P_ASG_OBJECT_VERSION_NUMBER => c.p110
884 ,P_PER_EFFECTIVE_START_DATE => c.p111
885 ,P_PER_EFFECTIVE_END_DATE => c.p112
886 ,P_FULL_NAME => c.p113
887 ,P_PER_COMMENT_ID => c.p114
888 ,P_ASSIGNMENT_SEQUENCE => c.p115
889 ,P_ASSIGNMENT_NUMBER => c.p116
890 ,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
891 ,P_ASSIGN_PAYROLL_WARNING => L_ASSIGN_PAYROLL_WARNING
895 iuk(p_batch_line_id,c.p107,L_PERSON_ID);
892 ,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING);
893 hr_data_pump.api_trc_off;
894 --
896 --
897 iuk(p_batch_line_id,c.p108,L_ASSIGNMENT_ID);
898 --
899 if L_NAME_COMBINATION_WARNING then
900 c.p117 := 'TRUE';
901 else
902 c.p117 := 'FALSE';
903 end if;
904 --
905 if L_ASSIGN_PAYROLL_WARNING then
906 c.p118 := 'TRUE';
907 else
908 c.p118 := 'FALSE';
909 end if;
910 --
911 if L_ORIG_HIRE_WARNING then
912 c.p119 := 'TRUE';
913 else
914 c.p119 := 'FALSE';
915 end if;
916 --
917 update hr_pump_batch_lines l set
918 l.pval008 = decode(c.p8,null,cn,c.p8),
919 l.pval107 = decode(c.p107,null,cn,c.p107),
920 l.pval108 = decode(c.p108,null,cn,c.p108),
921 l.pval109 = decode(c.p109,null,cn,c.p109),
922 l.pval110 = decode(c.p110,null,cn,c.p110),
923 l.pval111 = decode(c.p111,null,cn,dc(c.p111)),
924 l.pval112 = decode(c.p112,null,cn,dc(c.p112)),
925 l.pval113 = decode(c.p113,null,cn,c.p113),
926 l.pval114 = decode(c.p114,null,cn,c.p114),
927 l.pval115 = decode(c.p115,null,cn,c.p115),
928 l.pval116 = decode(c.p116,null,cn,c.p116),
929 l.pval117 = decode(c.p117,null,cn,c.p117),
930 l.pval118 = decode(c.p118,null,cn,c.p118),
931 l.pval119 = decode(c.p119,null,cn,c.p119)
932 where l.rowid = c.myrowid;
933 --
934 close cr;
935 --
936 hr_data_pump.exit('call');
937 exception
938  when hr_multi_message.error_message_exist then
939    if cr%isopen then
940     close cr;
941    end if;
942    hr_pump_utils.set_multi_msg_error_flag(true);
943  when others then
944  if cr%isopen then
945   close cr;
946  end if;
947  raise;
948 end call;
949 end hrdpp_CREATE_RU_EMPLOYEE;