eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.HRDPP_CREATE_GB_SECONDARY_EMP_

Source


1 package body hrdpp_create_gb_secondary_emp_ as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2007/01/04 02:01:35
4  * Generated for API: hr_assignment_api.create_gb_secondary_emp_asg
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_EFFECTIVE_DATE in date
83 ,P_ASSIGNMENT_NUMBER in varchar2
84 ,P_CHANGE_REASON in varchar2 default null
85 ,P_COMMENTS in varchar2 default null
86 ,P_DATE_PROBATION_END in date default null
87 ,P_EMPLOYMENT_CATEGORY in varchar2 default null
88 ,P_FREQUENCY in varchar2 default null
89 ,P_INTERNAL_ADDRESS_LINE in varchar2 default null
90 ,P_MANAGER_FLAG in varchar2 default null
91 ,P_NORMAL_HOURS in number default null
92 ,P_PERF_REVIEW_PERIOD in number default null
93 ,P_PERF_REVIEW_PERIOD_FREQUENCY in varchar2 default null
94 ,P_PROBATION_PERIOD in number default null
95 ,P_PROBATION_UNIT in varchar2 default null
96 ,P_SAL_REVIEW_PERIOD in number default null
97 ,P_SAL_REVIEW_PERIOD_FREQUENCY in varchar2 default null
98 ,P_SOURCE_TYPE in varchar2 default null
99 ,P_TIME_NORMAL_FINISH in varchar2 default null
100 ,P_TIME_NORMAL_START in varchar2 default null
101 ,P_BARGAINING_UNIT_CODE in varchar2 default null
102 ,P_LABOUR_UNION_MEMBER_FLAG in varchar2 default null
103 ,P_HOURLY_SALARIED_CODE in varchar2 default null
104 ,P_ASS_ATTRIBUTE_CATEGORY in varchar2 default null
105 ,P_ASS_ATTRIBUTE1 in varchar2 default null
106 ,P_ASS_ATTRIBUTE2 in varchar2 default null
107 ,P_ASS_ATTRIBUTE3 in varchar2 default null
108 ,P_ASS_ATTRIBUTE4 in varchar2 default null
109 ,P_ASS_ATTRIBUTE5 in varchar2 default null
110 ,P_ASS_ATTRIBUTE6 in varchar2 default null
111 ,P_ASS_ATTRIBUTE7 in varchar2 default null
112 ,P_ASS_ATTRIBUTE8 in varchar2 default null
113 ,P_ASS_ATTRIBUTE9 in varchar2 default null
114 ,P_ASS_ATTRIBUTE10 in varchar2 default null
115 ,P_ASS_ATTRIBUTE11 in varchar2 default null
116 ,P_ASS_ATTRIBUTE12 in varchar2 default null
117 ,P_ASS_ATTRIBUTE13 in varchar2 default null
118 ,P_ASS_ATTRIBUTE14 in varchar2 default null
119 ,P_ASS_ATTRIBUTE15 in varchar2 default null
120 ,P_ASS_ATTRIBUTE16 in varchar2 default null
121 ,P_ASS_ATTRIBUTE17 in varchar2 default null
122 ,P_ASS_ATTRIBUTE18 in varchar2 default null
123 ,P_ASS_ATTRIBUTE19 in varchar2 default null
124 ,P_ASS_ATTRIBUTE20 in varchar2 default null
125 ,P_ASS_ATTRIBUTE21 in varchar2 default null
126 ,P_ASS_ATTRIBUTE22 in varchar2 default null
127 ,P_ASS_ATTRIBUTE23 in varchar2 default null
128 ,P_ASS_ATTRIBUTE24 in varchar2 default null
129 ,P_ASS_ATTRIBUTE25 in varchar2 default null
130 ,P_ASS_ATTRIBUTE26 in varchar2 default null
131 ,P_ASS_ATTRIBUTE27 in varchar2 default null
132 ,P_ASS_ATTRIBUTE28 in varchar2 default null
133 ,P_ASS_ATTRIBUTE29 in varchar2 default null
134 ,P_ASS_ATTRIBUTE30 in varchar2 default null
135 ,P_TITLE in varchar2 default null
136 ,P_PGP_SEGMENT1 in varchar2 default null
137 ,P_PGP_SEGMENT2 in varchar2 default null
138 ,P_PGP_SEGMENT3 in varchar2 default null
139 ,P_PGP_SEGMENT4 in varchar2 default null
140 ,P_PGP_SEGMENT5 in varchar2 default null
141 ,P_PGP_SEGMENT6 in varchar2 default null
142 ,P_PGP_SEGMENT7 in varchar2 default null
143 ,P_PGP_SEGMENT8 in varchar2 default null
144 ,P_PGP_SEGMENT9 in varchar2 default null
145 ,P_PGP_SEGMENT10 in varchar2 default null
146 ,P_PGP_SEGMENT11 in varchar2 default null
147 ,P_PGP_SEGMENT12 in varchar2 default null
148 ,P_PGP_SEGMENT13 in varchar2 default null
149 ,P_PGP_SEGMENT14 in varchar2 default null
150 ,P_PGP_SEGMENT15 in varchar2 default null
151 ,P_PGP_SEGMENT16 in varchar2 default null
152 ,P_PGP_SEGMENT17 in varchar2 default null
153 ,P_PGP_SEGMENT18 in varchar2 default null
154 ,P_PGP_SEGMENT19 in varchar2 default null
155 ,P_PGP_SEGMENT20 in varchar2 default null
156 ,P_PGP_SEGMENT21 in varchar2 default null
157 ,P_PGP_SEGMENT22 in varchar2 default null
158 ,P_PGP_SEGMENT23 in varchar2 default null
159 ,P_PGP_SEGMENT24 in varchar2 default null
160 ,P_PGP_SEGMENT25 in varchar2 default null
161 ,P_PGP_SEGMENT26 in varchar2 default null
162 ,P_PGP_SEGMENT27 in varchar2 default null
163 ,P_PGP_SEGMENT28 in varchar2 default null
164 ,P_PGP_SEGMENT29 in varchar2 default null
165 ,P_PGP_SEGMENT30 in varchar2 default null
166 ,P_PGP_CONCAT_SEGMENTS in varchar2 default null
167 ,P_ASSIGNMENT_USER_KEY in varchar2
168 ,P_PERSON_USER_KEY in varchar2
169 ,P_ORGANIZATION_NAME in varchar2
170 ,P_LANGUAGE_CODE in varchar2
171 ,P_GRADE_NAME in varchar2 default null
172 ,P_POSITION_NAME in varchar2 default null
173 ,P_JOB_NAME in varchar2 default null
174 ,P_USER_STATUS in varchar2 default null
175 ,P_PAYROLL_NAME in varchar2 default null
176 ,P_LOCATION_CODE in varchar2 default null
177 ,P_SUPERVISOR_USER_KEY in varchar2 default null
178 ,P_SPECIAL_CEILIN_STEP_USER_KEY in varchar2 default null
179 ,P_PAY_BASIS_NAME in varchar2 default null
180 ,P_DEFAULT_CODE_COMB_USER_KEY in varchar2 default null
181 ,P_SET_OF_BOOKS_NAME in varchar2 default null
182 ,P_SVR_ASSIGNMENT_USER_KEY in varchar2 default null) is
183 blid number := p_data_pump_batch_line_id;
184 begin
185 if blid is not null then
186 delete from hr_pump_batch_lines where batch_line_id = blid;
187 delete from hr_pump_batch_exceptions
188 where source_type = 'BATCH_LINE' and source_id = blid;
189 end if;
190 insert into hr_pump_batch_lines
191 (batch_id
192 ,batch_line_id
193 ,business_group_name
194 ,api_module_id
195 ,line_status
196 ,user_sequence
197 ,link_value
198 ,pval001
199 ,pval002
200 ,pval003
201 ,pval004
202 ,pval005
203 ,pval006
204 ,pval007
205 ,pval008
206 ,pval009
207 ,pval010
208 ,pval011
209 ,pval012
210 ,pval013
211 ,pval014
212 ,pval015
213 ,pval016
214 ,pval017
215 ,pval018
216 ,pval019
217 ,pval020
218 ,pval021
219 ,pval022
220 ,pval023
221 ,pval024
222 ,pval025
223 ,pval026
224 ,pval027
225 ,pval028
226 ,pval029
227 ,pval030
228 ,pval031
229 ,pval032
230 ,pval033
231 ,pval034
232 ,pval035
233 ,pval036
234 ,pval037
235 ,pval038
236 ,pval039
237 ,pval040
238 ,pval041
239 ,pval042
240 ,pval043
241 ,pval044
242 ,pval045
243 ,pval046
244 ,pval047
245 ,pval048
246 ,pval049
247 ,pval050
248 ,pval051
249 ,pval052
250 ,pval053
251 ,pval054
252 ,pval055
253 ,pval056
254 ,pval057
255 ,pval058
256 ,pval059
257 ,pval060
258 ,pval061
259 ,pval062
260 ,pval063
261 ,pval064
262 ,pval065
263 ,pval066
264 ,pval067
265 ,pval068
266 ,pval069
267 ,pval070
268 ,pval071
269 ,pval072
270 ,pval073
271 ,pval074
272 ,pval075
273 ,pval076
274 ,pval077
275 ,pval078
276 ,pval079
277 ,pval080
278 ,pval081
279 ,pval082
280 ,pval083
281 ,pval084
282 ,pval085
283 ,pval087
284 ,pval098
285 ,pval099
286 ,pval100
287 ,pval101
288 ,pval102
289 ,pval103
290 ,pval104
291 ,pval105
292 ,pval106
293 ,pval107
294 ,pval108
295 ,pval109
296 ,pval110
297 ,pval111
298 ,pval112)
299 values
300 (p_batch_id
301 ,nvl(blid,hr_pump_batch_lines_s.nextval)
302 ,p_data_pump_business_grp_name
303 ,1374
304 ,'U'
305 ,p_user_sequence
306 ,p_link_value
307 ,dc(P_EFFECTIVE_DATE)
308 ,P_ASSIGNMENT_NUMBER
309 ,P_CHANGE_REASON
310 ,P_COMMENTS
311 ,dc(P_DATE_PROBATION_END)
312 ,P_EMPLOYMENT_CATEGORY
313 ,P_FREQUENCY
314 ,P_INTERNAL_ADDRESS_LINE
315 ,P_MANAGER_FLAG
316 ,P_NORMAL_HOURS
317 ,P_PERF_REVIEW_PERIOD
318 ,P_PERF_REVIEW_PERIOD_FREQUENCY
319 ,P_PROBATION_PERIOD
320 ,P_PROBATION_UNIT
321 ,P_SAL_REVIEW_PERIOD
322 ,P_SAL_REVIEW_PERIOD_FREQUENCY
323 ,P_SOURCE_TYPE
324 ,P_TIME_NORMAL_FINISH
325 ,P_TIME_NORMAL_START
326 ,P_BARGAINING_UNIT_CODE
327 ,P_LABOUR_UNION_MEMBER_FLAG
328 ,P_HOURLY_SALARIED_CODE
329 ,P_ASS_ATTRIBUTE_CATEGORY
330 ,P_ASS_ATTRIBUTE1
331 ,P_ASS_ATTRIBUTE2
332 ,P_ASS_ATTRIBUTE3
333 ,P_ASS_ATTRIBUTE4
334 ,P_ASS_ATTRIBUTE5
335 ,P_ASS_ATTRIBUTE6
336 ,P_ASS_ATTRIBUTE7
337 ,P_ASS_ATTRIBUTE8
338 ,P_ASS_ATTRIBUTE9
339 ,P_ASS_ATTRIBUTE10
340 ,P_ASS_ATTRIBUTE11
341 ,P_ASS_ATTRIBUTE12
342 ,P_ASS_ATTRIBUTE13
343 ,P_ASS_ATTRIBUTE14
344 ,P_ASS_ATTRIBUTE15
345 ,P_ASS_ATTRIBUTE16
346 ,P_ASS_ATTRIBUTE17
347 ,P_ASS_ATTRIBUTE18
348 ,P_ASS_ATTRIBUTE19
349 ,P_ASS_ATTRIBUTE20
350 ,P_ASS_ATTRIBUTE21
351 ,P_ASS_ATTRIBUTE22
352 ,P_ASS_ATTRIBUTE23
353 ,P_ASS_ATTRIBUTE24
354 ,P_ASS_ATTRIBUTE25
355 ,P_ASS_ATTRIBUTE26
356 ,P_ASS_ATTRIBUTE27
357 ,P_ASS_ATTRIBUTE28
358 ,P_ASS_ATTRIBUTE29
359 ,P_ASS_ATTRIBUTE30
360 ,P_TITLE
361 ,P_PGP_SEGMENT1
362 ,P_PGP_SEGMENT2
363 ,P_PGP_SEGMENT3
364 ,P_PGP_SEGMENT4
365 ,P_PGP_SEGMENT5
366 ,P_PGP_SEGMENT6
367 ,P_PGP_SEGMENT7
368 ,P_PGP_SEGMENT8
369 ,P_PGP_SEGMENT9
370 ,P_PGP_SEGMENT10
371 ,P_PGP_SEGMENT11
372 ,P_PGP_SEGMENT12
373 ,P_PGP_SEGMENT13
374 ,P_PGP_SEGMENT14
375 ,P_PGP_SEGMENT15
376 ,P_PGP_SEGMENT16
377 ,P_PGP_SEGMENT17
378 ,P_PGP_SEGMENT18
379 ,P_PGP_SEGMENT19
380 ,P_PGP_SEGMENT20
381 ,P_PGP_SEGMENT21
382 ,P_PGP_SEGMENT22
383 ,P_PGP_SEGMENT23
384 ,P_PGP_SEGMENT24
385 ,P_PGP_SEGMENT25
386 ,P_PGP_SEGMENT26
387 ,P_PGP_SEGMENT27
388 ,P_PGP_SEGMENT28
389 ,P_PGP_SEGMENT29
390 ,P_PGP_SEGMENT30
391 ,P_PGP_CONCAT_SEGMENTS
392 ,P_ASSIGNMENT_USER_KEY
393 ,P_PERSON_USER_KEY
394 ,P_ORGANIZATION_NAME
395 ,P_LANGUAGE_CODE
396 ,P_GRADE_NAME
397 ,P_POSITION_NAME
398 ,P_JOB_NAME
399 ,P_USER_STATUS
400 ,P_PAYROLL_NAME
401 ,P_LOCATION_CODE
402 ,P_SUPERVISOR_USER_KEY
403 ,P_SPECIAL_CEILIN_STEP_USER_KEY
404 ,P_PAY_BASIS_NAME
405 ,P_DEFAULT_CODE_COMB_USER_KEY
406 ,P_SET_OF_BOOKS_NAME
407 ,P_SVR_ASSIGNMENT_USER_KEY);
408 end insert_batch_lines;
409 --
410 procedure call
411 (p_business_group_id in number,
412 p_batch_line_id     in number) is
413 cursor cr is
414 select l.rowid myrowid,
415 decode(l.pval001,cn,dn,d(l.pval001)) p1,
416 decode(l.pval002,cn,vn,l.pval002) p2,
417 decode(l.pval003,cn,vn,vn,vn,
418  hr_pump_get.gl(l.pval003,'EMP_ASSIGN_REASON',d(l.pval001),l.pval100)) p3,
419 l.pval003 d3,
420 decode(l.pval004,cn,vn,vn,vn,l.pval004) p4,
421 l.pval004 d4,
422 decode(l.pval005,cn,dn,vn,dn,d(l.pval005)) p5,
423 l.pval005 d5,
424 decode(l.pval006,cn,vn,vn,vn,
425  hr_pump_get.gl(l.pval006,'EMP_CAT',d(l.pval001),l.pval100)) p6,
426 l.pval006 d6,
427 decode(l.pval007,cn,vn,vn,vn,
428  hr_pump_get.gl(l.pval007,'FREQUENCY',d(l.pval001),l.pval100)) p7,
429 l.pval007 d7,
430 decode(l.pval008,cn,vn,vn,vn,l.pval008) p8,
431 l.pval008 d8,
432 decode(l.pval009,cn,vn,vn,vn,
433  hr_pump_get.gl(l.pval009,'YES_NO',d(l.pval001),l.pval100)) p9,
434 l.pval009 d9,
435 decode(l.pval010,cn,nn,vn,nn,n(l.pval010)) p10,
436 l.pval010 d10,
437 decode(l.pval011,cn,nn,vn,nn,n(l.pval011)) p11,
438 l.pval011 d11,
439 decode(l.pval012,cn,vn,vn,vn,
440  hr_pump_get.gl(l.pval012,'FREQUENCY',d(l.pval001),l.pval100)) p12,
441 l.pval012 d12,
442 decode(l.pval013,cn,nn,vn,nn,n(l.pval013)) p13,
443 l.pval013 d13,
444 decode(l.pval014,cn,vn,vn,vn,
445  hr_pump_get.gl(l.pval014,'QUALIFYING_UNITS',d(l.pval001),l.pval100)) p14,
446 l.pval014 d14,
447 decode(l.pval015,cn,nn,vn,nn,n(l.pval015)) p15,
448 l.pval015 d15,
449 decode(l.pval016,cn,vn,vn,vn,
450  hr_pump_get.gl(l.pval016,'FREQUENCY',d(l.pval001),l.pval100)) p16,
451 l.pval016 d16,
452 decode(l.pval017,cn,vn,vn,vn,
453  hr_pump_get.gl(l.pval017,'REC_TYPE',d(l.pval001),l.pval100)) p17,
454 l.pval017 d17,
455 decode(l.pval018,cn,vn,vn,vn,l.pval018) p18,
456 l.pval018 d18,
457 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
458 l.pval019 d19,
459 decode(l.pval020,cn,vn,vn,vn,
460  hr_pump_get.gl(l.pval020,'BARGAINING_UNIT_CODE',d(l.pval001),l.pval100)) p20,
461 l.pval020 d20,
462 decode(l.pval021,cn,vn,vn,'N',
463  hr_pump_get.gl(l.pval021,'YES_NO',d(l.pval001),l.pval100)) p21,
464 l.pval021 d21,
465 decode(l.pval022,cn,vn,vn,vn,
466  hr_pump_get.gl(l.pval022,'HOURLY_SALARIED_CODE',d(l.pval001),l.pval100)) p22,
467 l.pval022 d22,
468 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
469 l.pval023 d23,
470 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
471 l.pval024 d24,
472 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
473 l.pval025 d25,
474 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
475 l.pval026 d26,
476 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
477 l.pval027 d27,
478 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
479 l.pval028 d28,
480 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
481 l.pval029 d29,
482 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
483 l.pval030 d30,
484 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
485 l.pval031 d31,
486 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
487 l.pval032 d32,
488 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
489 l.pval033 d33,
490 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
491 l.pval034 d34,
492 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
493 l.pval035 d35,
494 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
495 l.pval036 d36,
496 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
497 l.pval037 d37,
498 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
499 l.pval038 d38,
500 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
501 l.pval039 d39,
502 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
503 l.pval040 d40,
504 decode(l.pval041,cn,vn,vn,vn,l.pval041) p41,
505 l.pval041 d41,
506 decode(l.pval042,cn,vn,vn,vn,l.pval042) p42,
507 l.pval042 d42,
508 decode(l.pval043,cn,vn,vn,vn,l.pval043) p43,
509 l.pval043 d43,
510 decode(l.pval044,cn,vn,vn,vn,l.pval044) p44,
511 l.pval044 d44,
512 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
513 l.pval045 d45,
514 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
515 l.pval046 d46,
516 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
517 l.pval047 d47,
518 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
519 l.pval048 d48,
520 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
521 l.pval049 d49,
522 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
523 l.pval050 d50,
524 decode(l.pval051,cn,vn,vn,vn,l.pval051) p51,
525 l.pval051 d51,
526 decode(l.pval052,cn,vn,vn,vn,l.pval052) p52,
527 l.pval052 d52,
528 decode(l.pval053,cn,vn,vn,vn,l.pval053) p53,
532 decode(l.pval055,cn,vn,vn,vn,l.pval055) p55,
529 l.pval053 d53,
530 decode(l.pval054,cn,vn,vn,vn,l.pval054) p54,
531 l.pval054 d54,
533 l.pval055 d55,
534 decode(l.pval056,cn,vn,vn,vn,l.pval056) p56,
535 l.pval056 d56,
536 decode(l.pval057,cn,vn,vn,vn,l.pval057) p57,
537 l.pval057 d57,
538 decode(l.pval058,cn,vn,vn,vn,l.pval058) p58,
539 l.pval058 d58,
540 decode(l.pval059,cn,vn,vn,vn,l.pval059) p59,
541 l.pval059 d59,
542 decode(l.pval060,cn,vn,vn,vn,l.pval060) p60,
543 l.pval060 d60,
544 decode(l.pval061,cn,vn,vn,vn,l.pval061) p61,
545 l.pval061 d61,
546 decode(l.pval062,cn,vn,vn,vn,l.pval062) p62,
547 l.pval062 d62,
548 decode(l.pval063,cn,vn,vn,vn,l.pval063) p63,
549 l.pval063 d63,
550 decode(l.pval064,cn,vn,vn,vn,l.pval064) p64,
551 l.pval064 d64,
552 decode(l.pval065,cn,vn,vn,vn,l.pval065) p65,
553 l.pval065 d65,
554 decode(l.pval066,cn,vn,vn,vn,l.pval066) p66,
555 l.pval066 d66,
556 decode(l.pval067,cn,vn,vn,vn,l.pval067) p67,
557 l.pval067 d67,
558 decode(l.pval068,cn,vn,vn,vn,l.pval068) p68,
559 l.pval068 d68,
560 decode(l.pval069,cn,vn,vn,vn,l.pval069) p69,
561 l.pval069 d69,
562 decode(l.pval070,cn,vn,vn,vn,l.pval070) p70,
563 l.pval070 d70,
564 decode(l.pval071,cn,vn,vn,vn,l.pval071) p71,
565 l.pval071 d71,
566 decode(l.pval072,cn,vn,vn,vn,l.pval072) p72,
567 l.pval072 d72,
568 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
569 l.pval073 d73,
570 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
571 l.pval074 d74,
572 decode(l.pval075,cn,vn,vn,vn,l.pval075) p75,
573 l.pval075 d75,
574 decode(l.pval076,cn,vn,vn,vn,l.pval076) p76,
575 l.pval076 d76,
576 decode(l.pval077,cn,vn,vn,vn,l.pval077) p77,
577 l.pval077 d77,
578 decode(l.pval078,cn,vn,vn,vn,l.pval078) p78,
579 l.pval078 d78,
580 decode(l.pval079,cn,vn,vn,vn,l.pval079) p79,
581 l.pval079 d79,
582 decode(l.pval080,cn,vn,vn,vn,l.pval080) p80,
583 l.pval080 d80,
584 decode(l.pval081,cn,vn,vn,vn,l.pval081) p81,
585 l.pval081 d81,
586 decode(l.pval082,cn,vn,vn,vn,l.pval082) p82,
587 l.pval082 d82,
588 decode(l.pval083,cn,vn,vn,vn,l.pval083) p83,
589 l.pval083 d83,
590 decode(l.pval084,cn,vn,vn,vn,l.pval084) p84,
591 l.pval084 d84,
592 decode(l.pval085,cn,vn,vn,vn,l.pval085) p85,
593 l.pval085 d85,
594 l.pval086 p86,
595 l.pval087 p87,
596 l.pval088 p88,
597 l.pval089 p89,
598 decode(l.pval090,cn,dn,d(l.pval090)) p90,
599 decode(l.pval091,cn,dn,d(l.pval091)) p91,
600 l.pval092 p92,
601 l.pval093 p93,
602 l.pval094 p94,
603 l.pval095 p95,
604 l.pval096 p96,
605 l.pval097 p97,
606 decode(l.pval098,cn,vn,l.pval098) p98,
607 decode(l.pval099,cn,vn,l.pval099) p99,
608 decode(l.pval100,cn,vn,l.pval100) p100,
609 decode(l.pval101,cn,vn,vn,vn,l.pval101) p101,
610 l.pval101 d101,
611 decode(l.pval102,cn,vn,vn,vn,l.pval102) p102,
612 l.pval102 d102,
613 decode(l.pval103,cn,vn,vn,vn,l.pval103) p103,
614 l.pval103 d103,
615 decode(l.pval104,cn,vn,vn,vn,l.pval104) p104,
616 l.pval104 d104,
617 decode(l.pval105,cn,vn,vn,vn,l.pval105) p105,
618 l.pval105 d105,
619 decode(l.pval106,cn,vn,vn,vn,l.pval106) p106,
620 l.pval106 d106,
621 decode(l.pval107,cn,vn,vn,vn,l.pval107) p107,
622 l.pval107 d107,
623 decode(l.pval108,cn,vn,vn,vn,l.pval108) p108,
624 l.pval108 d108,
625 decode(l.pval109,cn,vn,vn,vn,l.pval109) p109,
626 l.pval109 d109,
627 decode(l.pval110,cn,vn,vn,vn,l.pval110) p110,
628 l.pval110 d110,
629 decode(l.pval111,cn,vn,vn,vn,l.pval111) p111,
630 l.pval111 d111,
631 decode(l.pval112,cn,vn,vn,vn,l.pval112) p112,
632 l.pval112 d112
633 from hr_pump_batch_lines l
634 where l.batch_line_id = p_batch_line_id;
635 --
636 c cr%rowtype;
637 l_validate boolean := false;
638 L_ASSIGNMENT_ID number;
639 L_OTHER_MANAGER_WARNING boolean;
640 L_HOURLY_SALARIED_WARNING boolean;
641 L_PERSON_ID number;
642 L_ORGANIZATION_ID number;
643 L_GRADE_ID number;
644 L_POSITION_ID number;
645 L_JOB_ID number;
646 L_ASSIGNMENT_STATUS_TYPE_ID number;
647 L_PAYROLL_ID number;
648 L_LOCATION_ID number;
649 L_SUPERVISOR_ID number;
650 L_SPECIAL_CEILING_STEP_ID number;
651 L_PAY_BASIS_ID number;
652 L_DEFAULT_CODE_COMB_ID number;
653 L_SET_OF_BOOKS_ID number;
654 L_SUPERVISOR_ASSIGNMENT_ID number;
655 --
656 begin
657 hr_data_pump.entry('call');
658 open cr;
659 fetch cr into c;
660 if cr%notfound then
661 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
662 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
663 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
664 hr_utility.set_message_token('VALUE',p_batch_line_id);
665 hr_utility.raise_error;
666 end if;
667 --
668 if c.p98 is null then
669 L_PERSON_ID:=nn;
670 else
671 L_PERSON_ID := 
672 hr_pump_get.get_person_id
673 (P_PERSON_USER_KEY => c.p98);
674 end if;
675 --
676 if c.p99 is null or
677 c.p1 is null or
678 c.p100 is null then
679 L_ORGANIZATION_ID:=nn;
680 else
681 L_ORGANIZATION_ID := 
682 hr_pump_get.get_organization_id
683 (P_ORGANIZATION_NAME => c.p99
684 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
685 ,P_EFFECTIVE_DATE => c.p1
686 ,P_LANGUAGE_CODE => c.p100);
687 end if;
688 --
689 if c.p101 is null or
690 c.p1 is null then
691 L_GRADE_ID:=nn;
692 else
693 L_GRADE_ID := 
694 hr_pump_get.get_grade_id
695 (P_GRADE_NAME => c.p101
696 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
697 ,P_EFFECTIVE_DATE => c.p1);
698 end if;
699 --
700 if c.p102 is null or
701 c.p1 is null then
702 L_POSITION_ID:=nn;
703 else
704 L_POSITION_ID := 
708 ,P_EFFECTIVE_DATE => c.p1);
705 hr_pump_get.get_position_id
706 (P_POSITION_NAME => c.p102
707 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
709 end if;
710 --
711 if c.p103 is null or
712 c.p1 is null then
713 L_JOB_ID:=nn;
714 else
715 L_JOB_ID := 
716 hr_pump_get.get_job_id
717 (P_JOB_NAME => c.p103
718 ,P_EFFECTIVE_DATE => c.p1
719 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID);
720 end if;
721 --
722 if c.p104 is null or
723 c.p100 is null then
724 L_ASSIGNMENT_STATUS_TYPE_ID:=nn;
725 else
726 L_ASSIGNMENT_STATUS_TYPE_ID := 
727 hr_pump_get.get_assignment_status_type_id
728 (P_USER_STATUS => c.p104
729 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
730 ,P_LANGUAGE_CODE => c.p100);
731 end if;
732 --
733 if c.p105 is null or
734 c.p1 is null then
735 L_PAYROLL_ID:=nn;
736 else
737 L_PAYROLL_ID := 
738 hr_pump_get.get_payroll_id
739 (P_PAYROLL_NAME => c.p105
740 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
741 ,P_EFFECTIVE_DATE => c.p1);
742 end if;
743 --
744 if c.p106 is null or
745 c.p100 is null then
746 L_LOCATION_ID:=nn;
747 else
748 L_LOCATION_ID := 
749 hr_pump_get.get_location_id
750 (P_LOCATION_CODE => c.p106
751 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
752 ,P_LANGUAGE_CODE => c.p100);
753 end if;
754 --
755 if c.p107 is null then
756 L_SUPERVISOR_ID:=nn;
757 else
758 L_SUPERVISOR_ID := 
759 hr_pump_get.get_supervisor_id
760 (P_SUPERVISOR_USER_KEY => c.p107);
761 end if;
762 --
763 if c.p108 is null then
764 L_SPECIAL_CEILING_STEP_ID:=nn;
765 else
766 L_SPECIAL_CEILING_STEP_ID := 
767 hr_pump_get.get_special_ceiling_step_id
768 (P_SPECIAL_CEILIN_STEP_USER_KEY => c.p108);
769 end if;
770 --
771 if c.p109 is null then
772 L_PAY_BASIS_ID:=nn;
773 else
774 L_PAY_BASIS_ID := 
775 hr_pump_get.get_pay_basis_id
776 (P_PAY_BASIS_NAME => c.p109
777 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID);
778 end if;
779 --
780 if c.p110 is null then
781 L_DEFAULT_CODE_COMB_ID:=nn;
782 else
783 L_DEFAULT_CODE_COMB_ID := 
784 hr_pump_get.get_default_code_comb_id
785 (P_DEFAULT_CODE_COMB_USER_KEY => c.p110);
786 end if;
787 --
788 if c.p111 is null then
789 L_SET_OF_BOOKS_ID:=nn;
790 else
791 L_SET_OF_BOOKS_ID := 
792 hr_pump_get.get_set_of_books_id
793 (P_SET_OF_BOOKS_NAME => c.p111);
794 end if;
795 --
796 if c.p112 is null then
797 L_SUPERVISOR_ASSIGNMENT_ID:=nn;
798 else
799 L_SUPERVISOR_ASSIGNMENT_ID := 
800 hr_pump_get.get_supervisor_assignment_id
801 (P_SVR_ASSIGNMENT_USER_KEY => c.p112);
802 end if;
803 --
804 hr_data_pump.api_trc_on;
805 hr_assignment_api.create_gb_secondary_emp_asg
806 (p_validate => l_validate
807 ,P_EFFECTIVE_DATE => c.p1
808 ,P_PERSON_ID => L_PERSON_ID
809 ,P_ORGANIZATION_ID => L_ORGANIZATION_ID
810 ,P_GRADE_ID => L_GRADE_ID
811 ,P_POSITION_ID => L_POSITION_ID
812 ,P_JOB_ID => L_JOB_ID
813 ,P_ASSIGNMENT_STATUS_TYPE_ID => L_ASSIGNMENT_STATUS_TYPE_ID
814 ,P_PAYROLL_ID => L_PAYROLL_ID
815 ,P_LOCATION_ID => L_LOCATION_ID
816 ,P_SUPERVISOR_ID => L_SUPERVISOR_ID
817 ,P_SPECIAL_CEILING_STEP_ID => L_SPECIAL_CEILING_STEP_ID
818 ,P_PAY_BASIS_ID => L_PAY_BASIS_ID
819 ,P_ASSIGNMENT_NUMBER => c.p2
820 ,P_CHANGE_REASON => c.p3
821 ,P_COMMENTS => c.p4
822 ,P_DATE_PROBATION_END => c.p5
823 ,P_DEFAULT_CODE_COMB_ID => L_DEFAULT_CODE_COMB_ID
824 ,P_EMPLOYMENT_CATEGORY => c.p6
825 ,P_FREQUENCY => c.p7
826 ,P_INTERNAL_ADDRESS_LINE => c.p8
827 ,P_MANAGER_FLAG => c.p9
828 ,P_NORMAL_HOURS => c.p10
829 ,P_PERF_REVIEW_PERIOD => c.p11
830 ,P_PERF_REVIEW_PERIOD_FREQUENCY => c.p12
831 ,P_PROBATION_PERIOD => c.p13
832 ,P_PROBATION_UNIT => c.p14
833 ,P_SAL_REVIEW_PERIOD => c.p15
834 ,P_SAL_REVIEW_PERIOD_FREQUENCY => c.p16
835 ,P_SET_OF_BOOKS_ID => L_SET_OF_BOOKS_ID
836 ,P_SOURCE_TYPE => c.p17
837 ,P_TIME_NORMAL_FINISH => c.p18
838 ,P_TIME_NORMAL_START => c.p19
839 ,P_BARGAINING_UNIT_CODE => c.p20
840 ,P_LABOUR_UNION_MEMBER_FLAG => c.p21
841 ,P_HOURLY_SALARIED_CODE => c.p22
842 ,P_ASS_ATTRIBUTE_CATEGORY => c.p23
843 ,P_ASS_ATTRIBUTE1 => c.p24
844 ,P_ASS_ATTRIBUTE2 => c.p25
845 ,P_ASS_ATTRIBUTE3 => c.p26
846 ,P_ASS_ATTRIBUTE4 => c.p27
847 ,P_ASS_ATTRIBUTE5 => c.p28
848 ,P_ASS_ATTRIBUTE6 => c.p29
849 ,P_ASS_ATTRIBUTE7 => c.p30
850 ,P_ASS_ATTRIBUTE8 => c.p31
851 ,P_ASS_ATTRIBUTE9 => c.p32
852 ,P_ASS_ATTRIBUTE10 => c.p33
853 ,P_ASS_ATTRIBUTE11 => c.p34
854 ,P_ASS_ATTRIBUTE12 => c.p35
855 ,P_ASS_ATTRIBUTE13 => c.p36
856 ,P_ASS_ATTRIBUTE14 => c.p37
857 ,P_ASS_ATTRIBUTE15 => c.p38
858 ,P_ASS_ATTRIBUTE16 => c.p39
859 ,P_ASS_ATTRIBUTE17 => c.p40
860 ,P_ASS_ATTRIBUTE18 => c.p41
861 ,P_ASS_ATTRIBUTE19 => c.p42
862 ,P_ASS_ATTRIBUTE20 => c.p43
866 ,P_ASS_ATTRIBUTE24 => c.p47
863 ,P_ASS_ATTRIBUTE21 => c.p44
864 ,P_ASS_ATTRIBUTE22 => c.p45
865 ,P_ASS_ATTRIBUTE23 => c.p46
867 ,P_ASS_ATTRIBUTE25 => c.p48
868 ,P_ASS_ATTRIBUTE26 => c.p49
869 ,P_ASS_ATTRIBUTE27 => c.p50
870 ,P_ASS_ATTRIBUTE28 => c.p51
871 ,P_ASS_ATTRIBUTE29 => c.p52
872 ,P_ASS_ATTRIBUTE30 => c.p53
873 ,P_TITLE => c.p54
874 ,P_PGP_SEGMENT1 => c.p55
875 ,P_PGP_SEGMENT2 => c.p56
876 ,P_PGP_SEGMENT3 => c.p57
877 ,P_PGP_SEGMENT4 => c.p58
878 ,P_PGP_SEGMENT5 => c.p59
879 ,P_PGP_SEGMENT6 => c.p60
880 ,P_PGP_SEGMENT7 => c.p61
881 ,P_PGP_SEGMENT8 => c.p62
882 ,P_PGP_SEGMENT9 => c.p63
883 ,P_PGP_SEGMENT10 => c.p64
884 ,P_PGP_SEGMENT11 => c.p65
885 ,P_PGP_SEGMENT12 => c.p66
886 ,P_PGP_SEGMENT13 => c.p67
887 ,P_PGP_SEGMENT14 => c.p68
888 ,P_PGP_SEGMENT15 => c.p69
889 ,P_PGP_SEGMENT16 => c.p70
890 ,P_PGP_SEGMENT17 => c.p71
891 ,P_PGP_SEGMENT18 => c.p72
892 ,P_PGP_SEGMENT19 => c.p73
893 ,P_PGP_SEGMENT20 => c.p74
894 ,P_PGP_SEGMENT21 => c.p75
895 ,P_PGP_SEGMENT22 => c.p76
896 ,P_PGP_SEGMENT23 => c.p77
897 ,P_PGP_SEGMENT24 => c.p78
898 ,P_PGP_SEGMENT25 => c.p79
899 ,P_PGP_SEGMENT26 => c.p80
900 ,P_PGP_SEGMENT27 => c.p81
901 ,P_PGP_SEGMENT28 => c.p82
902 ,P_PGP_SEGMENT29 => c.p83
903 ,P_PGP_SEGMENT30 => c.p84
904 ,P_PGP_CONCAT_SEGMENTS => c.p85
905 ,P_SUPERVISOR_ASSIGNMENT_ID => L_SUPERVISOR_ASSIGNMENT_ID
906 ,P_GROUP_NAME => c.p86
907 ,P_ASSIGNMENT_ID => L_ASSIGNMENT_ID
908 ,P_PEOPLE_GROUP_ID => c.p88
909 ,P_OBJECT_VERSION_NUMBER => c.p89
910 ,P_EFFECTIVE_START_DATE => c.p90
911 ,P_EFFECTIVE_END_DATE => c.p91
912 ,P_ASSIGNMENT_SEQUENCE => c.p92
913 ,P_COMMENT_ID => c.p93
914 ,P_OTHER_MANAGER_WARNING => L_OTHER_MANAGER_WARNING
915 ,P_HOURLY_SALARIED_WARNING => L_HOURLY_SALARIED_WARNING
916 ,P_CAGR_GRADE_DEF_ID => c.p96
917 ,P_CAGR_CONCATENATED_SEGMENTS => c.p97);
918 hr_data_pump.api_trc_off;
919 --
920 iuk(p_batch_line_id,c.p87,L_ASSIGNMENT_ID);
921 --
922 if L_OTHER_MANAGER_WARNING then
923 c.p94 := 'TRUE';
924 else
925 c.p94 := 'FALSE';
926 end if;
927 --
928 if L_HOURLY_SALARIED_WARNING then
929 c.p95 := 'TRUE';
930 else
931 c.p95 := 'FALSE';
932 end if;
933 --
934 update hr_pump_batch_lines l set
935 l.pval002 = decode(c.p2,null,cn,c.p2),
936 l.pval086 = decode(c.p86,null,cn,c.p86),
937 l.pval087 = decode(c.p87,null,cn,c.p87),
938 l.pval088 = decode(c.p88,null,cn,c.p88),
939 l.pval089 = decode(c.p89,null,cn,c.p89),
940 l.pval090 = decode(c.p90,null,cn,dc(c.p90)),
941 l.pval091 = decode(c.p91,null,cn,dc(c.p91)),
942 l.pval092 = decode(c.p92,null,cn,c.p92),
943 l.pval093 = decode(c.p93,null,cn,c.p93),
944 l.pval094 = decode(c.p94,null,cn,c.p94),
945 l.pval095 = decode(c.p95,null,cn,c.p95),
946 l.pval096 = decode(c.p96,null,cn,c.p96),
947 l.pval097 = decode(c.p97,null,cn,c.p97)
948 where l.rowid = c.myrowid;
949 --
950 close cr;
951 --
952 hr_data_pump.exit('call');
953 exception
954  when hr_multi_message.error_message_exist then
955    if cr%isopen then
956     close cr;
957    end if;
958    hr_pump_utils.set_multi_msg_error_flag(true);
959  when others then
960  if cr%isopen then
961   close cr;
962  end if;
963  raise;
964 end call;
965 end hrdpp_create_gb_secondary_emp_;