APPS.PER_PHN_BUS dependencies on HR_UTILITY

Line 21: hr_utility.set_location('Entering:'||l_proc, 10);

17: --
18: l_proc varchar2(72) := g_package||'chk_non_updateable_args';
19: --
20: Begin
21: hr_utility.set_location('Entering:'||l_proc, 10);
22: --
23: -- Only proceed with validation if a row exists for
24: -- the current record in the HR Schema
25: --

Line 30: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');

26: if not per_phn_shd.api_updating
27: (p_phone_id => p_rec.phone_id,
28: p_object_version_number => p_rec.object_version_number)
29: then
30: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.set_message_token('PROCEDURE', l_proc);
32: hr_utility.set_message_token('STEP', '20');
33: end if;
34: hr_utility.set_location(l_proc, 30);

Line 31: hr_utility.set_message_token('PROCEDURE', l_proc);

27: (p_phone_id => p_rec.phone_id,
28: p_object_version_number => p_rec.object_version_number)
29: then
30: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.set_message_token('PROCEDURE', l_proc);
32: hr_utility.set_message_token('STEP', '20');
33: end if;
34: hr_utility.set_location(l_proc, 30);
35: --

Line 32: hr_utility.set_message_token('STEP', '20');

28: p_object_version_number => p_rec.object_version_number)
29: then
30: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.set_message_token('PROCEDURE', l_proc);
32: hr_utility.set_message_token('STEP', '20');
33: end if;
34: hr_utility.set_location(l_proc, 30);
35: --
36: -- start of commenting of the following code, as parent_id and parent_table

Line 34: hr_utility.set_location(l_proc, 30);

30: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.set_message_token('PROCEDURE', l_proc);
32: hr_utility.set_message_token('STEP', '20');
33: end if;
34: hr_utility.set_location(l_proc, 30);
35: --
36: -- start of commenting of the following code, as parent_id and parent_table
37: -- are updteable if null. Present code makes it non updateable hence
38: -- commented

Line 54: hr_utility.set_location(l_proc, 40);

50: );
51: --
52: end if;
53: --
54: hr_utility.set_location(l_proc, 40);
55: if nvl(p_rec.parent_table, hr_api.g_varchar2) <>
56: nvl(per_phn_shd.g_old_rec.parent_table
57: ,hr_api.g_varchar2
58: ) then

Line 71: hr_utility.set_location(' Leaving:'||l_proc, 50);

67: --
68: */
69: -- end of commenting the code
70: --
71: hr_utility.set_location(' Leaving:'||l_proc, 50);
72: end chk_non_updateable_args;
73: --
74: -- ---------------------------------------------------------------------------
75: -- |----------------------------< chk_date_from >----------------------------|

Line 116: hr_utility.set_location('Entering:'||l_proc, 1);

112: l_proc varchar2(72) := g_package||'chk_date_from';
113: l_api_updating boolean;
114: --
115: begin
116: hr_utility.set_location('Entering:'||l_proc, 1);
117: --
118: -- Check mandatory parameters have been set
119: --
120: hr_api.mandatory_arg_error

Line 141: hr_utility.set_location(l_proc, 2);

137: or nvl(per_phn_shd.g_old_rec.date_to,hr_api.g_eot)
138: <> nvl(p_date_to,hr_api.g_eot)))
139: or
140: (NOT l_api_updating) then
141: hr_utility.set_location(l_proc, 2);
142: --
143: -- Check that the date_from value is less than or equal to the date_to
144: -- value for the current record
145: --

Line 147: hr_utility.set_message(801,'PER_7004_ALL_DATE_TO_FROM');

143: -- Check that the date_from value is less than or equal to the date_to
144: -- value for the current record
145: --
146: if p_date_from > nvl(p_date_to,hr_api.g_eot)then
147: hr_utility.set_message(801,'PER_7004_ALL_DATE_TO_FROM');
148: hr_utility.raise_error;
149: end if;
150: end if;
151: --

Line 148: hr_utility.raise_error;

144: -- value for the current record
145: --
146: if p_date_from > nvl(p_date_to,hr_api.g_eot)then
147: hr_utility.set_message(801,'PER_7004_ALL_DATE_TO_FROM');
148: hr_utility.raise_error;
149: end if;
150: end if;
151: --
152: hr_utility.set_location(' Leaving:'||l_proc, 3);

Line 152: hr_utility.set_location(' Leaving:'||l_proc, 3);

148: hr_utility.raise_error;
149: end if;
150: end if;
151: --
152: hr_utility.set_location(' Leaving:'||l_proc, 3);
153: --
154: exception
155: when app_exception.application_exception then
156: if hr_multi_message.exception_add

Line 161: hr_utility.set_location(' Leaving:'||l_proc, 4);

157: (p_associated_column1 => 'PER_PHONES.DATE_FROM'
158: ,p_associated_column2 => 'PER_PHONES.DATE_TO'
159: ) then
160: --
161: hr_utility.set_location(' Leaving:'||l_proc, 4);
162: --
163: raise;
164: end if;
165: --

Line 166: hr_utility.set_location(' Leaving:'||l_proc, 5);

162: --
163: raise;
164: end if;
165: --
166: hr_utility.set_location(' Leaving:'||l_proc, 5);
167: --
168: end chk_date_from;
169: --
170: -- ---------------------------------------------------------------------------

Line 215: hr_utility.set_location('Entering:'|| l_proc, 1);

211: l_proc varchar2(72) := g_package||'chk_phone_type';
212: l_api_updating boolean;
213: --
214: begin
215: hr_utility.set_location('Entering:'|| l_proc, 1);
216: --
217: -- Check mandatory parameters have been set
218: --
219: hr_api.mandatory_arg_error

Line 254: hr_utility.set_location(l_proc, 2);

250: -- and nvl(per_phn_shd.g_old_rec.phone_type, hr_api.g_varchar2) <>
251: -- nvl(p_phone_type, hr_api.g_varchar2))
252: -- or
253: -- (NOT l_api_updating)) then
254: hr_utility.set_location(l_proc, 2);
255: --
256: -- Checks that the value for phone_type is
257: -- valid and exists on hr_lookups within the
258: -- specified date range

Line 267: hr_utility.set_message(801, 'HR_51529_PHN_TYPE_INVALID');

263: ,p_lookup_code => p_phone_type
264: ) then
265: --
266: -- Error: Invalid phone type.
267: hr_utility.set_message(801, 'HR_51529_PHN_TYPE_INVALID');
268: hr_utility.set_message_token(801,'ERRORTEXT',hr_general.decode_lookup('PHONE_TYPE',p_phone_type));
269: hr_utility.raise_error;
270: end if;
271: -- end if;

Line 268: hr_utility.set_message_token(801,'ERRORTEXT',hr_general.decode_lookup('PHONE_TYPE',p_phone_type));

264: ) then
265: --
266: -- Error: Invalid phone type.
267: hr_utility.set_message(801, 'HR_51529_PHN_TYPE_INVALID');
268: hr_utility.set_message_token(801,'ERRORTEXT',hr_general.decode_lookup('PHONE_TYPE',p_phone_type));
269: hr_utility.raise_error;
270: end if;
271: -- end if;
272: --

Line 269: hr_utility.raise_error;

265: --
266: -- Error: Invalid phone type.
267: hr_utility.set_message(801, 'HR_51529_PHN_TYPE_INVALID');
268: hr_utility.set_message_token(801,'ERRORTEXT',hr_general.decode_lookup('PHONE_TYPE',p_phone_type));
269: hr_utility.raise_error;
270: end if;
271: -- end if;
272: --
273: hr_utility.set_location(' Leaving:'|| l_proc, 3);

Line 273: hr_utility.set_location(' Leaving:'|| l_proc, 3);

269: hr_utility.raise_error;
270: end if;
271: -- end if;
272: --
273: hr_utility.set_location(' Leaving:'|| l_proc, 3);
274: exception
275: when app_exception.application_exception then
276: if hr_multi_message.exception_add
277: (p_associated_column1 => 'PER_PHONES.PHONE_TYPE'

Line 280: hr_utility.set_location(' Leaving:'||l_proc, 4);

276: if hr_multi_message.exception_add
277: (p_associated_column1 => 'PER_PHONES.PHONE_TYPE'
278: ) then
279: --
280: hr_utility.set_location(' Leaving:'||l_proc, 4);
281: --
282: raise;
283: end if;
284: --

Line 285: hr_utility.set_location(' Leaving:'||l_proc, 5);

281: --
282: raise;
283: end if;
284: --
285: hr_utility.set_location(' Leaving:'||l_proc, 5);
286: --
287: end chk_phone_type;
288: -- ---------------------------------------------------------------------------
289: -- |-------------------------< chk_phone_type_limits >---------------------|

Line 385: hr_utility.set_location('Entering:'|| l_proc, 1);

381: (phn.party_id = p_party_id and p_parent_id is null) -- 3299844
382: );
383: --
384: begin
385: hr_utility.set_location('Entering:'|| l_proc, 1);
386: if hr_multi_message.no_all_inclusive_error
387: (p_check_column1 => 'PER_PHONES.PHONE_TYPE'
388: ,p_check_column2 => 'PER_PHONES.DATE_FROM'
389: ,p_check_column3 => 'PER_PHONES.PARENT_TABLE'

Line 407: hr_utility.set_location(l_proc, 2);

403: l_api_updating := per_phn_shd.api_updating
404: (p_phone_id => p_phone_id
405: ,p_object_version_number => p_object_version_number);
406: --
407: hr_utility.set_location(l_proc, 2);
408: --
409: if ((l_api_updating
410: and (per_phn_shd.g_old_rec.phone_type <> p_phone_type
411: or per_phn_shd.g_old_rec.date_from <> p_date_from

Line 417: hr_utility.set_location(l_proc, 3);

413: nvl(p_date_to,hr_api.g_eot)))
414: OR
415: (NOT l_api_updating)) then
416: --
417: hr_utility.set_location(l_proc, 3);
418: --
419: -- Checks that there is only one active primary home (H1) phone number
420: --
421: if p_phone_type = 'H1' then

Line 426: hr_utility.set_message(801, 'HR_51530_PHN_TYPE_HOME_LIMIT');

422: open csr_home_phone_limit;
423: fetch csr_home_phone_limit into l_dummy;
424: if csr_home_phone_limit%found then
425: close csr_home_phone_limit;
426: hr_utility.set_message(801, 'HR_51530_PHN_TYPE_HOME_LIMIT');
427: hr_utility.raise_error;
428: end if;
429: close csr_home_phone_limit;
430: end if;

Line 427: hr_utility.raise_error;

423: fetch csr_home_phone_limit into l_dummy;
424: if csr_home_phone_limit%found then
425: close csr_home_phone_limit;
426: hr_utility.set_message(801, 'HR_51530_PHN_TYPE_HOME_LIMIT');
427: hr_utility.raise_error;
428: end if;
429: close csr_home_phone_limit;
430: end if;
431: --

Line 432: hr_utility.set_location(l_proc, 4);

428: end if;
429: close csr_home_phone_limit;
430: end if;
431: --
432: hr_utility.set_location(l_proc, 4);
433: --
434: -- Checks that there is only one active primary work (W1) phone number
435: --
436: if p_phone_type = 'W1' then

Line 441: hr_utility.set_message(801, 'HR_51531_PHN_TYPE_WORK_LIMIT');

437: open csr_work_phone_limit;
438: fetch csr_work_phone_limit into l_dummy;
439: if csr_work_phone_limit%found then
440: close csr_work_phone_limit;
441: hr_utility.set_message(801, 'HR_51531_PHN_TYPE_WORK_LIMIT');
442: hr_utility.raise_error;
443: end if;
444: close csr_work_phone_limit;
445: end if;

Line 442: hr_utility.raise_error;

438: fetch csr_work_phone_limit into l_dummy;
439: if csr_work_phone_limit%found then
440: close csr_work_phone_limit;
441: hr_utility.set_message(801, 'HR_51531_PHN_TYPE_WORK_LIMIT');
442: hr_utility.raise_error;
443: end if;
444: close csr_work_phone_limit;
445: end if;
446: --

Line 451: hr_utility.set_location(' Leaving:'|| l_proc, 5);

447: end if;
448: --
449: end if;
450: --
451: hr_utility.set_location(' Leaving:'|| l_proc, 5);
452: --
453: exception
454: when app_exception.application_exception then
455: if hr_multi_message.exception_add

Line 459: hr_utility.set_location(' Leaving:'||l_proc, 6);

455: if hr_multi_message.exception_add
456: (p_same_associated_columns => 'Y'
457: ) then
458: --
459: hr_utility.set_location(' Leaving:'||l_proc, 6);
460: --
461: raise;
462: end if;
463: --

Line 464: hr_utility.set_location(' Leaving:'||l_proc, 7);

460: --
461: raise;
462: end if;
463: --
464: hr_utility.set_location(' Leaving:'||l_proc, 7);
465: --
466: end chk_phone_type_limits;
467: -- ---------------------------------------------------------------------------
468: -- |----------------------------< chk_parent_table >-------------------------|

Line 505: hr_utility.set_location('Entering:'||l_proc, 1);

501: --
502: l_proc varchar2(72) := g_package||'chk_parent_table';
503: --
504: begin
505: hr_utility.set_location('Entering:'||l_proc, 1);
506: --
507: -- Check mandatory parameters have been set
508: --
509: hr_api.mandatory_arg_error

Line 518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);

514: --
515: -- Check that the parent_table is in the per_people table.
516: -- This is a temporary solution.
517: --
518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);
519: If p_parent_table <> 'PER_ALL_PEOPLE_F' then
520: hr_utility.set_location('Failed parent Table check', 4);
521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;

Line 520: hr_utility.set_location('Failed parent Table check', 4);

516: -- This is a temporary solution.
517: --
518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);
519: If p_parent_table <> 'PER_ALL_PEOPLE_F' then
520: hr_utility.set_location('Failed parent Table check', 4);
521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;
523: end if;
524:

Line 521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');

517: --
518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);
519: If p_parent_table <> 'PER_ALL_PEOPLE_F' then
520: hr_utility.set_location('Failed parent Table check', 4);
521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;
523: end if;
524:
525: hr_utility.set_location(' Leaving:'||l_proc, 5);

Line 522: hr_utility.raise_error;

518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);
519: If p_parent_table <> 'PER_ALL_PEOPLE_F' then
520: hr_utility.set_location('Failed parent Table check', 4);
521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;
523: end if;
524:
525: hr_utility.set_location(' Leaving:'||l_proc, 5);
526: --

Line 525: hr_utility.set_location(' Leaving:'||l_proc, 5);

521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;
523: end if;
524:
525: hr_utility.set_location(' Leaving:'||l_proc, 5);
526: --
527: exception
528: when app_exception.application_exception then
529: if hr_multi_message.exception_add

Line 533: hr_utility.set_location(' Leaving:'||l_proc, 6);

529: if hr_multi_message.exception_add
530: (p_associated_column1 => 'PER_PHONES.PARENT_TABLE'
531: ) then
532: --
533: hr_utility.set_location(' Leaving:'||l_proc, 6);
534: --
535: raise;
536: end if;
537: --

Line 538: hr_utility.set_location(' Leaving:'||l_proc, 7);

534: --
535: raise;
536: end if;
537: --
538: hr_utility.set_location(' Leaving:'||l_proc, 7);
539: --
540: end chk_parent_table;
541: --
542: -- ---------------------------------------------------------------------------

Line 593: hr_utility.set_location('Entering:'||l_proc, 1);

589: where per.person_id = p_parent_id
590: and rownum <2; -- performance bug fix 3387297
591: --
592: begin
593: hr_utility.set_location('Entering:'||l_proc, 1);
594: --
595: -- Check mandatory parameters have been set
596: --
597: hr_api.mandatory_arg_error

Line 603: hr_utility.set_location(l_proc, 2);

599: ,p_argument => 'parent_id'
600: ,p_argument_value => p_parent_id
601: );
602: --
603: hr_utility.set_location(l_proc, 2);
604: --
605: if hr_multi_message.no_exclusive_error
606: (p_check_column1 => 'PER_PHONES.PARENT_TABLE'
607: ) then

Line 609: hr_utility.set_location(l_proc, 3);

605: if hr_multi_message.no_exclusive_error
606: (p_check_column1 => 'PER_PHONES.PARENT_TABLE'
607: ) then
608: --
609: hr_utility.set_location(l_proc, 3);
610: --
611: -- Only proceed with validation if :
612: -- a) The current g_old_rec is current and
613: -- b) The date_from value has changed

Line 623: hr_utility.set_location(l_proc, 4);

619: if ((l_api_updating and per_phn_shd.g_old_rec.parent_id <> p_parent_id)
620: or
621: (NOT l_api_updating)) then
622: --
623: hr_utility.set_location(l_proc, 4);
624: --
625: -- Check that the parent_id is in the per_people table.
626: -- This is a temporary solution.
627: --

Line 632: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');

628: open csr_valid_parent_id;
629: fetch csr_valid_parent_id into l_dummy;
630: if csr_valid_parent_id %notfound then
631: close csr_valid_parent_id;
632: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
633: hr_utility.raise_error;
634: end if;
635: close csr_valid_parent_id;
636: end if;

Line 633: hr_utility.raise_error;

629: fetch csr_valid_parent_id into l_dummy;
630: if csr_valid_parent_id %notfound then
631: close csr_valid_parent_id;
632: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
633: hr_utility.raise_error;
634: end if;
635: close csr_valid_parent_id;
636: end if;
637: --

Line 638: hr_utility.set_location(l_proc, 10);

634: end if;
635: close csr_valid_parent_id;
636: end if;
637: --
638: hr_utility.set_location(l_proc, 10);
639: --
640: --UPDATE not allowed unless currently null
641: --
642: if (l_api_updating

Line 646: hr_utility.set_location(l_proc, 11);

642: if (l_api_updating
643: and nvl(per_phn_shd.g_old_rec.parent_id,hr_api.g_number) <> hr_api.g_number
644: and per_phn_shd.g_old_rec.parent_id <> p_parent_id
645: ) then
646: hr_utility.set_location(l_proc, 11);
647: hr_utility.set_message(800, 'HR_289949_INV_UPD_PARENT_ID');
648: hr_utility.raise_error;
649: end if;
650: --

Line 647: hr_utility.set_message(800, 'HR_289949_INV_UPD_PARENT_ID');

643: and nvl(per_phn_shd.g_old_rec.parent_id,hr_api.g_number) <> hr_api.g_number
644: and per_phn_shd.g_old_rec.parent_id <> p_parent_id
645: ) then
646: hr_utility.set_location(l_proc, 11);
647: hr_utility.set_message(800, 'HR_289949_INV_UPD_PARENT_ID');
648: hr_utility.raise_error;
649: end if;
650: --
651: hr_utility.set_location(l_proc, 15);

Line 648: hr_utility.raise_error;

644: and per_phn_shd.g_old_rec.parent_id <> p_parent_id
645: ) then
646: hr_utility.set_location(l_proc, 11);
647: hr_utility.set_message(800, 'HR_289949_INV_UPD_PARENT_ID');
648: hr_utility.raise_error;
649: end if;
650: --
651: hr_utility.set_location(l_proc, 15);
652: --

Line 651: hr_utility.set_location(l_proc, 15);

647: hr_utility.set_message(800, 'HR_289949_INV_UPD_PARENT_ID');
648: hr_utility.raise_error;
649: end if;
650: --
651: hr_utility.set_location(l_proc, 15);
652: --
653: if ((nvl(p_parent_id,hr_api.g_number) <> hr_api.g_number)
654: and (nvl(p_parent_table,hr_api.g_varchar2) = hr_api.g_varchar2)) then
655: hr_utility.set_location(l_proc, 16);

Line 655: hr_utility.set_location(l_proc, 16);

651: hr_utility.set_location(l_proc, 15);
652: --
653: if ((nvl(p_parent_id,hr_api.g_number) <> hr_api.g_number)
654: and (nvl(p_parent_table,hr_api.g_varchar2) = hr_api.g_varchar2)) then
655: hr_utility.set_location(l_proc, 16);
656: hr_utility.set_message(800, 'HR_289946_INV_PARENT_TABLE');
657: hr_utility.raise_error;
658: end if;
659: --

Line 656: hr_utility.set_message(800, 'HR_289946_INV_PARENT_TABLE');

652: --
653: if ((nvl(p_parent_id,hr_api.g_number) <> hr_api.g_number)
654: and (nvl(p_parent_table,hr_api.g_varchar2) = hr_api.g_varchar2)) then
655: hr_utility.set_location(l_proc, 16);
656: hr_utility.set_message(800, 'HR_289946_INV_PARENT_TABLE');
657: hr_utility.raise_error;
658: end if;
659: --
660: hr_utility.set_location(l_proc,20);

Line 657: hr_utility.raise_error;

653: if ((nvl(p_parent_id,hr_api.g_number) <> hr_api.g_number)
654: and (nvl(p_parent_table,hr_api.g_varchar2) = hr_api.g_varchar2)) then
655: hr_utility.set_location(l_proc, 16);
656: hr_utility.set_message(800, 'HR_289946_INV_PARENT_TABLE');
657: hr_utility.raise_error;
658: end if;
659: --
660: hr_utility.set_location(l_proc,20);
661: end if;

Line 660: hr_utility.set_location(l_proc,20);

656: hr_utility.set_message(800, 'HR_289946_INV_PARENT_TABLE');
657: hr_utility.raise_error;
658: end if;
659: --
660: hr_utility.set_location(l_proc,20);
661: end if;
662: --
663: hr_utility.set_location(' Leaving:'||l_proc, 25);
664: --

Line 663: hr_utility.set_location(' Leaving:'||l_proc, 25);

659: --
660: hr_utility.set_location(l_proc,20);
661: end if;
662: --
663: hr_utility.set_location(' Leaving:'||l_proc, 25);
664: --
665: exception
666: when app_exception.application_exception then
667: if hr_multi_message.exception_add

Line 671: hr_utility.set_location(' Leaving:'||l_proc, 6);

667: if hr_multi_message.exception_add
668: (p_associated_column1 => 'PER_PHONES.PARENT_ID'
669: ) then
670: --
671: hr_utility.set_location(' Leaving:'||l_proc, 6);
672: --
673: raise;
674: end if;
675: --

Line 676: hr_utility.set_location(' Leaving:'||l_proc, 7);

672: --
673: raise;
674: end if;
675: --
676: hr_utility.set_location(' Leaving:'||l_proc, 7);
677: --
678: end chk_parent_id;
679: --
680: -- ----------------------------------------------------------------------------

Line 735: hr_utility.set_location('Entering:'|| l_proc, 10);

731: from hz_parties hzp
732: where hzp.party_id = p_rec.party_id;
733: --
734: begin
735: hr_utility.set_location('Entering:'|| l_proc, 10);
736: --
737: --
738: if p_rec.parent_id is not null then
739: if hr_multi_message.no_exclusive_error

Line 747: hr_utility.set_location(l_proc,20);

743: open csr_get_party_id;
744: fetch csr_get_party_id into l_party_id;
745: close csr_get_party_id;
746: --
747: hr_utility.set_location(l_proc,20);
748: --
749: if p_rec.party_id is not null then
750: --
751: hr_utility.set_location(l_proc,30);

Line 751: hr_utility.set_location(l_proc,30);

747: hr_utility.set_location(l_proc,20);
748: --
749: if p_rec.party_id is not null then
750: --
751: hr_utility.set_location(l_proc,30);
752: --
753: if p_rec.party_id <> nvl(l_party_id,-1) then
754: hr_utility.set_message(800, 'HR_289343_PERSONPARTY_MISMATCH');
755: hr_utility.set_location(l_proc,40);

Line 754: hr_utility.set_message(800, 'HR_289343_PERSONPARTY_MISMATCH');

750: --
751: hr_utility.set_location(l_proc,30);
752: --
753: if p_rec.party_id <> nvl(l_party_id,-1) then
754: hr_utility.set_message(800, 'HR_289343_PERSONPARTY_MISMATCH');
755: hr_utility.set_location(l_proc,40);
756: hr_multi_message.add
757: (p_associated_column1 => 'PER_PHONES.PARENT_ID'
758: ,p_associated_column2 => 'PER_PHONES.PARTY_ID'

Line 755: hr_utility.set_location(l_proc,40);

751: hr_utility.set_location(l_proc,30);
752: --
753: if p_rec.party_id <> nvl(l_party_id,-1) then
754: hr_utility.set_message(800, 'HR_289343_PERSONPARTY_MISMATCH');
755: hr_utility.set_location(l_proc,40);
756: hr_multi_message.add
757: (p_associated_column1 => 'PER_PHONES.PARENT_ID'
758: ,p_associated_column2 => 'PER_PHONES.PARTY_ID'
759: );

Line 765: hr_utility.set_location(l_proc,50);

761: else
762: --
763: -- derive party_id from per_all_people_f using parent_id
764: --
765: hr_utility.set_location(l_proc,50);
766: p_rec.party_id := l_party_id;
767: end if;
768: end if; -- for no_excl_err
769: else

Line 771: hr_utility.set_location(l_proc,60);

767: end if;
768: end if; -- for no_excl_err
769: else
770: --
771: hr_utility.set_location(l_proc,60);
772: --
773: if p_rec.party_id is null then
774: hr_utility.set_message(800, 'HR_289341_CHK_PERSON_OR_PARTY');
775: hr_utility.set_location(l_proc,70);

Line 774: hr_utility.set_message(800, 'HR_289341_CHK_PERSON_OR_PARTY');

770: --
771: hr_utility.set_location(l_proc,60);
772: --
773: if p_rec.party_id is null then
774: hr_utility.set_message(800, 'HR_289341_CHK_PERSON_OR_PARTY');
775: hr_utility.set_location(l_proc,70);
776: hr_multi_message.add
777: (p_associated_column1 => 'PER_PHONES.PARENT_ID'
778: ,p_associated_column2 => 'PER_PHONES.PARTY_ID'

Line 775: hr_utility.set_location(l_proc,70);

771: hr_utility.set_location(l_proc,60);
772: --
773: if p_rec.party_id is null then
774: hr_utility.set_message(800, 'HR_289341_CHK_PERSON_OR_PARTY');
775: hr_utility.set_location(l_proc,70);
776: hr_multi_message.add
777: (p_associated_column1 => 'PER_PHONES.PARENT_ID'
778: ,p_associated_column2 => 'PER_PHONES.PARTY_ID'
779: );

Line 784: hr_utility.set_location(l_proc,80);

780: else
781: open csr_valid_party_id;
782: fetch csr_valid_party_id into l_party_id2;
783: --
784: hr_utility.set_location(l_proc,80);
785: --
786: if csr_valid_party_id%notfound then
787: close csr_valid_party_id;
788: hr_utility.set_message(800, 'PER_289342_PARTY_ID_INVALID');

Line 788: hr_utility.set_message(800, 'PER_289342_PARTY_ID_INVALID');

784: hr_utility.set_location(l_proc,80);
785: --
786: if csr_valid_party_id%notfound then
787: close csr_valid_party_id;
788: hr_utility.set_message(800, 'PER_289342_PARTY_ID_INVALID');
789: hr_utility.set_location(l_proc,90);
790: hr_multi_message.add
791: (p_associated_column1 => 'PER_PHONES.PARTY_ID'
792: );

Line 789: hr_utility.set_location(l_proc,90);

785: --
786: if csr_valid_party_id%notfound then
787: close csr_valid_party_id;
788: hr_utility.set_message(800, 'PER_289342_PARTY_ID_INVALID');
789: hr_utility.set_location(l_proc,90);
790: hr_multi_message.add
791: (p_associated_column1 => 'PER_PHONES.PARTY_ID'
792: );
793: else

Line 799: hr_utility.set_location(' Leaving:'||l_proc,100);

795: end if;
796: end if;
797: end if;
798: --
799: hr_utility.set_location(' Leaving:'||l_proc,100);
800: End chk_party_id;
801:
802: --
803: -- ---------------------------------------------------------------------------

Line 838: hr_utility.set_location('Entering:'||l_proc, 1);

834: --
835: l_proc varchar2(72) := g_package||'chk_object_version_number';
836: --
837: begin
838: hr_utility.set_location('Entering:'||l_proc, 1);
839: --
840: -- Check mandatory parameters have been set
841: --
842: hr_api.mandatory_arg_error

Line 848: hr_utility.set_location(' Leaving:'||l_proc, 3);

844: ,p_argument => 'object_version_number'
845: ,p_argument_value => p_object_version_number
846: );
847: --
848: hr_utility.set_location(' Leaving:'||l_proc, 3);
849: --
850: end chk_object_version_number;
851: --
852: --

Line 888: hr_utility.set_location('Entering:'||l_proc, 10);

884: --
885: l_proc varchar2(72) := g_package||'df_update_validate';
886: --
887: begin
888: hr_utility.set_location('Entering:'||l_proc, 10);
889: --
890: if nvl(per_phn_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
891: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
892: nvl(per_phn_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>

Line 960: hr_utility.set_location(' Leaving:'||l_proc, 10);

956: -- so we must call the flex stub
957: per_phn_flex.df(p_rec => p_rec);
958: end if;
959: --
960: hr_utility.set_location(' Leaving:'||l_proc, 10);
961: end df_update_validate;
962: --
963: -- -----------------------------------------------------------------------
964: -- |------------------------------< chk_df >-----------------------------|

Line 996: hr_utility.set_location('Entering:'||l_proc, 10);

992: --
993: l_proc varchar2(72) := g_package||'chk_df';
994: --
995: begin
996: hr_utility.set_location('Entering:'||l_proc, 10);
997: --
998: if ((p_rec.phone_id is not null) and (
999: nvl(per_phn_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
1000: nvl(p_rec.attribute_category, hr_api.g_varchar2) or

Line 1136: hr_utility.set_location(' Leaving:'||l_proc, 20);

1132: ,p_attribute30_value => p_rec.attribute30
1133: );
1134: end if;
1135: --
1136: hr_utility.set_location(' Leaving:'||l_proc, 20);
1137:
1138: end chk_df;
1139: --
1140: -- ---------------------------------------------------------------------------

Line 1177: hr_utility.set_location('Entering:'||l_proc, 5);

1173: --
1174: l_proc varchar2(72) := g_package||'chk_validity';
1175: --
1176: Begin
1177: hr_utility.set_location('Entering:'||l_proc, 5);
1178: If p_validity is not null
1179: then
1180: hr_utility.set_location(l_proc, 10);
1181: If hr_api.not_exists_in_hr_lookups

Line 1180: hr_utility.set_location(l_proc, 10);

1176: Begin
1177: hr_utility.set_location('Entering:'||l_proc, 5);
1178: If p_validity is not null
1179: then
1180: hr_utility.set_location(l_proc, 10);
1181: If hr_api.not_exists_in_hr_lookups
1182: (p_effective_date => p_effective_date
1183: ,p_lookup_type => 'IRC_CONTACT_TIMES'
1184: ,p_lookup_code => p_validity

Line 1191: hr_utility.set_location(' Leaving:'||l_proc, 20);

1187: fnd_message.set_name('PER','PER_289551_BAD_PHN_VALIDITY');
1188: fnd_message.raise_error;
1189: end if;
1190: end if;
1191: hr_utility.set_location(' Leaving:'||l_proc, 20);
1192: exception
1193: when app_exception.application_exception then
1194: if hr_multi_message.exception_add
1195: (p_associated_column1 => 'PER_PHONES.VALIDITY'

Line 1198: hr_utility.set_location(' Leaving:'||l_proc, 30);

1194: if hr_multi_message.exception_add
1195: (p_associated_column1 => 'PER_PHONES.VALIDITY'
1196: ) then
1197: --
1198: hr_utility.set_location(' Leaving:'||l_proc, 30);
1199: --
1200: raise;
1201: end if;
1202: --

Line 1203: hr_utility.set_location(' Leaving:'||l_proc, 40);

1199: --
1200: raise;
1201: end if;
1202: --
1203: hr_utility.set_location(' Leaving:'||l_proc, 40);
1204: --
1205: End chk_validity;
1206: --
1207: -- ----------------------------------------------------------------------------

Line 1217: hr_utility.set_location('Entering:'||l_proc, 5);

1213: --
1214: l_proc varchar2(72) := g_package||'insert_validate';
1215: --
1216: Begin
1217: hr_utility.set_location('Entering:'||l_proc, 5);
1218: --
1219: --
1220: if p_rec.parent_table = 'PER_ALL_PEOPLE_F' then
1221: per_per_bus.set_security_group_id

Line 1236: hr_utility.set_location(l_proc, 7);

1232: hr_multi_message.end_validation_set;
1233: --
1234: -- Validate Dependent Attributes
1235: --
1236: hr_utility.set_location(l_proc, 7);
1237: --
1238: -- Validiate dates
1239: --
1240: chk_date_from

Line 1332: hr_utility.set_location(' Leaving:'||l_proc, 10);

1328: --
1329: per_phn_bus.chk_df(p_rec => p_rec);
1330: --
1331: --
1332: hr_utility.set_location(' Leaving:'||l_proc, 10);
1333: End insert_validate;
1334: --
1335: -- ----------------------------------------------------------------------------
1336: -- |---------------------------< update_validate >----------------------------|

Line 1345: hr_utility.set_location('Entering:'||l_proc, 5);

1341: --
1342: l_proc varchar2(72) := g_package||'update_validate';
1343: --
1344: Begin
1345: hr_utility.set_location('Entering:'||l_proc, 5);
1346: --
1347: if p_rec.parent_table = 'PER_ALL_PEOPLE_F' then
1348: per_per_bus.set_security_group_id
1349: (

Line 1361: hr_utility.set_location(l_proc, 7);

1357: -- one error has been found then abort further validation.
1358: --
1359: hr_multi_message.end_validation_set;
1360: --
1361: hr_utility.set_location(l_proc, 7);
1362: --
1363: -- Check whether called has tried to update non-updateable values.
1364: --
1365: chk_non_updateable_args (p_rec => p_rec);

Line 1458: hr_utility.set_location(' Leaving:'||l_proc, 10);

1454: --
1455: per_phn_bus.chk_df(p_rec => p_rec);
1456: --
1457: --
1458: hr_utility.set_location(' Leaving:'||l_proc, 10);
1459: End update_validate;
1460: --
1461: -- ----------------------------------------------------------------------------
1462: -- |---------------------------< delete_validate >----------------------------|

Line 1469: hr_utility.set_location('Entering:'||l_proc, 5);

1465: --
1466: l_proc varchar2(72) := g_package||'delete_validate';
1467: --
1468: Begin
1469: hr_utility.set_location('Entering:'||l_proc, 5);
1470: --
1471: -- Call all supporting business operations
1472: --
1473: -- Validate Object Version Number

Line 1478: hr_utility.set_location(' Leaving:'||l_proc, 10);

1474: --
1475: chk_object_version_number
1476: (p_object_version_number => p_rec.object_version_number);
1477: --
1478: hr_utility.set_location(' Leaving:'||l_proc, 10);
1479: End delete_validate;
1480: --
1481: -- ---------------------------------------------------------------------------
1482: -- |---------------------< return_legislation_code >-------------------------|

Line 1505: hr_utility.set_location('Entering:'|| l_proc, 10);

1501: --
1502: l_legislation_code varchar2(150);
1503: l_proc varchar2(72) := 'return_legislation_code';
1504: begin
1505: hr_utility.set_location('Entering:'|| l_proc, 10);
1506: --
1507: -- Ensure that all the mandatory parameter are not null
1508: --
1509: hr_api.mandatory_arg_error(p_api_name => l_proc,

Line 1520: hr_utility.set_location(l_proc, 20);

1516: -- call to this function. Just return the value in the global
1517: -- variable.
1518: --
1519: l_legislation_code := g_legislation_code;
1520: hr_utility.set_location(l_proc, 20);
1521: else
1522: --
1523: -- The ID is different to the last call to this function
1524: -- or this is the first call to this function.

Line 1533: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');

1529: --
1530: -- The primary key is invalid therefore we must error
1531: --
1532: close csr_leg_code;
1533: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1534: hr_utility.raise_error;
1535: end if;
1536: hr_utility.set_location(l_proc, 30);
1537: --

Line 1534: hr_utility.raise_error;

1530: -- The primary key is invalid therefore we must error
1531: --
1532: close csr_leg_code;
1533: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1534: hr_utility.raise_error;
1535: end if;
1536: hr_utility.set_location(l_proc, 30);
1537: --
1538: -- Set the global variables so the values are

Line 1536: hr_utility.set_location(l_proc, 30);

1532: close csr_leg_code;
1533: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1534: hr_utility.raise_error;
1535: end if;
1536: hr_utility.set_location(l_proc, 30);
1537: --
1538: -- Set the global variables so the values are
1539: -- available for the next call to this function
1540: --

Line 1545: hr_utility.set_location(' Leaving:'|| l_proc, 40);

1541: close csr_leg_code;
1542: g_phone_id := p_phone_id;
1543: g_legislation_code := l_legislation_code;
1544: end if;
1545: hr_utility.set_location(' Leaving:'|| l_proc, 40);
1546: --
1547: return l_legislation_code;
1548: end return_legislation_code;
1549: --

Line 1563: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');

1559: if p_parent_table = 'PER_ALL_PEOPLE_F'
1560: then
1561: return per_per_bus.return_legislation_code(p_person_id => p_parent_id);
1562: else
1563: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
1564: hr_utility.raise_error;
1565: end if;
1566:
1567: end return_legislation_parent;

Line 1564: hr_utility.raise_error;

1560: then
1561: return per_per_bus.return_legislation_code(p_person_id => p_parent_id);
1562: else
1563: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
1564: hr_utility.raise_error;
1565: end if;
1566:
1567: end return_legislation_parent;
1568: