DBA Data[Home] [Help]

APPS.PER_PDM_BUS dependencies on HR_UTILITY

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

20: l_error exception;
21: l_argument varchar2(30);
22: --
23: Begin
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: -- Only proceed with validation if a row exists for
27: -- the current record in the HR Schema
28: --

Line 33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

29: if not per_pdm_shd.api_updating
30: (p_delivery_method_id => p_rec.delivery_method_id
31: ,p_object_version_number => p_rec.object_version_number
32: ) then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP', '20');
36: end if;
37: hr_utility.set_location(l_proc, 30);

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

30: (p_delivery_method_id => p_rec.delivery_method_id
31: ,p_object_version_number => p_rec.object_version_number
32: ) then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP', '20');
36: end if;
37: hr_utility.set_location(l_proc, 30);
38: --

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

31: ,p_object_version_number => p_rec.object_version_number
32: ) then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP', '20');
36: end if;
37: hr_utility.set_location(l_proc, 30);
38: --
39: if p_rec.person_id <> per_pdm_shd.g_old_rec.person_id then

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

33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP', '20');
36: end if;
37: hr_utility.set_location(l_proc, 30);
38: --
39: if p_rec.person_id <> per_pdm_shd.g_old_rec.person_id then
40: l_argument := 'person_id';
41: raise l_error;

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

39: if p_rec.person_id <> per_pdm_shd.g_old_rec.person_id then
40: l_argument := 'person_id';
41: raise l_error;
42: end if;
43: hr_utility.set_location(l_proc, 50);
44: --
45: exception
46: when l_error then
47: hr_api.argument_changed_error

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

49: ,p_argument => l_argument
50: );
51: when others then
52: raise;
53: hr_utility.set_location(' Leaving:'||l_proc, 100);
54: end chk_non_updateable_args;
55: --
56: -- -----------------------------------------------------------------
57: -- |-----------------------< chk_person_id >-------------------------|

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

94: and ((effective_start_date <= p_effective_date and
95: effective_end_date >= p_effective_date));
96: --
97: begin
98: hr_utility.set_location('Entering: '||l_proc,5);
99: --
100: --------------------------------
101: -- Check person id not null --
102: --------------------------------

Line 104: hr_utility.set_message(801,'HR_52460_PDM_NULL_PERSON_ID');

100: --------------------------------
101: -- Check person id not null --
102: --------------------------------
103: if p_person_id is null then
104: hr_utility.set_message(801,'HR_52460_PDM_NULL_PERSON_ID');
105: hr_utility.raise_error;
106: end if;
107:
108: --------------------------------

Line 105: hr_utility.raise_error;

101: -- Check person id not null --
102: --------------------------------
103: if p_person_id is null then
104: hr_utility.set_message(801,'HR_52460_PDM_NULL_PERSON_ID');
105: hr_utility.raise_error;
106: end if;
107:
108: --------------------------------
109: -- Check person id is valid --

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

115: per_pdm_shd.constraint_error('PER_PERSON_DLVRY_METHODS_FK1');
116: end if;
117: close csr_valid_person_id;
118:
119: hr_utility.set_location('Leaving: '||l_proc,10);
120: end chk_person_id;
121: --
122: -- ----------------------------------------------------------------------------
123: -- |--------------------------< chk_comm_dlvry_method >------------------------|

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

167: and person_id = p_person_id;
168: --
169: Begin
170: --
171: hr_utility.set_location('Entering:'||l_proc, 5);
172: --
173: --------------------------------------
174: -- Check comm_dlvry_method not null --
175: --------------------------------------

Line 178: hr_utility.set_message(801,'HR_52461_PDM_NULL_COMM_ID');

174: -- Check comm_dlvry_method not null --
175: --------------------------------------
176: --
177: if p_comm_dlvry_method is null then
178: hr_utility.set_message(801,'HR_52461_PDM_NULL_COMM_ID');
179: hr_utility.raise_error;
180: end if;
181: --
182: -----------------------------------

Line 179: hr_utility.raise_error;

175: --------------------------------------
176: --
177: if p_comm_dlvry_method is null then
178: hr_utility.set_message(801,'HR_52461_PDM_NULL_COMM_ID');
179: hr_utility.raise_error;
180: end if;
181: --
182: -----------------------------------
183: -- Check that person id is not null

Line 206: hr_utility.set_message(801,'HR_52391_PDM_INV_DLVRY_METHOD');

202: p_effective_date => p_effective_date) then
203: --
204: -- raise error as does not exist as lookup
205: --
206: hr_utility.set_message(801,'HR_52391_PDM_INV_DLVRY_METHOD');
207: hr_utility.raise_error;
208: --
209: end if;
210: --

Line 207: hr_utility.raise_error;

203: --
204: -- raise error as does not exist as lookup
205: --
206: hr_utility.set_message(801,'HR_52391_PDM_INV_DLVRY_METHOD');
207: hr_utility.raise_error;
208: --
209: end if;
210: --
211: ----------------------------------------

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

222: --
223: --
224: end if;
225: --
226: hr_utility.set_location('Leaving:'||l_proc,10);
227: --
228: end chk_comm_dlvry_method;
229: --
230: -- ---------------------------------------------------------------------------

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

267: --
268: l_proc varchar2(72) := g_package||'chk_date_start';
269: --
270: begin
271: hr_utility.set_location('Entering:'||l_proc, 1);
272: --
273: -- Check mandatory parameters have been set
274: --
275: if p_date_start is null then

Line 276: hr_utility.set_message(801,'HR_52462_PDM_NULL_DATE_START');

272: --
273: -- Check mandatory parameters have been set
274: --
275: if p_date_start is null then
276: hr_utility.set_message(801,'HR_52462_PDM_NULL_DATE_START');
277: hr_utility.raise_error;
278: end if;
279: --
280: -- Only proceed with validation if :

Line 277: hr_utility.raise_error;

273: -- Check mandatory parameters have been set
274: --
275: if p_date_start is null then
276: hr_utility.set_message(801,'HR_52462_PDM_NULL_DATE_START');
277: hr_utility.raise_error;
278: end if;
279: --
280: -- Only proceed with validation if :
281: -- a) The current g_old_rec is current and

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

285: <> nvl(p_date_start,hr_api.g_date)
286: or nvl(per_pdm_shd.g_old_rec.date_end,hr_api.g_date)
287: <> nvl(p_date_end,hr_api.g_date)))
288: then
289: hr_utility.set_location(l_proc, 2);
290: --
291: -- Check that the date_start value is less than or equal to the date_start
292: -- value for the current record
293: --

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

291: -- Check that the date_start value is less than or equal to the date_start
292: -- value for the current record
293: --
294: if p_date_start > nvl(p_date_end,hr_api.g_eot)then
295: hr_utility.set_message(801,'PER_7004_ALL_DATE_TO_FROM');
296: hr_utility.raise_error;
297: end if;
298: end if;
299: --

Line 296: hr_utility.raise_error;

292: -- value for the current record
293: --
294: if p_date_start > nvl(p_date_end,hr_api.g_eot)then
295: hr_utility.set_message(801,'PER_7004_ALL_DATE_TO_FROM');
296: hr_utility.raise_error;
297: end if;
298: end if;
299: --
300: hr_utility.set_location(' Leaving:'||l_proc, 3);

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

296: hr_utility.raise_error;
297: end if;
298: end if;
299: --
300: hr_utility.set_location(' Leaving:'||l_proc, 3);
301: --
302: end chk_date_start_end;
303: --
304: --

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

347: and person_id = p_person_id;
348: --
349: Begin
350: --
351: hr_utility.set_location('Entering:'||l_proc, 5);
352: --
353: if (nvl(p_preferred_flag, hr_api.g_varchar2)
354: <> nvl(per_pdm_shd.g_old_rec.preferred_flag,hr_api.g_varchar2))
355: and p_preferred_flag is not null then

Line 366: hr_utility.set_message(801,'HR_52393_PDM_INV_PREF_FLAG');

362: p_effective_date => p_effective_date) then
363: --
364: -- raise error as does not exist as lookup
365: --
366: hr_utility.set_message(801,'HR_52393_PDM_INV_PREF_FLAG');
367: hr_utility.raise_error;
368: --
369: end if;
370: --

Line 367: hr_utility.raise_error;

363: --
364: -- raise error as does not exist as lookup
365: --
366: hr_utility.set_message(801,'HR_52393_PDM_INV_PREF_FLAG');
367: hr_utility.raise_error;
368: --
369: end if;
370: --
371: -- If Value is being set to 'Y' then check that this is the only

Line 380: hr_utility.set_message(801, 'HR_52394_PDM_DUP_PREF_FLAG');

376: open csr_check_uniqueness;
377: fetch csr_check_uniqueness into l_delivery_method_id;
378: if csr_check_uniqueness%found then
379: close csr_check_uniqueness;
380: hr_utility.set_message(801, 'HR_52394_PDM_DUP_PREF_FLAG');
381: hr_utility.raise_error;
382: end if;
383: close csr_check_uniqueness;
384: --

Line 381: hr_utility.raise_error;

377: fetch csr_check_uniqueness into l_delivery_method_id;
378: if csr_check_uniqueness%found then
379: close csr_check_uniqueness;
380: hr_utility.set_message(801, 'HR_52394_PDM_DUP_PREF_FLAG');
381: hr_utility.raise_error;
382: end if;
383: close csr_check_uniqueness;
384: --
385: end if;

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

385: end if;
386: --
387: end if;
388: --
389: hr_utility.set_location('Leaving:'||l_proc,10);
390: --
391: end chk_preferred_flag;
392: --
393: -- -----------------------------------------------------------------------

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

422: --
423: l_proc varchar2(72) := g_package||'chk_df';
424: --
425: begin
426: hr_utility.set_location('Entering:'||l_proc, 10);
427: --
428: if ((p_rec.delivery_method_id is not null) and (
429: nvl(per_pdm_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
430: nvl(p_rec.attribute_category, hr_api.g_varchar2) or

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

522: ,p_attribute20_value => p_rec.attribute20
523: );
524: end if;
525: --
526: hr_utility.set_location(' Leaving:'||l_proc, 20);
527: end chk_df;
528: --
529: -- ----------------------------------------------------------------------------
530: -- |---------------------------< insert_validate >----------------------------|

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

534: --
535: l_proc varchar2(72) := g_package||'insert_validate';
536: --
537: Begin
538: hr_utility.set_location('Entering:'||l_proc, 5);
539: --
540: -- Call all supporting business operations
541: --
542: chk_person_id

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

568: -- Call descriptive flexfield validation routines
569: --
570: per_pdm_bus.chk_df(p_rec => p_rec);
571: --
572: hr_utility.set_location(' Leaving:'||l_proc, 10);
573: End insert_validate;
574: --
575: -- ----------------------------------------------------------------------------
576: -- |---------------------------< update_validate >----------------------------|

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

580: --
581: l_proc varchar2(72) := g_package||'update_validate';
582: --
583: Begin
584: hr_utility.set_location('Entering:'||l_proc, 5);
585: --
586: -- Call all supporting business operations
587: --
588: chk_non_updateable_args

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

618: --
619: per_pdm_bus.chk_df(p_rec => p_rec);
620: --
621: --
622: hr_utility.set_location(' Leaving:'||l_proc, 10);
623: End update_validate;
624: --
625: -- ----------------------------------------------------------------------------
626: -- |---------------------------< delete_validate >----------------------------|

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

629: --
630: l_proc varchar2(72) := g_package||'delete_validate';
631: --
632: Begin
633: hr_utility.set_location('Entering:'||l_proc, 5);
634: --
635: -- Call all supporting business operations
636: --
637: hr_utility.set_location(' Leaving:'||l_proc, 10);

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

633: hr_utility.set_location('Entering:'||l_proc, 5);
634: --
635: -- Call all supporting business operations
636: --
637: hr_utility.set_location(' Leaving:'||l_proc, 10);
638: End delete_validate;
639: --
640: --
641: -- ---------------------------------------------------------------------------

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

661: --
662: l_legislation_code varchar2(150);
663: l_proc varchar2(72) := 'return_legislation_code';
664: begin
665: hr_utility.set_location('Entering:'|| l_proc, 10);
666: --
667: -- Ensure that all the mandatory parameter are not null
668: --
669: hr_api.mandatory_arg_error(p_api_name => l_proc,

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

676: -- call to this function. Just return the value in the global
677: -- variable.
678: --
679: l_legislation_code := g_legislation_code;
680: hr_utility.set_location(l_proc, 20);
681: else
682: --
683: -- The ID is different to the last call to this function
684: -- or this is the first call to this function.

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

689: --
690: -- The primary key is invalid therefore we must error
691: --
692: close csr_leg_code;
693: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
694: hr_utility.raise_error;
695: end if;
696: hr_utility.set_location(l_proc, 30);
697: --

Line 694: hr_utility.raise_error;

690: -- The primary key is invalid therefore we must error
691: --
692: close csr_leg_code;
693: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
694: hr_utility.raise_error;
695: end if;
696: hr_utility.set_location(l_proc, 30);
697: --
698: -- Set the global variables so the values are

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

692: close csr_leg_code;
693: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
694: hr_utility.raise_error;
695: end if;
696: hr_utility.set_location(l_proc, 30);
697: --
698: -- Set the global variables so the values are
699: -- available for the next call to this function
700: --

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

701: close csr_leg_code;
702: g_delivery_method_id := p_delivery_method_id;
703: g_legislation_code := l_legislation_code;
704: end if;
705: hr_utility.set_location(' Leaving:'|| l_proc, 40);
706: --
707: return l_legislation_code;
708: end return_legislation_code;
709: --