36: l_proc varchar2(72) := g_package||'set_security_group_id';
37: --
38: begin
39: --
40: hr_utility.set_location('Entering:'|| l_proc, 10);
41: --
42: -- Ensure that all the mandatory parameter are not null
43: --
44: hr_api.mandatory_arg_error
73: hr_api.set_security_group_id
74: (p_security_group_id => l_security_group_id
75: );
76: --
77: hr_utility.set_location(' Leaving:'|| l_proc, 20);
78: --
79: end set_security_group_id;
80: --
81: -- ---------------------------------------------------------------------------
100: l_proc varchar2(72) := g_package||'return_legislation_code';
101: --
102: Begin
103: --
104: hr_utility.set_location('Entering:'|| l_proc, 10);
105: --
106: -- Ensure that all the mandatory parameter are not null
107: --
108: --
112: --
113: if pqp_exr_bus.g_legislation_code IS NOT NULL THEN
114: l_legislation_code := pqp_exr_bus.g_legislation_code;
115: end if;
116: hr_utility.set_location(l_proc, 20);
117: -- The ID is different to the last call to this function
118: -- or this is the first call to this function.
119: --
120: open csr_leg_code;
129: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
130: fnd_message.raise_error;
131: END IF;
132: end if;
133: hr_utility.set_location(l_proc,30);
134: --
135: -- Set the global variables so the values are
136: -- available for the next call to this function.
137: --
138: close csr_leg_code;
139: -- pqp_exr_bus.g_exception_report_id := p_exception_report_id;
140: pqp_exr_bus.g_legislation_code := l_legislation_code;
141: -- end if;
142: hr_utility.set_location(' Leaving:'|| l_proc, 40);
143: return l_legislation_code;
144: end return_legislation_code;
145: --
146: -- ---------------------------------------------------------------------------
169: l_proc varchar2(72) := g_package||'return_exr_legislation_code';
170: --
171: Begin
172: --
173: hr_utility.set_location('Entering:'|| l_proc, 10);
174: --
175: -- Ensure that all the mandatory parameter are not null
176: -- The legislation code has already been found with a previous
177: -- call to this function. Just return the value in the global
179: --
180: if pqp_exr_bus.g_legislation_code is not null and
181: p_exception_report_id = g_exception_report_id then
182: l_legislation_code := pqp_exr_bus.g_legislation_code;
183: hr_utility.set_location(l_proc, 19);
184: else
185: hr_utility.set_location(l_proc, 20);
186: -- The ID is different to the last call to this function
187: -- or this is the first call to this function.
181: p_exception_report_id = g_exception_report_id then
182: l_legislation_code := pqp_exr_bus.g_legislation_code;
183: hr_utility.set_location(l_proc, 19);
184: else
185: hr_utility.set_location(l_proc, 20);
186: -- The ID is different to the last call to this function
187: -- or this is the first call to this function.
188: --
189: open csr_leg_code;
198: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
199: fnd_message.raise_error;
200: END IF;
201: end if;
202: hr_utility.set_location(l_proc,30);
203: --
204: -- Set the global variables so the values are
205: -- available for the next call to this function.
206: --
212: pqp_exr_bus.g_exception_report_id := p_exception_report_id;
213: pqp_exr_bus.g_legislation_code := l_exr_legislation_code;
214: end if;
215: end if;
216: hr_utility.set_location(' Leaving:'|| l_proc, 40);
217: return l_legislation_code;
218: end return_exr_legislation_code;
219: --
220:
372: l_default_currency_code varchar2(15);
373: --
374: BEGIN
375: --
376: hr_utility.set_location('Entering:'|| l_proc, 10);
377: --
378: -- Only proceed with validation if :
379: -- a) The g_old_rec is current and
380: -- b) The currency code value has changed
395: --
396:
397: IF p_currency_code is not null THEN
398:
399: hr_utility.set_location(l_proc, 20);
400:
401: l_default_currency_code := hr_general.default_currency_code
402: (p_business_group_id => p_business_group_id);
403:
408: -- to the default currency for the BG
409:
410: fnd_message.set_name('PQP','PQP_230520_CUR_CODE_MISMATCH' );
411: fnd_message.raise_error;
412: --hr_utility.set_message(8303,'PQP_230520_CUR_CODE_MISMATCH' );
413: --hr_utility.raise_error;
414:
415: END IF; -- end if of currency code check ...
416: --
409:
410: fnd_message.set_name('PQP','PQP_230520_CUR_CODE_MISMATCH' );
411: fnd_message.raise_error;
412: --hr_utility.set_message(8303,'PQP_230520_CUR_CODE_MISMATCH' );
413: --hr_utility.raise_error;
414:
415: END IF; -- end if of currency code check ...
416: --
417:
420:
421: END IF; -- end if of api updating check ...
422: --
423:
424: hr_utility.set_location(' Leaving:' || l_proc, 30);
425: --
426: END chk_currency_code;
427: --
428: -- ----------------------------------------------------------------------------
481: and business_group_id = p_business_group_id));
482: --
483: BEGIN
484: --
485: hr_utility.set_location('Entering:'|| l_proc, 10);
486: --
487: -- Only proceed with validation if :
488: -- a) The g_old_rec is current and
489: -- b) The balance type id value has changed
509: END IF;
510:
511: IF p_balance_type_id is not null THEN
512:
513: hr_utility.set_location(l_proc, 20);
514:
515: open csr_bal_type;
516: fetch csr_bal_type into l_exists;
517:
520: -- Raise an error
521:
522: fnd_message.set_name('PQP','PQP_230549_BAL_TYPE_NOT_FOUND' );
523: fnd_message.raise_error;
524: -- hr_utility.set_message(8303,'PQP_230549_BAL_TYPE_NOT_FOUND' );
525: --hr_utility.raise_error;
526:
527: END IF; -- end if of balance type id check ...
528: close csr_bal_type;
521:
522: fnd_message.set_name('PQP','PQP_230549_BAL_TYPE_NOT_FOUND' );
523: fnd_message.raise_error;
524: -- hr_utility.set_message(8303,'PQP_230549_BAL_TYPE_NOT_FOUND' );
525: --hr_utility.raise_error;
526:
527: END IF; -- end if of balance type id check ...
528: close csr_bal_type;
529: --
533:
534: END IF; -- end if of api updating check ...
535: --
536:
537: hr_utility.set_location(' Leaving:' || l_proc, 30);
538: --
539: END chk_balance_type_id;
540: --
541: -- ----------------------------------------------------------------------------
588: and balance_dimension_id = p_balance_dimension_id;
589: --
590: BEGIN
591: --
592: hr_utility.set_location('Entering:'|| l_proc, 10);
593: --
594: -- Only proceed with validation if :
595: -- a) The g_old_rec is current and
596: -- b) The balance dimension id value has changed
611: --
612:
613: IF p_balance_dimension_id is not null THEN
614:
615: hr_utility.set_location(l_proc, 20);
616:
617: open csr_bal_dim;
618: fetch csr_bal_dim into l_exists;
619:
622: -- Raise an error
623:
624: fnd_message.set_name('PQP','PQP_230550_BAL_DIM_NOT_FOUND' );
625: fnd_message.raise_error;
626: --hr_utility.set_message(8303,'PQP_230550_BAL_DIM_NOT_FOUND' );
627: --hr_utility.raise_error;
628:
629: END IF; -- end if of balance dimension check...
630: --
623:
624: fnd_message.set_name('PQP','PQP_230550_BAL_DIM_NOT_FOUND' );
625: fnd_message.raise_error;
626: --hr_utility.set_message(8303,'PQP_230550_BAL_DIM_NOT_FOUND' );
627: --hr_utility.raise_error;
628:
629: END IF; -- end if of balance dimension check...
630: --
631:
634:
635: END IF; -- end if of api updating check ...
636: --
637:
638: hr_utility.set_location(' Leaving:' || l_proc, 30);
639: --
640: END chk_bal_dim_id;
641: --
642: -- ----------------------------------------------------------------------------
681: l_api_updating boolean;
682: --
683: BEGIN
684: --
685: hr_utility.set_location('Entering:'|| l_proc, 10);
686: --
687: -- Only proceed with validation if :
688: -- a) The g_old_rec is current and
689: -- b) The variance type value has changed
710: -- Raise error as the variance type is not 'A' or 'P'
711:
712: fnd_message.set_name('PQP','PQP_230551_VARIANCE_MISMATCH' );
713: fnd_message.raise_error;
714: -- hr_utility.set_message(8303,'PQP_230551_VARIANCE_MISMATCH' );
715: -- hr_utility.raise_error;
716:
717: END IF; -- end if of variance type check ...
718: --
711:
712: fnd_message.set_name('PQP','PQP_230551_VARIANCE_MISMATCH' );
713: fnd_message.raise_error;
714: -- hr_utility.set_message(8303,'PQP_230551_VARIANCE_MISMATCH' );
715: -- hr_utility.raise_error;
716:
717: END IF; -- end if of variance type check ...
718: --
719:
725: --added by pjavaji
726: IF p_comparison_type ='PC' AND p_variance_type='P' THEN
727: fnd_message.set_name('PQP','PQP_230583_INVALID_VAR_TYPE' );
728: fnd_message.raise_error;
729: -- hr_utility.set_message(8303,'PQP_230583_INVALID_VAR_TYPE' );
730: -- hr_utility.raise_error;
731: END IF;
732: --
733:
726: IF p_comparison_type ='PC' AND p_variance_type='P' THEN
727: fnd_message.set_name('PQP','PQP_230583_INVALID_VAR_TYPE' );
728: fnd_message.raise_error;
729: -- hr_utility.set_message(8303,'PQP_230583_INVALID_VAR_TYPE' );
730: -- hr_utility.raise_error;
731: END IF;
732: --
733:
734: hr_utility.set_location(' Leaving:' || l_proc, 20);
730: -- hr_utility.raise_error;
731: END IF;
732: --
733:
734: hr_utility.set_location(' Leaving:' || l_proc, 20);
735: --
736: END chk_variance_type;
737: --
738: -- ----------------------------------------------------------------------------
784: --
785: BEGIN
786: -- Code is changed to validate the existence of
787: -- TXT format.
788: hr_utility.set_location('Entering:'|| l_proc, 10);
789: --
790: -- Only proceed with validation if :
791: -- a) The g_old_rec is current and
792: -- b) The output_format type value has changed
802: (NOT l_api_updating)) THEN
803:
804: IF p_output_format_type is not null THEN
805:
806: hr_utility.set_location(l_proc, 20);
807:
808: /* open csr_eff_date;
809: fetch csr_eff_date into l_effective_date;
810: close csr_eff_date;*/
812: /*IF l_effective_date is NULL THEN
813: l_effective_date:=TRUNC(sysdate);
814: END IF;*/
815: --
816: hr_utility.set_location(l_proc, 30);
817:
818: IF p_business_group_id is not null THEN
819: IF p_output_format_type='TXT' THEN
820: fnd_message.set_name('PQP','PQP_230444_BACKCOMP_SUPPORT');
831: fnd_message.set_token('COLUMN','output_format_TYPE' );
832: fnd_message.set_token('LOOKUP_TYPE', 'PQP_output_format_TYPES' );
833: fnd_message.raise_error;
834: END IF; */ -- End if of lookup check ...
835: hr_utility.set_location(l_proc, 40);
836: /* ELSE
837: IF hr_api.not_exists_in_hrstanlookups
838: (p_lookup_type => 'PQP_OUTPUT_FORMAT_TYPES'
839: ,p_lookup_code => p_output_format_type
846: fnd_message.set_token('LOOKUP_TYPE', 'PQP_OUTPUT_FORMAT_TYPES' );
847: fnd_message.raise_error;
848:
849: END IF; */ -- End if of lookup check ...
850: hr_utility.set_location(l_proc, 50);
851: END IF; -- End if of business group check...
852: --
853: hr_utility.set_location(l_proc, 60);
854: --
849: END IF; */ -- End if of lookup check ...
850: hr_utility.set_location(l_proc, 50);
851: END IF; -- End if of business group check...
852: --
853: hr_utility.set_location(l_proc, 60);
854: --
855: END IF; -- p_output_format_type is not null check...
856: --
857: END IF; -- end if of api updating check ...
855: END IF; -- p_output_format_type is not null check...
856: --
857: END IF; -- end if of api updating check ...
858: --
859: hr_utility.set_location(' Leaving:' || l_proc, 70);
860: --
861: END chk_output_format;
862: -- ----------------------------------------------------------------------------
863: -- |-------------------------< chk_variance_value >---------------------------|
903: l_api_updating boolean;
904: --
905: BEGIN
906: --
907: hr_utility.set_location('Entering:'|| l_proc, 10);
908: --
909: -- Only proceed with validation if :
910: -- a) The variance type is 'P'
911: -- b) The g_old_rec is current and
933: --Raise error as the variance value exceeded 100
934:
935: fnd_message.set_name('PQP','PQP_230552_VARIANCE_VALUE_MORE' );
936: fnd_message.raise_error;
937: --hr_utility.set_message(8303,'PQP_230552_VARIANCE_VALUE_MORE' );
938: --hr_utility.raise_error;
939:
940: END IF; -- end if of variance value check ...
941: --
934:
935: fnd_message.set_name('PQP','PQP_230552_VARIANCE_VALUE_MORE' );
936: fnd_message.raise_error;
937: --hr_utility.set_message(8303,'PQP_230552_VARIANCE_VALUE_MORE' );
938: --hr_utility.raise_error;
939:
940: END IF; -- end if of variance value check ...
941: --
942: --END IF; -- end if of api updating check ...
943: --
944: END IF; -- end if of variance_type check ...
945: --
946:
947: hr_utility.set_location(' Leaving:' || l_proc, 20);
948: --
949: END chk_variance_value;
950: --
951: -- ----------------------------------------------------------------------------
1010: and pers.database_item_suffix = pbd.database_item_suffix;
1011: --
1012: BEGIN
1013: --
1014: hr_utility.set_location('Entering:'|| l_proc, 10);
1015: --
1016: -- Only proceed with validation if :
1017: -- a) The g_old_rec is current and
1018: -- b) The comparison type value has changed
1028: (NOT l_api_updating)) THEN
1029:
1030: IF p_comparison_type is not null THEN
1031:
1032: hr_utility.set_location(l_proc, 20);
1033:
1034: open csr_eff_date;
1035: fetch csr_eff_date into l_effective_date;
1036: close csr_eff_date;
1038: IF l_effective_date is NULL THEN
1039: l_effective_date:=TRUNC(sysdate);
1040: END IF;
1041: --
1042: hr_utility.set_location(l_proc, 30);
1043:
1044: IF p_business_group_id is not null THEN
1045: IF hr_api.not_exists_in_hr_lookups
1046: (p_lookup_type => 'PQP_COMPARISON_TYPE'
1053: fnd_message.set_token('COLUMN','COMPARISON_TYPE' );
1054: fnd_message.set_token('LOOKUP_TYPE', 'PQP_COMPARISON_TYPE' );
1055: fnd_message.raise_error;
1056: END IF; -- End if of lookup check ...
1057: hr_utility.set_location(l_proc, 40);
1058: ELSE
1059: IF hr_api.not_exists_in_hrstanlookups
1060: (p_lookup_type => 'PQP_COMPARISON_TYPE'
1061: ,p_lookup_code => p_comparison_type
1068: fnd_message.set_token('LOOKUP_TYPE', 'PQP_COMPARISON_TYPE' );
1069: fnd_message.raise_error;
1070:
1071: END IF; -- End if of lookup check ...
1072: hr_utility.set_location(l_proc, 50);
1073: END IF; -- End if of business group check...
1074: --
1075: hr_utility.set_location(l_proc, 60);
1076: --
1071: END IF; -- End if of lookup check ...
1072: hr_utility.set_location(l_proc, 50);
1073: END IF; -- End if of business group check...
1074: --
1075: hr_utility.set_location(l_proc, 60);
1076: --
1077: END IF; -- End if of comparison type not null check...
1078: --
1079: END IF; -- end if of api updating check ...
1084: FOR c_rec IN c_dim_suffix LOOP
1085: IF upper(c_rec.db_suffix) <> upper(substr(p_comparison_type,1,1)) THEN
1086: fnd_message.set_name('PQP','PQP_230567_DIM_COM_TYP_INVALID');
1087: fnd_message.raise_error;
1088: --hr_utility.set_message(8303,'PQP_230567_DIM_COM_TYP_INVALID');
1089: --hr_utility.raise_error;
1090: END IF;
1091: END LOOP;
1092: --
1085: IF upper(c_rec.db_suffix) <> upper(substr(p_comparison_type,1,1)) THEN
1086: fnd_message.set_name('PQP','PQP_230567_DIM_COM_TYP_INVALID');
1087: fnd_message.raise_error;
1088: --hr_utility.set_message(8303,'PQP_230567_DIM_COM_TYP_INVALID');
1089: --hr_utility.raise_error;
1090: END IF;
1091: END LOOP;
1092: --
1093: hr_utility.set_location(' Leaving:' || l_proc, 70);
1089: --hr_utility.raise_error;
1090: END IF;
1091: END LOOP;
1092: --
1093: hr_utility.set_location(' Leaving:' || l_proc, 70);
1094: --
1095: END chk_comparison_type;
1096: --
1097: --
1145: where session_id = USERENV('sessionid');
1146: --
1147: BEGIN
1148: --
1149: hr_utility.set_location('Entering:'|| l_proc, 10);
1150: --
1151: -- Only proceed with validation if :
1152: -- a) The g_old_rec is current and
1153: -- b) The variance_operator type value has changed
1163: (NOT l_api_updating)) THEN
1164:
1165: IF p_variance_operator is not null THEN
1166:
1167: hr_utility.set_location(l_proc, 20);
1168:
1169: open csr_eff_date;
1170: fetch csr_eff_date into l_effective_date;
1171: close csr_eff_date;
1173: IF l_effective_date is NULL THEN
1174: l_effective_date:=TRUNC(sysdate);
1175: END IF;
1176: --
1177: hr_utility.set_location(l_proc, 30);
1178:
1179: IF p_business_group_id is not null THEN
1180: IF hr_api.not_exists_in_hr_lookups
1181: (p_lookup_type => 'PQP_VARIANCE_OPERATOR_TYPES'
1188: fnd_message.set_token('COLUMN','variance_operator_TYPE' );
1189: fnd_message.set_token('LOOKUP_TYPE', 'PQP_VARIANCE_OPERATOR_TYPES' );
1190: fnd_message.raise_error;
1191: END IF; -- End if of lookup check ...
1192: hr_utility.set_location(l_proc, 40);
1193: ELSE
1194: IF hr_api.not_exists_in_hrstanlookups
1195: (p_lookup_type => 'PQP_VARIANCE_OPERATOR_TYPES'
1196: ,p_lookup_code => p_variance_operator
1203: fnd_message.set_token('LOOKUP_TYPE', 'PQP_VARIANCE_OPERATOR_TYPES' );
1204: fnd_message.raise_error;
1205:
1206: END IF; -- End if of lookup check ...
1207: hr_utility.set_location(l_proc, 50);
1208: END IF; -- End if of business group check...
1209: --
1210: hr_utility.set_location(l_proc, 60);
1211: --
1206: END IF; -- End if of lookup check ...
1207: hr_utility.set_location(l_proc, 50);
1208: END IF; -- End if of business group check...
1209: --
1210: hr_utility.set_location(l_proc, 60);
1211: --
1212: END IF; -- End if of variance_operator not null check...
1213: --
1214: END IF; -- end if of api updating check ...
1212: END IF; -- End if of variance_operator not null check...
1213: --
1214: END IF; -- end if of api updating check ...
1215: --
1216: hr_utility.set_location(' Leaving:' || l_proc, 70);
1217: --
1218: END chk_variance_operator;
1219: -- ----------------------------------------------------------------------------
1220: -- |-------------------------< chk_comparison_value >-------------------------|
1258: l_api_updating boolean;
1259: --
1260: BEGIN
1261: --
1262: hr_utility.set_location('Entering:'|| l_proc, 10);
1263: --
1264: -- Only proceed with validation if :
1265: -- a) The second character of comparison_type is 'P'
1266: -- b) The g_old_rec is current and
1285: -- to one
1286:
1287: fnd_message.set_name('PQP','PQP_230553_COMPARISON_VAL_QUAL' );
1288: fnd_message.raise_error;
1289: --hr_utility.set_message(8303,'PQP_230553_COMPARISON_VAL_QUAL' );
1290: --hr_utility.raise_error;
1291:
1292: END IF; -- end if of comparison value check ...
1293: --
1286:
1287: fnd_message.set_name('PQP','PQP_230553_COMPARISON_VAL_QUAL' );
1288: fnd_message.raise_error;
1289: --hr_utility.set_message(8303,'PQP_230553_COMPARISON_VAL_QUAL' );
1290: --hr_utility.raise_error;
1291:
1292: END IF; -- end if of comparison value check ...
1293: --
1294:
1316: -- to one
1317:
1318: fnd_message.set_name('PQP','PQP_230553_COMPARISON_VAL_QUAL' );
1319: fnd_message.raise_error;
1320: --hr_utility.set_message(8303,'PQP_230553_COMPARISON_VAL_QUAL' );
1321: --hr_utility.raise_error;
1322:
1323: END IF; -- end if of comparison value check ...
1324: --
1317:
1318: fnd_message.set_name('PQP','PQP_230553_COMPARISON_VAL_QUAL' );
1319: fnd_message.raise_error;
1320: --hr_utility.set_message(8303,'PQP_230553_COMPARISON_VAL_QUAL' );
1321: --hr_utility.raise_error;
1322:
1323: END IF; -- end if of comparison value check ...
1324: --
1325:
1326: END IF; -- end if of api updating check ...
1327: --
1328:
1329: END IF; -- End if of comparison type check ...
1330: hr_utility.set_location(' Leaving:' || l_proc, 30);
1331: --
1332: END chk_comparison_value;
1333: --
1334: -- ----------------------------------------------------------------------------
1393: l_legislation_code:=p_legislation_code;
1394: END IF;
1395:
1396: --
1397: hr_utility.set_location('Entering:'|| l_proc, 10);
1398: --
1399:
1400: -- Check manadatory arg
1401:
1423: -- Check whether a row exists already in pqp_exception_reports
1424: -- with this exception_report_name
1425: --
1426:
1427: hr_utility.set_location(l_proc, 20);
1428:
1429: open csr_report_name;
1430: fetch csr_report_name into l_exists;
1431:
1434: -- Raise an error
1435:
1436: fnd_message.set_name('PQP','PQP_230554_REPORT_NAME_UNIQUE' );
1437: fnd_message.raise_error;
1438: --hr_utility.set_message(8303,'PQP_230554_REPORT_NAME_UNIQUE' );
1439: --hr_utility.raise_error;
1440:
1441: END IF; -- end if of report name check ...
1442: close csr_report_name;
1435:
1436: fnd_message.set_name('PQP','PQP_230554_REPORT_NAME_UNIQUE' );
1437: fnd_message.raise_error;
1438: --hr_utility.set_message(8303,'PQP_230554_REPORT_NAME_UNIQUE' );
1439: --hr_utility.raise_error;
1440:
1441: END IF; -- end if of report name check ...
1442: close csr_report_name;
1443: --
1444:
1445: END IF; -- end if of api updating check ...
1446: --
1447:
1448: hr_utility.set_location(' Leaving:' || l_proc, 30);
1449: --
1450: END chk_report_name;
1451: --
1452: -- ----------------------------------------------------------------------------
1492: where exception_report_id = p_exception_report_id;
1493: --
1494: BEGIN
1495: --
1496: hr_utility.set_location('Entering:'|| l_proc, 10);
1497: --
1498:
1499: open csr_rep_grp;
1500: fetch csr_rep_grp into l_exists;
1504: -- Raise error
1505:
1506: fnd_message.set_name('PQP','PQP_230555_CHILD_REPORT_GRP' );
1507: fnd_message.raise_error;
1508: --hr_utility.set_message(8303,'PQP_230555_CHILD_REPORT_GRP' );
1509: --hr_utility.raise_error;
1510:
1511: END IF; -- end if of report group row check...
1512: --
1505:
1506: fnd_message.set_name('PQP','PQP_230555_CHILD_REPORT_GRP' );
1507: fnd_message.raise_error;
1508: --hr_utility.set_message(8303,'PQP_230555_CHILD_REPORT_GRP' );
1509: --hr_utility.raise_error;
1510:
1511: END IF; -- end if of report group row check...
1512: --
1513:
1510:
1511: END IF; -- end if of report group row check...
1512: --
1513:
1514: hr_utility.set_location(' Leaving:' || l_proc, 20);
1515: --
1516: END chk_report_grp_exists;
1517: --
1518: --This procedure is introduced when a bug was detected
1559:
1560: l_proc varchar2(72) := g_package||'insert_validate';
1561: --
1562: Begin
1563: hr_utility.set_location('Entering:'||l_proc, 5);
1564: --
1565: -- Call all supporting business operations
1566: --
1567: --
1578: --
1579: -- Check currency code
1580: --
1581:
1582: hr_utility.set_location('Entering:'||l_proc, 10);
1583: chk_output_format
1584: (p_exception_report_id => p_rec.exception_report_id
1585: ,p_business_group_id => p_rec.business_group_id
1586: ,p_output_format_type => p_rec.output_format_type
1591:
1592:
1593:
1594:
1595: hr_utility.set_location(l_proc, 20);
1596:
1597: chk_currency_code (p_exception_report_id => p_rec.exception_report_id
1598: ,p_business_group_id => p_rec.business_group_id
1599: ,p_currency_code => p_rec.currency_code
1603:
1604: -- Check balance type id
1605: --
1606:
1607: hr_utility.set_location(l_proc, 30);
1608:
1609: chk_balance_type_id (p_exception_report_id => p_rec.exception_report_id
1610: ,p_business_group_id => p_rec.business_group_id
1611: ,p_legislation_code => p_rec.legislation_code
1616: --
1617: -- Check balance dimension id
1618: --
1619:
1620: hr_utility.set_location(l_proc, 40);
1621:
1622: chk_bal_dim_id (p_exception_report_id => p_rec.exception_report_id
1623: ,p_balance_type_id => p_rec.balance_type_id
1624: ,p_balance_dimension_id => p_rec.balance_dimension_id
1628: --
1629: -- Check variance type
1630: --
1631:
1632: hr_utility.set_location(l_proc, 50);
1633:
1634: chk_variance_type (p_exception_report_id => p_rec.exception_report_id
1635: ,p_variance_type => p_rec.variance_type
1636: ,p_comparison_type => p_rec.comparison_type
1640: --
1641: -- Check variance value
1642: --
1643:
1644: hr_utility.set_location(l_proc, 60);
1645:
1646: chk_variance_value (p_exception_report_id => p_rec.exception_report_id
1647: ,p_variance_type => p_rec.variance_type
1648: ,p_variance_value => p_rec.variance_value
1652: --
1653: -- Check comparison type
1654: --
1655:
1656: hr_utility.set_location(l_proc, 70);
1657:
1658: chk_comparison_type (p_exception_report_id => p_rec.exception_report_id
1659: ,p_business_group_id => p_rec.business_group_id
1660: ,p_comparison_type => p_rec.comparison_type
1665: --
1666: -- Check comparison value
1667: --
1668:
1669: hr_utility.set_location(l_proc, 80);
1670:
1671: chk_comparison_value (p_exception_report_id => p_rec.exception_report_id
1672: ,p_comparison_type => p_rec.comparison_type
1673: ,p_comparison_value => p_rec.comparison_value
1677: --
1678: -- Check report name
1679: --
1680:
1681: hr_utility.set_location(l_proc, 90);
1682:
1683: chk_report_name (p_exception_report_id => p_rec.exception_report_id
1684: ,p_business_group_id => p_rec.business_group_id
1685: ,p_legislation_code => p_rec.legislation_code
1698: -- After validating the set of important attributes
1699: -- if Multiple Message detection is enabled and at least
1700: -- one error has been found then abort further validation.
1701: hr_multi_message.end_validation_set;
1702: hr_utility.set_location(' Leaving:'||l_proc, 100);
1703: End insert_validate;
1704: --
1705: -- ----------------------------------------------------------------------------
1706: -- |---------------------------< update_validate >----------------------------|
1711: --
1712: l_proc varchar2(72) := g_package||'update_validate';
1713: --
1714: Begin
1715: hr_utility.set_location('Entering:'||l_proc, 5);
1716: --
1717: -- Call all supporting business operations
1718: --
1719: --
1743: --
1744: -- Check currency code
1745: --
1746:
1747: hr_utility.set_location(l_proc, 10);
1748: chk_output_format
1749: (p_exception_report_id => p_rec.exception_report_id
1750: ,p_business_group_id => p_rec.business_group_id
1751: ,p_output_format_type => p_rec.output_format_type
1752: ,p_object_version_number => p_rec.object_version_number
1753: );
1754:
1755:
1756: hr_utility.set_location(l_proc, 20);
1757:
1758:
1759:
1760: chk_currency_code (p_exception_report_id => p_rec.exception_report_id
1766: --
1767: -- Check balance type id
1768: --
1769:
1770: hr_utility.set_location(l_proc, 30);
1771:
1772: chk_balance_type_id (p_exception_report_id => p_rec.exception_report_id
1773: ,p_business_group_id => p_rec.business_group_id
1774: ,p_legislation_code => p_rec.legislation_code
1779: --
1780: -- Check balance dimension id
1781: --
1782:
1783: hr_utility.set_location(l_proc, 40);
1784:
1785: chk_bal_dim_id (p_exception_report_id => p_rec.exception_report_id
1786: ,p_balance_type_id => p_rec.balance_type_id
1787: ,p_balance_dimension_id => p_rec.balance_dimension_id
1791: --
1792: -- Check variance type
1793: --
1794:
1795: hr_utility.set_location(l_proc, 50);
1796:
1797: chk_variance_type (p_exception_report_id => p_rec.exception_report_id
1798: ,p_variance_type => p_rec.variance_type
1799: ,p_comparison_type => p_rec.comparison_type
1803: --
1804: -- Check variance value
1805: --
1806:
1807: hr_utility.set_location(l_proc, 60);
1808:
1809: chk_variance_value (p_exception_report_id => p_rec.exception_report_id
1810: ,p_variance_type => p_rec.variance_type
1811: ,p_variance_value => p_rec.variance_value
1815: --
1816: -- Check comparison type
1817: --
1818:
1819: hr_utility.set_location(l_proc, 70);
1820:
1821: chk_comparison_type (p_exception_report_id => p_rec.exception_report_id
1822: ,p_business_group_id => p_rec.business_group_id
1823: ,p_comparison_type => p_rec.comparison_type
1828: --
1829: -- Check comparison value
1830: --
1831:
1832: hr_utility.set_location(l_proc, 80);
1833:
1834: chk_comparison_value (p_exception_report_id => p_rec.exception_report_id
1835: ,p_comparison_type => p_rec.comparison_type
1836: ,p_comparison_value => p_rec.comparison_value
1840: --
1841: -- Check report name
1842: --
1843:
1844: hr_utility.set_location(l_proc, 90);
1845:
1846: chk_report_name (p_exception_report_id => p_rec.exception_report_id
1847: ,p_business_group_id => p_rec.business_group_id
1848: ,p_legislation_code => p_rec.legislation_code
1867: -- one error has been found then abort further validation.
1868: --
1869: hr_multi_message.end_validation_set;
1870:
1871: hr_utility.set_location(' Leaving:'||l_proc, 100);
1872: End update_validate;
1873: --
1874: -- ----------------------------------------------------------------------------
1875: -- |---------------------------< delete_validate >----------------------------|
1880: --
1881: l_proc varchar2(72) := g_package||'delete_validate';
1882: --
1883: Begin
1884: hr_utility.set_location('Entering:'||l_proc, 5);
1885: --
1886: --
1887: IF pqp_exr_shd.g_old_rec.business_group_id IS NOT NULL THEN
1888: chk_startup_action(p_insert =>false
1900: -- Check whether exception record group exists for this report id
1901: --
1902: chk_del_seed_report ( p_rec=>pqp_exr_shd.g_old_rec);
1903: hr_multi_message.end_validation_set;
1904: hr_utility.set_location(l_proc, 10);
1905: chk_report_grp_exists(p_exception_report_id => p_rec.exception_report_id);
1906: Exception
1907: when app_exception.application_exception then
1908: -- IF hr_multi_message.exception_add
1914: -- if Multiple Message detection is enabled and at least
1915: -- one error has been found then abort further validation.
1916: hr_multi_message.end_validation_set;
1917:
1918: hr_utility.set_location(' Leaving:'||l_proc, 20);
1919: End delete_validate;
1920: --
1921: end pqp_exr_bus;