DBA Data[Home] [Help]

APPS.PAY_PRT_BUS dependencies on HR_UTILITY

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

36: l_proc varchar2(72) := g_package||'set_security_group_id';
37: --
38: begin
39: --
40: hr_utility.set_location('Entering:'|| l_proc, 10);
41: --
42: -- Ensure that all the mandatory parameter are not null
43: --
44: hr_api.mandatory_arg_error

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

67: hr_api.set_security_group_id
68: (p_security_group_id => l_security_group_id
69: );
70: --
71: hr_utility.set_location(' Leaving:'|| l_proc, 20);
72: --
73: end set_security_group_id;
74: --
75: -- ----------------------------------------------------------------------------

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

95: l_proc varchar2(72) := g_package||'return_legislation_code';
96: --
97: Begin
98: --
99: hr_utility.set_location('Entering:'|| l_proc, 10);
100: --
101: -- Ensure that all the mandatory parameter are not null
102: --
103: hr_api.mandatory_arg_error

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

113: -- call to this function. Just return the value in the global
114: -- variable.
115: --
116: l_legislation_code := pay_prt_bus.g_legislation_code;
117: hr_utility.set_location(l_proc, 20);
118: else
119: --
120: -- The ID is different to the last call to this function
121: -- or this is the first call to this function.

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

130: close csr_leg_code;
131: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
132: fnd_message.raise_error;
133: end if;
134: hr_utility.set_location(l_proc,30);
135: --
136: -- Set the global variables so the values are
137: -- available for the next call to this function.
138: --

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

139: close csr_leg_code;
140: pay_prt_bus.g_run_type_id := p_run_type_id;
141: pay_prt_bus.g_legislation_code := l_legislation_code;
142: end if;
143: hr_utility.set_location(' Leaving:'|| l_proc, 40);
144: return l_legislation_code;
145: end return_legislation_code;
146: --
147: /*

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

168: l_bg_id number(15);
169: l_proc varchar2(72) := g_package||'return_legislation_code_child';
170: Begin
171: --
172: hr_utility.set_location('Entering:'|| l_proc, 10);
173: --
174: if ( nvl(pay_prt_bus.g_run_type_id, hr_api.g_number) = p_run_type_id) then
175: --
176: -- The legislation code has already been found with a previous

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

177: -- call to this function. Just return the value in the global
178: -- variable.
179: --
180: l_legislation_code := pay_prt_bus.g_legislation_code;
181: hr_utility.set_location(l_proc, 20);
182: else
183: open csr_get_bg_id;
184: fetch csr_get_bg_id into l_gb_id;
185: --

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

189: --
190: close csr_get_bg_id;
191: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
192: fnd_message.raise_error;
193: hr_utility.set_location(l_proc,20);
194: else -- a row is found
195: --
196: -- if bg is null then return null, else get the leg code using the hr_api
197: -- function.

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

198: --
199: if l_bg_id is null then
200: --
201: l_legislation_code := '';
202: hr_utility.set_location(l_proc,30);
203: else
204: l_legislation_code := hr_api.return_legislation_code
205: (p_business_group_id => l_bg_id);
206: hr_utility.set_location(l_proc,40);

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

202: hr_utility.set_location(l_proc,30);
203: else
204: l_legislation_code := hr_api.return_legislation_code
205: (p_business_group_id => l_bg_id);
206: hr_utility.set_location(l_proc,40);
207: end if;
208: end if; -- cursor not found
209: --
210: close csr_get_bg_id;

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

215: pay_prt_bus.g_run_type_id := p_run_type_id;
216: pay_prt_bus.g_legislation_code := l_legislation_code;
217: end if;
218: --
219: hr_utility.set_location(' Leaving:'|| l_proc, 50);
220: return l_legislation_code;
221: end return_legislation_code_child;
222: */
223: -- ----------------------------------------------------------------------------

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

265: -- not be able to add new lookup_codes. Thus only need to validate against
266: -- hr_standard_lookups, even though the table does have a business_group_id
267: -- and would expect to need to validate against hr_lookups.
268: --
269: hr_utility.set_location('Entering: '||l_proc,5);
270: --
271: IF hr_api.not_exists_in_dt_hrstanlookups
272: (p_effective_date => p_effective_date
273: ,p_validation_start_date => p_validation_start_date

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

281: --
282: fnd_message.set_name('PAY','HR_xxxx_INVALID_RUN_METHOD');
283: fnd_message.raise_error;
284: --
285: hr_utility.set_location(l_proc,10);
286: END IF;
287: --
288: hr_utility.set_location('Leaving: '||l_proc,15);
289: --

Line 288: hr_utility.set_location('Leaving: '||l_proc,15);

284: --
285: hr_utility.set_location(l_proc,10);
286: END IF;
287: --
288: hr_utility.set_location('Leaving: '||l_proc,15);
289: --
290: End chk_run_method;
291: -- ----------------------------------------------------------------------------
292: -- |--------------------------< chk_run_type_name >---------------------------|

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

366: and prt.effective_end_date;
367: --
368: Begin
369: --
370: hr_utility.set_location('Entering: '||l_proc,5);
371: --
372: -- Only execute the cursor if absolutely necessary.
373: -- a) During update, the run_type_name has actually changed to another not
374: -- null value, i,e, the value passed to this procedure is different to the

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

383: nvl(p_run_type_name, hr_api.g_varchar2))
384: or
385: (p_run_type_id is null)) then
386: --
387: hr_utility.set_location(l_proc, 10);
388: --
389: -- Only need to open the cursor if run_type_name is not null
390: --
391: if p_run_type_name is not null then

Line 402: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');

398: --
399: OPEN csr_rt_name_g;
400: FETCH csr_rt_name_g INTO l_run_type_name;
401: IF csr_rt_name_g%FOUND THEN
402: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
403: hr_utility.raise_error;
404: END IF;
405: CLOSE csr_rt_name_g;
406: hr_utility.set_location(l_proc, 15);

Line 403: hr_utility.raise_error;

399: OPEN csr_rt_name_g;
400: FETCH csr_rt_name_g INTO l_run_type_name;
401: IF csr_rt_name_g%FOUND THEN
402: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
403: hr_utility.raise_error;
404: END IF;
405: CLOSE csr_rt_name_g;
406: hr_utility.set_location(l_proc, 15);
407: --

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

402: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
403: hr_utility.raise_error;
404: END IF;
405: CLOSE csr_rt_name_g;
406: hr_utility.set_location(l_proc, 15);
407: --
408: elsif l_mode = 'STARTUP' then
409: --
410: OPEN csr_rt_name_s;

Line 413: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');

409: --
410: OPEN csr_rt_name_s;
411: FETCH csr_rt_name_s INTO l_run_type_name;
412: IF csr_rt_name_s%FOUND THEN
413: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
414: hr_utility.raise_error;
415: END IF;
416: CLOSE csr_rt_name_s;
417: hr_utility.set_location(l_proc, 20);

Line 414: hr_utility.raise_error;

410: OPEN csr_rt_name_s;
411: FETCH csr_rt_name_s INTO l_run_type_name;
412: IF csr_rt_name_s%FOUND THEN
413: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
414: hr_utility.raise_error;
415: END IF;
416: CLOSE csr_rt_name_s;
417: hr_utility.set_location(l_proc, 20);
418: else -- mode is USER

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

413: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
414: hr_utility.raise_error;
415: END IF;
416: CLOSE csr_rt_name_s;
417: hr_utility.set_location(l_proc, 20);
418: else -- mode is USER
419: --
420: OPEN csr_rt_name_u;
421: FETCH csr_rt_name_u INTO l_run_type_name;

Line 423: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');

419: --
420: OPEN csr_rt_name_u;
421: FETCH csr_rt_name_u INTO l_run_type_name;
422: IF csr_rt_name_u%FOUND THEN
423: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
424: hr_utility.raise_error;
425: END IF;
426: CLOSE csr_rt_name_u;
427: hr_utility.set_location(l_proc, 25);

Line 424: hr_utility.raise_error;

420: OPEN csr_rt_name_u;
421: FETCH csr_rt_name_u INTO l_run_type_name;
422: IF csr_rt_name_u%FOUND THEN
423: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
424: hr_utility.raise_error;
425: END IF;
426: CLOSE csr_rt_name_u;
427: hr_utility.set_location(l_proc, 25);
428: end if; -- what mode

Line 427: hr_utility.set_location(l_proc, 25);

423: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
424: hr_utility.raise_error;
425: END IF;
426: CLOSE csr_rt_name_u;
427: hr_utility.set_location(l_proc, 25);
428: end if; -- what mode
429: /*
430: Logic has changed back! so that names are unique within a business group
431: and within a legislation. So, you have the same name for an RT in a BG as

Line 437: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');

433: legislation.
434: OPEN csr_rt_name;
435: FETCH csr_rt_name into l_run_type_name;
436: IF csr_rt_name%FOUND THEN
437: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
438: hr_utility.raise_error;
439: END IF;
440: CLOSE csr_rt_name;
441: end if;

Line 438: hr_utility.raise_error;

434: OPEN csr_rt_name;
435: FETCH csr_rt_name into l_run_type_name;
436: IF csr_rt_name%FOUND THEN
437: hr_utility.set_message(801,'HR_33592_PRT_DUP_NAME');
438: hr_utility.raise_error;
439: END IF;
440: CLOSE csr_rt_name;
441: end if;
442: */

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

442: */
443: --
444: end if;
445: end if;
446: hr_utility.set_location('Leaving: '||l_proc, 20);
447: --
448: END chk_run_type_name;
449: --
450: -- ----------------------------------------------------------------------------

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

523: --
524: l_proc varchar2(72) := g_package || 'chk_ddf';
525: --
526: begin
527: hr_utility.set_location('Entering:'||l_proc,10);
528: --
529: if ((p_rec.run_type_id is not null) and
530: (nvl(pay_prt_shd.g_old_rec.run_information_category,
531: hr_api.g_varchar2) <>

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

665: );
666:
667: end if;
668: --
669: hr_utility.set_location(' Leaving:'||l_proc,20);
670: end chk_ddf;
671: --
672: -- ----------------------------------------------------------------------------
673: -- ----------------------------------------------------------------------------

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

743: l_argument varchar2(30);
744: l_exists number(1);
745: --
746: BEGIN
747: hr_utility.set_location('Entering: '||l_proc,5);
748: --
749: if p_business_group_id is not null then -- user run type
750: open chk_for_ppa(p_run_type_id, p_business_group_id);
751: fetch chk_for_ppa into l_exists;

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

752: if chk_for_ppa%FOUND then
753: close chk_for_ppa;
754: fnd_message.set_name('PAY', 'HR_34981_PRT_CHILD_PPA');
755: fnd_message.raise_error;
756: hr_utility.set_location(l_proc, 10);
757: else
758: close chk_for_ppa;
759: end if;
760: --

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

763: if chk_for_paa%FOUND then
764: close chk_for_paa;
765: fnd_message.set_name('PAY', 'HR_34982_PRT_CHILD_PAA');
766: fnd_message.raise_error;
767: hr_utility.set_location(l_proc, 15);
768: else
769: close chk_for_paa;
770: end if;
771: --

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

777: if chk_for_ppa%FOUND then
778: close chk_for_ppa;
779: fnd_message.set_name('PAY', 'HR_34981_PRT_CHILD_PPA');
780: fnd_message.raise_error;
781: hr_utility.set_location(l_proc, 20);
782: else
783: close chk_for_ppa;
784: end if;
785: --

Line 792: hr_utility.set_location(l_proc, 25);

788: if chk_for_paa%FOUND then
789: close chk_for_paa;
790: fnd_message.set_name('PAY', 'HR_34982_PRT_CHILD_PAA');
791: fnd_message.raise_error;
792: hr_utility.set_location(l_proc, 25);
793: else
794: close chk_for_paa;
795: end if;
796: end loop;

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

801: if chk_for_ppanb%FOUND then
802: close chk_for_ppanb;
803: fnd_message.set_name('PAY', 'HR_34981_PRT_CHILD_PPA');
804: fnd_message.raise_error;
805: hr_utility.set_location(l_proc, 30);
806: else
807: close chk_for_ppanb;
808: end if;
809: --

Line 816: hr_utility.set_location(l_proc, 35);

812: if chk_for_paanb%FOUND then
813: close chk_for_paanb;
814: fnd_message.set_name('PAY', 'HR_34982_PRT_CHILD_PAA');
815: fnd_message.raise_error;
816: hr_utility.set_location(l_proc, 35);
817: else
818: close chk_for_paanb;
819: end if;
820: --

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

818: close chk_for_paanb;
819: end if;
820: --
821: end if;
822: hr_utility.set_location(l_proc, 40);
823: --
824: end chk_for_child_actions;
825: -- ----------------------------------------------------------------------------
826: -- |-----------------------< chk_non_updateable_args >------------------------|

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

873: fnd_message.set_token('STEP ', '5');
874: fnd_message.raise_error;
875: END IF;
876: --
877: hr_utility.set_location(l_proc, 10);
878: --
879: if p_rec.run_type_id <> pay_prt_shd.g_old_rec.run_type_id then
880: l_argument := 'run_type_id';
881: raise l_error;

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

879: if p_rec.run_type_id <> pay_prt_shd.g_old_rec.run_type_id then
880: l_argument := 'run_type_id';
881: raise l_error;
882: end if;
883: hr_utility.set_location(l_proc, 20);
884: --
885: if nvl(p_rec.business_group_id, hr_api.g_number) <>
886: nvl(pay_prt_shd.g_old_rec.business_group_id, hr_api.g_number) then
887: l_argument := 'business_group_id';

Line 890: hr_utility.set_location(l_proc, 25);

886: nvl(pay_prt_shd.g_old_rec.business_group_id, hr_api.g_number) then
887: l_argument := 'business_group_id';
888: raise l_error;
889: end if;
890: hr_utility.set_location(l_proc, 25);
891: --
892: if nvl(p_rec.legislation_code, hr_api.g_varchar2) <>
893: nvl(pay_prt_shd.g_old_rec.legislation_code, hr_api.g_varchar2) then
894: l_argument := 'legislation_code';

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

893: nvl(pay_prt_shd.g_old_rec.legislation_code, hr_api.g_varchar2) then
894: l_argument := 'legislation_code';
895: raise l_error;
896: end if;
897: hr_utility.set_location(l_proc, 30);
898: --
899: if nvl(p_rec.run_method, hr_api.g_varchar2) <>
900: nvl(pay_prt_shd.g_old_rec.run_method, hr_api.g_varchar2) then
901: l_argument := 'run_method';

Line 904: hr_utility.set_location(l_proc, 35);

900: nvl(pay_prt_shd.g_old_rec.run_method, hr_api.g_varchar2) then
901: l_argument := 'run_method';
902: raise l_error;
903: end if;
904: hr_utility.set_location(l_proc, 35);
905: --
906: -- RET 12-DEC-2001 making run_type_name non-updateable as is the key
907: -- for uploading ldts.
908: --

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

910: nvl(pay_prt_shd.g_old_rec.run_type_name, hr_api.g_varchar2) then
911: l_argument := 'run_type_name';
912: raise l_error;
913: end if;
914: hr_utility.set_location(l_proc, 40);
915: --
916: EXCEPTION
917: WHEN l_error THEN
918: hr_api.argument_changed_error

Line 923: hr_utility.set_location(' Leaving:'||l_proc, 45);

919: (p_api_name => l_proc
920: ,p_argument => l_argument);
921: WHEN OTHERS THEN
922: RAISE;
923: hr_utility.set_location(' Leaving:'||l_proc, 45);
924: End chk_non_updateable_args;
925: --
926: -- ----------------------------------------------------------------------------
927: -- |--------------------------< dt_update_validate >--------------------------|

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

1218: --
1219: l_proc varchar2(72) := g_package||'insert_validate';
1220: --
1221: Begin
1222: hr_utility.set_location('Entering:'||l_proc, 5);
1223: --
1224: -- Call all supporting business operations
1225: --
1226: /* RET removed this in favour of new chk_startup_action

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

1238: THEN
1239: hr_api.validate_bus_grp_id(p_rec.business_group_id); -- Validate bus_grp
1240: END IF;
1241: --
1242: hr_utility.set_location(l_proc, 10);
1243: --
1244: chk_run_method(p_effective_date => p_effective_date
1245: ,p_validation_start_date => p_validation_start_date
1246: ,p_validation_end_date => p_validation_end_date

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

1245: ,p_validation_start_date => p_validation_start_date
1246: ,p_validation_end_date => p_validation_end_date
1247: ,p_run_method => p_rec.run_method);
1248: --
1249: hr_utility.set_location(l_proc, 15);
1250: --
1251: chk_run_type_name(p_run_type_id => p_rec.run_type_id
1252: ,p_run_type_name => p_rec.run_type_name
1253: ,p_effective_date => p_effective_date

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

1258: ,p_effective_date => p_effective_date);
1259: --
1260: chk_ddf(p_rec => p_rec);
1261: --
1262: hr_utility.set_location(' Leaving:'||l_proc, 20);
1263: End insert_validate;
1264: --
1265: -- ----------------------------------------------------------------------------
1266: -- |---------------------------< update_validate >----------------------------|

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

1275: --
1276: l_proc varchar2(72) := g_package||'update_validate';
1277: --
1278: Begin
1279: hr_utility.set_location('Entering:'||l_proc, 5);
1280: --
1281: -- Currently the only columns that can be updated on pay_run_types_f are
1282: -- run_type_name and shortname. These can only be updated in CORRECTION
1283: -- mode, so if a different update mode has been passed in, raise an error

Line 1288: hr_utility.set_message(801,'HR_34115_PRT_NOT_CORRECTION');

1284: -- NOTE: this will have to be changed if new columns with different update
1285: -- requirements are added to the table.
1286: --
1287: if p_datetrack_mode <> 'CORRECTION' then
1288: hr_utility.set_message(801,'HR_34115_PRT_NOT_CORRECTION');
1289: hr_utility.raise_error;
1290: end if;
1291: --
1292: -- Call all supporting business operations

Line 1289: hr_utility.raise_error;

1285: -- requirements are added to the table.
1286: --
1287: if p_datetrack_mode <> 'CORRECTION' then
1288: hr_utility.set_message(801,'HR_34115_PRT_NOT_CORRECTION');
1289: hr_utility.raise_error;
1290: end if;
1291: --
1292: -- Call all supporting business operations
1293: --

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

1300: hr_api.validate_bus_grp_id(p_rec.business_group_id); -- Validate bus_grp
1301: END IF;
1302: --
1303: --
1304: hr_utility.set_location(l_proc, 10);
1305: --
1306: chk_run_method(p_effective_date => p_effective_date
1307: ,p_validation_start_date => p_validation_start_date
1308: ,p_validation_end_date => p_validation_end_date

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

1307: ,p_validation_start_date => p_validation_start_date
1308: ,p_validation_end_date => p_validation_end_date
1309: ,p_run_method => p_rec.run_method);
1310: --
1311: hr_utility.set_location(l_proc, 15);
1312: --
1313: chk_run_type_name(p_run_type_id => p_rec.run_type_id
1314: ,p_run_type_name => p_rec.run_type_name
1315: ,p_effective_date => p_effective_date

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

1321: --
1322: chk_ddf(p_rec => p_rec);
1323: -- Call the datetrack update integrity operation
1324: --
1325: hr_utility.set_location(l_proc, 20);
1326: --
1327: dt_update_validate
1328: (p_datetrack_mode => p_datetrack_mode
1329: ,p_validation_start_date => p_validation_start_date

Line 1333: hr_utility.set_location(l_proc, 25);

1329: ,p_validation_start_date => p_validation_start_date
1330: ,p_validation_end_date => p_validation_end_date
1331: );
1332: --
1333: hr_utility.set_location(l_proc, 25);
1334: --
1335: chk_non_updateable_args
1336: (p_effective_date => p_effective_date
1337: ,p_rec => p_rec

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

1336: (p_effective_date => p_effective_date
1337: ,p_rec => p_rec
1338: );
1339: --
1340: hr_utility.set_location('Leaving:'||l_proc, 30);
1341: End update_validate;
1342: --
1343: -- ----------------------------------------------------------------------------
1344: -- |---------------------------< delete_validate >----------------------------|

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

1353: --
1354: l_proc varchar2(72) := g_package||'delete_validate';
1355: --
1356: Begin
1357: hr_utility.set_location('Entering:'||l_proc, 5);
1358: --
1359: -- Call all supporting business operations
1360: --
1361: -- NB. need to use g_old_rec, as p_rec is not pupulated with all the columns

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

1378: ,p_validation_end_date => p_validation_end_date
1379: ,p_run_type_id => p_rec.run_type_id
1380: );
1381: --
1382: hr_utility.set_location(' Leaving:'||l_proc, 10);
1383: End delete_validate;
1384: --
1385: end pay_prt_bus;