[Home] [Help]
32: l_proc varchar2(72) := g_package||'set_security_group_id';
33: --
34: begin
35: --
36: hr_utility.set_location('Entering:'|| l_proc, 10);
37: --
38: -- No business group context. Security group is not applicable.
39: --
40: null;
38: -- No business group context. Security group is not applicable.
39: --
40: null;
41: --
42: hr_utility.set_location(' Leaving:'|| l_proc, 20);
43: --
44: end set_security_group_id;
45: --
46: -- ---------------------------------------------------------------------------
79: l_proc varchar2(72) := g_package||'return_legislation_code';
80: --
81: Begin
82: --
83: hr_utility.set_location('Entering:'|| l_proc, 10);
84: --
85: -- Ensure that all the mandatory parameter are not null
86: --
87: hr_api.mandatory_arg_error
97: -- call to this function. Just return the value in the global
98: -- variable.
99: --
100: l_legislation_code := hr_itp_bus.g_legislation_code;
101: hr_utility.set_location(l_proc, 20);
102: else
103: --
104: -- The ID is different to the last call to this function
105: -- or this is the first call to this function.
113: -- properties.
114: --
115: l_legislation_code := null;
116: end if;
117: hr_utility.set_location(l_proc,30);
118: --
119: -- Set the global variables so the values are
120: -- available for the next call to this function.
121: --
122: close csr_leg_code;
123: hr_itp_bus.g_item_property_id := p_item_property_id;
124: hr_itp_bus.g_legislation_code := l_legislation_code;
125: end if;
126: hr_utility.set_location(' Leaving:'|| l_proc, 40);
127: return l_legislation_code;
128: end return_legislation_code;
129: --
130: --
181: l_form_id number(15);
182: l_prev_form_id number(15);
183: l_next_form_id number(15);
184: Begin
185: hr_utility.set_location('Entering:'||l_proc, 10);
186:
187: IF (p_item_property_id is not null
188: and ((p_previous_navigation_item_id is not null and
189: (nvl(hr_itp_shd.g_old_rec.previous_navigation_item_id,hr_api.g_number)
251: END IF;
252:
253: end if;
254:
255: hr_utility.set_location('Leaving:'||l_proc, 20);
256:
257: if (p_item_property_id is not null and
258: (p_next_navigation_item_id is not null and
259: (nvl(hr_itp_shd.g_old_rec.next_navigation_item_id,hr_api.g_number)
284:
285: end if;
286: --
287: --
288: hr_utility.set_location('Leaving:'||l_proc, 100);
289: End chk_prev_and_next_nav_item;
290: --
291: --
292: -- ---------------------------------------------------------------------------
327: l_proc varchar2(72) := g_package||'return_canvas_type';
328: --
329: Begin
330: --
331: hr_utility.set_location('Entering:'|| l_proc, 10);
332: --
333: if ( nvl(hr_itp_bus.g_form_item_id, hr_api.g_number) = nvl(p_form_item_id, hr_api.g_number)
334: and nvl(hr_itp_bus.g_template_item_id, hr_api.g_number) = nvl(p_template_item_id, hr_api.g_number)
335: and nvl(hr_itp_bus.g_template_item_context_id, hr_api.g_number) = nvl(p_template_item_context_id, hr_api.g_number)
339: -- call to this function. Just return the value in the global
340: -- variable.
341: --
342: l_item_type := hr_itp_bus.g_item_type;
343: hr_utility.set_location(l_proc, 20);
344: else
345: --
346: -- The IDs are different to the last call to this function
347: -- or this is the first call to this function.
360: fnd_message.set_token('PROCEDURE ', l_proc);
361: fnd_message.set_token('STEP ', '10');
362: fnd_message.raise_error;
363: end if;
364: hr_utility.set_location(l_proc,30);
365: close csr_form_item;
366: --
367: elsif (nvl(p_template_item_id, hr_api.g_number) <> hr_api.g_number) then
368: --
378: fnd_message.set_token('PROCEDURE ', l_proc);
379: fnd_message.set_token('STEP ', '20');
380: fnd_message.raise_error;
381: end if;
382: hr_utility.set_location(l_proc,40);
383: close csr_template_item;
384: --
385: elsif (nvl(p_template_item_context_id, hr_api.g_number) <> hr_api.g_number) then
386: --
396: fnd_message.set_token('PROCEDURE ', l_proc);
397: fnd_message.set_token('STEP ', '30');
398: fnd_message.raise_error;
399: end if;
400: hr_utility.set_location(l_proc,50);
401: close csr_template_item_context;
402: --
403: end if;
404: --
409: hr_itp_bus.g_template_item_id := p_template_item_id;
410: hr_itp_bus.g_template_item_context_id := p_template_item_context_id;
411: hr_itp_bus.g_item_type := l_item_type;
412: end if;
413: hr_utility.set_location(' Leaving:'|| l_proc, 50);
414: return l_item_type;
415: End return_item_type;
416: --
417: -- ----------------------------------------------------------------------------
448: --
449: l_proc varchar2(72) := g_package || 'chk_ddf';
450: --
451: begin
452: hr_utility.set_location('Entering:'||l_proc,10);
453: --
454: if ((p_rec.item_property_id is not null) and (
455: nvl(hr_itp_shd.g_old_rec.information_formula_id, hr_api.g_number) <>
456: nvl(p_rec.information_formula_id, hr_api.g_number) or
604: ,p_attribute30_value => p_rec.information30
605: );
606: end if;
607: --
608: hr_utility.set_location(' Leaving:'||l_proc,20);
609: end chk_ddf;
610: --
611: -- ----------------------------------------------------------------------------
612: -- |-----------------------< chk_non_updateable_args >------------------------|
703: l_proc varchar2(72) := g_package || 'chk_form_template_and_context';
704: l_api_updating boolean;
705: --
706: Begin
707: hr_utility.set_location('Entering:'||l_proc, 10);
708: --
709: -- One and only one of form_item_id, template_item_id and
710: -- template_item_context_id must be given
711: --
723: fnd_message.set_token('STEP','10');
724: fnd_message.raise_error;
725: end if;
726: --
727: hr_utility.set_location('Leaving:'||l_proc, 100);
728: End chk_form_template_and_context;
729: --
730: -- ----------------------------------------------------------------------------
731: -- |---------------------------< chk_form_item_id >---------------------------|
739: l_proc varchar2(72) := g_package || 'chk_form_item_id';
740: l_api_updating boolean;
741: --
742: Begin
743: hr_utility.set_location('Entering:'||l_proc, 10);
744: --
745: -- No additional validation required
746: --
747: null;
745: -- No additional validation required
746: --
747: null;
748: --
749: hr_utility.set_location('Leaving:'||l_proc, 100);
750: End chk_form_item_id;
751: --
752: -- ----------------------------------------------------------------------------
753: -- |-------------------------< chk_template_item_id >-------------------------|
761: l_proc varchar2(72) := g_package || 'chk_template_item_id';
762: l_api_updating boolean;
763: --
764: Begin
765: hr_utility.set_location('Entering:'||l_proc, 10);
766: --
767: -- No additional validation required
768: --
769: null;
767: -- No additional validation required
768: --
769: null;
770: --
771: hr_utility.set_location('Leaving:'||l_proc, 100);
772: End chk_template_item_id;
773: --
774: -- ----------------------------------------------------------------------------
775: -- |---------------------< chk_template_item_context_id >---------------------|
783: l_proc varchar2(72) := g_package || 'chk_template_item_context_id';
784: l_api_updating boolean;
785: --
786: Begin
787: hr_utility.set_location('Entering:'||l_proc, 10);
788: --
789: -- No additional validation required
790: --
791: null;
789: -- No additional validation required
790: --
791: null;
792: --
793: hr_utility.set_location('Leaving:'||l_proc, 100);
794: End chk_template_item_context_id;
795: --
796: -- ----------------------------------------------------------------------------
797: -- |----------------------------< chk_alignment >-----------------------------|
806: l_proc varchar2(72) := g_package || 'chk_alignment';
807: l_api_updating boolean;
808: --
809: Begin
810: hr_utility.set_location('Entering:'||l_proc, 10);
811: --
812: -- Check mandatory arguments have been set
813: --
814: hr_api.mandatory_arg_error
820: l_api_updating := hr_itp_shd.api_updating
821: (p_item_property_id => p_item_property_id
822: ,p_object_version_number => p_object_version_number
823: );
824: hr_utility.set_location(l_proc,20);
825: --
826: -- Only proceed with SQL validation if absolutely necessary
827: --
828: if ( ( l_api_updating
829: and nvl(hr_itp_shd.g_old_rec.alignment,hr_api.g_number) <>
830: nvl(p_alignment,hr_api.g_number))
831: or (NOT l_api_updating)) then
832: --
833: hr_utility.set_location(l_proc,30);
834: --
835: if (p_alignment is not null) then
836: --
837: hr_utility.set_location(l_proc,40);
833: hr_utility.set_location(l_proc,30);
834: --
835: if (p_alignment is not null) then
836: --
837: hr_utility.set_location(l_proc,40);
838: --
839: -- Must exist in hr_standard_lookups where lookup_type is
840: -- ALIGNMENTS
841: --
853: end if;
854: --
855: end if;
856: --
857: hr_utility.set_location('Leaving:'||l_proc, 100);
858: End chk_alignment;
859: --
860: -- ----------------------------------------------------------------------------
861: -- |------------------------------< chk_bevel >-------------------------------|
870: l_proc varchar2(72) := g_package || 'chk_bevel';
871: l_api_updating boolean;
872: --
873: Begin
874: hr_utility.set_location('Entering:'||l_proc, 10);
875: --
876: -- Check mandatory arguments have been set
877: --
878: hr_api.mandatory_arg_error
884: l_api_updating := hr_itp_shd.api_updating
885: (p_item_property_id => p_item_property_id
886: ,p_object_version_number => p_object_version_number
887: );
888: hr_utility.set_location(l_proc,20);
889: --
890: -- Only proceed with SQL validation if absolutely necessary
891: --
892: if ( ( l_api_updating
893: and nvl(hr_itp_shd.g_old_rec.bevel,hr_api.g_number) <>
894: nvl(p_bevel,hr_api.g_number))
895: or (NOT l_api_updating)) then
896: --
897: hr_utility.set_location(l_proc,30);
898: --
899: if (p_bevel is not null) then
900: --
901: hr_utility.set_location(l_proc,40);
897: hr_utility.set_location(l_proc,30);
898: --
899: if (p_bevel is not null) then
900: --
901: hr_utility.set_location(l_proc,40);
902: --
903: -- Must exist in hr_standard_lookups where lookup_type is
904: -- BORDER_BEVELS
905: --
917: end if;
918: --
919: end if;
920: --
921: hr_utility.set_location('Leaving:'||l_proc, 100);
922: End chk_bevel;
923: --
924: -- ----------------------------------------------------------------------------
925: -- |-------------------------< chk_case_restriction >-------------------------|
934: l_proc varchar2(72) := g_package || 'chk_case_restriction';
935: l_api_updating boolean;
936: --
937: Begin
938: hr_utility.set_location('Entering:'||l_proc, 10);
939: --
940: -- Check mandatory arguments have been set
941: --
942: hr_api.mandatory_arg_error
948: l_api_updating := hr_itp_shd.api_updating
949: (p_item_property_id => p_item_property_id
950: ,p_object_version_number => p_object_version_number
951: );
952: hr_utility.set_location(l_proc,20);
953: --
954: -- Only proceed with SQL validation if absolutely necessary
955: --
956: if ( ( l_api_updating
957: and nvl(hr_itp_shd.g_old_rec.case_restriction,hr_api.g_number) <>
958: nvl(p_case_restriction,hr_api.g_number))
959: or (NOT l_api_updating)) then
960: --
961: hr_utility.set_location(l_proc,30);
962: --
963: if (p_case_restriction is not null) then
964: --
965: hr_utility.set_location(l_proc,40);
961: hr_utility.set_location(l_proc,30);
962: --
963: if (p_case_restriction is not null) then
964: --
965: hr_utility.set_location(l_proc,40);
966: --
967: -- Must exist in hr_standard_lookups where lookup_type is
968: -- CASE_RESTRICTIONS
969: --
981: end if;
982: --
983: end if;
984: --
985: hr_utility.set_location('Leaving:'||l_proc, 100);
986: End chk_case_restriction;
987: --
988: -- ----------------------------------------------------------------------------
989: -- |-----------------------------< chk_enabled >------------------------------|
998: l_proc varchar2(72) := g_package || 'chk_enabled';
999: l_api_updating boolean;
1000: --
1001: Begin
1002: hr_utility.set_location('Entering:'||l_proc, 10);
1003: --
1004: -- Check mandatory arguments have been set
1005: --
1006: hr_api.mandatory_arg_error
1012: l_api_updating := hr_itp_shd.api_updating
1013: (p_item_property_id => p_item_property_id
1014: ,p_object_version_number => p_object_version_number
1015: );
1016: hr_utility.set_location(l_proc,20);
1017: --
1018: -- Only proceed with SQL validation if absolutely necessary
1019: --
1020: if ( ( l_api_updating
1021: and nvl(hr_itp_shd.g_old_rec.enabled,hr_api.g_number) <>
1022: nvl(p_enabled,hr_api.g_number))
1023: or (NOT l_api_updating)) then
1024: --
1025: hr_utility.set_location(l_proc,30);
1026: --
1027: if (p_enabled is not null) then
1028: --
1029: hr_utility.set_location(l_proc,40);
1025: hr_utility.set_location(l_proc,30);
1026: --
1027: if (p_enabled is not null) then
1028: --
1029: hr_utility.set_location(l_proc,40);
1030: --
1031: -- Must exist in hr_standard_lookups where lookup_type is
1032: -- PROPERTY_TRUE_OR_FALSE
1033: --
1045: end if;
1046: --
1047: end if;
1048: --
1049: hr_utility.set_location('Leaving:'||l_proc, 100);
1050: End chk_enabled;
1051: --
1052: -- ----------------------------------------------------------------------------
1053: -- |---------------------------< chk_format_mask >----------------------------|
1061: l_proc varchar2(72) := g_package || 'chk_format_mask';
1062: l_api_updating boolean;
1063: --
1064: Begin
1065: hr_utility.set_location('Entering:'||l_proc, 10);
1066: --
1067: -- No additional validation required
1068: --
1069: null;
1067: -- No additional validation required
1068: --
1069: null;
1070: --
1071: hr_utility.set_location('Leaving:'||l_proc, 100);
1072: End chk_format_mask;
1073: --
1074: -- ----------------------------------------------------------------------------
1075: -- |------------------------------< chk_height >------------------------------|
1083: l_proc varchar2(72) := g_package || 'chk_height';
1084: l_api_updating boolean;
1085: --
1086: Begin
1087: hr_utility.set_location('Entering:'||l_proc, 10);
1088: --
1089: -- Height must be greater than or equal to zero, if given
1090: --
1091: if (p_height is not null) then
1089: -- Height must be greater than or equal to zero, if given
1090: --
1091: if (p_height is not null) then
1092: --
1093: hr_utility.set_location(l_proc,30);
1094: --
1095: if (p_height < 0) then
1096: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1097: fnd_message.set_token('PROCEDURE', l_proc);
1100: end if;
1101: --
1102: end if;
1103: --
1104: hr_utility.set_location('Leaving:'||l_proc, 100);
1105: End chk_height;
1106: --
1107: -- ----------------------------------------------------------------------------
1108: -- |----------------------< chk_information_formula_id >----------------------|
1125: l_api_updating boolean;
1126: l_formula_type_name varchar2(80);
1127: --
1128: Begin
1129: hr_utility.set_location('Entering:'||l_proc, 10);
1130: --
1131: l_api_updating := hr_itp_shd.api_updating
1132: (p_item_property_id => p_item_property_id
1133: ,p_object_version_number => p_object_version_number
1131: l_api_updating := hr_itp_shd.api_updating
1132: (p_item_property_id => p_item_property_id
1133: ,p_object_version_number => p_object_version_number
1134: );
1135: hr_utility.set_location(l_proc,20);
1136: --
1137: -- Only proceed with SQL validation if absolutely necessary
1138: --
1139: if ( ( l_api_updating
1168: end if;
1169: --
1170: end if;
1171: --
1172: hr_utility.set_location('Leaving:'||l_proc, 100);
1173: End chk_information_formula_id;
1174: --
1175: -- ----------------------------------------------------------------------------
1176: -- |--------------------< chk_information_param_item_ids >--------------------|
1189: l_proc varchar2(72) := g_package || 'chk_information_param_item_ids';
1190: l_api_updating boolean;
1191: --
1192: Begin
1193: hr_utility.set_location('Entering:'||l_proc, 10);
1194: --
1195: -- Check item ids have only been specified if the formula has
1196: --
1197: if p_information_formula_id is null then
1206: fnd_message.raise_error;
1207: end if;
1208: end if;
1209: --
1210: hr_utility.set_location('Leaving:'||l_proc, 100);
1211: End chk_information_param_item_ids;
1212: --
1213: -- ----------------------------------------------------------------------------
1214: -- |--------------------------< chk_insert_allowed >--------------------------|
1223: l_proc varchar2(72) := g_package || 'chk_insert_allowed';
1224: l_api_updating boolean;
1225: --
1226: Begin
1227: hr_utility.set_location('Entering:'||l_proc, 10);
1228: --
1229: -- Check mandatory arguments have been set
1230: --
1231: hr_api.mandatory_arg_error
1237: l_api_updating := hr_itp_shd.api_updating
1238: (p_item_property_id => p_item_property_id
1239: ,p_object_version_number => p_object_version_number
1240: );
1241: hr_utility.set_location(l_proc,20);
1242: --
1243: -- Only proceed with SQL validation if absolutely necessary
1244: --
1245: if ( ( l_api_updating
1246: and nvl(hr_itp_shd.g_old_rec.insert_allowed,hr_api.g_number) <>
1247: nvl(p_insert_allowed,hr_api.g_number))
1248: or (NOT l_api_updating)) then
1249: --
1250: hr_utility.set_location(l_proc,30);
1251: --
1252: if (p_insert_allowed is not null) then
1253: --
1254: hr_utility.set_location(l_proc,40);
1250: hr_utility.set_location(l_proc,30);
1251: --
1252: if (p_insert_allowed is not null) then
1253: --
1254: hr_utility.set_location(l_proc,40);
1255: --
1256: -- Must exist in hr_standard_lookups where lookup_type is
1257: -- PROPERTY_TRUE_OR_FALSE
1258: --
1270: end if;
1271: --
1272: end if;
1273: --
1274: hr_utility.set_location('Leaving:'||l_proc, 100);
1275: End chk_insert_allowed;
1276: --
1277: -- ----------------------------------------------------------------------------
1278: -- |---------------------< chk_prompt_alignment_offset >----------------------|
1286: l_proc varchar2(72) := g_package || 'chk_prompt_alignment_offset';
1287: l_api_updating boolean;
1288: --
1289: Begin
1290: hr_utility.set_location('Entering:'||l_proc, 10);
1291: --
1292: hr_utility.set_location('Leaving:'||l_proc, 100);
1293: End chk_prompt_alignment_offset;
1294: --
1288: --
1289: Begin
1290: hr_utility.set_location('Entering:'||l_proc, 10);
1291: --
1292: hr_utility.set_location('Leaving:'||l_proc, 100);
1293: End chk_prompt_alignment_offset;
1294: --
1295: -- ----------------------------------------------------------------------------
1296: -- |-----------------------< chk_prompt_display_style >-----------------------|
1305: l_proc varchar2(72) := g_package || 'chk_prompt_display_style';
1306: l_api_updating boolean;
1307: --
1308: Begin
1309: hr_utility.set_location('Entering:'||l_proc, 10);
1310: --
1311: -- Check mandatory arguments have been set
1312: --
1313: hr_api.mandatory_arg_error
1319: l_api_updating := hr_itp_shd.api_updating
1320: (p_item_property_id => p_item_property_id
1321: ,p_object_version_number => p_object_version_number
1322: );
1323: hr_utility.set_location(l_proc,20);
1324: --
1325: -- Only proceed with SQL validation if absolutely necessary
1326: --
1327: if ( ( l_api_updating
1328: and nvl(hr_itp_shd.g_old_rec.prompt_display_style,hr_api.g_number) <>
1329: nvl(p_prompt_display_style,hr_api.g_number))
1330: or (NOT l_api_updating)) then
1331: --
1332: hr_utility.set_location(l_proc,30);
1333: --
1334: if (p_prompt_display_style is not null) then
1335: --
1336: hr_utility.set_location(l_proc,40);
1332: hr_utility.set_location(l_proc,30);
1333: --
1334: if (p_prompt_display_style is not null) then
1335: --
1336: hr_utility.set_location(l_proc,40);
1337: --
1338: -- Must exist in hr_standard_lookups where lookup_type is
1339: -- PROMTP_DISPLAY_STYLES
1340: --
1352: end if;
1353: --
1354: end if;
1355: --
1356: hr_utility.set_location('Leaving:'||l_proc, 100);
1357: End chk_prompt_display_style;
1358: --
1359: -- ----------------------------------------------------------------------------
1360: -- |----------------------------< chk_prompt_edge >---------------------------|
1369: l_proc varchar2(72) := g_package || 'chk_prompt_edge';
1370: l_api_updating boolean;
1371: --
1372: Begin
1373: hr_utility.set_location('Entering:'||l_proc, 10);
1374: --
1375: -- Check mandatory arguments have been set
1376: --
1377: hr_api.mandatory_arg_error
1383: l_api_updating := hr_itp_shd.api_updating
1384: (p_item_property_id => p_item_property_id
1385: ,p_object_version_number => p_object_version_number
1386: );
1387: hr_utility.set_location(l_proc,20);
1388: --
1389: -- Only proceed with SQL validation if absolutely necessary
1390: --
1391: if ( ( l_api_updating
1392: and nvl(hr_itp_shd.g_old_rec.prompt_edge,hr_api.g_number) <>
1393: nvl(p_prompt_edge,hr_api.g_number))
1394: or (NOT l_api_updating)) then
1395: --
1396: hr_utility.set_location(l_proc,30);
1397: --
1398: if (p_prompt_edge is not null) then
1399: --
1400: hr_utility.set_location(l_proc,40);
1396: hr_utility.set_location(l_proc,30);
1397: --
1398: if (p_prompt_edge is not null) then
1399: --
1400: hr_utility.set_location(l_proc,40);
1401: --
1402: -- Must exist in hr_standard_lookups where lookup_type is
1403: -- PROMPT_EDGES
1404: --
1416: end if;
1417: --
1418: end if;
1419: --
1420: hr_utility.set_location('Leaving:'||l_proc, 100);
1421: End chk_prompt_edge;
1422: --
1423: -- ----------------------------------------------------------------------------
1424: -- |-----------------------< chk_prompt_edge_alignment >----------------------|
1433: l_proc varchar2(72) := g_package || 'chk_prompt_edge_alignment';
1434: l_api_updating boolean;
1435: --
1436: Begin
1437: hr_utility.set_location('Entering:'||l_proc, 10);
1438: --
1439: -- Check mandatory arguments have been set
1440: --
1441: hr_api.mandatory_arg_error
1447: l_api_updating := hr_itp_shd.api_updating
1448: (p_item_property_id => p_item_property_id
1449: ,p_object_version_number => p_object_version_number
1450: );
1451: hr_utility.set_location(l_proc,20);
1452: --
1453: -- Only proceed with SQL validation if absolutely necessary
1454: --
1455: if ( ( l_api_updating
1456: and nvl(hr_itp_shd.g_old_rec.prompt_edge_alignment,hr_api.g_number) <>
1457: nvl(p_prompt_edge_alignment,hr_api.g_number))
1458: or (NOT l_api_updating)) then
1459: --
1460: hr_utility.set_location(l_proc,30);
1461: --
1462: if (p_prompt_edge_alignment is not null) then
1463: --
1464: hr_utility.set_location(l_proc,40);
1460: hr_utility.set_location(l_proc,30);
1461: --
1462: if (p_prompt_edge_alignment is not null) then
1463: --
1464: hr_utility.set_location(l_proc,40);
1465: --
1466: -- Must exist in hr_standard_lookups where lookup_type is
1467: -- PROMPT_EDGE_ALIGNMENTS
1468: --
1480: end if;
1481: --
1482: end if;
1483: --
1484: hr_utility.set_location('Leaving:'||l_proc, 100);
1485: End chk_prompt_edge_alignment;
1486: --
1487: -- ----------------------------------------------------------------------------
1488: -- |-----------------------< chk_prompt_edge_offset >-------------------------|
1496: l_proc varchar2(72) := g_package || 'chk_prompt_edge_offset';
1497: l_api_updating boolean;
1498: --
1499: Begin
1500: hr_utility.set_location('Entering:'||l_proc, 10);
1501: --
1502: hr_utility.set_location('Leaving:'||l_proc, 100);
1503: End chk_prompt_edge_offset;
1504: --
1498: --
1499: Begin
1500: hr_utility.set_location('Entering:'||l_proc, 10);
1501: --
1502: hr_utility.set_location('Leaving:'||l_proc, 100);
1503: End chk_prompt_edge_offset;
1504: --
1505: -- ----------------------------------------------------------------------------
1506: -- |-----------------------< chk_prompt_text_alignment >----------------------|
1515: l_proc varchar2(72) := g_package || 'chk_prompt_text_alignment';
1516: l_api_updating boolean;
1517: --
1518: Begin
1519: hr_utility.set_location('Entering:'||l_proc, 10);
1520: --
1521: -- Check mandatory arguments have been set
1522: --
1523: hr_api.mandatory_arg_error
1529: l_api_updating := hr_itp_shd.api_updating
1530: (p_item_property_id => p_item_property_id
1531: ,p_object_version_number => p_object_version_number
1532: );
1533: hr_utility.set_location(l_proc,20);
1534: --
1535: -- Only proceed with SQL validation if absolutely necessary
1536: --
1537: if ( ( l_api_updating
1538: and nvl(hr_itp_shd.g_old_rec.prompt_text_alignment,hr_api.g_number) <>
1539: nvl(p_prompt_text_alignment,hr_api.g_number))
1540: or (NOT l_api_updating)) then
1541: --
1542: hr_utility.set_location(l_proc,30);
1543: --
1544: if (p_prompt_text_alignment is not null) then
1545: --
1546: hr_utility.set_location(l_proc,40);
1542: hr_utility.set_location(l_proc,30);
1543: --
1544: if (p_prompt_text_alignment is not null) then
1545: --
1546: hr_utility.set_location(l_proc,40);
1547: --
1548: -- Must exist in hr_standard_lookups where lookup_type is
1549: -- PROMPT_TEXT_ALIGNMENTS
1550: --
1562: end if;
1563: --
1564: end if;
1565: --
1566: hr_utility.set_location('Leaving:'||l_proc, 100);
1567: End chk_prompt_text_alignment;
1568: --
1569: -- ----------------------------------------------------------------------------
1570: -- |--------------------------< chk_query_allowed >---------------------------|
1579: l_proc varchar2(72) := g_package || 'chk_query_allowed';
1580: l_api_updating boolean;
1581: --
1582: Begin
1583: hr_utility.set_location('Entering:'||l_proc, 10);
1584: --
1585: -- Check mandatory arguments have been set
1586: --
1587: hr_api.mandatory_arg_error
1593: l_api_updating := hr_itp_shd.api_updating
1594: (p_item_property_id => p_item_property_id
1595: ,p_object_version_number => p_object_version_number
1596: );
1597: hr_utility.set_location(l_proc,20);
1598: --
1599: -- Only proceed with SQL validation if absolutely necessary
1600: --
1601: if ( ( l_api_updating
1602: and nvl(hr_itp_shd.g_old_rec.query_allowed,hr_api.g_number) <>
1603: nvl(p_query_allowed,hr_api.g_number))
1604: or (NOT l_api_updating)) then
1605: --
1606: hr_utility.set_location(l_proc,30);
1607: --
1608: if (p_query_allowed is not null) then
1609: --
1610: hr_utility.set_location(l_proc,40);
1606: hr_utility.set_location(l_proc,30);
1607: --
1608: if (p_query_allowed is not null) then
1609: --
1610: hr_utility.set_location(l_proc,40);
1611: --
1612: -- Must exist in hr_standard_lookups where lookup_type is
1613: -- PROPERTY_TRUE_OR_FALSE
1614: --
1626: end if;
1627: --
1628: end if;
1629: --
1630: hr_utility.set_location('Leaving:'||l_proc, 100);
1631: End chk_query_allowed;
1632: --
1633: -- ----------------------------------------------------------------------------
1634: -- |-----------------------------< chk_required >-----------------------------|
1643: l_proc varchar2(72) := g_package || 'chk_required';
1644: l_api_updating boolean;
1645: --
1646: Begin
1647: hr_utility.set_location('Entering:'||l_proc, 10);
1648: --
1649: -- Check mandatory arguments have been set
1650: --
1651: hr_api.mandatory_arg_error
1657: l_api_updating := hr_itp_shd.api_updating
1658: (p_item_property_id => p_item_property_id
1659: ,p_object_version_number => p_object_version_number
1660: );
1661: hr_utility.set_location(l_proc,20);
1662: --
1663: -- Only proceed with SQL validation if absolutely necessary
1664: --
1665: if ( ( l_api_updating
1666: and nvl(hr_itp_shd.g_old_rec.required,hr_api.g_number) <>
1667: nvl(p_required,hr_api.g_number))
1668: or (NOT l_api_updating)) then
1669: --
1670: hr_utility.set_location(l_proc,30);
1671: --
1672: if (p_required is not null) then
1673: --
1674: hr_utility.set_location(l_proc,40);
1670: hr_utility.set_location(l_proc,30);
1671: --
1672: if (p_required is not null) then
1673: --
1674: hr_utility.set_location(l_proc,40);
1675: --
1676: -- Must exist in hr_standard_lookups where lookup_type is
1677: -- PROPERTY_TRUE_OR_FALSE
1678: --
1690: end if;
1691: --
1692: end if;
1693: --
1694: hr_utility.set_location('Leaving:'||l_proc, 100);
1695: End chk_required;
1696: --
1697: -- ----------------------------------------------------------------------------
1698: -- |--------------------------< chk_update_allowed >--------------------------|
1707: l_proc varchar2(72) := g_package || 'chk_update_allowed';
1708: l_api_updating boolean;
1709: --
1710: Begin
1711: hr_utility.set_location('Entering:'||l_proc, 10);
1712: --
1713: -- Check mandatory arguments have been set
1714: --
1715: hr_api.mandatory_arg_error
1721: l_api_updating := hr_itp_shd.api_updating
1722: (p_item_property_id => p_item_property_id
1723: ,p_object_version_number => p_object_version_number
1724: );
1725: hr_utility.set_location(l_proc,20);
1726: --
1727: -- Only proceed with SQL validation if absolutely necessary
1728: --
1729: if ( ( l_api_updating
1730: and nvl(hr_itp_shd.g_old_rec.update_allowed,hr_api.g_number) <>
1731: nvl(p_update_allowed,hr_api.g_number))
1732: or (NOT l_api_updating)) then
1733: --
1734: hr_utility.set_location(l_proc,30);
1735: --
1736: if (p_update_allowed is not null) then
1737: --
1738: hr_utility.set_location(l_proc,40);
1734: hr_utility.set_location(l_proc,30);
1735: --
1736: if (p_update_allowed is not null) then
1737: --
1738: hr_utility.set_location(l_proc,40);
1739: --
1740: -- Must exist in hr_standard_lookups where lookup_type is
1741: -- PROPERTY_TRUE_OR_FALSE
1742: --
1754: end if;
1755: --
1756: end if;
1757: --
1758: hr_utility.set_location('Leaving:'||l_proc, 100);
1759: End chk_update_allowed;
1760: --
1761: -- ----------------------------------------------------------------------------
1762: -- |----------------------< chk_validation_formula_id >-----------------------|
1779: l_api_updating boolean;
1780: l_formula_type_name varchar2(80);
1781: --
1782: Begin
1783: hr_utility.set_location('Entering:'||l_proc, 10);
1784: --
1785: l_api_updating := hr_itp_shd.api_updating
1786: (p_item_property_id => p_item_property_id
1787: ,p_object_version_number => p_object_version_number
1785: l_api_updating := hr_itp_shd.api_updating
1786: (p_item_property_id => p_item_property_id
1787: ,p_object_version_number => p_object_version_number
1788: );
1789: hr_utility.set_location(l_proc,20);
1790: --
1791: -- Only proceed with SQL validation if absolutely necessary
1792: --
1793: if ( ( l_api_updating
1822: end if;
1823: --
1824: end if;
1825: --
1826: hr_utility.set_location('Leaving:'||l_proc, 100);
1827: End chk_validation_formula_id;
1828: --
1829: -- ----------------------------------------------------------------------------
1830: -- |--------------------< chk_validation_param_item_ids >---------------------|
1843: l_proc varchar2(72) := g_package || 'chk_validation_param_item_ids';
1844: l_api_updating boolean;
1845: --
1846: Begin
1847: hr_utility.set_location('Entering:'||l_proc, 10);
1848: --
1849: -- Check item ids have only been specified if the formula has
1850: --
1851: if p_validation_formula_id is null then
1860: fnd_message.raise_error;
1861: end if;
1862: end if;
1863: --
1864: hr_utility.set_location('Leaving:'||l_proc, 100);
1865: End chk_validation_param_item_ids;
1866: --
1867: -- ----------------------------------------------------------------------------
1868: -- |-----------------------------< chk_visible >------------------------------|
1877: l_proc varchar2(72) := g_package || 'chk_visible';
1878: l_api_updating boolean;
1879: --
1880: Begin
1881: hr_utility.set_location('Entering:'||l_proc, 10);
1882: --
1883: -- Check mandatory arguments have been set
1884: --
1885: hr_api.mandatory_arg_error
1891: l_api_updating := hr_itp_shd.api_updating
1892: (p_item_property_id => p_item_property_id
1893: ,p_object_version_number => p_object_version_number
1894: );
1895: hr_utility.set_location(l_proc,20);
1896: --
1897: -- Only proceed with SQL validation if absolutely necessary
1898: --
1899: if ( ( l_api_updating
1900: and nvl(hr_itp_shd.g_old_rec.visible,hr_api.g_number) <>
1901: nvl(p_visible,hr_api.g_number))
1902: or (NOT l_api_updating)) then
1903: --
1904: hr_utility.set_location(l_proc,30);
1905: --
1906: if (p_visible is not null) then
1907: --
1908: hr_utility.set_location(l_proc,40);
1904: hr_utility.set_location(l_proc,30);
1905: --
1906: if (p_visible is not null) then
1907: --
1908: hr_utility.set_location(l_proc,40);
1909: --
1910: -- Must exist in hr_standard_lookups where lookup_type is
1911: -- PROPERTY_TRUE_OR_FALSE
1912: --
1924: end if;
1925: --
1926: end if;
1927: --
1928: hr_utility.set_location('Leaving:'||l_proc, 100);
1929: End chk_visible;
1930: --
1931: -- ----------------------------------------------------------------------------
1932: -- |------------------------------< chk_width >-------------------------------|
1940: l_proc varchar2(72) := g_package || 'chk_width';
1941: l_api_updating boolean;
1942: --
1943: Begin
1944: hr_utility.set_location('Entering:'||l_proc, 10);
1945: --
1946: -- Width must be greater than or equal to zero, if given
1947: --
1948: if (p_width is not null) then
1946: -- Width must be greater than or equal to zero, if given
1947: --
1948: if (p_width is not null) then
1949: --
1950: hr_utility.set_location(l_proc,30);
1951: --
1952: if (p_width < 0) then
1953: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1954: fnd_message.set_token('PROCEDURE', l_proc);
1957: end if;
1958: --
1959: end if;
1960: --
1961: hr_utility.set_location('Leaving:'||l_proc, 100);
1962: End chk_width;
1963: --
1964: -- ----------------------------------------------------------------------------
1965: -- |-----------------------------< chk_x_position >---------------------------|
1973: l_proc varchar2(72) := g_package || 'chk_x_position';
1974: l_api_updating boolean;
1975: --
1976: Begin
1977: hr_utility.set_location('Entering:'||l_proc, 10);
1978: --
1979: -- X position must be greater than or equal to zero,if given
1980: --
1981: if (p_x_position is not null) then
1979: -- X position must be greater than or equal to zero,if given
1980: --
1981: if (p_x_position is not null) then
1982: --
1983: hr_utility.set_location(l_proc,30);
1984: --
1985: if (p_x_position < 0) then
1986: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1987: fnd_message.set_token('PROCEDURE', l_proc);
1990: end if;
1991: --
1992: end if;
1993: --
1994: hr_utility.set_location('Leaving:'||l_proc, 100);
1995: End chk_x_position;
1996: --
1997: -- ----------------------------------------------------------------------------
1998: -- |-----------------------------< chk_y_position >---------------------------|
2006: l_proc varchar2(72) := g_package || 'chk_y_position';
2007: l_api_updating boolean;
2008: --
2009: Begin
2010: hr_utility.set_location('Entering:'||l_proc, 10);
2011: --
2012: -- Y position must be greater than or equal to zero, if given
2013: --
2014: if (p_y_position is not null) then
2012: -- Y position must be greater than or equal to zero, if given
2013: --
2014: if (p_y_position is not null) then
2015: --
2016: hr_utility.set_location(l_proc,30);
2017: --
2018: if (p_y_position < 0) then
2019: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2020: fnd_message.set_token('PROCEDURE', l_proc);
2023: end if;
2024: --
2025: end if;
2026: --
2027: hr_utility.set_location('Leaving:'||l_proc, 100);
2028: End chk_y_position;
2029: --
2030: -- ----------------------------------------------------------------------------
2031: -- |----------------------< chk_item_type_dependencies >----------------------|
2039: l_api_updating boolean;
2040: l_item_type varchar2(30);
2041: --
2042: Begin
2043: hr_utility.set_location('Entering:'||l_proc, 10);
2044: --
2045: l_item_type := return_item_type
2046: (p_form_item_id => p_rec.form_item_id
2047: ,p_template_item_id => p_rec.template_item_id
2046: (p_form_item_id => p_rec.form_item_id
2047: ,p_template_item_id => p_rec.template_item_id
2048: ,p_template_item_context_id => p_rec.template_item_context_id
2049: );
2050: hr_utility.set_location(l_proc,20);
2051: --
2052: if p_rec.alignment is not null then
2053: if l_item_type not in ('DISPLAY_ITEM','TEXT_ITEM') then
2054: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2056: fnd_message.set_token('STEP','10');
2057: fnd_message.raise_error;
2058: end if;
2059: end if;
2060: hr_utility.set_location(l_proc,30);
2061: --
2062: if p_rec.bevel is not null then
2063: if l_item_type not in ('CHART_ITEM','USER_AREA','IMAGE','TEXT_ITEM') then
2064: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2066: fnd_message.set_token('STEP','20');
2067: fnd_message.raise_error;
2068: end if;
2069: end if;
2070: hr_utility.set_location(l_proc,40);
2071: --
2072: if p_rec.case_restriction is not null then
2073: if l_item_type not in ('TEXT_ITEM') then
2074: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2076: fnd_message.set_token('STEP','30');
2077: fnd_message.raise_error;
2078: end if;
2079: end if;
2080: hr_utility.set_location(l_proc,50);
2081: --
2082: if p_rec.enabled is not null then
2083: if l_item_type not in ('BUTTON','CHECKBOX','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2084: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2086: fnd_message.set_token('STEP','40');
2087: fnd_message.raise_error;
2088: end if;
2089: end if;
2090: hr_utility.set_location(l_proc,60);
2091: --
2092: if p_rec.format_mask is not null then
2093: if l_item_type not in ('TEXT_ITEM') then
2094: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2096: fnd_message.set_token('STEP','50');
2097: fnd_message.raise_error;
2098: end if;
2099: end if;
2100: hr_utility.set_location(l_proc,70);
2101: --
2102: if p_rec.height is not null then
2103: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2104: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2106: fnd_message.set_token('STEP','53');
2107: fnd_message.raise_error;
2108: end if;
2109: end if;
2110: hr_utility.set_location(l_proc,73);
2111: --
2112: if p_rec.information_formula_id is not null then
2113: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2114: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2116: fnd_message.set_token('STEP','56');
2117: fnd_message.raise_error;
2118: end if;
2119: end if;
2120: hr_utility.set_location(l_proc,76);
2121: --
2122: if p_rec.insert_allowed is not null then
2123: if l_item_type not in ('CHECKBOX','IMAGE','LIST','RADIO_BUTTON','TEXT_ITEM') then
2124: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2126: fnd_message.set_token('STEP','60');
2127: fnd_message.raise_error;
2128: end if;
2129: end if;
2130: hr_utility.set_location(l_proc,80);
2131: --
2132: if p_rec.next_navigation_item_id is not null then
2133: if l_item_type not in ('BUTTON','CHECKBOX','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2134: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2136: fnd_message.set_token('STEP','61');
2137: fnd_message.raise_error;
2138: end if;
2139: end if;
2140: hr_utility.set_location(l_proc,81);
2141: --
2142: if p_rec.previous_navigation_item_id is not null then
2143: if l_item_type not in ('BUTTON','CHECKBOX','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2144: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2146: fnd_message.set_token('STEP','62');
2147: fnd_message.raise_error;
2148: end if;
2149: end if;
2150: hr_utility.set_location(l_proc,82);
2151: --
2152: if p_rec.prompt_alignment_offset is not null then
2153: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2154: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2156: fnd_message.set_token('STEP','63');
2157: fnd_message.raise_error;
2158: end if;
2159: end if;
2160: hr_utility.set_location(l_proc,83);
2161: --
2162: if p_rec.prompt_display_style is not null then
2163: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2164: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2166: fnd_message.set_token('STEP','64');
2167: fnd_message.raise_error;
2168: end if;
2169: end if;
2170: hr_utility.set_location(l_proc,84);
2171: --
2172: if p_rec.prompt_edge is not null then
2173: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2174: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2176: fnd_message.set_token('STEP','65');
2177: fnd_message.raise_error;
2178: end if;
2179: end if;
2180: hr_utility.set_location(l_proc,85);
2181: --
2182: if p_rec.prompt_edge_alignment is not null then
2183: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2184: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2186: fnd_message.set_token('STEP','66');
2187: fnd_message.raise_error;
2188: end if;
2189: end if;
2190: hr_utility.set_location(l_proc,86);
2191: --
2192: if p_rec.prompt_edge_offset is not null then
2193: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2194: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2196: fnd_message.set_token('STEP','67');
2197: fnd_message.raise_error;
2198: end if;
2199: end if;
2200: hr_utility.set_location(l_proc,87);
2201: --
2202: if p_rec.prompt_text_alignment is not null then
2203: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2204: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2206: fnd_message.set_token('STEP','68');
2207: fnd_message.raise_error;
2208: end if;
2209: end if;
2210: hr_utility.set_location(l_proc,88);
2211: --
2212: if p_rec.query_allowed is not null then
2213: if l_item_type not in ('CHECKBOX','DISPLAY_ITEM','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2214: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2216: fnd_message.set_token('STEP','70');
2217: fnd_message.raise_error;
2218: end if;
2219: end if;
2220: hr_utility.set_location(l_proc,90);
2221: --
2222: if p_rec.required is not null then
2223: if l_item_type not in ('CHECKBOX','LIST','TEXT_ITEM') then
2224: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2226: fnd_message.set_token('STEP','80');
2227: fnd_message.raise_error;
2228: end if;
2229: end if;
2230: hr_utility.set_location(l_proc,100);
2231: --
2232: if p_rec.update_allowed is not null then
2233: if l_item_type not in ('CHECKBOX','DISPLAY_ITEM','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2234: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2236: fnd_message.set_token('STEP','90');
2237: fnd_message.raise_error;
2238: end if;
2239: end if;
2240: hr_utility.set_location(l_proc,110);
2241: --
2242: if p_rec.validation_formula_id is not null then
2243: if l_item_type not in ('CHECKBOX','DISPLAY_ITEM','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2244: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2246: fnd_message.set_token('STEP','100');
2247: fnd_message.raise_error;
2248: end if;
2249: end if;
2250: hr_utility.set_location(l_proc,120);
2251: --
2252: if p_rec.visible is not null then
2253: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2254: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2256: fnd_message.set_token('STEP','110');
2257: fnd_message.raise_error;
2258: end if;
2259: end if;
2260: hr_utility.set_location(l_proc,130);
2261: --
2262: if p_rec.width is not null then
2263: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2264: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2266: fnd_message.set_token('STEP','120');
2267: fnd_message.raise_error;
2268: end if;
2269: end if;
2270: hr_utility.set_location(l_proc,140);
2271: --
2272: if p_rec.x_position is not null then
2273: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','SCROLLBAR','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2274: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2276: fnd_message.set_token('STEP','130');
2277: fnd_message.raise_error;
2278: end if;
2279: end if;
2280: hr_utility.set_location(l_proc,150);
2281: --
2282: if p_rec.y_position is not null then
2283: if l_item_type not in ('BUTTON','CHART_ITEM','CHECKBOX','DISPLAY_ITEM','IMAGE','LIST','OLE_OBJECT','RADIO_BUTTON','SCROLLBAR','TEXT_ITEM','USER_AREA','VBX_CONTROL') then
2284: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
2286: fnd_message.set_token('STEP','140');
2287: fnd_message.raise_error;
2288: end if;
2289: end if;
2290: hr_utility.set_location(l_proc,160);
2291: --
2292: hr_utility.set_location('Leaving:'||l_proc, 1000);
2293: End chk_item_type_dependencies;
2294: --
2288: end if;
2289: end if;
2290: hr_utility.set_location(l_proc,160);
2291: --
2292: hr_utility.set_location('Leaving:'||l_proc, 1000);
2293: End chk_item_type_dependencies;
2294: --
2295: -- ----------------------------------------------------------------------------
2296: -- |------------------------------< chk_delete >------------------------------|
2301: --
2302: l_proc varchar2(72) := g_package||'chk_delete';
2303: --
2304: Begin
2305: hr_utility.set_location('Entering:'||l_proc, 5);
2306: --
2307: -- No additional validation required
2308: --
2309: null;
2307: -- No additional validation required
2308: --
2309: null;
2310: --
2311: hr_utility.set_location(' Leaving:'||l_proc, 10);
2312: End chk_delete;
2313: --
2314: -- ----------------------------------------------------------------------------
2315: -- |---------------------------< insert_validate >----------------------------|
2321: --
2322: l_proc varchar2(72) := g_package||'insert_validate';
2323: --
2324: Begin
2325: hr_utility.set_location('Entering:'||l_proc, 5);
2326: --
2327: -- Call all supporting business operations
2328: -- No business group context. HR_STANDARD_LOOKUPS used for validation.
2329: --
2540: chk_ddf
2541: (p_rec => p_rec
2542: );
2543: --
2544: hr_utility.set_location(' Leaving:'||l_proc, 10);
2545: End insert_validate;
2546: --
2547: -- ----------------------------------------------------------------------------
2548: -- |---------------------------< update_validate >----------------------------|
2554: --
2555: l_proc varchar2(72) := g_package||'update_validate';
2556: --
2557: Begin
2558: hr_utility.set_location('Entering:'||l_proc, 5);
2559: --
2560: -- Call all supporting business operations
2561: -- No business group context. HR_STANDARD_LOOKUPS used for validation.
2562: --
2778: chk_ddf
2779: (p_rec => p_rec
2780: );
2781: --
2782: hr_utility.set_location(' Leaving:'||l_proc, 10);
2783: End update_validate;
2784: --
2785: -- ----------------------------------------------------------------------------
2786: -- |---------------------------< delete_validate >----------------------------|
2791: --
2792: l_proc varchar2(72) := g_package||'delete_validate';
2793: --
2794: Begin
2795: hr_utility.set_location('Entering:'||l_proc, 5);
2796: --
2797: -- Call all supporting business operations
2798: --
2799: chk_delete
2799: chk_delete
2800: (p_rec => p_rec
2801: );
2802: --
2803: hr_utility.set_location(' Leaving:'||l_proc, 10);
2804: End delete_validate;
2805: --
2806: end hr_itp_bus;