DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_CREATE_IN_EMPLOYEE

Source


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