DBA Data[Home] [Help]

APPS.HXC_HAC_BUS dependencies on HR_UTILITY

Line 9: g_debug boolean := hr_utility.debug_enabled;

5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_hac_bus.'; -- Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- The following two global variables are only to be
12: -- used by the return_legislation_code function.
13: --

Line 47: g_debug:=hr_utility.debug_enabled;

43: l_proc varchar2(72);
44: --
45: begin
46: --
47: g_debug:=hr_utility.debug_enabled;
48: if g_debug then
49: l_proc := g_package||'set_security_group_id';
50: hr_utility.set_location('Entering:'|| l_proc, 10);
51: end if;

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

46: --
47: g_debug:=hr_utility.debug_enabled;
48: if g_debug then
49: l_proc := g_package||'set_security_group_id';
50: hr_utility.set_location('Entering:'|| l_proc, 10);
51: end if;
52: --
53: -- Ensure that all the mandatory parameter are not null
54: --

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

79: (p_security_group_id => l_security_group_id
80: );
81: --
82: if g_debug then
83: hr_utility.set_location(' Leaving:'|| l_proc, 20);
84: end if;
85: --
86: end set_security_group_id;
87: --

Line 119: g_debug:=hr_utility.debug_enabled;

115: l_proc varchar2(72);
116: --
117: Begin
118: --
119: g_debug:=hr_utility.debug_enabled;
120: if g_debug then
121: l_proc := g_package||'return_legislation_code';
122: hr_utility.set_location('Entering:'|| l_proc, 10);
123: end if;

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

118: --
119: g_debug:=hr_utility.debug_enabled;
120: if g_debug then
121: l_proc := g_package||'return_legislation_code';
122: hr_utility.set_location('Entering:'|| l_proc, 10);
123: end if;
124: --
125: -- Ensure that all the mandatory parameter are not null
126: --

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

138: -- variable.
139: --
140: l_legislation_code := hxc_hac_bus.g_legislation_code;
141: if g_debug then
142: hr_utility.set_location(l_proc, 20);
143: end if;
144: else
145: --
146: -- The ID is different to the last call to this function

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

157: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
158: fnd_message.raise_error;
159: end if;
160: if g_debug then
161: hr_utility.set_location(l_proc,30);
162: end if;
163: --
164: -- Set the global variables so the values are
165: -- available for the next call to this function.

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

168: hxc_hac_bus.g_approval_comp_id := p_approval_comp_id;
169: hxc_hac_bus.g_legislation_code := l_legislation_code;
170: end if;
171: if g_debug then
172: hr_utility.set_location(' Leaving:'|| l_proc, 40);
173: end if;
174: return l_legislation_code;
175: end return_legislation_code;
176: --

Line 299: -- hr_utility.set_message

295: -- check that the start date is not null
296: --
297: -- IF p_start_date IS NULL THEN
298: --
299: -- hr_utility.set_message
300: -- (809
301: -- ,'HXC_0054_HAC_COMP_ST_DT_NULL'
302: -- );
303: -- hr_utility.raise_error;

Line 303: -- hr_utility.raise_error;

299: -- hr_utility.set_message
300: -- (809
301: -- ,'HXC_0054_HAC_COMP_ST_DT_NULL'
302: -- );
303: -- hr_utility.raise_error;
304: --
305: -- END IF;
306: --
307: -- check that the start date is not equal to or more than the end date

Line 311: hr_utility.set_message

307: -- check that the start date is not equal to or more than the end date
308: --
309: IF p_start_date > NVL(p_end_date, hr_general.END_OF_TIME) THEN
310: --
311: hr_utility.set_message
312: (809
313: ,'HXC_0055_HAC_COMP_DT_ERR'
314: );
315: hr_utility.raise_error;

Line 315: hr_utility.raise_error;

311: hr_utility.set_message
312: (809
313: ,'HXC_0055_HAC_COMP_DT_ERR'
314: );
315: hr_utility.raise_error;
316: --
317: END IF;
318: --
319: END chk_approval_comp_dates;

Line 388: hr_utility.set_message

384: CLOSE c_chk_invalid_dates_create;
385: --
386: -- record found - raise an exception
387: --
388: hr_utility.set_message
389: (809
390: ,'HXC_0067_HAC_COMP_INVCR_DT_ERR'
391: );
392: hr_utility.raise_error;

Line 392: hr_utility.raise_error;

388: hr_utility.set_message
389: (809
390: ,'HXC_0067_HAC_COMP_INVCR_DT_ERR'
391: );
392: hr_utility.raise_error;
393: END IF;
394: --
395: CLOSE c_chk_invalid_dates_create;
396: --

Line 469: hr_utility.set_message

465: CLOSE c_chk_invalid_dates_update;
466: --
467: -- record found - raise an exception
468: --
469: hr_utility.set_message
470: (809
471: ,'HXC_0070_HAC_COMP_INVUP_DT_ERR'
472: );
473: hr_utility.raise_error;

Line 473: hr_utility.raise_error;

469: hr_utility.set_message
470: (809
471: ,'HXC_0070_HAC_COMP_INVUP_DT_ERR'
472: );
473: hr_utility.raise_error;
474: END IF;
475: --
476: CLOSE c_chk_invalid_dates_update;
477: --

Line 556: hr_utility.set_message

552: IF p_start_date >= l_start_date AND p_start_date <= l_end_date THEN
553: --
554: -- The start date of the inserted record is in error
555: --
556: hr_utility.set_message
557: (809
558: ,'HXC_0071_HAC_COMP_ST_DTCR_ERR'
559: );
560: hr_utility.raise_error;

Line 560: hr_utility.raise_error;

556: hr_utility.set_message
557: (809
558: ,'HXC_0071_HAC_COMP_ST_DTCR_ERR'
559: );
560: hr_utility.raise_error;
561: --
562: ELSIF p_end_date >= l_start_date AND p_end_date <= l_end_date THEN
563: --
564: -- The end date of the inserted record is in error

Line 566: hr_utility.set_message

562: ELSIF p_end_date >= l_start_date AND p_end_date <= l_end_date THEN
563: --
564: -- The end date of the inserted record is in error
565: --
566: hr_utility.set_message
567: (809
568: ,'HXC_0072_HAC_COMP_END_DTCR_ERR'
569: );
570: hr_utility.raise_error;

Line 570: hr_utility.raise_error;

566: hr_utility.set_message
567: (809
568: ,'HXC_0072_HAC_COMP_END_DTCR_ERR'
569: );
570: hr_utility.raise_error;
571: --
572:
573: END IF;
574: END IF;

Line 751: hr_utility.set_message

747: IF p_start_date >= l_start_date AND p_start_date <= l_end_date THEN
748: --
749: -- The start date of the updated record is in error
750: --
751: hr_utility.set_message
752: (809
753: ,'HXC_0073_HAC_COMP_ST_DTUP_ERR'
754: );
755: hr_utility.raise_error;

Line 755: hr_utility.raise_error;

751: hr_utility.set_message
752: (809
753: ,'HXC_0073_HAC_COMP_ST_DTUP_ERR'
754: );
755: hr_utility.raise_error;
756: --
757: ELSIF p_end_date >= l_start_date AND p_end_date <= l_end_date THEN
758: --
759: -- The end date of the updated record is in error

Line 761: hr_utility.set_message

757: ELSIF p_end_date >= l_start_date AND p_end_date <= l_end_date THEN
758: --
759: -- The end date of the updated record is in error
760: --
761: hr_utility.set_message
762: (809
763: ,'HXC_0074_HAC_COMP_END_DTUP_ERR'
764: );
765: hr_utility.raise_error;

Line 765: hr_utility.raise_error;

761: hr_utility.set_message
762: (809
763: ,'HXC_0074_HAC_COMP_END_DTUP_ERR'
764: );
765: hr_utility.raise_error;
766: --
767:
768: END IF;
769: END IF;

Line 932: hr_utility.set_message

928:
929: IF c_chk_master_record_exists%NOTFOUND then
930:
931: CLOSE c_chk_master_record_exists;
932: hr_utility.set_message
933: (809
934: ,'HXC_0402_HAC_COMP_PAR_REC_NF'
935: );
936: hr_utility.raise_error;

Line 936: hr_utility.raise_error;

932: hr_utility.set_message
933: (809
934: ,'HXC_0402_HAC_COMP_PAR_REC_NF'
935: );
936: hr_utility.raise_error;
937:
938: END IF;
939:
940: CLOSE c_chk_master_record_exists;

Line 995: hr_utility.set_message

991: --
992: IF (p_parent_comp_id is not null and p_parent_comp_ovn is null) or
993: (p_parent_comp_id is null and p_parent_comp_ovn is not null) then
994:
995: hr_utility.set_message
996: (809
997: ,'HXC_0403_HAC_ELA_PAR_INV'
998: );
999: hr_utility.raise_error;

Line 999: hr_utility.raise_error;

995: hr_utility.set_message
996: (809
997: ,'HXC_0403_HAC_ELA_PAR_INV'
998: );
999: hr_utility.raise_error;
1000:
1001:
1002: END IF;
1003:

Line 1065: hr_utility.set_message

1061: BEGIN
1062: --
1063: IF p_parent_comp_id is null and p_parent_comp_ovn is null and
1064: p_time_category_id is not null then
1065: hr_utility.set_message
1066: (809
1067: ,'HXC_0404_HAC_ELA_TIM_CAT_NN');
1068: hr_utility.raise_error;
1069: END IF;

Line 1068: hr_utility.raise_error;

1064: p_time_category_id is not null then
1065: hr_utility.set_message
1066: (809
1067: ,'HXC_0404_HAC_ELA_TIM_CAT_NN');
1068: hr_utility.raise_error;
1069: END IF;
1070:
1071:
1072: IF p_parent_comp_id is not null and p_parent_comp_ovn is not null then

Line 1075: hr_utility.set_message

1071:
1072: IF p_parent_comp_id is not null and p_parent_comp_ovn is not null then
1073:
1074: IF p_time_category_id is null then
1075: hr_utility.set_message
1076: (809
1077: ,'HXC_0405_HAC_ELA_TIM_CAT_NULL'
1078: );
1079: hr_utility.raise_error;

Line 1079: hr_utility.raise_error;

1075: hr_utility.set_message
1076: (809
1077: ,'HXC_0405_HAC_ELA_TIM_CAT_NULL'
1078: );
1079: hr_utility.raise_error;
1080: ELSE
1081:
1082: IF p_time_category_id <> 0 then
1083:

Line 1089: hr_utility.set_message

1085: FETCH c_time_category_exists into l_dummy;
1086:
1087: IF c_time_category_exists%NOTFOUND then
1088: CLOSE c_time_category_exists;
1089: hr_utility.set_message
1090: (809
1091: ,'HXC_0406_HAC_ELA_TIM_CAT_NF'
1092: );
1093: hr_utility.raise_error;

Line 1093: hr_utility.raise_error;

1089: hr_utility.set_message
1090: (809
1091: ,'HXC_0406_HAC_ELA_TIM_CAT_NF'
1092: );
1093: hr_utility.raise_error;
1094:
1095: END IF;
1096: CLOSE c_time_category_exists;
1097: END IF;

Line 1168: hr_utility.set_message

1164: FETCH c_def_ela_rec_exists into l_approval_comp_id,l_object_version_number;
1165:
1166: IF c_def_ela_rec_exists%FOUND then
1167: CLOSE c_def_ela_rec_exists;
1168: hr_utility.set_message
1169: (809
1170: ,'HXC_0407_HAC_ELA_DEF_EXISTS'
1171: );
1172: hr_utility.raise_error;

Line 1172: hr_utility.raise_error;

1168: hr_utility.set_message
1169: (809
1170: ,'HXC_0407_HAC_ELA_DEF_EXISTS'
1171: );
1172: hr_utility.raise_error;
1173:
1174: END IF;
1175: CLOSE c_def_ela_rec_exists;
1176: END IF;

Line 1243: hr_utility.set_message

1239: FETCH c_time_recipient_exists into l_dummy;
1240:
1241: IF c_time_recipient_exists%NOTFOUND then
1242: CLOSE c_time_recipient_exists;
1243: hr_utility.set_message
1244: (809
1245: ,'HXC_0408_HAC_COMP_TRP_NF'
1246: );
1247: hr_utility.raise_error;

Line 1247: hr_utility.raise_error;

1243: hr_utility.set_message
1244: (809
1245: ,'HXC_0408_HAC_COMP_TRP_NF'
1246: );
1247: hr_utility.raise_error;
1248:
1249: END IF;
1250: CLOSE c_time_recipient_exists;
1251: END IF;

Line 1257: hr_utility.set_message

1253:
1254: IF p_parent_comp_id is not null and p_parent_comp_ovn is not null then
1255:
1256: IF p_time_recipient_id <> -1 THEN
1257: hr_utility.set_message
1258: (809
1259: ,'HXC_0409_HAC_ELA_TRP'
1260: );
1261:

Line 1262: hr_utility.raise_error;

1258: (809
1259: ,'HXC_0409_HAC_ELA_TRP'
1260: );
1261:
1262: hr_utility.raise_error;
1263:
1264: END IF;
1265:
1266: END IF;

Line 1366: hr_utility.set_message

1362: FETCH c_tim_cat_exists into l_dummy;
1363:
1364: IF c_tim_cat_exists%FOUND then
1365: CLOSE c_tim_cat_exists;
1366: hr_utility.set_message
1367: (809
1368: ,'HXC_0410_HAC_ELA_TIMCAT_EXISTS'
1369: );
1370: hr_utility.raise_error;

Line 1370: hr_utility.raise_error;

1366: hr_utility.set_message
1367: (809
1368: ,'HXC_0410_HAC_ELA_TIMCAT_EXISTS'
1369: );
1370: hr_utility.raise_error;
1371:
1372: END IF;
1373: CLOSE c_tim_cat_exists;
1374:

Line 1382: hr_utility.set_message

1378:
1379: IF c_tim_cat_dup%FOUND then
1380: CLOSE c_tim_cat_dup;
1381:
1382: hr_utility.set_message
1383: (809
1384: ,'HXC_0411_HAC_ELA_DUP_TIMCAT'
1385: );
1386: hr_utility.raise_error;

Line 1386: hr_utility.raise_error;

1382: hr_utility.set_message
1383: (809
1384: ,'HXC_0411_HAC_ELA_DUP_TIMCAT'
1385: );
1386: hr_utility.raise_error;
1387:
1388: END IF;
1389: CLOSE c_tim_cat_dup;
1390:

Line 1451: hr_utility.set_message

1447: IF p_time_category_id = 0 then
1448: IF (p_approval_mechanism = 'PROJECT_MANAGER' or
1449: p_approval_mechanism = 'ENTRY_LEVEL_APPROVAL') then
1450:
1451: hr_utility.set_message
1452: (809
1453: ,'HXC_0412_HAC_DEF_APP_MECH'
1454: );
1455: hr_utility.raise_error;

Line 1455: hr_utility.raise_error;

1451: hr_utility.set_message
1452: (809
1453: ,'HXC_0412_HAC_DEF_APP_MECH'
1454: );
1455: hr_utility.raise_error;
1456:
1457: END IF;
1458:
1459: ELSE

Line 1462: hr_utility.set_message

1458:
1459: ELSE
1460: IF (p_approval_mechanism = 'ENTRY_LEVEL_APPROVAL') then
1461:
1462: hr_utility.set_message
1463: (809
1464: ,'HXC_0413_HAC_ELA_APP_MECH'
1465: );
1466: hr_utility.raise_error;

Line 1466: hr_utility.raise_error;

1462: hr_utility.set_message
1463: (809
1464: ,'HXC_0413_HAC_ELA_APP_MECH'
1465: );
1466: hr_utility.raise_error;
1467:
1468: END IF;
1469:
1470: END IF;

Line 1524: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');

1520: approval_style_extensions hxc_approval_styles.run_recipient_extensions%type;
1521: Begin
1522: if not(p_run_recipient_extensions is null or p_run_recipient_extensions in ('Y','N'))
1523: then
1524: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');
1525: hr_utility.raise_error;
1526: else
1527: open crs_approval_extensions;
1528: fetch crs_approval_extensions into approval_style_extensions;

Line 1525: hr_utility.raise_error;

1521: Begin
1522: if not(p_run_recipient_extensions is null or p_run_recipient_extensions in ('Y','N'))
1523: then
1524: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');
1525: hr_utility.raise_error;
1526: else
1527: open crs_approval_extensions;
1528: fetch crs_approval_extensions into approval_style_extensions;
1529: close crs_approval_extensions;

Line 1534: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');

1530: if (approval_style_extensions is null or approval_style_extensions in ('N'))
1531: then
1532: if not(p_run_recipient_extensions is null or p_run_recipient_extensions ='N')
1533: then
1534: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');
1535: hr_utility.raise_error;
1536: end if;
1537: end if;
1538: end if;

Line 1535: hr_utility.raise_error;

1531: then
1532: if not(p_run_recipient_extensions is null or p_run_recipient_extensions ='N')
1533: then
1534: hr_utility.set_message(809,'HXC_VALUE_RECIPIENT_EXTENSIONS');
1535: hr_utility.raise_error;
1536: end if;
1537: end if;
1538: end if;
1539: end chk_allowable_extensions;

Line 1554: g_debug:=hr_utility.debug_enabled;

1550: --
1551: l_proc varchar2(72);
1552: --
1553: Begin
1554: g_debug:=hr_utility.debug_enabled;
1555: if g_debug then
1556: l_proc := g_package||'insert_validate';
1557: hr_utility.set_location('Entering:'||l_proc, 5);
1558: end if;

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

1553: Begin
1554: g_debug:=hr_utility.debug_enabled;
1555: if g_debug then
1556: l_proc := g_package||'insert_validate';
1557: hr_utility.set_location('Entering:'||l_proc, 5);
1558: end if;
1559: --
1560: -- Call all supporting business operations
1561: --

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

1643: -- "-- CLIENT_INFO not set. No lookup validation or joins to HR_LOOKUPS."
1644: --
1645: --
1646: if g_debug then
1647: hr_utility.set_location(' Leaving:'||l_proc, 10);
1648: end if;
1649: End insert_validate;
1650: --
1651: -- ----------------------------------------------------------------------------

Line 1662: g_debug:=hr_utility.debug_enabled;

1658: --
1659: l_proc varchar2(72);
1660: --
1661: Begin
1662: g_debug:=hr_utility.debug_enabled;
1663: if g_debug then
1664: l_proc := g_package||'update_validate';
1665: hr_utility.set_location('Entering:'||l_proc, 5);
1666: end if;

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

1661: Begin
1662: g_debug:=hr_utility.debug_enabled;
1663: if g_debug then
1664: l_proc := g_package||'update_validate';
1665: hr_utility.set_location('Entering:'||l_proc, 5);
1666: end if;
1667: --
1668: -- Call all supporting business operations
1669: --

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

1752: (p_parent_comp_id => p_rec.parent_comp_id
1753: ,p_parent_comp_ovn => p_rec.parent_comp_ovn);
1754: --
1755: if g_debug then
1756: hr_utility.set_location(' Leaving:'||l_proc, 10);
1757: end if;
1758: End update_validate;
1759: --
1760: -- ----------------------------------------------------------------------------

Line 1770: g_debug:=hr_utility.debug_enabled;

1766: --
1767: l_proc varchar2(72);
1768: --
1769: Begin
1770: g_debug:=hr_utility.debug_enabled;
1771: if g_debug then
1772: l_proc := g_package||'delete_validate';
1773: hr_utility.set_location('Entering:'||l_proc, 5);
1774: end if;

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

1769: Begin
1770: g_debug:=hr_utility.debug_enabled;
1771: if g_debug then
1772: l_proc := g_package||'delete_validate';
1773: hr_utility.set_location('Entering:'||l_proc, 5);
1774: end if;
1775: --
1776: -- Call all supporting business operations
1777: --

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

1775: --
1776: -- Call all supporting business operations
1777: --
1778: if g_debug then
1779: hr_utility.set_location(' Leaving:'||l_proc, 10);
1780: end if;
1781: End delete_validate;
1782: --
1783: end hxc_hac_bus;