[Home] [Help]
40: l_api_updating boolean;
41: --
42: Begin
43: --
44: hr_utility.set_location('Entering:'||l_proc, 5);
45: --
46: l_api_updating := pqh_tct_shd.api_updating
47: (p_transaction_category_id => p_transaction_category_id,
48: p_object_version_number => p_object_version_number);
68: end if;
69: --
70: end if;
71: --
72: hr_utility.set_location('Leaving:'||l_proc, 10);
73: --
74: End chk_transaction_category_id;
75: --
76: -- ----------------------------------------------------------------------------
112: where a.table_route_id = p_consolidated_table_route_id;
113: --
114: Begin
115: --
116: hr_utility.set_location('Entering:'||l_proc,5);
117: --
118: l_api_updating := pqh_tct_shd.api_updating
119: (p_transaction_category_id => p_transaction_category_id,
120: p_object_version_number => p_object_version_number);
143: close c1;
144: --
145: end if;
146: --
147: hr_utility.set_location('Leaving:'||l_proc,10);
148: --
149: End chk_consolid_table_route_id;
150: --
151: -- ----------------------------------------------------------------------------
188: where a.table_route_id = p_master_table_route_id;
189: --
190: Begin
191: --
192: hr_utility.set_location('Entering:'||l_proc,5);
193: --
194: l_api_updating := pqh_tct_shd.api_updating
195: (p_transaction_category_id => p_transaction_category_id,
196: p_object_version_number => p_object_version_number);
221: close c1;
222: --
223: end if;
224: --
225: hr_utility.set_location('Leaving:'||l_proc,10);
226: --
227: End chk_master_table_route_id;
228: --
229: --
254: where a.organization_id = p_business_group_id;
255: --
256: Begin
257: --
258: hr_utility.set_location('Entering:'||l_proc,5);
259: --
260: l_api_updating := pqh_tct_shd.api_updating
261: (p_transaction_category_id => p_transaction_category_id,
262: p_object_version_number => p_object_version_number);
275: if c1%notfound then
276: --
277: close c1;
278: --
279: hr_utility.set_message(8302,'PQH_INVALID_BUSINESS_GROUP');
280: hr_utility.raise_error;
281: --
282: End if;
283: --
276: --
277: close c1;
278: --
279: hr_utility.set_message(8302,'PQH_INVALID_BUSINESS_GROUP');
280: hr_utility.raise_error;
281: --
282: End if;
283: --
284: Close c1;
284: Close c1;
285: --
286: end if;
287: --
288: hr_utility.set_location('Leaving:'||l_proc,10);
289: --
290: End chk_business_group_id;
291: --
292: -- ----------------------------------------------------------------------------
325: l_api_updating boolean;
326: --
327: Begin
328: --
329: hr_utility.set_location('Entering:'||l_proc, 5);
330: --
331: l_api_updating := pqh_tct_shd.api_updating
332: (p_transaction_category_id => p_transaction_category_id,
333: p_object_version_number => p_object_version_number);
346: p_effective_date => p_effective_date) then
347: --
348: -- raise error as does not exist as lookup
349: --
350: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
351: hr_utility.raise_error;
352: --
353: End if;
354: --
347: --
348: -- raise error as does not exist as lookup
349: --
350: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
351: hr_utility.raise_error;
352: --
353: End if;
354: --
355: End if;
354: --
355: End if;
356: --
357: --
358: hr_utility.set_location('Leaving:'||l_proc,10);
359: --
360: End chk_setup_type_cd;
361: --
362: --
395: l_api_updating boolean;
396: --
397: Begin
398: --
399: hr_utility.set_location('Entering:'||l_proc, 5);
400: --
401: l_api_updating := pqh_tct_shd.api_updating
402: (p_transaction_category_id => p_transaction_category_id,
403: p_object_version_number => p_object_version_number);
416: p_effective_date => p_effective_date) then
417: --
418: -- raise error as does not exist as lookup
419: --
420: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
421: hr_utility.raise_error;
422: --
423: end if;
424: --
417: --
418: -- raise error as does not exist as lookup
419: --
420: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
421: hr_utility.raise_error;
422: --
423: end if;
424: --
425: end if;
423: end if;
424: --
425: end if;
426: --
427: hr_utility.set_location('Leaving:'||l_proc,10);
428: --
429: end chk_route_validated_txn_flag;
430: --
431: -- ----------------------------------------------------------------------------
463: l_api_updating boolean;
464: --
465: Begin
466: --
467: hr_utility.set_location('Entering:'||l_proc, 5);
468: --
469: l_api_updating := pqh_tct_shd.api_updating
470: (p_transaction_category_id => p_transaction_category_id,
471: p_object_version_number => p_object_version_number);
485: p_effective_date => p_effective_date) then
486: --
487: -- raise error as does not exist as lookup
488: --
489: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
490: hr_utility.raise_error;
491: --
492: end if;
493: --
486: --
487: -- raise error as does not exist as lookup
488: --
489: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
490: hr_utility.raise_error;
491: --
492: end if;
493: --
494: end if;
492: end if;
493: --
494: end if;
495: --
496: hr_utility.set_location('Leaving:'||l_proc,10);
497: --
498: end chk_workflow_enable_flag;
499: --
500: -- ----------------------------------------------------------------------------
532: l_api_updating boolean;
533: --
534: Begin
535: --
536: hr_utility.set_location('Entering:'||l_proc, 5);
537: --
538: l_api_updating := pqh_tct_shd.api_updating
539: (p_transaction_category_id => p_transaction_category_id,
540: p_object_version_number => p_object_version_number);
554: p_effective_date => p_effective_date) then
555: --
556: -- raise error as does not exist as lookup
557: --
558: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
559: hr_utility.raise_error;
560: --
561: end if;
562: --
555: --
556: -- raise error as does not exist as lookup
557: --
558: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
559: hr_utility.raise_error;
560: --
561: end if;
562: --
563: end if;
561: end if;
562: --
563: end if;
564: --
565: hr_utility.set_location('Leaving:'||l_proc,10);
566: --
567: end chk_enable_flag;
568: --
569: -- ----------------------------------------------------------------------------
601: l_api_updating boolean;
602: --
603: Begin
604: --
605: hr_utility.set_location('Entering:'||l_proc, 5);
606: --
607: l_api_updating := pqh_tct_shd.api_updating
608: (p_transaction_category_id => p_transaction_category_id,
609: p_object_version_number => p_object_version_number);
622: p_effective_date => p_effective_date) then
623: --
624: -- raise error as does not exist as lookup
625: --
626: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
627: hr_utility.raise_error;
628: --
629: end if;
630: --
623: --
624: -- raise error as does not exist as lookup
625: --
626: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
627: hr_utility.raise_error;
628: --
629: end if;
630: --
631: end if;
629: end if;
630: --
631: end if;
632: --
633: hr_utility.set_location('Leaving:'||l_proc,10);
634: --
635: end chk_post_style_cd;
636: --
637: --
648: where a.transaction_category_id = p_transaction_category_id
649: and nvl(a.enable_flag,'N') = 'Y';
650: Begin
651: --
652: hr_utility.set_location('Entering:'||l_proc, 5);
653: --
654: Open c1;
655: --
656: Fetch c1 into l_dummy;
656: Fetch c1 into l_dummy;
657: if c1%found then
658: --
659: Close c1;
660: hr_utility.set_message(8302,'PQH_INVALID_MEMBER_CD_UPD');
661: hr_utility.raise_error;
662: --
663: End if;
664: Close c1;
657: if c1%found then
658: --
659: Close c1;
660: hr_utility.set_message(8302,'PQH_INVALID_MEMBER_CD_UPD');
661: hr_utility.raise_error;
662: --
663: End if;
664: Close c1;
665: --
662: --
663: End if;
664: Close c1;
665: --
666: hr_utility.set_location('Leaving:'||l_proc,10);
667: --
668: End chk_member_cd_upd_allowed;
669: --
670: -- ----------------------------------------------------------------------------
703: l_api_updating boolean;
704: --
705: Begin
706: --
707: hr_utility.set_location('Entering:'||l_proc, 5);
708: --
709: l_api_updating := pqh_tct_shd.api_updating
710: (p_transaction_category_id => p_transaction_category_id,
711: p_object_version_number => p_object_version_number);
724: p_effective_date => p_effective_date) then
725: --
726: -- raise error as does not exist as lookup
727: --
728: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
729: hr_utility.raise_error;
730: --
731: end if;
732: --
725: --
726: -- raise error as does not exist as lookup
727: --
728: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
729: hr_utility.raise_error;
730: --
731: end if;
732: --
733: End if;
745: --
746: End if;
747: ****/
748: --
749: hr_utility.set_location('Leaving:'||l_proc,10);
750: --
751: end chk_member_cd;
752: --
753: -- ----------------------------------------------------------------------------
785: l_api_updating boolean;
786: --
787: Begin
788: --
789: hr_utility.set_location('Entering:'||l_proc, 5);
790: --
791: l_api_updating := pqh_tct_shd.api_updating
792: (p_transaction_category_id => p_transaction_category_id,
793: p_object_version_number => p_object_version_number);
806: p_effective_date => p_effective_date) then
807: --
808: -- raise error as does not exist as lookup
809: --
810: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
811: hr_utility.raise_error;
812: --
813: end if;
814: --
807: --
808: -- raise error as does not exist as lookup
809: --
810: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
811: hr_utility.raise_error;
812: --
813: end if;
814: --
815: end if;
813: end if;
814: --
815: end if;
816: --
817: hr_utility.set_location('Leaving:'||l_proc,10);
818: --
819: end chk_future_action_cd;
820: --
821: -- ----------------------------------------------------------------------------
867: l_proc varchar2(72) := g_package||'chk_valid_routing_exists';
868: --
869: Begin
870: --
871: hr_utility.set_location('Entering:'||l_proc, 5);
872: --
873: -- Select the number of list identifiers.
874: --
875: Open csr_list_ident_defined;
938: get_routing_category_name
939: (p_routing_category_id =>l_routing_category_id,
940: p_routing_category_name=> l_list_name);
941: --
942: hr_utility.set_message(8302,'PQH_NO_RULES_IN_ROUTING_CAT');
943: hr_utility.set_message_token('LIST_NAME', l_list_name);
944: hr_utility.raise_error;
945: --
946: End if;
939: (p_routing_category_id =>l_routing_category_id,
940: p_routing_category_name=> l_list_name);
941: --
942: hr_utility.set_message(8302,'PQH_NO_RULES_IN_ROUTING_CAT');
943: hr_utility.set_message_token('LIST_NAME', l_list_name);
944: hr_utility.raise_error;
945: --
946: End if;
947: --
940: p_routing_category_name=> l_list_name);
941: --
942: hr_utility.set_message(8302,'PQH_NO_RULES_IN_ROUTING_CAT');
943: hr_utility.set_message_token('LIST_NAME', l_list_name);
944: hr_utility.raise_error;
945: --
946: End if;
947: --
948: End loop;
951: --
952: -- The transaction category must have at least one routing category though
953: --
954: If l_rec_count = 0 then
955: hr_utility.set_message(8302,'PQH_NO_ROUTING_CAT_IN_TCT');
956: hr_utility.raise_error;
957: End if;
958: --
959: -- Position and Supervisory hierarchy must have at least one member rule
952: -- The transaction category must have at least one routing category though
953: --
954: If l_rec_count = 0 then
955: hr_utility.set_message(8302,'PQH_NO_ROUTING_CAT_IN_TCT');
956: hr_utility.raise_error;
957: End if;
958: --
959: -- Position and Supervisory hierarchy must have at least one member rule
960: -- with approver flag set to 'Y'.
1008: get_routing_category_name
1009: (p_routing_category_id =>l_routing_category_id,
1010: p_routing_category_name=> l_list_name);
1011: --
1012: hr_utility.set_message(8302,'PQH_NO_MEM_RULE_IN_ROUT_CAT');
1013: hr_utility.set_message_token('LIST_NAME', l_list_name);
1014: hr_utility.raise_error;
1015: --
1016: End if;
1009: (p_routing_category_id =>l_routing_category_id,
1010: p_routing_category_name=> l_list_name);
1011: --
1012: hr_utility.set_message(8302,'PQH_NO_MEM_RULE_IN_ROUT_CAT');
1013: hr_utility.set_message_token('LIST_NAME', l_list_name);
1014: hr_utility.raise_error;
1015: --
1016: End if;
1017: --
1010: p_routing_category_name=> l_list_name);
1011: --
1012: hr_utility.set_message(8302,'PQH_NO_MEM_RULE_IN_ROUT_CAT');
1013: hr_utility.set_message_token('LIST_NAME', l_list_name);
1014: hr_utility.raise_error;
1015: --
1016: End if;
1017: --
1018: Close csr_auth2;
1023: --
1024: --
1025: End if;
1026: --
1027: hr_utility.set_location('Leaving:'||l_proc, 10);
1028: --
1029: End;
1030: --
1031: --
1046: RCT.position_structure_id = PPS.position_structure_id(+);
1047: --
1048: Begin
1049: --
1050: hr_utility.set_location('Entering:'||l_proc, 5);
1051: --
1052: --
1053: Open csr_routing_name(p_routing_category_id => p_routing_category_id);
1054: Fetch csr_routing_name into p_routing_category_name;
1053: Open csr_routing_name(p_routing_category_id => p_routing_category_id);
1054: Fetch csr_routing_name into p_routing_category_name;
1055: Close csr_routing_name;
1056: --
1057: hr_utility.set_location('Leaving:'||l_proc, 10);
1058: --
1059: End;
1060: --
1061: -- ----------------------------------------------------------------------------
1096: l_active_txn_exists_flag varchar2(1) := 'N';
1097: --
1098: Begin
1099: --
1100: hr_utility.set_location('Entering:'||l_proc, 5);
1101: --
1102: l_api_updating := pqh_tct_shd.api_updating
1103: (p_transaction_category_id => p_transaction_category_id,
1104: p_object_version_number => p_object_version_number);
1117: p_effective_date => p_effective_date) then
1118: --
1119: -- raise error as does not exist as lookup
1120: --
1121: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
1122: hr_utility.raise_error;
1123: --
1124: -- Check if there exists at least one routing category under
1125: -- the transaction category and if each routing category has
1118: --
1119: -- raise error as does not exist as lookup
1120: --
1121: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
1122: hr_utility.raise_error;
1123: --
1124: -- Check if there exists at least one routing category under
1125: -- the transaction category and if each routing category has
1126: -- at least one rule before freezing the category.
1168: (p_transaction_category_id => p_transaction_category_id);
1169: --
1170: If l_active_txn_exists_flag = 'Y' then
1171: --
1172: hr_utility.set_message(8302, 'PQH_CATEGORY_ROUT_HIST_EXISTS');
1173: hr_utility.raise_error;
1174: --
1175: End if;
1176: End if;
1169: --
1170: If l_active_txn_exists_flag = 'Y' then
1171: --
1172: hr_utility.set_message(8302, 'PQH_CATEGORY_ROUT_HIST_EXISTS');
1173: hr_utility.raise_error;
1174: --
1175: End if;
1176: End if;
1177: --
1211: --
1212: End if;
1213: ***/
1214: --
1215: hr_utility.set_location('Leaving:'||l_proc,10);
1216: --
1217: end chk_freeze_status_cd;
1218: --
1219: --------------------------------------------------------------------------------
1255: --
1256:
1257: Begin
1258: --
1259: hr_utility.set_location('Entering:'||l_proc, 5);
1260: --
1261: l_api_updating := pqh_tct_shd.api_updating
1262: (p_transaction_category_id => p_transaction_category_id,
1263: p_object_version_number => p_object_version_number);
1272: -- Disallow changing details of frozen category
1273: --
1274: if pqh_tct_shd.g_old_rec.freeze_status_cd = 'FREEZE_CATEGORY' then
1275: --
1276: hr_utility.set_message(8302,'PQH_NO_UPD_FROZEN_TCT');
1277: hr_utility.raise_error;
1278: --
1279: End if;
1280: --
1273: --
1274: if pqh_tct_shd.g_old_rec.freeze_status_cd = 'FREEZE_CATEGORY' then
1275: --
1276: hr_utility.set_message(8302,'PQH_NO_UPD_FROZEN_TCT');
1277: hr_utility.raise_error;
1278: --
1279: End if;
1280: --
1281: End if;
1280: --
1281: End if;
1282: --
1283: --
1284: hr_utility.set_location('Leaving:'||l_proc, 10);
1285: --
1286: End chk_upd_tct_allowed;
1287: --
1288: --
1319: --
1320: l_proc varchar2(72) := g_package||'chk_identifiers_count';
1321: --
1322: Begin
1323: hr_utility.set_location('Entering:'||l_proc, 5);
1324: --
1325: -- Check if there a maximum of p_max_list_identifiers
1326: --
1327: Open tot_list_identifiers;
1328: Fetch tot_list_identifiers into l_no_list_identifiers;
1329: Close tot_list_identifiers;
1330: --
1331: If l_no_list_identifiers > p_max_list_identifiers then
1332: hr_utility.set_message(8302, 'PQH_MAX_LIST_IDENTIFIERS');
1333: hr_utility.raise_error;
1334: end if;
1335: --
1336: -- Check if there a maximum of p_member_list_identifiers
1329: Close tot_list_identifiers;
1330: --
1331: If l_no_list_identifiers > p_max_list_identifiers then
1332: hr_utility.set_message(8302, 'PQH_MAX_LIST_IDENTIFIERS');
1333: hr_utility.raise_error;
1334: end if;
1335: --
1336: -- Check if there a maximum of p_member_list_identifiers
1337: -- There maybe no member identifiers at all.
1340: Fetch tot_member_identifiers into l_no_member_identifiers;
1341: Close tot_member_identifiers;
1342: --
1343: if l_no_member_identifiers > p_max_member_identifiers then
1344: hr_utility.set_message(8302, 'PQH_MAX_MEMBER_IDENTIFIERS');
1345: hr_utility.raise_error;
1346: end if;
1347:
1348: If ((p_routing_type = 'P' OR p_routing_type = 'S') AND
1341: Close tot_member_identifiers;
1342: --
1343: if l_no_member_identifiers > p_max_member_identifiers then
1344: hr_utility.set_message(8302, 'PQH_MAX_MEMBER_IDENTIFIERS');
1345: hr_utility.raise_error;
1346: end if;
1347:
1348: If ((p_routing_type = 'P' OR p_routing_type = 'S') AND
1349: l_no_member_identifiers < p_min_member_identifiers) then
1347:
1348: If ((p_routing_type = 'P' OR p_routing_type = 'S') AND
1349: l_no_member_identifiers < p_min_member_identifiers) then
1350: --
1351: hr_utility.set_message(8302, 'PQH_MIN_MEMBER_IDENTIFIERS');
1352: hr_utility.raise_error;
1353: --
1354: End if;
1355: --
1348: If ((p_routing_type = 'P' OR p_routing_type = 'S') AND
1349: l_no_member_identifiers < p_min_member_identifiers) then
1350: --
1351: hr_utility.set_message(8302, 'PQH_MIN_MEMBER_IDENTIFIERS');
1352: hr_utility.raise_error;
1353: --
1354: End if;
1355: --
1356: hr_utility.set_location('Leaving:'||l_proc, 10);
1352: hr_utility.raise_error;
1353: --
1354: End if;
1355: --
1356: hr_utility.set_location('Leaving:'||l_proc, 10);
1357: --
1358: End;
1359: --
1360: --
1370: l_proc varchar2(72) := g_package||'chk_act_txn_exists';
1371: --
1372: Begin
1373: --
1374: hr_utility.set_location('Entering:'||l_proc, 5);
1375: --
1376: if p_short_name ='BUDGET_WORKSHEET' then
1377: select 'Y'
1378: into l_dummy
1396: where wf_transaction_category_id = p_transaction_category_id
1397: and transaction_status not in ('REJECT','TERMINATE','APPLIED'));
1398: end if;
1399: --
1400: hr_utility.set_location('Leaving with:'||l_dummy,20);
1401: hr_utility.set_location('Leaving:'||l_proc,30);
1402: --
1403: RETURN l_dummy;
1404: --
1397: and transaction_status not in ('REJECT','TERMINATE','APPLIED'));
1398: end if;
1399: --
1400: hr_utility.set_location('Leaving with:'||l_dummy,20);
1401: hr_utility.set_location('Leaving:'||l_proc,30);
1402: --
1403: RETURN l_dummy;
1404: --
1405: exception
1422: l_short_name pqh_transaction_categories.short_name%type;
1423: --
1424: Begin
1425: --
1426: hr_utility.set_location('Entering:'||l_proc, 5);
1427: --
1428: Select short_name
1429: into l_short_name
1430: From pqh_transaction_categories
1433: if l_short_name is not null then
1434: l_dummy := chk_active_transaction_exists(p_short_name => l_short_name,
1435: p_transaction_category_id => p_transaction_category_id);
1436: end if;
1437: hr_utility.set_location('Entering:'||l_proc, 5);
1438: return l_dummy;
1439: End chk_active_transaction_exists;
1440: --
1441: --
1465: l_proc varchar2(72) := g_package||'chk_active_transaction_exists';
1466: --
1467: Begin
1468: --
1469: hr_utility.set_location('Entering:'||l_proc, 5);
1470: --
1471: Open c1;
1472: --
1473: -- Fetch the from clause for the transaction category id.
1536: End;
1537: --
1538: End if;
1539: --
1540: hr_utility.set_location('Leaving:'||l_proc,10);
1541: --
1542: RETURN 'N';
1543: --
1544: End chk_active_transaction_exists;
1553: --
1554: l_proc varchar2(72) := g_package||'insert_validate';
1555: --
1556: Begin
1557: hr_utility.set_location('Entering:'||l_proc, 5);
1558: --
1559: -- Call all supporting business operations
1560: --
1561: chk_transaction_category_id
1633: p_object_version_number => p_rec.object_version_number);
1634: --
1635: --
1636: --
1637: hr_utility.set_location(' Leaving:'||l_proc, 10);
1638: End insert_validate;
1639: --
1640: -- ----------------------------------------------------------------------------
1641: -- |---------------------------< update_validate >----------------------------|
1645: --
1646: l_proc varchar2(72) := g_package||'update_validate';
1647: --
1648: Begin
1649: hr_utility.set_location('Entering:'||l_proc, 5);
1650: --
1651: -- Call all supporting business operations
1652: --
1653: chk_transaction_category_id
1724: p_business_group_id => p_rec.business_group_id,
1725: p_object_version_number => p_rec.object_version_number);
1726: --
1727: --
1728: hr_utility.set_location(' Leaving:'||l_proc, 10);
1729: --
1730: End update_validate;
1731: --
1732: -- ----------------------------------------------------------------------------
1737: --
1738: l_proc varchar2(72) := g_package||'delete_validate';
1739: --
1740: Begin
1741: hr_utility.set_location('Entering:'||l_proc, 5);
1742: --
1743: -- Call all supporting business operations
1744: --
1745: hr_utility.set_location(' Leaving:'||l_proc, 10);
1741: hr_utility.set_location('Entering:'||l_proc, 5);
1742: --
1743: -- Call all supporting business operations
1744: --
1745: hr_utility.set_location(' Leaving:'||l_proc, 10);
1746: End delete_validate;
1747: --
1748: end pqh_tct_bus;