[Home] [Help]
41: l_api_updating boolean;
42: --
43: Begin
44: --
45: hr_utility.set_location('Entering:'||l_proc, 5);
46: --
47: l_api_updating := pqh_rct_shd.api_updating
48: (p_routing_category_id => p_routing_category_id,
49: p_object_version_number => p_object_version_number);
69: end if;
70: --
71: end if;
72: --
73: hr_utility.set_location('Leaving:'||l_proc, 10);
74: --
75: End chk_routing_category_id;
76: --
77: --
115: where a.transaction_category_id = p_transaction_category_id;
116: --
117: Begin
118: --
119: hr_utility.set_location('Entering:'||l_proc,5);
120: --
121: l_api_updating := pqh_rct_shd.api_updating
122: (p_routing_category_id => p_routing_category_id,
123: p_object_version_number => p_object_version_number);
148: --
149: --
150: End if;
151: --
152: hr_utility.set_location('Leaving:'||l_proc,10);
153: --
154: End chk_transaction_category_id;
155: --
156: --
195: l_api_updating boolean;
196: --
197: Begin
198: --
199: hr_utility.set_location('Entering:'||l_proc, 5);
200: --
201: l_api_updating := pqh_rct_shd.api_updating
202: (p_routing_category_id => p_routing_category_id,
203: p_object_version_number => p_object_version_number);
216: p_effective_date => p_effective_date) then
217: --
218: -- raise error as does not exist as lookup
219: --
220: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
221: hr_utility.raise_error;
222: --
223: end if;
224: --
217: --
218: -- raise error as does not exist as lookup
219: --
220: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
221: hr_utility.raise_error;
222: --
223: end if;
224: --
225: End if;
233: p_enable_flag = 'Y' and
234: p_enable_flag <> nvl(pqh_rct_shd.g_old_rec.enable_flag,hr_api.g_varchar2)
235: then
236: --
237: hr_utility.set_location('Enable allow :'||l_proc,8);
238: --
239: l_error_code := pqh_ATTRIBUTE_RANGES_pkg.chk_enable_routing_category
240: (p_transaction_category_id => p_transaction_category_id,
241: p_routing_category_id => p_routing_category_id,
245: );
246: --
247: If l_error_code = 1 then
248: --
249: hr_utility.set_message(8302,'PQH_CANNOT_ENABLE_ROUTING_CAT');
250: hr_utility.set_message_token('RANGE_NAME',l_overlap_range_name);
251: hr_utility.set_message_token('ERR_RANGE',l_error_range_name);
252: hr_utility.set_message_token('ERR_ROUTING',l_error_routing_category);
253: hr_utility.raise_error;
246: --
247: If l_error_code = 1 then
248: --
249: hr_utility.set_message(8302,'PQH_CANNOT_ENABLE_ROUTING_CAT');
250: hr_utility.set_message_token('RANGE_NAME',l_overlap_range_name);
251: hr_utility.set_message_token('ERR_RANGE',l_error_range_name);
252: hr_utility.set_message_token('ERR_ROUTING',l_error_routing_category);
253: hr_utility.raise_error;
254: --
247: If l_error_code = 1 then
248: --
249: hr_utility.set_message(8302,'PQH_CANNOT_ENABLE_ROUTING_CAT');
250: hr_utility.set_message_token('RANGE_NAME',l_overlap_range_name);
251: hr_utility.set_message_token('ERR_RANGE',l_error_range_name);
252: hr_utility.set_message_token('ERR_ROUTING',l_error_routing_category);
253: hr_utility.raise_error;
254: --
255: End if;
248: --
249: hr_utility.set_message(8302,'PQH_CANNOT_ENABLE_ROUTING_CAT');
250: hr_utility.set_message_token('RANGE_NAME',l_overlap_range_name);
251: hr_utility.set_message_token('ERR_RANGE',l_error_range_name);
252: hr_utility.set_message_token('ERR_ROUTING',l_error_routing_category);
253: hr_utility.raise_error;
254: --
255: End if;
256: --
249: hr_utility.set_message(8302,'PQH_CANNOT_ENABLE_ROUTING_CAT');
250: hr_utility.set_message_token('RANGE_NAME',l_overlap_range_name);
251: hr_utility.set_message_token('ERR_RANGE',l_error_range_name);
252: hr_utility.set_message_token('ERR_ROUTING',l_error_routing_category);
253: hr_utility.raise_error;
254: --
255: End if;
256: --
257: hr_utility.set_location('Allowed:'||l_proc,9);
253: hr_utility.raise_error;
254: --
255: End if;
256: --
257: hr_utility.set_location('Allowed:'||l_proc,9);
258: --
259: End if;
260: --
261: **/
258: --
259: End if;
260: --
261: **/
262: hr_utility.set_location('Leaving:'||l_proc,10);
263: --
264: end chk_enable_flag;
265: --
266: -- ----------------------------------------------------------------------------
299: l_api_updating boolean;
300: --
301: Begin
302: --
303: hr_utility.set_location('Entering:'||l_proc, 5);
304: --
305: l_api_updating := pqh_rct_shd.api_updating
306: (p_routing_category_id => p_routing_category_id,
307: p_object_version_number => p_object_version_number);
320: p_effective_date => p_effective_date) then
321: --
322: -- raise error as does not exist as lookup
323: --
324: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
325: hr_utility.raise_error;
326: --
327: end if;
328: --
321: --
322: -- raise error as does not exist as lookup
323: --
324: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
325: hr_utility.raise_error;
326: --
327: end if;
328: --
329: End if;
328: --
329: End if;
330: --
331: --
332: hr_utility.set_location('Leaving:'||l_proc,10);
333: --
334: end chk_default_flag;
335: --
336: -- ----------------------------------------------------------------------------
369: l_api_updating boolean;
370: --
371: Begin
372: --
373: hr_utility.set_location('Entering:'||l_proc, 5);
374: --
375: l_api_updating := pqh_rct_shd.api_updating
376: (p_routing_category_id => p_routing_category_id,
377: p_object_version_number => p_object_version_number);
390: p_effective_date => p_effective_date) then
391: --
392: -- raise error as does not exist as lookup
393: --
394: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
395: hr_utility.raise_error;
396: --
397: end if;
398: --
391: --
392: -- raise error as does not exist as lookup
393: --
394: hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
395: hr_utility.raise_error;
396: --
397: end if;
398: --
399: End if;
398: --
399: End if;
400: --
401: --
402: hr_utility.set_location('Leaving:'||l_proc,10);
403: --
404: end chk_delete_flag;
405: --
406: ---------------------------------------------------------------------------
428: where a.transaction_category_id = p_transaction_category_id;
429: --
430: Begin
431: --
432: hr_utility.set_location('Entering:'||l_proc,5);
433: --
434: l_api_updating := pqh_rct_shd.api_updating
435: (p_routing_category_id => p_routing_category_id,
436: p_object_version_number => p_object_version_number);
443: <> nvl(pqh_rct_shd.g_old_rec.transaction_category_id,hr_api.g_number)) then
444: --
445: -- Cannot update the transaction category id
446: --
447: hr_utility.set_message(8302,'PQH_NO_UPD_TRAN_CAT_OF_RCAT');
448: hr_utility.raise_error;
449: --
450: End if;
451:
444: --
445: -- Cannot update the transaction category id
446: --
447: hr_utility.set_message(8302,'PQH_NO_UPD_TRAN_CAT_OF_RCAT');
448: hr_utility.raise_error;
449: --
450: End if;
451:
452: --
474: if l_api_updating then
475: --
476: If nvl(pqh_rct_shd.g_old_rec.enable_flag,'Y') = 'Y' then
477: --
478: hr_utility.set_message(8302,'PQH_NO_RCT_UPD_FROZEN_TCT');
479: hr_utility.raise_error;
480: --
481: End if;
482: --
475: --
476: If nvl(pqh_rct_shd.g_old_rec.enable_flag,'Y') = 'Y' then
477: --
478: hr_utility.set_message(8302,'PQH_NO_RCT_UPD_FROZEN_TCT');
479: hr_utility.raise_error;
480: --
481: End if;
482: --
483: Else
481: End if;
482: --
483: Else
484: --
485: hr_utility.set_message(8302,'PQH_NO_RCT_INS_FROZEN_TCT');
486: hr_utility.raise_error;
487: --
488: End if;
489:
482: --
483: Else
484: --
485: hr_utility.set_message(8302,'PQH_NO_RCT_INS_FROZEN_TCT');
486: hr_utility.raise_error;
487: --
488: End if;
489:
490: /**
499: if l_api_updating AND
500: nvl(p_enable_flag,hr_api.g_varchar2)
501: = nvl(pqh_rct_shd.g_old_rec.enable_flag,hr_api.g_varchar2) then
502: --
503: hr_utility.set_message(8302,'PQH_NO_UPDATE_ROUT_CAT');
504: hr_utility.raise_error;
505: --
506: End if;
507: --
500: nvl(p_enable_flag,hr_api.g_varchar2)
501: = nvl(pqh_rct_shd.g_old_rec.enable_flag,hr_api.g_varchar2) then
502: --
503: hr_utility.set_message(8302,'PQH_NO_UPDATE_ROUT_CAT');
504: hr_utility.raise_error;
505: --
506: End if;
507: --
508: -- Disallow any inserts when the transaction category is in unfrozen
509: -- state
510: --
511: If not l_api_updating then
512: --
513: hr_utility.set_message(8302,'PQH_NO_INSERT_ROUT_CAT');
514: hr_utility.raise_error;
515: --
516: End if;
517: --
510: --
511: If not l_api_updating then
512: --
513: hr_utility.set_message(8302,'PQH_NO_INSERT_ROUT_CAT');
514: hr_utility.raise_error;
515: --
516: End if;
517: --
518: **/
517: --
518: **/
519: End if;
520: --
521: hr_utility.set_location('Leaving:'||l_proc,10);
522: --
523: End chk_ins_upd_routing_category;
524: --
525: --
571: where routing_category_id = p_routing_category_id;
572:
573: Begin
574: --
575: hr_utility.set_location('Entering:'||l_proc,5);
576: --
577: l_api_updating := pqh_rct_shd.api_updating
578: (p_routing_category_id => p_routing_category_id,
579: p_object_version_number => p_object_version_number);
590: --
591: -- Raise error if the routing list id is null
592: --
593: if p_routing_list_id IS NULL then
594: hr_utility.set_message(8302,'PQH_ROUTING_LIST_ID_IS_NULL');
595: hr_utility.raise_error;
596: Else
597: if (l_api_updating AND
598: nvl(p_routing_list_id,hr_api.g_number)
591: -- Raise error if the routing list id is null
592: --
593: if p_routing_list_id IS NULL then
594: hr_utility.set_message(8302,'PQH_ROUTING_LIST_ID_IS_NULL');
595: hr_utility.raise_error;
596: Else
597: if (l_api_updating AND
598: nvl(p_routing_list_id,hr_api.g_number)
599: <> nvl(pqh_rct_shd.g_old_rec.routing_list_id,hr_api.g_number)) then
603: open c2;
604: Fetch c2 into l_dummy;
605: if c2%found then
606: close c2;
607: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
608: hr_utility.raise_error;
609: End if;
610: close c2;
611: --
604: Fetch c2 into l_dummy;
605: if c2%found then
606: close c2;
607: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
608: hr_utility.raise_error;
609: End if;
610: close c2;
611: --
612: End if;
614: --
615: -- Raise Error if position structure id is not null
616: --
617: if p_position_structure_id IS NOT NULL then
618: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
619: hr_utility.raise_error;
620: End if;
621: --
622: Elsif l_member_cd = 'P' then
615: -- Raise Error if position structure id is not null
616: --
617: if p_position_structure_id IS NOT NULL then
618: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
619: hr_utility.raise_error;
620: End if;
621: --
622: Elsif l_member_cd = 'P' then
623: if p_position_structure_id IS NULL then
620: End if;
621: --
622: Elsif l_member_cd = 'P' then
623: if p_position_structure_id IS NULL then
624: hr_utility.set_message(8302,'PQH_POS_STRUCT_ID_IS_NULL');
625: hr_utility.raise_error;
626: Else
627: if (l_api_updating AND
628: nvl(p_position_structure_id,hr_api.g_number)
621: --
622: Elsif l_member_cd = 'P' then
623: if p_position_structure_id IS NULL then
624: hr_utility.set_message(8302,'PQH_POS_STRUCT_ID_IS_NULL');
625: hr_utility.raise_error;
626: Else
627: if (l_api_updating AND
628: nvl(p_position_structure_id,hr_api.g_number)
629: <> nvl(pqh_rct_shd.g_old_rec.position_structure_id,hr_api.g_number)) then
633: open c2;
634: Fetch c2 into l_dummy;
635: if c2%found then
636: close c2;
637: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
638: hr_utility.raise_error;
639: End if;
640: close c2;
641: --
634: Fetch c2 into l_dummy;
635: if c2%found then
636: close c2;
637: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
638: hr_utility.raise_error;
639: End if;
640: close c2;
641: --
642: End if;
644: --
645: -- Raise Error if routing list id is not null
646: --
647: if p_routing_list_id IS NOT NULL then
648: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
649: hr_utility.raise_error;
650: End if;
651: --
652: Else
645: -- Raise Error if routing list id is not null
646: --
647: if p_routing_list_id IS NOT NULL then
648: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
649: hr_utility.raise_error;
650: End if;
651: --
652: Else
653: if p_routing_list_id IS NOT NULL or p_position_structure_id IS NOT NULL then
650: End if;
651: --
652: Else
653: if p_routing_list_id IS NOT NULL or p_position_structure_id IS NOT NULL then
654: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
655: hr_utility.raise_error;
656: End if;
657: End if;
658: --
651: --
652: Else
653: if p_routing_list_id IS NOT NULL or p_position_structure_id IS NOT NULL then
654: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
655: hr_utility.raise_error;
656: End if;
657: End if;
658: --
659: **/
668: open c2;
669: Fetch c2 into l_dummy;
670: if c2%found then
671: close c2;
672: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
673: hr_utility.raise_error;
674: End if;
675: close c2;
676: --
669: Fetch c2 into l_dummy;
670: if c2%found then
671: close c2;
672: hr_utility.set_message(8302,'PQH_CANNOT_UPD_LIST_ID');
673: hr_utility.raise_error;
674: End if;
675: close c2;
676: --
677: End if;
689: --
690: if l_member_cd = 'R' then
691: --
692: If p_routing_list_id IS NULL then
693: hr_utility.set_message(8302,'PQH_ROUTING_LIST_ID_IS_NULL');
694: hr_utility.raise_error;
695: End if;
696: --
697: if p_position_structure_id IS NOT NULL then
690: if l_member_cd = 'R' then
691: --
692: If p_routing_list_id IS NULL then
693: hr_utility.set_message(8302,'PQH_ROUTING_LIST_ID_IS_NULL');
694: hr_utility.raise_error;
695: End if;
696: --
697: if p_position_structure_id IS NOT NULL then
698: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
694: hr_utility.raise_error;
695: End if;
696: --
697: if p_position_structure_id IS NOT NULL then
698: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
699: hr_utility.raise_error;
700: End if;
701: --
702: Elsif l_member_cd = 'P' then
695: End if;
696: --
697: if p_position_structure_id IS NOT NULL then
698: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
699: hr_utility.raise_error;
700: End if;
701: --
702: Elsif l_member_cd = 'P' then
703: If p_position_structure_id IS NULL then
701: --
702: Elsif l_member_cd = 'P' then
703: If p_position_structure_id IS NULL then
704: --
705: hr_utility.set_message(8302,'PQH_POS_STRUCT_ID_IS_NULL');
706: hr_utility.raise_error;
707: --
708: End if;
709: --
702: Elsif l_member_cd = 'P' then
703: If p_position_structure_id IS NULL then
704: --
705: hr_utility.set_message(8302,'PQH_POS_STRUCT_ID_IS_NULL');
706: hr_utility.raise_error;
707: --
708: End if;
709: --
710: if p_routing_list_id IS NOT NULL then
707: --
708: End if;
709: --
710: if p_routing_list_id IS NOT NULL then
711: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
712: hr_utility.raise_error;
713: End if;
714: Else
715: if p_routing_list_id IS NOT NULL or
708: End if;
709: --
710: if p_routing_list_id IS NOT NULL then
711: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
712: hr_utility.raise_error;
713: End if;
714: Else
715: if p_routing_list_id IS NOT NULL or
716: p_position_structure_id IS NOT NULL then
714: Else
715: if p_routing_list_id IS NOT NULL or
716: p_position_structure_id IS NOT NULL then
717: --
718: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
719: hr_utility.raise_error;
720: --
721: End if;
722: --
715: if p_routing_list_id IS NOT NULL or
716: p_position_structure_id IS NOT NULL then
717: --
718: hr_utility.set_message(8302,'PQH_LIST_ID_NOT_MATCH_MEM_CD');
719: hr_utility.raise_error;
720: --
721: End if;
722: --
723: End if;
723: End if;
724: --
725: End if;
726: --
727: hr_utility.set_location('Leaving:'||l_proc,10);
728: --
729: End chk_list_id;
730: --
731: --
770: where a.routing_list_id = p_routing_list_id;
771: --
772: Begin
773: --
774: hr_utility.set_location('Entering:'||l_proc,5);
775: --
776: l_api_updating := pqh_rct_shd.api_updating
777: (p_routing_category_id => p_routing_category_id,
778: p_object_version_number => p_object_version_number);
804: -- Check if the Routing List is enabled .
805: --
806: if nvl(l_enable_flag,'N') = 'N' then
807: --
808: hr_utility.set_message(8302,'PQH_ROUTING_LIST_NOT_ENABLED');
809: hr_utility.raise_error;
810: --
811: End if;
812: --
805: --
806: if nvl(l_enable_flag,'N') = 'N' then
807: --
808: hr_utility.set_message(8302,'PQH_ROUTING_LIST_NOT_ENABLED');
809: hr_utility.raise_error;
810: --
811: End if;
812: --
813: end if;
811: End if;
812: --
813: end if;
814: --
815: hr_utility.set_location('Leaving:'||l_proc,10);
816: --
817: End chk_routing_list_id;
818: --
819: -- ----------------------------------------------------------------------------
856: where a.role_id = p_override_role_id;
857: --
858: Begin
859: --
860: hr_utility.set_location('Entering:'||l_proc,5);
861: --
862: l_api_updating := pqh_rct_shd.api_updating
863: (p_routing_category_id => p_routing_category_id,
864: p_object_version_number => p_object_version_number);
881: --
882: -- raise error as FK does not relate to PK in pqh_routing_list_members
883: -- table.
884: --
885: hr_utility.set_message(8302,'PQH_INVALID_OVERRIDE_ROLE');
886: hr_utility.raise_error;
887: --
888: end if;
889: --
882: -- raise error as FK does not relate to PK in pqh_routing_list_members
883: -- table.
884: --
885: hr_utility.set_message(8302,'PQH_INVALID_OVERRIDE_ROLE');
886: hr_utility.raise_error;
887: --
888: end if;
889: --
890: close c1;
893: -- Check if the override member is a enabled member.
894: --
895: if nvl(l_enable_flag,'N') <> 'Y' then
896: --
897: hr_utility.set_message(8302,'PQH_OVERRIDE_ROLE_NOT_ENABLED');
898: hr_utility.raise_error;
899: --
900: End if;
901: --
894: --
895: if nvl(l_enable_flag,'N') <> 'Y' then
896: --
897: hr_utility.set_message(8302,'PQH_OVERRIDE_ROLE_NOT_ENABLED');
898: hr_utility.raise_error;
899: --
900: End if;
901: --
902: end if;
901: --
902: end if;
903: --
904: --
905: hr_utility.set_location('Leaving:'||l_proc,10);
906: --
907: End chk_override_role_id;
908: --
909: -- ----------------------------------------------------------------------------
952: Where user_id = p_override_user_id
953: and role_id = p_override_role_id;
954: Begin
955: --
956: hr_utility.set_location('Entering:'||l_proc,5);
957: --
958: l_api_updating := pqh_rct_shd.api_updating
959: (p_routing_category_id => p_routing_category_id,
960: p_object_version_number => p_object_version_number);
977: --
978: -- raise error as FK does not relate to PK in pqh_routing_list_members
979: -- table.
980: --
981: hr_utility.set_message(8302,'PQH_INVALID_OVERRIDE_USER');
982: hr_utility.raise_error;
983: --
984: end if;
985: --
978: -- raise error as FK does not relate to PK in pqh_routing_list_members
979: -- table.
980: --
981: hr_utility.set_message(8302,'PQH_INVALID_OVERRIDE_USER');
982: hr_utility.raise_error;
983: --
984: end if;
985: --
986: close c1;
992: If p_override_role_id IS NULL then
993: --
994: -- Should not be able to enter user without entering override role.
995: --
996: hr_utility.set_message(8302,'PQH_NO_OVERRIDE_ROLE_FOR_USER');
997: hr_utility.raise_error;
998: --
999: Else
1000: --
993: --
994: -- Should not be able to enter user without entering override role.
995: --
996: hr_utility.set_message(8302,'PQH_NO_OVERRIDE_ROLE_FOR_USER');
997: hr_utility.raise_error;
998: --
999: Else
1000: --
1001: -- Check if user belongs to the override role specified.
1008: close c2;
1009: --
1010: -- raise error
1011: --
1012: hr_utility.set_message(8302,'PQH_USER_NOT_IN_OVERRIDE_ROLE');
1013: hr_utility.raise_error;
1014: --
1015: end if;
1016: --
1009: --
1010: -- raise error
1011: --
1012: hr_utility.set_message(8302,'PQH_USER_NOT_IN_OVERRIDE_ROLE');
1013: hr_utility.raise_error;
1014: --
1015: end if;
1016: --
1017: close c2;
1020: --
1021: End if;
1022: --
1023: --
1024: hr_utility.set_location('Leaving:'||l_proc,10);
1025: --
1026: End chk_override_user_id;
1027: --
1028: -- ----------------------------------------------------------------------------
1064: where a.position_structure_id = p_position_structure_id;
1065: --
1066: Begin
1067: --
1068: hr_utility.set_location('Entering:'||l_proc,5);
1069: --
1070: l_api_updating := pqh_rct_shd.api_updating
1071: (p_routing_category_id => p_routing_category_id,
1072: p_object_version_number => p_object_version_number);
1096: close c1;
1097: --
1098: end if;
1099: --
1100: hr_utility.set_location('Leaving:'||l_proc,10);
1101: --
1102: End chk_position_structure_id;
1103: --
1104: -- ----------------------------------------------------------------------------
1153: **/
1154: --
1155: Begin
1156: --
1157: hr_utility.set_location('Entering:'||l_proc,5);
1158: --
1159: l_api_updating := pqh_rct_shd.api_updating
1160: (p_routing_category_id => p_routing_category_id,
1161: p_object_version_number => p_object_version_number);
1203: --
1204: -- raise error
1205: --
1206: close csr_pos_in_pos_hier;
1207: hr_utility.set_message(8302,'PQH_POS_NOT_IN_POS_HIER');
1208: hr_utility.raise_error;
1209: --
1210: end if;
1211: --
1204: -- raise error
1205: --
1206: close csr_pos_in_pos_hier;
1207: hr_utility.set_message(8302,'PQH_POS_NOT_IN_POS_HIER');
1208: hr_utility.raise_error;
1209: --
1210: end if;
1211: --
1212: Close csr_pos_in_pos_hier;
1213: --
1214: End if;
1215: --
1216: **/
1217: hr_utility.set_location('Leaving:'||l_proc,10);
1218: --
1219: End chk_override_position_id;
1220: --
1221: --------------------------------------------------------------------------
1262: --
1263: Begin
1264: --
1265: --
1266: hr_utility.set_location('Entering:'||l_proc,10);
1267: --
1268: -- We need to do the below validations , only if we are trying to create
1269: -- a non-default routing category.
1270: --
1342: Close csr_univ_routing;
1343: --
1344: If l_prev_range_name IS NULL then
1345: --
1346: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1347: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1348: hr_utility.raise_error;
1349: --
1350: Else
1343: --
1344: If l_prev_range_name IS NULL then
1345: --
1346: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1347: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1348: hr_utility.raise_error;
1349: --
1350: Else
1351: --
1344: If l_prev_range_name IS NULL then
1345: --
1346: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1347: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1348: hr_utility.raise_error;
1349: --
1350: Else
1351: --
1352: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1348: hr_utility.raise_error;
1349: --
1350: Else
1351: --
1352: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1353: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1354: hr_utility.raise_error;
1355: --
1356: End if;
1349: --
1350: Else
1351: --
1352: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1353: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1354: hr_utility.raise_error;
1355: --
1356: End if;
1357: --
1350: Else
1351: --
1352: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1353: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1354: hr_utility.raise_error;
1355: --
1356: End if;
1357: --
1358: End if;
1386: If null_rule_flag = 'Y' then
1387: --
1388: If l_prev_range_name IS NULL then
1389: --
1390: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1391: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1392: hr_utility.raise_error;
1393: --
1394: Else
1387: --
1388: If l_prev_range_name IS NULL then
1389: --
1390: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1391: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1392: hr_utility.raise_error;
1393: --
1394: Else
1395: --
1388: If l_prev_range_name IS NULL then
1389: --
1390: hr_utility.set_message(8302,'PQH_RCT_WITH_NO_RULE_EXISTS');
1391: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1392: hr_utility.raise_error;
1393: --
1394: Else
1395: --
1396: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1392: hr_utility.raise_error;
1393: --
1394: Else
1395: --
1396: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1397: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1398: hr_utility.raise_error;
1399: --
1400: End if;
1393: --
1394: Else
1395: --
1396: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1397: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1398: hr_utility.raise_error;
1399: --
1400: End if;
1401: --
1394: Else
1395: --
1396: hr_utility.set_message(8302,'PQH_NULL_RULE_EXISTS');
1397: hr_utility.set_message_token('LIST_NAME',l_prev_list_name);
1398: hr_utility.raise_error;
1399: --
1400: End if;
1401: --
1402: End if;
1403: --
1404: End if;
1405: --
1406: --
1407: hr_utility.set_location('Leaving:'||l_proc,10);
1408: --
1409: --
1410: End;
1411: --
1428: l_proc varchar2(72) := g_package||'chk_if_routing_cat_exists';
1429: --
1430: Begin
1431: --
1432: hr_utility.set_location('Entering:'|| l_proc, 10);
1433: --
1434: sql_stmt := 'Select routing_category_id from pqh_routing_categories where transaction_category_id = :t';
1435: --
1436: -- Select only the routing categories that belong to the current routing
1457: If rct_cur%found then
1458: RETURN TRUE;
1459: End if;
1460: --
1461: hr_utility.set_location('Leaving:'|| l_proc, 70);
1462: --
1463: RETURN FALSE;
1464: --
1465: End;
1473: --
1474: l_proc varchar2(72) := g_package||'insert_validate';
1475: --
1476: Begin
1477: hr_utility.set_location('Entering:'||l_proc, 5);
1478: --
1479: -- Call all supporting business operations
1480: --
1481: --
1552: p_override_position_id => p_rec.override_position_id,
1553: p_object_version_number => p_rec.object_version_number);
1554: --
1555: --
1556: hr_utility.set_location(' Leaving:'||l_proc, 10);
1557: End insert_validate;
1558: --
1559: -- ----------------------------------------------------------------------------
1560: -- |---------------------------< update_validate >----------------------------|
1564: --
1565: l_proc varchar2(72) := g_package||'update_validate';
1566: --
1567: Begin
1568: hr_utility.set_location('Entering:'||l_proc, 5);
1569: --
1570: -- Call all supporting business operations
1571: --
1572: chk_routing_category_id
1636: p_override_position_id => p_rec.override_position_id,
1637: p_object_version_number => p_rec.object_version_number);
1638: --
1639: --
1640: hr_utility.set_location(' Leaving:'||l_proc, 10);
1641: --
1642: End update_validate;
1643: --
1644: -- ----------------------------------------------------------------------------
1649: --
1650: l_proc varchar2(72) := g_package||'delete_validate';
1651: --
1652: Begin
1653: hr_utility.set_location('Entering:'||l_proc, 5);
1654: --
1655: -- Call all supporting business operations
1656: --
1657: hr_utility.set_location(' Leaving:'||l_proc, 10);
1653: hr_utility.set_location('Entering:'||l_proc, 5);
1654: --
1655: -- Call all supporting business operations
1656: --
1657: hr_utility.set_location(' Leaving:'||l_proc, 10);
1658: End delete_validate;
1659: --
1660: end pqh_rct_bus;
1661: