DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_UPDATE_GB_EMP_ASG

Source


1 package body hrdpp_UPDATE_GB_EMP_ASG as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2009/03/30 04:03:21
4  * Generated for API: HR_ASSIGNMENT_API.UPDATE_GB_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_DATETRACK_UPDATE_MODE in varchar2
84 ,P_ASSIGNMENT_NUMBER in varchar2 default null
85 ,P_CHANGE_REASON in varchar2 default null
86 ,P_COMMENTS in varchar2 default null
87 ,P_DATE_PROBATION_END in date default null
88 ,I_DATE_PROBATION_END in varchar2 default 'N'
89 ,P_FREQUENCY in varchar2 default null
90 ,P_INTERNAL_ADDRESS_LINE in varchar2 default null
91 ,P_MANAGER_FLAG in varchar2 default null
92 ,P_NORMAL_HOURS in number default null
93 ,I_NORMAL_HOURS in varchar2 default 'N'
94 ,P_PERF_REVIEW_PERIOD in number default null
95 ,I_PERF_REVIEW_PERIOD in varchar2 default 'N'
96 ,P_PERF_REVIEW_PERIOD_FREQUENCY in varchar2 default null
97 ,P_PROBATION_PERIOD in number default null
98 ,I_PROBATION_PERIOD in varchar2 default 'N'
99 ,P_PROBATION_UNIT in varchar2 default null
100 ,P_SAL_REVIEW_PERIOD in number default null
101 ,I_SAL_REVIEW_PERIOD in varchar2 default 'N'
102 ,P_SAL_REVIEW_PERIOD_FREQUENCY in varchar2 default null
103 ,P_SOURCE_TYPE in varchar2 default null
104 ,P_TIME_NORMAL_FINISH in varchar2 default null
105 ,P_TIME_NORMAL_START in varchar2 default null
106 ,P_BARGAINING_UNIT_CODE in varchar2 default null
107 ,P_LABOUR_UNION_MEMBER_FLAG in varchar2 default null
108 ,P_HOURLY_SALARIED_CODE in varchar2 default null
109 ,P_ASS_ATTRIBUTE_CATEGORY in varchar2 default null
110 ,P_ASS_ATTRIBUTE1 in varchar2 default null
111 ,P_ASS_ATTRIBUTE2 in varchar2 default null
112 ,P_ASS_ATTRIBUTE3 in varchar2 default null
113 ,P_ASS_ATTRIBUTE4 in varchar2 default null
114 ,P_ASS_ATTRIBUTE5 in varchar2 default null
115 ,P_ASS_ATTRIBUTE6 in varchar2 default null
116 ,P_ASS_ATTRIBUTE7 in varchar2 default null
117 ,P_ASS_ATTRIBUTE8 in varchar2 default null
118 ,P_ASS_ATTRIBUTE9 in varchar2 default null
119 ,P_ASS_ATTRIBUTE10 in varchar2 default null
120 ,P_ASS_ATTRIBUTE11 in varchar2 default null
121 ,P_ASS_ATTRIBUTE12 in varchar2 default null
122 ,P_ASS_ATTRIBUTE13 in varchar2 default null
123 ,P_ASS_ATTRIBUTE14 in varchar2 default null
124 ,P_ASS_ATTRIBUTE15 in varchar2 default null
125 ,P_ASS_ATTRIBUTE16 in varchar2 default null
126 ,P_ASS_ATTRIBUTE17 in varchar2 default null
127 ,P_ASS_ATTRIBUTE18 in varchar2 default null
128 ,P_ASS_ATTRIBUTE19 in varchar2 default null
129 ,P_ASS_ATTRIBUTE20 in varchar2 default null
130 ,P_ASS_ATTRIBUTE21 in varchar2 default null
131 ,P_ASS_ATTRIBUTE22 in varchar2 default null
132 ,P_ASS_ATTRIBUTE23 in varchar2 default null
133 ,P_ASS_ATTRIBUTE24 in varchar2 default null
134 ,P_ASS_ATTRIBUTE25 in varchar2 default null
135 ,P_ASS_ATTRIBUTE26 in varchar2 default null
136 ,P_ASS_ATTRIBUTE27 in varchar2 default null
137 ,P_ASS_ATTRIBUTE28 in varchar2 default null
138 ,P_ASS_ATTRIBUTE29 in varchar2 default null
139 ,P_ASS_ATTRIBUTE30 in varchar2 default null
140 ,P_TITLE in varchar2 default null
141 ,P_CAGR_ID_FLEX_NUM in number default null
142 ,I_CAGR_ID_FLEX_NUM in varchar2 default 'N'
143 ,P_NOTICE_PERIOD in number default null
144 ,I_NOTICE_PERIOD in varchar2 default 'N'
145 ,P_NOTICE_PERIOD_UOM in varchar2 default null
146 ,P_EMPLOYEE_CATEGORY in varchar2 default null
147 ,P_WORK_AT_HOME in varchar2 default null
148 ,P_JOB_POST_SOURCE_NAME in varchar2 default null
149 ,P_ASSIGNMENT_USER_KEY in varchar2
150 ,P_SUPERVISOR_USER_KEY in varchar2 default null
151 ,P_DEFAULT_CODE_COMB_USER_KEY in varchar2 default null
152 ,P_SET_OF_BOOKS_NAME in varchar2 default null
153 ,P_CONTRACT_USER_KEY in varchar2 default null
154 ,P_ESTABLISHMENT_NAME in varchar2 default null
155 ,P_LOCATION in varchar2 default null
156 ,P_CAGR_NAME in varchar2 default null
157 ,P_SVR_ASSIGNMENT_USER_KEY in varchar2 default null) is
158 blid number := p_data_pump_batch_line_id;
159 begin
160 if blid is not null then
161 delete from hr_pump_batch_lines where batch_line_id = blid;
162 delete from hr_pump_batch_exceptions
163 where source_type = 'BATCH_LINE' and source_id = blid;
164 end if;
165 insert into hr_pump_batch_lines
166 (batch_id
167 ,batch_line_id
168 ,business_group_name
169 ,api_module_id
170 ,line_status
171 ,user_sequence
172 ,link_value
173 ,pval001
174 ,pval002
175 ,pval003
176 ,pval004
177 ,pval005
178 ,pval006
179 ,pval007
180 ,pval008
181 ,pval009
182 ,pval010
183 ,pval011
184 ,pval012
185 ,pval013
186 ,pval014
187 ,pval015
188 ,pval016
189 ,pval017
190 ,pval018
191 ,pval019
192 ,pval020
193 ,pval021
194 ,pval022
195 ,pval023
196 ,pval024
197 ,pval025
198 ,pval026
199 ,pval027
200 ,pval028
201 ,pval029
202 ,pval030
203 ,pval031
204 ,pval032
205 ,pval033
206 ,pval034
207 ,pval035
208 ,pval036
209 ,pval037
210 ,pval038
211 ,pval039
212 ,pval040
213 ,pval041
214 ,pval042
215 ,pval043
216 ,pval044
217 ,pval045
218 ,pval046
219 ,pval047
220 ,pval048
221 ,pval049
222 ,pval050
223 ,pval051
224 ,pval052
225 ,pval053
226 ,pval054
227 ,pval055
228 ,pval056
229 ,pval057
230 ,pval058
231 ,pval059
232 ,pval060
233 ,pval071
234 ,pval072
235 ,pval073
236 ,pval074
237 ,pval075
238 ,pval076
239 ,pval077
240 ,pval078
241 ,pval079)
242 values
243 (p_batch_id
244 ,nvl(blid,hr_pump_batch_lines_s.nextval)
245 ,p_data_pump_business_grp_name
246 ,1376
247 ,'U'
248 ,p_user_sequence
249 ,p_link_value
250 ,dc(P_EFFECTIVE_DATE)
251 ,P_DATETRACK_UPDATE_MODE
252 ,P_ASSIGNMENT_NUMBER
253 ,P_CHANGE_REASON
254 ,P_COMMENTS
255 ,dd(P_DATE_PROBATION_END,I_DATE_PROBATION_END)
256 ,P_FREQUENCY
257 ,P_INTERNAL_ADDRESS_LINE
258 ,P_MANAGER_FLAG
259 ,nd(P_NORMAL_HOURS,I_NORMAL_HOURS)
260 ,nd(P_PERF_REVIEW_PERIOD,I_PERF_REVIEW_PERIOD)
261 ,P_PERF_REVIEW_PERIOD_FREQUENCY
262 ,nd(P_PROBATION_PERIOD,I_PROBATION_PERIOD)
263 ,P_PROBATION_UNIT
264 ,nd(P_SAL_REVIEW_PERIOD,I_SAL_REVIEW_PERIOD)
265 ,P_SAL_REVIEW_PERIOD_FREQUENCY
266 ,P_SOURCE_TYPE
267 ,P_TIME_NORMAL_FINISH
268 ,P_TIME_NORMAL_START
269 ,P_BARGAINING_UNIT_CODE
270 ,P_LABOUR_UNION_MEMBER_FLAG
271 ,P_HOURLY_SALARIED_CODE
272 ,P_ASS_ATTRIBUTE_CATEGORY
273 ,P_ASS_ATTRIBUTE1
274 ,P_ASS_ATTRIBUTE2
275 ,P_ASS_ATTRIBUTE3
276 ,P_ASS_ATTRIBUTE4
277 ,P_ASS_ATTRIBUTE5
278 ,P_ASS_ATTRIBUTE6
279 ,P_ASS_ATTRIBUTE7
280 ,P_ASS_ATTRIBUTE8
281 ,P_ASS_ATTRIBUTE9
282 ,P_ASS_ATTRIBUTE10
283 ,P_ASS_ATTRIBUTE11
284 ,P_ASS_ATTRIBUTE12
285 ,P_ASS_ATTRIBUTE13
286 ,P_ASS_ATTRIBUTE14
287 ,P_ASS_ATTRIBUTE15
288 ,P_ASS_ATTRIBUTE16
289 ,P_ASS_ATTRIBUTE17
290 ,P_ASS_ATTRIBUTE18
291 ,P_ASS_ATTRIBUTE19
292 ,P_ASS_ATTRIBUTE20
293 ,P_ASS_ATTRIBUTE21
294 ,P_ASS_ATTRIBUTE22
295 ,P_ASS_ATTRIBUTE23
296 ,P_ASS_ATTRIBUTE24
297 ,P_ASS_ATTRIBUTE25
298 ,P_ASS_ATTRIBUTE26
299 ,P_ASS_ATTRIBUTE27
300 ,P_ASS_ATTRIBUTE28
301 ,P_ASS_ATTRIBUTE29
302 ,P_ASS_ATTRIBUTE30
303 ,P_TITLE
304 ,nd(P_CAGR_ID_FLEX_NUM,I_CAGR_ID_FLEX_NUM)
305 ,nd(P_NOTICE_PERIOD,I_NOTICE_PERIOD)
306 ,P_NOTICE_PERIOD_UOM
307 ,P_EMPLOYEE_CATEGORY
308 ,P_WORK_AT_HOME
309 ,P_JOB_POST_SOURCE_NAME
310 ,P_ASSIGNMENT_USER_KEY
311 ,P_SUPERVISOR_USER_KEY
312 ,P_DEFAULT_CODE_COMB_USER_KEY
313 ,P_SET_OF_BOOKS_NAME
314 ,P_CONTRACT_USER_KEY
315 ,P_ESTABLISHMENT_NAME
316 ,P_LOCATION
317 ,P_CAGR_NAME
318 ,P_SVR_ASSIGNMENT_USER_KEY);
319 end insert_batch_lines;
320 --
321 procedure call
322 (p_business_group_id in number,
323 p_batch_line_id     in number) is
324 cursor cr is
325 select l.rowid myrowid,
326 decode(l.pval001,cn,dn,d(l.pval001)) p1,
327 decode(l.pval002,cn,vn,l.pval002) p2,
328 decode(l.pval003,cn,vn,vn,vh,l.pval003) p3,
329 l.pval003 d3,
330 decode(l.pval004,cn,vn,vn,vh,
331  hr_pump_get.gl(l.pval004,'EMP_ASSIGN_REASON',d(l.pval001),vn)) p4,
332 l.pval004 d4,
333 decode(l.pval005,cn,vn,vn,vh,l.pval005) p5,
334 l.pval005 d5,
335 decode(l.pval006,cn,dn,vn,dh,d(l.pval006)) p6,
336 l.pval006 d6,
337 decode(l.pval007,cn,vn,vn,vh,
338  hr_pump_get.gl(l.pval007,'FREQUENCY',d(l.pval001),vn)) p7,
339 l.pval007 d7,
340 decode(l.pval008,cn,vn,vn,vh,l.pval008) p8,
341 l.pval008 d8,
342 decode(l.pval009,cn,vn,vn,vh,
343  hr_pump_get.gl(l.pval009,'YES_NO',d(l.pval001),vn)) p9,
344 l.pval009 d9,
345 decode(l.pval010,cn,nn,vn,nh,n(l.pval010)) p10,
346 l.pval010 d10,
347 decode(l.pval011,cn,nn,vn,nh,n(l.pval011)) p11,
348 l.pval011 d11,
349 decode(l.pval012,cn,vn,vn,vh,
350  hr_pump_get.gl(l.pval012,'FREQUENCY',d(l.pval001),vn)) p12,
351 l.pval012 d12,
352 decode(l.pval013,cn,nn,vn,nh,n(l.pval013)) p13,
353 l.pval013 d13,
354 decode(l.pval014,cn,vn,vn,vh,
355  hr_pump_get.gl(l.pval014,'QUALIFYING_UNITS',d(l.pval001),vn)) p14,
356 l.pval014 d14,
357 decode(l.pval015,cn,nn,vn,nh,n(l.pval015)) p15,
358 l.pval015 d15,
359 decode(l.pval016,cn,vn,vn,vh,
360  hr_pump_get.gl(l.pval016,'FREQUENCY',d(l.pval001),vn)) p16,
361 l.pval016 d16,
362 decode(l.pval017,cn,vn,vn,vh,
363  hr_pump_get.gl(l.pval017,'REC_TYPE',d(l.pval001),vn)) p17,
364 l.pval017 d17,
365 decode(l.pval018,cn,vn,vn,vh,l.pval018) p18,
366 l.pval018 d18,
367 decode(l.pval019,cn,vn,vn,vh,l.pval019) p19,
368 l.pval019 d19,
369 decode(l.pval020,cn,vn,vn,vh,
370  hr_pump_get.gl(l.pval020,'BARGAINING_UNIT_CODE',d(l.pval001),vn)) p20,
371 l.pval020 d20,
372 decode(l.pval021,cn,vn,vn,vh,
373  hr_pump_get.gl(l.pval021,'YES_NO',d(l.pval001),vn)) p21,
374 l.pval021 d21,
375 decode(l.pval022,cn,vn,vn,vh,
376  hr_pump_get.gl(l.pval022,'HOURLY_SALARIED_CODE',d(l.pval001),vn)) p22,
377 l.pval022 d22,
381 l.pval024 d24,
378 decode(l.pval023,cn,vn,vn,vh,l.pval023) p23,
379 l.pval023 d23,
380 decode(l.pval024,cn,vn,vn,vh,l.pval024) p24,
382 decode(l.pval025,cn,vn,vn,vh,l.pval025) p25,
383 l.pval025 d25,
384 decode(l.pval026,cn,vn,vn,vh,l.pval026) p26,
385 l.pval026 d26,
386 decode(l.pval027,cn,vn,vn,vh,l.pval027) p27,
387 l.pval027 d27,
388 decode(l.pval028,cn,vn,vn,vh,l.pval028) p28,
389 l.pval028 d28,
390 decode(l.pval029,cn,vn,vn,vh,l.pval029) p29,
391 l.pval029 d29,
392 decode(l.pval030,cn,vn,vn,vh,l.pval030) p30,
393 l.pval030 d30,
394 decode(l.pval031,cn,vn,vn,vh,l.pval031) p31,
395 l.pval031 d31,
396 decode(l.pval032,cn,vn,vn,vh,l.pval032) p32,
397 l.pval032 d32,
398 decode(l.pval033,cn,vn,vn,vh,l.pval033) p33,
399 l.pval033 d33,
400 decode(l.pval034,cn,vn,vn,vh,l.pval034) p34,
401 l.pval034 d34,
402 decode(l.pval035,cn,vn,vn,vh,l.pval035) p35,
403 l.pval035 d35,
404 decode(l.pval036,cn,vn,vn,vh,l.pval036) p36,
405 l.pval036 d36,
406 decode(l.pval037,cn,vn,vn,vh,l.pval037) p37,
407 l.pval037 d37,
408 decode(l.pval038,cn,vn,vn,vh,l.pval038) p38,
409 l.pval038 d38,
410 decode(l.pval039,cn,vn,vn,vh,l.pval039) p39,
411 l.pval039 d39,
412 decode(l.pval040,cn,vn,vn,vh,l.pval040) p40,
413 l.pval040 d40,
414 decode(l.pval041,cn,vn,vn,vh,l.pval041) p41,
415 l.pval041 d41,
416 decode(l.pval042,cn,vn,vn,vh,l.pval042) p42,
417 l.pval042 d42,
418 decode(l.pval043,cn,vn,vn,vh,l.pval043) p43,
419 l.pval043 d43,
420 decode(l.pval044,cn,vn,vn,vh,l.pval044) p44,
421 l.pval044 d44,
422 decode(l.pval045,cn,vn,vn,vh,l.pval045) p45,
423 l.pval045 d45,
424 decode(l.pval046,cn,vn,vn,vh,l.pval046) p46,
425 l.pval046 d46,
426 decode(l.pval047,cn,vn,vn,vh,l.pval047) p47,
427 l.pval047 d47,
428 decode(l.pval048,cn,vn,vn,vh,l.pval048) p48,
429 l.pval048 d48,
430 decode(l.pval049,cn,vn,vn,vh,l.pval049) p49,
431 l.pval049 d49,
432 decode(l.pval050,cn,vn,vn,vh,l.pval050) p50,
433 l.pval050 d50,
434 decode(l.pval051,cn,vn,vn,vh,l.pval051) p51,
435 l.pval051 d51,
436 decode(l.pval052,cn,vn,vn,vh,l.pval052) p52,
437 l.pval052 d52,
438 decode(l.pval053,cn,vn,vn,vh,l.pval053) p53,
439 l.pval053 d53,
440 decode(l.pval054,cn,vn,vn,vh,l.pval054) p54,
441 l.pval054 d54,
442 decode(l.pval055,cn,nn,vn,nh,n(l.pval055)) p55,
443 l.pval055 d55,
444 decode(l.pval056,cn,nn,vn,nh,n(l.pval056)) p56,
445 l.pval056 d56,
446 decode(l.pval057,cn,vn,vn,vh,l.pval057) p57,
447 l.pval057 d57,
448 decode(l.pval058,cn,vn,vn,vh,l.pval058) p58,
449 l.pval058 d58,
450 decode(l.pval059,cn,vn,vn,vh,l.pval059) p59,
451 l.pval059 d59,
452 decode(l.pval060,cn,vn,vn,vh,l.pval060) p60,
453 l.pval060 d60,
454 l.pval061 p61,
455 l.pval062 p62,
456 l.pval063 p63,
457 l.pval064 p64,
458 l.pval065 p65,
459 decode(l.pval066,cn,dn,d(l.pval066)) p66,
460 decode(l.pval067,cn,dn,d(l.pval067)) p67,
461 l.pval068 p68,
462 l.pval069 p69,
463 l.pval070 p70,
464 decode(l.pval071,cn,vn,l.pval071) p71,
465 decode(l.pval072,cn,vn,vn,vn,l.pval072) p72,
466 l.pval072 d72,
467 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
468 l.pval073 d73,
469 decode(l.pval074,cn,vn,vn,vh,l.pval074) p74,
470 l.pval074 d74,
471 decode(l.pval075,cn,vn,vn,vn,l.pval075) p75,
472 l.pval075 d75,
473 decode(l.pval076,cn,vn,vn,vh,l.pval076) p76,
474 l.pval076 d76,
475 decode(l.pval077,cn,vn,vn,vh,l.pval077) p77,
476 l.pval077 d77,
477 decode(l.pval078,cn,vn,vn,vh,l.pval078) p78,
478 l.pval078 d78,
479 decode(l.pval079,cn,vn,vn,vn,l.pval079) p79,
480 l.pval079 d79
481 from hr_pump_batch_lines l
482 where l.batch_line_id = p_batch_line_id;
483 --
484 c cr%rowtype;
485 l_validate boolean := false;
489 L_ASSIGNMENT_ID number;
486 L_NO_MANAGERS_WARNING boolean;
487 L_OTHER_MANAGER_WARNING boolean;
488 L_HOURLY_SALARIED_WARNING boolean;
490 L_OBJECT_VERSION_NUMBER number;
491 L_SUPERVISOR_ID number;
492 L_DEFAULT_CODE_COMB_ID number;
493 L_SET_OF_BOOKS_ID number;
494 L_CONTRACT_ID number;
495 L_ESTABLISHMENT_ID number;
496 L_COLLECTIVE_AGREEMENT_ID number;
497 L_SUPERVISOR_ASSIGNMENT_ID number;
498 --
499 begin
500 hr_data_pump.entry('call');
501 open cr;
502 fetch cr into c;
503 if cr%notfound then
504 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
505 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
506 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
507 hr_utility.set_message_token('VALUE',p_batch_line_id);
508 hr_utility.raise_error;
509 end if;
510 --
511 if c.p71 is null then
512 L_ASSIGNMENT_ID:=nn;
513 else
514 L_ASSIGNMENT_ID := 
515 hr_pump_get.get_assignment_id
516 (P_ASSIGNMENT_USER_KEY => c.p71);
517 end if;
518 --
519 if c.p71 is null or
520 c.p1 is null then
521 L_OBJECT_VERSION_NUMBER:=nn;
522 else
523 L_OBJECT_VERSION_NUMBER := 
524 hr_pump_get.GET_ASG_OVN
525 (P_ASSIGNMENT_USER_KEY => c.p71
526 ,P_EFFECTIVE_DATE => c.p1);
527 end if;
528 --
529 if c.d72=cn then
530 L_SUPERVISOR_ID:=nn;
531 elsif c.d72 is null then 
532 L_SUPERVISOR_ID:=nh;
533 else
534 L_SUPERVISOR_ID := 
535 hr_pump_get.get_supervisor_id
536 (P_SUPERVISOR_USER_KEY => c.p72);
537 end if;
538 --
539 if c.d73=cn then
540 L_DEFAULT_CODE_COMB_ID:=nn;
541 elsif c.d73 is null then 
542 L_DEFAULT_CODE_COMB_ID:=nh;
543 else
544 L_DEFAULT_CODE_COMB_ID := 
545 hr_pump_get.get_default_code_comb_id
546 (P_DEFAULT_CODE_COMB_USER_KEY => c.p73);
547 end if;
548 --
549 if c.d74=cn then
550 L_SET_OF_BOOKS_ID:=nn;
551 elsif c.d74 is null then 
552 L_SET_OF_BOOKS_ID:=nh;
553 else
554 L_SET_OF_BOOKS_ID := 
555 hr_pump_get.get_set_of_books_id
556 (P_SET_OF_BOOKS_NAME => c.p74);
557 end if;
558 --
559 if c.d75=cn then
560 L_CONTRACT_ID:=nn;
561 elsif c.d75 is null then 
562 L_CONTRACT_ID:=nh;
563 else
564 L_CONTRACT_ID := 
565 hr_pump_get.get_contract_id
566 (P_CONTRACT_USER_KEY => c.p75);
567 end if;
568 --
569 if c.d76=cn or
570 c.d77=cn then
571 L_ESTABLISHMENT_ID:=nn;
572 elsif c.d76 is null or
573 c.d77 is null then 
574 L_ESTABLISHMENT_ID:=nh;
575 else
576 L_ESTABLISHMENT_ID := 
577 hr_pump_get.get_establishment_id
578 (P_ESTABLISHMENT_NAME => c.p76
579 ,P_LOCATION => c.p77);
580 end if;
581 --
582 if c.d78=cn or
583 c.p1 is null then
584 L_COLLECTIVE_AGREEMENT_ID:=nn;
585 elsif c.d78 is null then 
586 L_COLLECTIVE_AGREEMENT_ID:=nh;
587 else
588 L_COLLECTIVE_AGREEMENT_ID := 
589 hr_pump_get.get_collective_agreement_id
590 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
591 ,P_CAGR_NAME => c.p78
592 ,P_EFFECTIVE_DATE => c.p1);
593 end if;
594 --
595 if c.d79=cn then
596 L_SUPERVISOR_ASSIGNMENT_ID:=nn;
597 elsif c.d79 is null then 
598 L_SUPERVISOR_ASSIGNMENT_ID:=nh;
599 else
600 L_SUPERVISOR_ASSIGNMENT_ID := 
601 hr_pump_get.get_supervisor_assignment_id
602 (P_SVR_ASSIGNMENT_USER_KEY => c.p79);
603 end if;
604 --
605 hr_data_pump.api_trc_on;
606 HR_ASSIGNMENT_API.UPDATE_GB_EMP_ASG
607 (p_validate => l_validate
608 ,P_EFFECTIVE_DATE => c.p1
609 ,P_DATETRACK_UPDATE_MODE => c.p2
610 ,P_ASSIGNMENT_ID => L_ASSIGNMENT_ID
611 ,P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER
612 ,P_SUPERVISOR_ID => L_SUPERVISOR_ID
613 ,P_ASSIGNMENT_NUMBER => c.p3
614 ,P_CHANGE_REASON => c.p4
615 ,P_COMMENTS => c.p5
616 ,P_DATE_PROBATION_END => c.p6
617 ,P_DEFAULT_CODE_COMB_ID => L_DEFAULT_CODE_COMB_ID
618 ,P_FREQUENCY => c.p7
619 ,P_INTERNAL_ADDRESS_LINE => c.p8
620 ,P_MANAGER_FLAG => c.p9
621 ,P_NORMAL_HOURS => c.p10
622 ,P_PERF_REVIEW_PERIOD => c.p11
623 ,P_PERF_REVIEW_PERIOD_FREQUENCY => c.p12
624 ,P_PROBATION_PERIOD => c.p13
625 ,P_PROBATION_UNIT => c.p14
626 ,P_SAL_REVIEW_PERIOD => c.p15
627 ,P_SAL_REVIEW_PERIOD_FREQUENCY => c.p16
628 ,P_SET_OF_BOOKS_ID => L_SET_OF_BOOKS_ID
629 ,P_SOURCE_TYPE => c.p17
630 ,P_TIME_NORMAL_FINISH => c.p18
631 ,P_TIME_NORMAL_START => c.p19
632 ,P_BARGAINING_UNIT_CODE => c.p20
633 ,P_LABOUR_UNION_MEMBER_FLAG => c.p21
634 ,P_HOURLY_SALARIED_CODE => c.p22
635 ,P_ASS_ATTRIBUTE_CATEGORY => c.p23
636 ,P_ASS_ATTRIBUTE1 => c.p24
637 ,P_ASS_ATTRIBUTE2 => c.p25
638 ,P_ASS_ATTRIBUTE3 => c.p26
639 ,P_ASS_ATTRIBUTE4 => c.p27
640 ,P_ASS_ATTRIBUTE5 => c.p28
641 ,P_ASS_ATTRIBUTE6 => c.p29
642 ,P_ASS_ATTRIBUTE7 => c.p30
643 ,P_ASS_ATTRIBUTE8 => c.p31
644 ,P_ASS_ATTRIBUTE9 => c.p32
645 ,P_ASS_ATTRIBUTE10 => c.p33
646 ,P_ASS_ATTRIBUTE11 => c.p34
647 ,P_ASS_ATTRIBUTE12 => c.p35
648 ,P_ASS_ATTRIBUTE13 => c.p36
649 ,P_ASS_ATTRIBUTE14 => c.p37
650 ,P_ASS_ATTRIBUTE15 => c.p38
651 ,P_ASS_ATTRIBUTE16 => c.p39
652 ,P_ASS_ATTRIBUTE17 => c.p40
653 ,P_ASS_ATTRIBUTE18 => c.p41
654 ,P_ASS_ATTRIBUTE19 => c.p42
655 ,P_ASS_ATTRIBUTE20 => c.p43
656 ,P_ASS_ATTRIBUTE21 => c.p44
657 ,P_ASS_ATTRIBUTE22 => c.p45
658 ,P_ASS_ATTRIBUTE23 => c.p46
659 ,P_ASS_ATTRIBUTE24 => c.p47
660 ,P_ASS_ATTRIBUTE25 => c.p48
661 ,P_ASS_ATTRIBUTE26 => c.p49
662 ,P_ASS_ATTRIBUTE27 => c.p50
663 ,P_ASS_ATTRIBUTE28 => c.p51
664 ,P_ASS_ATTRIBUTE29 => c.p52
665 ,P_ASS_ATTRIBUTE30 => c.p53
666 ,P_TITLE => c.p54
667 ,P_CONTRACT_ID => L_CONTRACT_ID
668 ,P_ESTABLISHMENT_ID => L_ESTABLISHMENT_ID
669 ,P_COLLECTIVE_AGREEMENT_ID => L_COLLECTIVE_AGREEMENT_ID
670 ,P_CAGR_ID_FLEX_NUM => c.p55
671 ,P_NOTICE_PERIOD => c.p56
672 ,P_NOTICE_PERIOD_UOM => c.p57
673 ,P_EMPLOYEE_CATEGORY => c.p58
674 ,P_WORK_AT_HOME => c.p59
675 ,P_JOB_POST_SOURCE_NAME => c.p60
676 ,P_SUPERVISOR_ASSIGNMENT_ID => L_SUPERVISOR_ASSIGNMENT_ID
677 ,P_CAGR_GRADE_DEF_ID => c.p61
678 ,P_CAGR_CONCATENATED_SEGMENTS => c.p62
679 ,P_CONCATENATED_SEGMENTS => c.p63
680 ,P_SOFT_CODING_KEYFLEX_ID => c.p64
681 ,P_COMMENT_ID => c.p65
682 ,P_EFFECTIVE_START_DATE => c.p66
683 ,P_EFFECTIVE_END_DATE => c.p67
684 ,P_NO_MANAGERS_WARNING => L_NO_MANAGERS_WARNING
685 ,P_OTHER_MANAGER_WARNING => L_OTHER_MANAGER_WARNING
686 ,P_HOURLY_SALARIED_WARNING => L_HOURLY_SALARIED_WARNING);
687 hr_data_pump.api_trc_off;
688 --
689 if L_NO_MANAGERS_WARNING then
690 c.p68 := 'TRUE';
691 else
692 c.p68 := 'FALSE';
693 end if;
694 --
695 if L_OTHER_MANAGER_WARNING then
696 c.p69 := 'TRUE';
697 else
698 c.p69 := 'FALSE';
699 end if;
700 --
701 if L_HOURLY_SALARIED_WARNING then
702 c.p70 := 'TRUE';
703 else
704 c.p70 := 'FALSE';
705 end if;
706 --
707 update hr_pump_batch_lines l set
708 l.pval061 = decode(c.p61,null,cn,c.p61),
709 l.pval062 = decode(c.p62,null,cn,c.p62),
710 l.pval063 = decode(c.p63,null,cn,c.p63),
711 l.pval064 = decode(c.p64,null,cn,c.p64),
712 l.pval065 = decode(c.p65,null,cn,c.p65),
713 l.pval066 = decode(c.p66,null,cn,dc(c.p66)),
714 l.pval067 = decode(c.p67,null,cn,dc(c.p67)),
715 l.pval068 = decode(c.p68,null,cn,c.p68),
716 l.pval069 = decode(c.p69,null,cn,c.p69),
717 l.pval070 = decode(c.p70,null,cn,c.p70)
718 where l.rowid = c.myrowid;
719 --
720 close cr;
721 --
722 hr_data_pump.exit('call');
723 exception
724  when hr_multi_message.error_message_exist then
725    if cr%isopen then
726     close cr;
727    end if;
728    hr_pump_utils.set_multi_msg_error_flag(true);
729  when others then
730  if cr%isopen then
731   close cr;
732  end if;
733  raise;
734 end call;
735 end hrdpp_UPDATE_GB_EMP_ASG;