[Home] [Help]
PACKAGE BODY: APPS.PER_STARTUP_PERSON_TYPES_PKG
Source
1 package body PER_STARTUP_PERSON_TYPES_PKG as
2 /* $Header: pespt01t.pkb 115.21 2003/10/27 07:07:36 skota ship $ */
3
4 procedure POPULATE_KEY (
5 p_seeded_person_type_key in varchar2,
6 p_user_person_type in varchar2,
7 p_system_person_type in varchar2) is
8
9 cursor bus_grp is
10 select distinct business_group_id
11 from per_person_types;
12
13 cursor person_type is
14 select person_type_id
15 from per_person_types
16 where seeded_person_type_key= p_seeded_person_type_key
17 and last_updated_by=1;
18
19 l_bus_grp number;
20 l_user_person_type varchar2(30);
21 l_system_person_type varchar2(30);
22 l_updated varchar2(1);
23 begin
24 hr_general.g_data_migrator_mode :='Y';
25
26 for C1 in bus_grp loop
27 l_bus_grp := c1.business_group_id;
28 update per_person_types
29 set seeded_person_type_key = p_seeded_person_type_key
30 ,last_updated_by = 1
31 ,last_update_login = 1
32 ,created_by =1
33 ,last_update_date = sysdate
34 where user_person_type = p_user_person_type
35 and system_person_type = p_system_person_type
36 and business_group_id = l_bus_grp;
37
38 if sql%rowcount = 0 then
39 insert into per_person_types
40 (PERSON_TYPE_ID
41 ,BUSINESS_GROUP_ID
42 ,SEEDED_PERSON_TYPE_KEY
43 ,ACTIVE_FLAG
44 ,DEFAULT_FLAG
45 ,SYSTEM_PERSON_TYPE
46 ,USER_PERSON_TYPE
47 ,LAST_UPDATED_BY
48 ,CREATED_BY
49 ,LAST_UPDATE_LOGIN
50 ,LAST_UPDATE_DATE
51 ,CREATION_DATE)
52 Values
53 (PER_PERSON_TYPES_S.nextval
54 ,C1.business_group_id
55 ,p_seeded_person_type_key
56 ,'N'
57 ,'N'
58 ,p_system_person_type
59 ,p_user_person_type
60 ,1
61 ,1
62 ,1
63 ,sysdate
64 ,sysdate);
65 end if;
66 end loop;
67
68 for c2 in person_type loop
69
70 update per_person_types_tl
71 set last_updated_by = 1,
72 last_update_login = 1,
73 created_by = 1,
74 last_update_date = sysdate
75 where person_type_id = c2.person_type_id;
76
77
78 if sql%rowcount = 0 then
79
80 insert into PER_PERSON_TYPES_TL (
81 PERSON_TYPE_ID
82 ,LANGUAGE
83 ,SOURCE_LANG
84 ,USER_PERSON_TYPE
85 ,LAST_UPDATE_DATE
86 ,LAST_UPDATED_BY
87 ,LAST_UPDATE_LOGIN
88 ,CREATED_BY
89 ,CREATION_DATE
90 )select
91 c2.person_type_id
92 ,l.language_code
93 ,userenv('lang')
94 ,p_user_person_Type
95 ,sysdate
96 ,1
97 ,1
98 ,1
99 ,sysdate
100 from fnd_languages l
101 where L.INSTALLED_FLAG in ('I', 'B');
102
103 end if;
104 end loop;
105 hr_general.g_data_migrator_mode :='N';
106 end;
107
108 procedure INSERT_ROW (
109 X_ROWID in out nocopy VARCHAR2,
110 X_SEEDED_PERSON_TYPE_KEY in VARCHAR2,
111 X_DEFAULT_FLAG in VARCHAR2,
112 X_SYSTEM_PERSON_TYPE in VARCHAR2,
113 X_CURRENT_APPLICANT_FLAG in VARCHAR2,
114 X_CURRENT_EMP_OR_APL_FLAG in VARCHAR2,
115 X_CURRENT_EMPLOYEE_FLAG in VARCHAR2,
116 X_USER_PERSON_TYPE in VARCHAR2,
117 X_CREATION_DATE in DATE,
118 X_CREATED_BY in NUMBER,
119 X_LAST_UPDATE_DATE in DATE,
120 X_LAST_UPDATED_BY in NUMBER,
121 X_LAST_UPDATE_LOGIN in NUMBER
122 ) is
123
124 begin
125 hr_general.g_data_migrator_mode :='Y';
126
127 insert into PER_PERSON_TYPES (
128 PERSON_TYPE_ID
129 ,BUSINESS_GROUP_ID
130 ,ACTIVE_FLAG
131 ,DEFAULT_FLAG
132 ,seeded_person_type_key
133 ,SYSTEM_PERSON_TYPE
134 ,USER_PERSON_TYPE
135 ,LAST_UPDATE_DATE
136 ,LAST_UPDATED_BY
137 ,LAST_UPDATE_LOGIN
138 ,CREATED_BY
139 ,CREATION_DATE
140 )select
141 PER_PERSON_TYPES_S.nextval
142 ,business_group_id
143 ,'Y'
144 ,x_default_flag
145 ,x_seeded_person_type_key
146 ,x_system_person_type
147 ,x_user_person_Type
148 ,sysdate
149 ,1
150 ,1
151 ,1
152 ,sysdate
153 from per_business_groups bg
154 where not exists(
155 select null
156 from per_person_types
157 where user_person_type = x_user_person_Type
158 and system_person_type = x_system_person_type
159 and business_group_id = bg.business_group_id);
160
161 insert into PER_PERSON_TYPES_TL (
162 PERSON_TYPE_ID
163 ,LANGUAGE
164 ,SOURCE_LANG
165 ,USER_PERSON_TYPE
166 ,LAST_UPDATE_DATE
167 ,LAST_UPDATED_BY
168 ,LAST_UPDATE_LOGIN
169 ,CREATED_BY
170 ,CREATION_DATE
171 )select
172 ppt.person_type_id
173 ,l.language_code
174 ,userenv('lang')
175 ,x_user_person_Type
176 ,sysdate
177 ,1
178 ,1
179 ,1
180 ,sysdate
181 from per_person_types ppt, fnd_languages l
182 where L.INSTALLED_FLAG in ('I', 'B')
183 and x_seeded_person_type_key = ppt.seeded_person_type_key
184 and x_system_person_type = ppt.system_person_type
185 and x_user_person_type = ppt.user_person_type
186 and not exists (
187 select null
188 from per_person_types_tl
189 where person_type_id = ppt.person_type_id
190 and language = l.language_code);
191
192 insert into PER_STARTUP_PERSON_TYPES_TL (
193 seeded_person_type_key,
194 USER_PERSON_TYPE,
195 LAST_UPDATE_DATE,
196 LAST_UPDATED_BY,
197 LAST_UPDATE_LOGIN,
198 CREATED_BY,
199 CREATION_DATE,
200 CURRENT_EMP_OR_APL_FLAG,
201 CURRENT_EMPLOYEE_FLAG,
202 DEFAULT_FLAG,
203 SYSTEM_PERSON_TYPE,
204 CURRENT_APPLICANT_FLAG,
205 LANGUAGE,
206 SOURCE_LANG
207 ) select
208 x_seeded_person_type_key,
209 X_USER_PERSON_TYPE,
210 SYSDATE,
211 X_LAST_UPDATED_BY,
212 X_LAST_UPDATE_LOGIN,
213 X_CREATED_BY,
214 X_CREATION_DATE,
215 X_CURRENT_EMP_OR_APL_FLAG,
216 X_CURRENT_EMPLOYEE_FLAG,
217 X_DEFAULT_FLAG,
218 X_SYSTEM_PERSON_TYPE,
219 X_CURRENT_APPLICANT_FLAG,
220 L.LANGUAGE_CODE,
221 userenv('LANG')
222 from FND_LANGUAGES L
223 where L.INSTALLED_FLAG in ('I', 'B')
224 and not exists (
225 select null
226 from per_startup_person_types_tl
227 where seeded_person_type_key = X_SEEDED_PERSON_TYPE_KEY
228 and language= l.language_code);
229
230 hr_general.g_data_migrator_mode :='N';
231 end INSERT_ROW;
232
233
234 procedure UPDATE_ROW (
235 X_FORCE_MODE in varchar2,
236 X_SEEDED_PERSON_TYPE_KEY in VARCHAR2,
237 X_DEFAULT_FLAG in VARCHAR2,
238 X_SYSTEM_PERSON_TYPE in VARCHAR2,
239 X_CURRENT_APPLICANT_FLAG in VARCHAR2,
240 X_CURRENT_EMP_OR_APL_FLAG in VARCHAR2,
241 X_CURRENT_EMPLOYEE_FLAG in VARCHAR2,
242 X_USER_PERSON_TYPE in VARCHAR2,
243 X_LAST_UPDATE_DATE in DATE,
244 X_LAST_UPDATED_BY in NUMBER,
245 X_LAST_UPDATE_LOGIN in NUMBER
246 ) is
247 l_count number;
248 cursor c_ppt is
249 select person_type_id from per_person_types
250 where SEEDED_PERSON_TYPE_KEY = X_SEEDED_PERSON_TYPE_KEY
251 and LAST_UPDATED_BY = 1;
252
253 begin
254 hr_general.g_data_migrator_mode :='Y';
255
256 -- The following update statement always updates the startup person types
257 -- Since these rows are seeded rows the who columns are always set accordingly
258
259 update PER_STARTUP_PERSON_TYPES_TL set
260 USER_PERSON_TYPE = X_USER_PERSON_TYPE,
261 CURRENT_APPLICANT_FLAG = X_CURRENT_APPLICANT_FLAG,
262 CURRENT_EMP_OR_APL_FLAG = X_CURRENT_EMP_OR_APL_FLAG,
263 CURRENT_EMPLOYEE_FLAG = X_CURRENT_EMPLOYEE_FLAG,
264 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
265 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
266 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
267 where SEEDED_PERSON_TYPE_KEY = X_SEEDED_PERSON_TYPE_KEY
268 and userenv('lang') in (LANGUAGE, SOURCE_LANG);
269
270 select count(*) into l_count from per_startup_person_types_tl where
271 SEEDED_PERSON_TYPE_KEY = X_SEEDED_PERSON_TYPE_KEY
272 and language = userenv('lang');
273
274 if l_count =0 then
275 raise no_data_found;
276 end if;
277
278 for C_row in c_ppt loop
279 update PER_PERSON_TYPES set
280 USER_PERSON_TYPE = X_USER_PERSON_TYPE,
281 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
282 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
283 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
284 where person_type_id = c_row.person_type_id
285 and last_updated_by = 1;
286
287 update per_person_types_tl set
288 USER_PERSON_TYPE = X_USER_PERSON_TYPE,
289 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
290 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
291 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
292 SOURCE_LANG = userenv('LANG')
293 where person_type_id = c_row.person_type_id
294 and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
295 and last_updated_by = 1;
296
297 end loop;
298 hr_general.g_data_migrator_mode :='N';
299 end UPDATE_ROW;
300
301 procedure DELETE_ROW (
302 X_SEEDED_PERSON_TYPE_KEY in VARCHAR2
303 ) is
304 begin
305 delete from PER_STARTUP_PERSON_TYPES_TL
306 where SEEDED_PERSON_TYPE_KEY = X_SEEDED_PERSON_TYPE_KEY;
307
308 if (sql%notfound) then
309 raise no_data_found;
310 end if;
311
312 end DELETE_ROW;
313
314 procedure LOAD_ROW (
315 x_Upload_mode in varchar2,
316 X_SEEDED_PERSON_TYPE_KEY in varchar2,
317 X_DEFAULT_FLAG in VARCHAR2,
318 X_SYSTEM_PERSON_TYPE in VARCHAR2,
319 X_CURRENT_APPLICANT_FLAG in VARCHAR2,
320 X_CURRENT_EMP_OR_APL_FLAG in VARCHAR2,
321 X_CURRENT_EMPLOYEE_FLAG in VARCHAR2,
322 x_last_update_date in varchar2,
323 X_USER_PERSON_TYPE in VARCHAR2
324 ) is
325 l_last_update_date date;
326 X_ROwID ROWID;
327 X_CREATION_DATE DATE;
328 X_CREATED_BY NUMBER;
329 X_LAST_UPDATED_BY NUMBER;
330 X_LAST_UPDATE_LOGIN NUMBER;
331 l_count number;
332 l_force varchar2(1);
333 begin
334 x_last_updated_by := 1;
335 x_last_update_login :=1;
336 x_created_by :=1;
337 x_creation_date := sysdate;
338 l_last_update_date := to_date(x_last_update_date,'DD/MM/YYYY');
339 if g_firstrun = 'Y' then
340 g_firstrun := 'N';
341 select count(*) into l_count
342 from per_startup_person_types_tl
343 where seeded_person_type_key = 'UNKNOWN';
344 if l_count <> 0 then
345 delete from per_startup_person_types_tl;
346 data_upgrade;
347 end if;
348 end if;
349 if x_upload_mode = 'FORCE' then
350 l_force :='Y';
351 else
352 l_force := 'N';
353 end if;
354 begin
355 -- The call to validate_upload has been removed so that the update row always
356 -- gets called. This call will correctly update/insert rows in startup_person
357 -- types though they have been modified by the user.
358
359 UPDATE_ROW (
360 l_force,
361 X_SEEDED_PERSON_TYPE_KEY,
362 X_DEFAULT_FLAG,
363 X_SYSTEM_PERSON_TYPE,
364 X_CURRENT_APPLICANT_FLAG,
365 X_CURRENT_EMP_OR_APL_FLAG,
366 X_CURRENT_EMPLOYEE_FLAG,
367 X_USER_PERSON_TYPE,
368 l_LAST_UPDATE_DATE,
369 X_LAST_UPDATED_BY,
370 X_LAST_UPDATE_LOGIN
371 );
372 exception
373 when no_data_found then
374 INSERT_ROW (
375 X_ROWID,
376 X_SEEDED_PERSON_TYPE_KEY,
377 X_DEFAULT_FLAG,
378 X_SYSTEM_PERSON_TYPE,
379 X_CURRENT_APPLICANT_FLAG,
380 X_CURRENT_EMP_OR_APL_FLAG,
381 X_CURRENT_EMPLOYEE_FLAG,
382 X_USER_PERSON_TYPE,
383 X_CREATION_DATE,
384 X_CREATED_BY,
385 l_LAST_UPDATE_DATE,
386 X_LAST_UPDATED_BY,
390 end LOAD_ROW;
387 X_LAST_UPDATE_LOGIN
388 );
389 end;
391
392 procedure TRANSLATE_ROW (
393 X_SEEDED_PERSON_TYPE_KEY in varchar2,
394 X_USER_PERSON_TYPE in VARCHAR2,
395 x_last_update_date in varchar2)
396 is
397 cursor c_ppt is
398 select person_type_id from per_person_types
399 where SEEDED_PERSON_TYPE_KEY = X_SEEDED_PERSON_TYPE_KEY
400 and LAST_UPDATED_BY = 1;
401 begin
402 hr_general.g_data_migrator_mode :='Y';
403 -- The following update statement always updates the startup person types
404 -- Since these rows are seeded rows the who columns are always set accordingly
405
406 update PER_STARTUP_PERSON_TYPES_TL set
407 USER_PERSON_TYPE = X_USER_PERSON_TYPE,
408 LAST_UPDATE_DATE = sysdate,
409 LAST_UPDATED_BY = 1,
410 LAST_UPDATE_LOGIN = 1,
411 SOURCE_LANG = userenv('LANG')
412 where userenv('LANG') in (LANGUAGE,SOURCE_LANG)
413 and X_SEEDED_PERSON_TYPE_KEY = SEEDED_PERSON_TYPE_KEY;
414
415 for c_row in c_ppt loop
416
417 update PER_PERSON_TYPES_TL set
418 USER_PERSON_TYPE = X_USER_PERSON_TYPE,
419 LAST_UPDATE_DATE = sysdate,
420 LAST_UPDATED_BY = 1,
421 LAST_UPDATE_LOGIN = 1,
422 SOURCE_LANG = userenv('LANG')
423 where userenv('LANG') in (LANGUAGE,SOURCE_LANG)
424 and person_type_id = c_row.person_type_id
425 and last_updated_by = 1;
426
427 end loop;
428 hr_general.g_data_migrator_mode :='N';
429 end TRANSLATE_ROW;
430
431 function validate_upload (
432 p_Upload_mode in varchar2,
433 p_Table_name in varchar2,
434 p_new_row_updated_by in varchar2,
435 p_new_row_update_date in date,
436 p_Table_key_name in varchar2,
437 p_table_key_value in varchar2)
438 return boolean
439 is
440 l_last_updated_by varchar2(30);
441 l_last_update_date date;
442 l_select_stmt varchar2(1000);
443 begin
444 l_select_stmt := '
445 select last_updated_by, last_update_date
446 from ' ||p_table_name||'
447 where '||p_table_key_name||' = '''||p_table_key_value||'''
448 ';
449 execute immediate l_select_stmt INTO l_last_updated_by, l_last_update_date;
450 IF ((p_upload_mode = 'FORCE') OR
451 ((l_last_updated_by = 1) AND
452 (p_new_row_updated_by <> 1)) OR
453 ((l_last_updated_by = p_new_row_updated_by) AND
454 (l_last_update_date <= p_new_row_update_date))) then
455 return true;
456 else
457 return false;
458 end if;
459
460 exception
461 when no_data_found then
462 return true;
463 end validate_upload;
464
465 procedure ADD_LANGUAGE
466 is
467 begin
468 hr_general.g_data_migrator_mode :='Y';
469 insert into PER_STARTUP_PERSON_TYPES_TL (
470 SEEDED_PERSON_TYPE_KEY,
471 USER_PERSON_TYPE,
472 LAST_UPDATE_DATE,
473 LAST_UPDATED_BY,
474 LAST_UPDATE_LOGIN,
475 CREATED_BY,
476 CREATION_DATE,
477 CURRENT_EMP_OR_APL_FLAG,
478 CURRENT_EMPLOYEE_FLAG,
479 DEFAULT_FLAG,
480 SYSTEM_PERSON_TYPE,
481 CURRENT_APPLICANT_FLAG,
482 LANGUAGE,
483 SOURCE_LANG
484 ) select
485 B.SEEDED_PERSON_TYPE_KEY,
486 B.USER_PERSON_TYPE,
487 B.LAST_UPDATE_DATE,
488 B.LAST_UPDATED_BY,
489 B.LAST_UPDATE_LOGIN,
490 B.CREATED_BY,
491 B.CREATION_DATE,
492 B.CURRENT_EMP_OR_APL_FLAG,
493 B.CURRENT_EMPLOYEE_FLAG,
494 B.DEFAULT_FLAG,
495 B.SYSTEM_PERSON_TYPE,
496 B.CURRENT_APPLICANT_FLAG,
497 L.LANGUAGE_CODE,
498 B.SOURCE_LANG
499 from PER_STARTUP_PERSON_TYPES_TL B, FND_LANGUAGES L
500 where L.INSTALLED_FLAG in ('B','I')
501 and B.LANGUAGE = userenv('LANG')
502 and not exists
503 (select NULL
504 from PER_STARTUP_PERSON_TYPES_TL T
505 where T.SEEDED_PERSON_TYPE_KEY = B.SEEDED_PERSON_TYPE_KEY
506 and T.LANGUAGE = L.LANGUAGE_CODE);
507 hr_general.g_data_migrator_mode :='N';
508 end ADD_LANGUAGE;
509
510 /* There is no need to add new person types here. This is a one-off
511 Procedure that upgrades the data only once. New system person types
512 will be corrected and added when they are just in the ldt. */
513
514 PROCEDURE data_upgrade
515 is
516 begin
517 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
518 p_seeded_person_type_key => 'EXTERNAL'
519 ,p_user_person_type => 'External'
520 ,p_system_person_type => 'OTHER');
521 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
522 p_seeded_person_type_key => 'CONTACT'
523 ,p_user_person_type => 'Contact'
524 ,p_system_person_type => 'OTHER');
525 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
526 p_seeded_person_type_key => 'EMPLOYEE'
527 ,p_user_person_type => 'Employee'
528 ,p_system_person_type => 'EMP');
529 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
530 p_seeded_person_type_key => 'APPLICANT'
531 ,p_user_person_type => 'Applicant'
532 ,p_system_person_type => 'APL');
533 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
534 p_seeded_person_type_key => 'APL_EX_APL'
535 ,p_user_person_type => 'Applicant and Ex-applicant'
536 ,p_system_person_type => 'APL_EX_APL');
537 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
538 p_seeded_person_type_key => 'BENEFICIARY'
539 ,p_user_person_type => 'Beneficiary'
540 ,p_system_person_type => 'BNF');
541 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
542 p_seeded_person_type_key => 'DEPENDENT'
543 ,p_user_person_type => 'Dependent'
544 ,p_system_person_type => 'DPNT');
545 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
546 p_seeded_person_type_key => 'EMP_APL'
547 ,p_user_person_type => 'Employee and Applicant'
548 ,p_system_person_type => 'EMP_APL');
549 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
550 p_seeded_person_type_key => 'EX_APL'
551 ,p_user_person_type => 'Ex-applicant'
552 ,p_system_person_type => 'EX_APL');
553 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
554 p_seeded_person_type_key => 'EX_EMP'
555 ,p_user_person_type => 'Ex-employee'
556 ,p_system_person_type => 'EX_EMP');
557 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
558 p_seeded_person_type_key => 'EX_EMP_APL'
559 ,p_user_person_type => 'Ex-employee and Applicant'
560 ,p_system_person_type => 'EX_EMP_APL');
561 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
562 p_seeded_person_type_key => 'FRMR_FMLY_MMBR'
563 ,p_user_person_type => 'Former Family Member'
564 ,p_system_person_type => 'FRMR_FMLY_MMBR');
565 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
566 p_seeded_person_type_key => 'FRMR_SPS'
567 ,p_user_person_type => 'Former Spouse'
568 ,p_system_person_type => 'FRMR_SPS');
569 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
570 p_seeded_person_type_key => 'PARTICIPANT'
571 ,p_user_person_type => 'Participant'
572 ,p_system_person_type => 'PRTN');
573 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
574 p_seeded_person_type_key => 'RETIREE'
575 ,p_user_person_type => 'Retiree'
576 ,p_system_person_type => 'RETIREE');
577 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
578 p_seeded_person_type_key => 'SRVNG_FMLY_MMBR'
579 ,p_user_person_type => 'Surviving Family Member'
580 ,p_system_person_type => 'SRVNG_FMLY_MMBR');
581 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
582 p_seeded_person_type_key => 'SRVNG_SPS'
583 ,p_user_person_type => 'Surviving Spouse'
584 ,p_system_person_type => 'SRVNG_SPS');
585 /*PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
586 p_seeded_person_type_key => 'EX_CWK'
587 ,p_user_person_type => 'Ex-Contingent Worker'
588 ,p_system_person_type => 'EX_CWK');*/
589 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
590 p_seeded_person_type_key => 'SRVNG_DP'
591 ,p_user_person_type => 'Surviving Domestic Partner'
592 ,p_system_person_type => 'SRVNG_DP');
593 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
594 p_seeded_person_type_key => 'SRVNG_DPFM'
595 ,p_user_person_type => 'Surviving Domestic Partner Family Member'
596 ,p_system_person_type => 'SRVNG_DPFM');
597 PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
598 p_seeded_person_type_key => 'FRMR_DP'
599 ,p_user_person_type => 'Former Domestic Partner'
600 ,p_system_person_type => 'FRMR_DP');
601 /*PER_STARTUP_PERSON_TYPES_PKG.POPULATE_KEY(
602 p_seeded_person_type_key => 'CWK'
603 ,p_user_person_type => 'Contingent Worker'
604 ,p_system_person_type => 'CWK');*/
605 end;
606 end PER_STARTUP_PERSON_TYPES_PKG;