DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_CREATE_GRADE

Source


1 package body hrdpp_CREATE_GRADE as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2009/03/30 04:03:07
4  * Generated for API: HR_GRADE_API.CREATE_GRADE
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_DATE_FROM in date
83 ,P_SEQUENCE in number
84 ,P_EFFECTIVE_DATE in date default null
85 ,P_DATE_TO in date default null
86 ,P_PROGRAM_UPDATE_DATE in date default null
87 ,P_LAST_UPDATE_DATE in date default null
88 ,P_LAST_UPDATED_BY in number default null
89 ,P_LAST_UPDATE_LOGIN in number default null
90 ,P_CREATED_BY in number default null
91 ,P_CREATION_DATE in date default null
92 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
93 ,P_ATTRIBUTE1 in varchar2 default null
94 ,P_ATTRIBUTE2 in varchar2 default null
95 ,P_ATTRIBUTE3 in varchar2 default null
96 ,P_ATTRIBUTE4 in varchar2 default null
97 ,P_ATTRIBUTE5 in varchar2 default null
98 ,P_ATTRIBUTE6 in varchar2 default null
99 ,P_ATTRIBUTE7 in varchar2 default null
100 ,P_ATTRIBUTE8 in varchar2 default null
101 ,P_ATTRIBUTE9 in varchar2 default null
102 ,P_ATTRIBUTE10 in varchar2 default null
103 ,P_ATTRIBUTE11 in varchar2 default null
104 ,P_ATTRIBUTE12 in varchar2 default null
105 ,P_ATTRIBUTE13 in varchar2 default null
106 ,P_ATTRIBUTE14 in varchar2 default null
107 ,P_ATTRIBUTE15 in varchar2 default null
108 ,P_ATTRIBUTE16 in varchar2 default null
109 ,P_ATTRIBUTE17 in varchar2 default null
110 ,P_ATTRIBUTE18 in varchar2 default null
111 ,P_ATTRIBUTE19 in varchar2 default null
112 ,P_ATTRIBUTE20 in varchar2 default null
113 ,P_INFORMATION_CATEGORY in varchar2 default null
114 ,P_INFORMATION1 in varchar2 default null
115 ,P_INFORMATION2 in varchar2 default null
116 ,P_INFORMATION3 in varchar2 default null
117 ,P_INFORMATION4 in varchar2 default null
118 ,P_INFORMATION5 in varchar2 default null
119 ,P_INFORMATION6 in varchar2 default null
120 ,P_INFORMATION7 in varchar2 default null
121 ,P_INFORMATION8 in varchar2 default null
122 ,P_INFORMATION9 in varchar2 default null
123 ,P_INFORMATION10 in varchar2 default null
124 ,P_INFORMATION11 in varchar2 default null
125 ,P_INFORMATION12 in varchar2 default null
126 ,P_INFORMATION13 in varchar2 default null
127 ,P_INFORMATION14 in varchar2 default null
128 ,P_INFORMATION15 in varchar2 default null
129 ,P_INFORMATION16 in varchar2 default null
130 ,P_INFORMATION17 in varchar2 default null
131 ,P_INFORMATION18 in varchar2 default null
132 ,P_INFORMATION19 in varchar2 default null
133 ,P_INFORMATION20 in varchar2 default null
134 ,P_SEGMENT1 in varchar2 default null
135 ,P_SEGMENT2 in varchar2 default null
136 ,P_SEGMENT3 in varchar2 default null
137 ,P_SEGMENT4 in varchar2 default null
138 ,P_SEGMENT5 in varchar2 default null
139 ,P_SEGMENT6 in varchar2 default null
140 ,P_SEGMENT7 in varchar2 default null
141 ,P_SEGMENT8 in varchar2 default null
142 ,P_SEGMENT9 in varchar2 default null
143 ,P_SEGMENT10 in varchar2 default null
144 ,P_SEGMENT11 in varchar2 default null
145 ,P_SEGMENT12 in varchar2 default null
146 ,P_SEGMENT13 in varchar2 default null
147 ,P_SEGMENT14 in varchar2 default null
148 ,P_SEGMENT15 in varchar2 default null
149 ,P_SEGMENT16 in varchar2 default null
150 ,P_SEGMENT17 in varchar2 default null
151 ,P_SEGMENT18 in varchar2 default null
152 ,P_SEGMENT19 in varchar2 default null
153 ,P_SEGMENT20 in varchar2 default null
154 ,P_SEGMENT21 in varchar2 default null
155 ,P_SEGMENT22 in varchar2 default null
156 ,P_SEGMENT23 in varchar2 default null
157 ,P_SEGMENT24 in varchar2 default null
158 ,P_SEGMENT25 in varchar2 default null
159 ,P_SEGMENT26 in varchar2 default null
160 ,P_SEGMENT27 in varchar2 default null
161 ,P_SEGMENT28 in varchar2 default null
162 ,P_SEGMENT29 in varchar2 default null
163 ,P_SEGMENT30 in varchar2 default null
164 ,P_LANGUAGE_CODE in varchar2 default null
165 ,P_CONCAT_SEGMENTS in varchar2 default null
166 ,P_SHORT_NAME in varchar2 default null
167 ,P_GRADE_DEFINITION_ID in number
168 ,P_NAME in varchar2) is
169 blid number := p_data_pump_batch_line_id;
170 begin
171 if blid is not null then
172 delete from hr_pump_batch_lines where batch_line_id = blid;
173 delete from hr_pump_batch_exceptions
174 where source_type = 'BATCH_LINE' and source_id = blid;
175 end if;
176 insert into hr_pump_batch_lines
177 (batch_id
178 ,batch_line_id
179 ,business_group_name
180 ,api_module_id
181 ,line_status
182 ,user_sequence
183 ,link_value
184 ,pval001
185 ,pval002
186 ,pval003
187 ,pval004
188 ,pval005
189 ,pval006
190 ,pval007
191 ,pval008
192 ,pval009
193 ,pval010
194 ,pval011
195 ,pval012
196 ,pval013
197 ,pval014
198 ,pval015
199 ,pval016
200 ,pval017
201 ,pval018
202 ,pval019
203 ,pval020
204 ,pval021
205 ,pval022
206 ,pval023
207 ,pval024
208 ,pval025
209 ,pval026
210 ,pval027
211 ,pval028
212 ,pval029
213 ,pval030
214 ,pval031
215 ,pval032
216 ,pval033
217 ,pval034
218 ,pval035
219 ,pval036
220 ,pval037
221 ,pval038
222 ,pval039
223 ,pval040
224 ,pval041
225 ,pval042
226 ,pval043
227 ,pval044
228 ,pval045
229 ,pval046
230 ,pval047
231 ,pval048
232 ,pval049
233 ,pval050
234 ,pval051
235 ,pval052
236 ,pval053
237 ,pval054
238 ,pval055
239 ,pval056
240 ,pval057
241 ,pval058
242 ,pval059
243 ,pval060
244 ,pval061
245 ,pval062
246 ,pval063
247 ,pval064
248 ,pval065
249 ,pval066
250 ,pval067
251 ,pval068
252 ,pval069
253 ,pval070
254 ,pval071
255 ,pval072
256 ,pval073
257 ,pval074
258 ,pval075
259 ,pval076
260 ,pval077
261 ,pval078
262 ,pval079
263 ,pval080
264 ,pval081
265 ,pval082
266 ,pval083
267 ,pval084
268 ,pval085
269 ,pval088
270 ,pval089)
271 values
272 (p_batch_id
273 ,nvl(blid,hr_pump_batch_lines_s.nextval)
274 ,p_data_pump_business_grp_name
275 ,2833
276 ,'U'
277 ,p_user_sequence
278 ,p_link_value
279 ,dc(P_DATE_FROM)
280 ,P_SEQUENCE
281 ,dc(P_EFFECTIVE_DATE)
282 ,dc(P_DATE_TO)
283 ,dc(P_PROGRAM_UPDATE_DATE)
284 ,dc(P_LAST_UPDATE_DATE)
285 ,P_LAST_UPDATED_BY
286 ,P_LAST_UPDATE_LOGIN
287 ,P_CREATED_BY
288 ,dc(P_CREATION_DATE)
289 ,P_ATTRIBUTE_CATEGORY
290 ,P_ATTRIBUTE1
291 ,P_ATTRIBUTE2
292 ,P_ATTRIBUTE3
293 ,P_ATTRIBUTE4
294 ,P_ATTRIBUTE5
295 ,P_ATTRIBUTE6
296 ,P_ATTRIBUTE7
297 ,P_ATTRIBUTE8
298 ,P_ATTRIBUTE9
299 ,P_ATTRIBUTE10
300 ,P_ATTRIBUTE11
301 ,P_ATTRIBUTE12
302 ,P_ATTRIBUTE13
303 ,P_ATTRIBUTE14
304 ,P_ATTRIBUTE15
305 ,P_ATTRIBUTE16
306 ,P_ATTRIBUTE17
307 ,P_ATTRIBUTE18
308 ,P_ATTRIBUTE19
309 ,P_ATTRIBUTE20
310 ,P_INFORMATION_CATEGORY
311 ,P_INFORMATION1
312 ,P_INFORMATION2
313 ,P_INFORMATION3
314 ,P_INFORMATION4
315 ,P_INFORMATION5
316 ,P_INFORMATION6
317 ,P_INFORMATION7
318 ,P_INFORMATION8
319 ,P_INFORMATION9
320 ,P_INFORMATION10
321 ,P_INFORMATION11
322 ,P_INFORMATION12
323 ,P_INFORMATION13
324 ,P_INFORMATION14
325 ,P_INFORMATION15
326 ,P_INFORMATION16
327 ,P_INFORMATION17
328 ,P_INFORMATION18
329 ,P_INFORMATION19
330 ,P_INFORMATION20
331 ,P_SEGMENT1
332 ,P_SEGMENT2
333 ,P_SEGMENT3
334 ,P_SEGMENT4
335 ,P_SEGMENT5
336 ,P_SEGMENT6
337 ,P_SEGMENT7
338 ,P_SEGMENT8
339 ,P_SEGMENT9
340 ,P_SEGMENT10
341 ,P_SEGMENT11
342 ,P_SEGMENT12
343 ,P_SEGMENT13
344 ,P_SEGMENT14
345 ,P_SEGMENT15
346 ,P_SEGMENT16
347 ,P_SEGMENT17
348 ,P_SEGMENT18
349 ,P_SEGMENT19
350 ,P_SEGMENT20
351 ,P_SEGMENT21
352 ,P_SEGMENT22
353 ,P_SEGMENT23
354 ,P_SEGMENT24
355 ,P_SEGMENT25
356 ,P_SEGMENT26
357 ,P_SEGMENT27
358 ,P_SEGMENT28
359 ,P_SEGMENT29
360 ,P_SEGMENT30
361 ,P_LANGUAGE_CODE
362 ,P_CONCAT_SEGMENTS
363 ,P_SHORT_NAME
364 ,P_GRADE_DEFINITION_ID
365 ,P_NAME);
366 end insert_batch_lines;
367 --
368 procedure call
369 (p_business_group_id in number,
370 p_batch_line_id     in number) is
371 cursor cr is
372 select l.rowid myrowid,
373 decode(l.pval001,cn,dn,d(l.pval001)) p1,
374 decode(l.pval002,cn,nn,n(l.pval002)) p2,
375 decode(l.pval003,cn,dn,vn,dn,d(l.pval003)) p3,
376 l.pval003 d3,
377 decode(l.pval004,cn,dn,vn,dn,d(l.pval004)) p4,
378 l.pval004 d4,
379 decode(l.pval005,cn,dn,vn,dn,d(l.pval005)) p5,
380 l.pval005 d5,
381 decode(l.pval006,cn,dn,vn,dn,d(l.pval006)) p6,
382 l.pval006 d6,
383 decode(l.pval007,cn,nn,vn,nn,n(l.pval007)) p7,
384 l.pval007 d7,
385 decode(l.pval008,cn,nn,vn,nn,n(l.pval008)) p8,
386 l.pval008 d8,
387 decode(l.pval009,cn,nn,vn,nn,n(l.pval009)) p9,
388 l.pval009 d9,
389 decode(l.pval010,cn,dn,vn,dn,d(l.pval010)) p10,
390 l.pval010 d10,
391 decode(l.pval011,cn,vn,vn,vn,l.pval011) p11,
392 l.pval011 d11,
393 decode(l.pval012,cn,vn,vn,vn,l.pval012) p12,
394 l.pval012 d12,
395 decode(l.pval013,cn,vn,vn,vn,l.pval013) p13,
396 l.pval013 d13,
397 decode(l.pval014,cn,vn,vn,vn,l.pval014) p14,
398 l.pval014 d14,
399 decode(l.pval015,cn,vn,vn,vn,l.pval015) p15,
400 l.pval015 d15,
401 decode(l.pval016,cn,vn,vn,vn,l.pval016) p16,
402 l.pval016 d16,
403 decode(l.pval017,cn,vn,vn,vn,l.pval017) p17,
404 l.pval017 d17,
405 decode(l.pval018,cn,vn,vn,vn,l.pval018) p18,
406 l.pval018 d18,
407 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
408 l.pval019 d19,
409 decode(l.pval020,cn,vn,vn,vn,l.pval020) p20,
410 l.pval020 d20,
411 decode(l.pval021,cn,vn,vn,vn,l.pval021) p21,
412 l.pval021 d21,
413 decode(l.pval022,cn,vn,vn,vn,l.pval022) p22,
414 l.pval022 d22,
415 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
416 l.pval023 d23,
417 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
418 l.pval024 d24,
419 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
420 l.pval025 d25,
421 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
422 l.pval026 d26,
423 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
424 l.pval027 d27,
425 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
426 l.pval028 d28,
427 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
428 l.pval029 d29,
429 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
430 l.pval030 d30,
431 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
432 l.pval031 d31,
433 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
434 l.pval032 d32,
435 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
436 l.pval033 d33,
437 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
438 l.pval034 d34,
439 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
440 l.pval035 d35,
441 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
442 l.pval036 d36,
446 l.pval038 d38,
443 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
444 l.pval037 d37,
445 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
447 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
448 l.pval039 d39,
449 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
450 l.pval040 d40,
451 decode(l.pval041,cn,vn,vn,vn,l.pval041) p41,
452 l.pval041 d41,
453 decode(l.pval042,cn,vn,vn,vn,l.pval042) p42,
454 l.pval042 d42,
455 decode(l.pval043,cn,vn,vn,vn,l.pval043) p43,
456 l.pval043 d43,
457 decode(l.pval044,cn,vn,vn,vn,l.pval044) p44,
458 l.pval044 d44,
459 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
460 l.pval045 d45,
461 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
462 l.pval046 d46,
463 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
464 l.pval047 d47,
465 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
466 l.pval048 d48,
467 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
468 l.pval049 d49,
469 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
470 l.pval050 d50,
471 decode(l.pval051,cn,vn,vn,vn,l.pval051) p51,
472 l.pval051 d51,
473 decode(l.pval052,cn,vn,vn,vn,l.pval052) p52,
474 l.pval052 d52,
475 decode(l.pval053,cn,vn,vn,vn,l.pval053) p53,
476 l.pval053 d53,
477 decode(l.pval054,cn,vn,vn,vn,l.pval054) p54,
478 l.pval054 d54,
479 decode(l.pval055,cn,vn,vn,vn,l.pval055) p55,
480 l.pval055 d55,
481 decode(l.pval056,cn,vn,vn,vn,l.pval056) p56,
482 l.pval056 d56,
483 decode(l.pval057,cn,vn,vn,vn,l.pval057) p57,
484 l.pval057 d57,
485 decode(l.pval058,cn,vn,vn,vn,l.pval058) p58,
486 l.pval058 d58,
487 decode(l.pval059,cn,vn,vn,vn,l.pval059) p59,
488 l.pval059 d59,
489 decode(l.pval060,cn,vn,vn,vn,l.pval060) p60,
490 l.pval060 d60,
491 decode(l.pval061,cn,vn,vn,vn,l.pval061) p61,
492 l.pval061 d61,
493 decode(l.pval062,cn,vn,vn,vn,l.pval062) p62,
494 l.pval062 d62,
495 decode(l.pval063,cn,vn,vn,vn,l.pval063) p63,
496 l.pval063 d63,
497 decode(l.pval064,cn,vn,vn,vn,l.pval064) p64,
498 l.pval064 d64,
499 decode(l.pval065,cn,vn,vn,vn,l.pval065) p65,
500 l.pval065 d65,
501 decode(l.pval066,cn,vn,vn,vn,l.pval066) p66,
502 l.pval066 d66,
503 decode(l.pval067,cn,vn,vn,vn,l.pval067) p67,
504 l.pval067 d67,
505 decode(l.pval068,cn,vn,vn,vn,l.pval068) p68,
506 l.pval068 d68,
507 decode(l.pval069,cn,vn,vn,vn,l.pval069) p69,
508 l.pval069 d69,
509 decode(l.pval070,cn,vn,vn,vn,l.pval070) p70,
510 l.pval070 d70,
511 decode(l.pval071,cn,vn,vn,vn,l.pval071) p71,
512 l.pval071 d71,
513 decode(l.pval072,cn,vn,vn,vn,l.pval072) p72,
514 l.pval072 d72,
515 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
516 l.pval073 d73,
517 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
518 l.pval074 d74,
519 decode(l.pval075,cn,vn,vn,vn,l.pval075) p75,
520 l.pval075 d75,
521 decode(l.pval076,cn,vn,vn,vn,l.pval076) p76,
522 l.pval076 d76,
523 decode(l.pval077,cn,vn,vn,vn,l.pval077) p77,
524 l.pval077 d77,
525 decode(l.pval078,cn,vn,vn,vn,l.pval078) p78,
526 l.pval078 d78,
527 decode(l.pval079,cn,vn,vn,vn,l.pval079) p79,
528 l.pval079 d79,
529 decode(l.pval080,cn,vn,vn,vn,l.pval080) p80,
530 l.pval080 d80,
531 decode(l.pval081,cn,vn,vn,vn,l.pval081) p81,
532 l.pval081 d81,
533 decode(l.pval082,cn,vn,vn,vn,l.pval082) p82,
534 l.pval082 d82,
535 decode(l.pval083,cn,vn,vn,vn,l.pval083) p83,
536 l.pval083 d83,
537 decode(l.pval084,cn,vn,vn,vn,l.pval084) p84,
538 l.pval084 d84,
539 decode(l.pval085,cn,vn,vn,vn,l.pval085) p85,
540 l.pval085 d85,
541 l.pval086 p86,
542 l.pval087 p87,
543 decode(l.pval088,cn,nn,n(l.pval088)) p88,
544 decode(l.pval089,cn,vn,l.pval089) p89
545 from hr_pump_batch_lines l
546 where l.batch_line_id = p_batch_line_id;
547 --
548 c cr%rowtype;
549 l_validate boolean := false;
550 L_REQUEST_ID number;
551 L_PROGRAM_APPLICATION_ID number;
552 L_PROGRAM_ID number;
553 --
554 begin
555 hr_data_pump.entry('call');
556 open cr;
557 fetch cr into c;
558 if cr%notfound then
559 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
560 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
561 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
562 hr_utility.set_message_token('VALUE',p_batch_line_id);
563 hr_utility.raise_error;
564 end if;
565 --
566 L_REQUEST_ID := 
567 hr_pump_get.get_request_id;
568 --
569 L_PROGRAM_APPLICATION_ID := 
570 hr_pump_get.get_program_application_id;
571 --
572 L_PROGRAM_ID := 
573 hr_pump_get.get_program_id;
574 --
575 hr_data_pump.api_trc_on;
576 HR_GRADE_API.CREATE_GRADE
577 (p_validate => l_validate
578 ,p_business_group_id => p_business_group_id
579 ,P_DATE_FROM => c.p1
580 ,P_SEQUENCE => c.p2
581 ,P_EFFECTIVE_DATE => c.p3
582 ,P_DATE_TO => c.p4
583 ,P_REQUEST_ID => L_REQUEST_ID
584 ,P_PROGRAM_APPLICATION_ID => L_PROGRAM_APPLICATION_ID
585 ,P_PROGRAM_ID => L_PROGRAM_ID
586 ,P_PROGRAM_UPDATE_DATE => c.p5
587 ,P_LAST_UPDATE_DATE => c.p6
591 ,P_CREATION_DATE => c.p10
588 ,P_LAST_UPDATED_BY => c.p7
589 ,P_LAST_UPDATE_LOGIN => c.p8
590 ,P_CREATED_BY => c.p9
592 ,P_ATTRIBUTE_CATEGORY => c.p11
593 ,P_ATTRIBUTE1 => c.p12
594 ,P_ATTRIBUTE2 => c.p13
595 ,P_ATTRIBUTE3 => c.p14
596 ,P_ATTRIBUTE4 => c.p15
597 ,P_ATTRIBUTE5 => c.p16
598 ,P_ATTRIBUTE6 => c.p17
599 ,P_ATTRIBUTE7 => c.p18
600 ,P_ATTRIBUTE8 => c.p19
601 ,P_ATTRIBUTE9 => c.p20
602 ,P_ATTRIBUTE10 => c.p21
603 ,P_ATTRIBUTE11 => c.p22
604 ,P_ATTRIBUTE12 => c.p23
605 ,P_ATTRIBUTE13 => c.p24
606 ,P_ATTRIBUTE14 => c.p25
607 ,P_ATTRIBUTE15 => c.p26
608 ,P_ATTRIBUTE16 => c.p27
609 ,P_ATTRIBUTE17 => c.p28
610 ,P_ATTRIBUTE18 => c.p29
611 ,P_ATTRIBUTE19 => c.p30
612 ,P_ATTRIBUTE20 => c.p31
613 ,P_INFORMATION_CATEGORY => c.p32
614 ,P_INFORMATION1 => c.p33
615 ,P_INFORMATION2 => c.p34
616 ,P_INFORMATION3 => c.p35
617 ,P_INFORMATION4 => c.p36
618 ,P_INFORMATION5 => c.p37
619 ,P_INFORMATION6 => c.p38
620 ,P_INFORMATION7 => c.p39
621 ,P_INFORMATION8 => c.p40
622 ,P_INFORMATION9 => c.p41
623 ,P_INFORMATION10 => c.p42
624 ,P_INFORMATION11 => c.p43
625 ,P_INFORMATION12 => c.p44
626 ,P_INFORMATION13 => c.p45
627 ,P_INFORMATION14 => c.p46
628 ,P_INFORMATION15 => c.p47
629 ,P_INFORMATION16 => c.p48
630 ,P_INFORMATION17 => c.p49
631 ,P_INFORMATION18 => c.p50
632 ,P_INFORMATION19 => c.p51
633 ,P_INFORMATION20 => c.p52
634 ,P_SEGMENT1 => c.p53
635 ,P_SEGMENT2 => c.p54
636 ,P_SEGMENT3 => c.p55
637 ,P_SEGMENT4 => c.p56
638 ,P_SEGMENT5 => c.p57
639 ,P_SEGMENT6 => c.p58
640 ,P_SEGMENT7 => c.p59
641 ,P_SEGMENT8 => c.p60
642 ,P_SEGMENT9 => c.p61
643 ,P_SEGMENT10 => c.p62
644 ,P_SEGMENT11 => c.p63
645 ,P_SEGMENT12 => c.p64
646 ,P_SEGMENT13 => c.p65
647 ,P_SEGMENT14 => c.p66
648 ,P_SEGMENT15 => c.p67
649 ,P_SEGMENT16 => c.p68
650 ,P_SEGMENT17 => c.p69
651 ,P_SEGMENT18 => c.p70
652 ,P_SEGMENT19 => c.p71
653 ,P_SEGMENT20 => c.p72
654 ,P_SEGMENT21 => c.p73
655 ,P_SEGMENT22 => c.p74
656 ,P_SEGMENT23 => c.p75
657 ,P_SEGMENT24 => c.p76
658 ,P_SEGMENT25 => c.p77
659 ,P_SEGMENT26 => c.p78
660 ,P_SEGMENT27 => c.p79
661 ,P_SEGMENT28 => c.p80
662 ,P_SEGMENT29 => c.p81
663 ,P_SEGMENT30 => c.p82
664 ,P_LANGUAGE_CODE => c.p83
665 ,P_CONCAT_SEGMENTS => c.p84
666 ,P_SHORT_NAME => c.p85
667 ,P_GRADE_ID => c.p86
668 ,P_OBJECT_VERSION_NUMBER => c.p87
669 ,P_GRADE_DEFINITION_ID => c.p88
670 ,P_NAME => c.p89);
671 hr_data_pump.api_trc_off;
672 
673 --
674 update hr_pump_batch_lines l set
675 l.pval086 = decode(c.p86,null,cn,c.p86),
676 l.pval087 = decode(c.p87,null,cn,c.p87),
677 l.pval088 = decode(c.p88,null,cn,c.p88),
678 l.pval089 = decode(c.p89,null,cn,c.p89)
679 where l.rowid = c.myrowid;
680 --
681 close cr;
682 --
683 hr_data_pump.exit('call');
684 exception
685  when hr_multi_message.error_message_exist then
686    if cr%isopen then
687     close cr;
688    end if;
689    hr_pump_utils.set_multi_msg_error_flag(true);
690  when others then
691  if cr%isopen then
692   close cr;
693  end if;
694  raise;
695 end call;
696 end hrdpp_CREATE_GRADE;