20: BEGIN
21: --
22: -- Added for GSI Bug 5472781
23: --
24: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
25: --
26: l_type := NULL;
27: OPEN c_type;
28: FETCH c_type INTO l_type;
50: /*Added an additional check fnd_profile.value('PER_NATIONAL_IDENTIFIER_VALIDATION')IN ('ERROR','WARN')*/
51: IF l_field IS NOT NULL AND fnd_profile.value('PER_NATIONAL_IDENTIFIER_VALIDATION')IN ('ERROR','WARN') THEN
52: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
53: fnd_message.set_token('NAME',l_field, translate => true );
54: hr_utility.raise_error;
55: END IF;
56: --
57: END IF;
58: --
67: BEGIN
68: --
69: -- Added for GSI Bug 5472781
70: --
71: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
72: --
73: validate
74: (p_person_type_id => p_person_type_id
75: ,p_first_name => p_first_name
112: BEGIN
113: --
114: -- Added for GSI Bug 5472781
115: --
116: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
117: --
118: per_per_bus.chk_person_type
119: (p_person_type_id => l_person_type_id
120: ,p_business_group_id => p_business_group_id
140: BEGIN
141: --
142: -- Added for GSI Bug 5472781
143: --
144: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
145: --
146: per_per_bus.chk_person_type
147: (p_person_type_id => l_person_type_id
148: ,p_business_group_id => p_business_group_id
203: BEGIN
204: --
205: -- Added for GSI Bug 5472781
206: --
207: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
208: --
209: open getbgid;
210: fetch getbgid into l_business_group_id;
211: close getbgid;
317: BEGIN
318: --
319: -- Added for GSI Bug 5472781
320: --
321: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
322: --
323: open getorgid;
324: fetch getorgid into l_organization_id;
325: close getorgid;
400: BEGIN
401: --
402: -- Added for GSI Bug 5472781
403: --
404: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
405: --
406: IF p_assignment_status_type_id = 3 THEN
407: IF p_segment6 IS NULL THEN
408: l_field := hr_general.decode_lookup('DK_FORM_LABELS','TR');
407: IF p_segment6 IS NULL THEN
408: l_field := hr_general.decode_lookup('DK_FORM_LABELS','TR');
409: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
410: fnd_message.set_token('NAME',l_field, translate => true );
411: hr_utility.raise_error;
412: END IF;
413:
414: IF p_segment7 IS NULL THEN
415: l_field := hr_general.decode_lookup('DK_FORM_LABELS','ND');
414: IF p_segment7 IS NULL THEN
415: l_field := hr_general.decode_lookup('DK_FORM_LABELS','ND');
416: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
417: fnd_message.set_token('NAME',l_field, translate => true );
418: hr_utility.raise_error;
419: END IF;
420:
421: IF p_segment8 IS NULL THEN
422: l_field := hr_general.decode_lookup('DK_FORM_LABELS','TD');
421: IF p_segment8 IS NULL THEN
422: l_field := hr_general.decode_lookup('DK_FORM_LABELS','TD');
423: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
424: fnd_message.set_token('NAME',l_field, translate => true );
425: hr_utility.raise_error;
426: END IF;
427: IF p_segment9 IS NULL THEN
428: l_field := hr_general.decode_lookup('DK_FORM_LABELS','AD');
429: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
427: IF p_segment9 IS NULL THEN
428: l_field := hr_general.decode_lookup('DK_FORM_LABELS','AD');
429: fnd_message.set_name('PER', 'HR_377002_DK_MANDATORY_MSG');
430: fnd_message.set_token('NAME',l_field, translate => true );
431: hr_utility.raise_error;
432: END IF;
433:
434: ELSE
435: -- GSI Bug 4585094
434: ELSE
435: -- GSI Bug 4585094
436: IF p_segment6 <> hr_api.g_varchar2 THEN
437: fnd_message.set_name('PER', 'HR_377009_DK_TR_INVALID');
438: hr_utility.raise_error;
439: END IF;
440: -- GSI Bug 4585094
441: IF p_segment7 <> hr_api.g_varchar2 THEN
442: fnd_message.set_name('PER', 'HR_377010_DK_ND_INVALID');
439: END IF;
440: -- GSI Bug 4585094
441: IF p_segment7 <> hr_api.g_varchar2 THEN
442: fnd_message.set_name('PER', 'HR_377010_DK_ND_INVALID');
443: hr_utility.raise_error;
444: END IF;
445: -- GSI Bug 4585094
446: IF p_segment8 <> hr_api.g_varchar2 THEN
447: fnd_message.set_name('PER', 'HR_377011_DK_TD_INVALID');
444: END IF;
445: -- GSI Bug 4585094
446: IF p_segment8 <> hr_api.g_varchar2 THEN
447: fnd_message.set_name('PER', 'HR_377011_DK_TD_INVALID');
448: hr_utility.raise_error;
449: END IF;
450:
451: END IF;
452:
463: if p_segment7 <> hr_api.g_varchar2 -- GSI Bug 4585094
464: and l_asg_start_date is not NULL then
465: if fnd_date.canonical_to_date(p_segment7) < fnd_date.canonical_to_date(l_asg_start_date) then
466: fnd_message.set_name('PER', 'HR_377006_DK_NOTIFIED_DATE');
467: hr_utility.raise_error;
468: end if;
469: end if;
470: -- Validation rule : Termination date >= notified date --
471: if p_segment8 <> hr_api.g_varchar2 -- GSI Bug 4585094
471: if p_segment8 <> hr_api.g_varchar2 -- GSI Bug 4585094
472: and p_segment7 <> hr_api.g_varchar2 then
473: if fnd_date.canonical_to_date(p_segment8) < fnd_date.canonical_to_date(p_segment7) then
474: fnd_message.set_name('PER', 'HR_377007_DK_TERM_DATE_ERR');
475: hr_utility.raise_error;
476: end if;
477: end if;
478: -- Validation rule : Adjusted seniority date < notified date --
479: if p_segment9 <> hr_api.g_varchar2 -- GSI Bug 4585094
479: if p_segment9 <> hr_api.g_varchar2 -- GSI Bug 4585094
480: and p_segment7 <> hr_api.g_varchar2 then
481: if fnd_date.canonical_to_date(p_segment9) >= fnd_date.canonical_to_date(p_segment7) then
482: fnd_message.set_name('PER', 'HR_377008_DK_ASD_ERR');
483: hr_utility.raise_error;
484: end if;
485: end if;
486:
487: END IF;
533: BEGIN
534: --
535: -- Added for GSI Bug 5472781
536: --
537: IF hr_utility.chk_product_install('Oracle Human Resources', 'DK') THEN
538: --
539: IF p_org_information1 = 'DK_PENSION_PROVIDER' THEN
540:
541: open orgtype;