48: from HR_TAX_UNITS_V htu
49: where htu.tax_unit_id = p_segment1;
50: --
51: begin
52: hr_utility.set_location('Entering: '||l_proc, 1);
53: --
54: -- Check that segment1, if it is not null, is linked to a valid tax unit
55: --
56: if p_segment1 is not null then
66: open csr_chk_tu;
67: fetch csr_chk_tu into l_business_group_id;
68: if csr_chk_tu%notfound then
69: close csr_chk_tu;
70: hr_utility.set_message(800,'HR_50002_SCL_US_GOV_REPORTING');
71: hr_utility.raise_error;
72: end if;
73: close csr_chk_tu;
74: hr_utility.set_location(l_proc, 10);
67: fetch csr_chk_tu into l_business_group_id;
68: if csr_chk_tu%notfound then
69: close csr_chk_tu;
70: hr_utility.set_message(800,'HR_50002_SCL_US_GOV_REPORTING');
71: hr_utility.raise_error;
72: end if;
73: close csr_chk_tu;
74: hr_utility.set_location(l_proc, 10);
75: --
70: hr_utility.set_message(800,'HR_50002_SCL_US_GOV_REPORTING');
71: hr_utility.raise_error;
72: end if;
73: close csr_chk_tu;
74: hr_utility.set_location(l_proc, 10);
75: --
76: if l_business_group_id <> p_business_group_id then
77: hr_utility.set_message(800,'HR_50003_SCL_US_GOV_BUS_GRP');
78: hr_utility.raise_error;
73: close csr_chk_tu;
74: hr_utility.set_location(l_proc, 10);
75: --
76: if l_business_group_id <> p_business_group_id then
77: hr_utility.set_message(800,'HR_50003_SCL_US_GOV_BUS_GRP');
78: hr_utility.raise_error;
79: end if;
80: end if;
81: --
74: hr_utility.set_location(l_proc, 10);
75: --
76: if l_business_group_id <> p_business_group_id then
77: hr_utility.set_message(800,'HR_50003_SCL_US_GOV_BUS_GRP');
78: hr_utility.raise_error;
79: end if;
80: end if;
81: --
82: hr_utility.set_location(' Leaving:'||l_proc, 15);
78: hr_utility.raise_error;
79: end if;
80: end if;
81: --
82: hr_utility.set_location(' Leaving:'||l_proc, 15);
83: --
84: end chk_us_segment1;
85: --
86: -- ----------------------------------------------------------------------------
137: and p_validation_start_date between asg.effective_start_date
138: and asg.effective_end_date;
139: --
140: begin
141: hr_utility.set_location('Entering: '||l_proc, 1);
142: --
143: If p_segment2 is not null then
144: --
145: -- Check mandatory parameters have been set
165: open csr_chk_emp;
166: fetch csr_chk_emp into l_business_group_id;
167: if csr_chk_emp%notfound then
168: close csr_chk_emp;
169: hr_utility.set_message(800,'HR_50004_SCL_US_TIME_EMP');
170: hr_utility.raise_error;
171: end if;
172: close csr_chk_emp;
173: hr_utility.set_location(l_proc, 10);
166: fetch csr_chk_emp into l_business_group_id;
167: if csr_chk_emp%notfound then
168: close csr_chk_emp;
169: hr_utility.set_message(800,'HR_50004_SCL_US_TIME_EMP');
170: hr_utility.raise_error;
171: end if;
172: close csr_chk_emp;
173: hr_utility.set_location(l_proc, 10);
174: --
169: hr_utility.set_message(800,'HR_50004_SCL_US_TIME_EMP');
170: hr_utility.raise_error;
171: end if;
172: close csr_chk_emp;
173: hr_utility.set_location(l_proc, 10);
174: --
175: if l_business_group_id <> p_business_group_id then
176: hr_utility.set_message(800,'HR_50005_SCL_US_TIME_BUS_GRP');
177: hr_utility.raise_error;
172: close csr_chk_emp;
173: hr_utility.set_location(l_proc, 10);
174: --
175: if l_business_group_id <> p_business_group_id then
176: hr_utility.set_message(800,'HR_50005_SCL_US_TIME_BUS_GRP');
177: hr_utility.raise_error;
178: end if;
179: end if;
180: --
173: hr_utility.set_location(l_proc, 10);
174: --
175: if l_business_group_id <> p_business_group_id then
176: hr_utility.set_message(800,'HR_50005_SCL_US_TIME_BUS_GRP');
177: hr_utility.raise_error;
178: end if;
179: end if;
180: --
181: hr_utility.set_location(' Leaving:'||l_proc, 15);
177: hr_utility.raise_error;
178: end if;
179: end if;
180: --
181: hr_utility.set_location(' Leaving:'||l_proc, 15);
182: --
183: end chk_us_segment2;
184: --
185: -- ----------------------------------------------------------------------------
223: where lu.lookup_type = 'YES_NO'
224: and lu.lookup_code = p_segment3;
225: --
226: begin
227: hr_utility.set_location('Entering: '||l_proc, 1);
228: --
229: If p_segment3 is not null then
230: --
231: open csr_chk_yes_no;
231: open csr_chk_yes_no;
232: fetch csr_chk_yes_no into l_exists;
233: if csr_chk_yes_no%notfound then
234: close csr_chk_yes_no;
235: hr_utility.set_message(800,'HR_50006_SCL_US_TIME_REQD');
236: hr_utility.raise_error;
237: end if;
238: close csr_chk_yes_no;
239: --
232: fetch csr_chk_yes_no into l_exists;
233: if csr_chk_yes_no%notfound then
234: close csr_chk_yes_no;
235: hr_utility.set_message(800,'HR_50006_SCL_US_TIME_REQD');
236: hr_utility.raise_error;
237: end if;
238: close csr_chk_yes_no;
239: --
240: end if;
237: end if;
238: close csr_chk_yes_no;
239: --
240: end if;
241: hr_utility.set_location(' Leaving:'||l_proc, 15);
242: --
243: end chk_us_segment3;
244: --
245: -- ----------------------------------------------------------------------------
293: and hoi.org_information_context = 'Work Schedule'
294: and hoi.organization_id = p_organization_id;
295: --
296: begin
297: hr_utility.set_location('Entering: '||l_proc, 1);
298: --
299: hr_utility.set_location(l_proc, 5);
300: --
301: If p_segment4 is not null then
295: --
296: begin
297: hr_utility.set_location('Entering: '||l_proc, 1);
298: --
299: hr_utility.set_location(l_proc, 5);
300: --
301: If p_segment4 is not null then
302: --
303: -- Check mandatory parameters have been set
311: open csr_chk_work_schedule;
312: fetch csr_chk_work_schedule into l_exists;
313: if csr_chk_work_schedule%notfound then
314: close csr_chk_work_schedule;
315: hr_utility.set_message(800,'HR_50007_SCL_US_INV_SCHEDULE');
316: hr_utility.raise_error;
317: end if;
318: close csr_chk_work_schedule;
319: --
312: fetch csr_chk_work_schedule into l_exists;
313: if csr_chk_work_schedule%notfound then
314: close csr_chk_work_schedule;
315: hr_utility.set_message(800,'HR_50007_SCL_US_INV_SCHEDULE');
316: hr_utility.raise_error;
317: end if;
318: close csr_chk_work_schedule;
319: --
320: end if;
317: end if;
318: close csr_chk_work_schedule;
319: --
320: end if;
321: hr_utility.set_location(' Leaving:'||l_proc, 15);
322: --
323: end chk_us_segment4;
324: --
325: -- ----------------------------------------------------------------------------
363: and lu.lookup_code = p_segment5
364: and lu.application_id = 800;
365: --
366: begin
367: hr_utility.set_location('Entering: '||l_proc, 1);
368: --
369: If p_segment5 is not null then
370: --
371: open csr_chk_shift;
371: open csr_chk_shift;
372: fetch csr_chk_shift into l_exists;
373: if csr_chk_shift%notfound then
374: close csr_chk_shift;
375: hr_utility.set_message(800,'PAY_7706_PDT_SHIFT_NOT_FOUND');
376: hr_utility.raise_error;
377: end if;
378: close csr_chk_shift;
379: --
372: fetch csr_chk_shift into l_exists;
373: if csr_chk_shift%notfound then
374: close csr_chk_shift;
375: hr_utility.set_message(800,'PAY_7706_PDT_SHIFT_NOT_FOUND');
376: hr_utility.raise_error;
377: end if;
378: close csr_chk_shift;
379: --
380: end if;
377: end if;
378: close csr_chk_shift;
379: --
380: end if;
381: hr_utility.set_location(' Leaving:'||l_proc, 15);
382: --
383: end chk_us_segment5;
384: --
385: -- ----------------------------------------------------------------------------
417: l_business_group_id number(15);
418: l_segment6 varchar2(60);
419: --
420: begin
421: hr_utility.set_location('Entering: '||l_proc, 1);
422: --
423: If p_segment6 is not null then
424: --
425: -- Ensure that the length is 11
424: --
425: -- Ensure that the length is 11
426: --
427: if (length(p_segment6) > 11) then
428: hr_utility.set_message(800,'HR_50008_SCL_US_SPOUSE_SALARY');
429: hr_utility.raise_error;
430: end if;
431: --
432: hr_utility.set_location(l_proc, 5);
425: -- Ensure that the length is 11
426: --
427: if (length(p_segment6) > 11) then
428: hr_utility.set_message(800,'HR_50008_SCL_US_SPOUSE_SALARY');
429: hr_utility.raise_error;
430: end if;
431: --
432: hr_utility.set_location(l_proc, 5);
433: --
428: hr_utility.set_message(800,'HR_50008_SCL_US_SPOUSE_SALARY');
429: hr_utility.raise_error;
430: end if;
431: --
432: hr_utility.set_location(l_proc, 5);
433: --
434: -- Ensure that p_segment6 is in numberic format with a precision of 2
435: --
436: l_segment6 := p_segment6;
438: (p_value => l_segment6,
439: p_arg_name => 'segment6',
440: p_format => 'H_DECIMAL2');
441: --
442: hr_utility.set_location(l_proc, 10);
443: --
444: -- Ensure that p_segment6 is betwween 0 and 10000000.00
445: --
446: if (to_number(p_segment6) < 0) or (to_number(p_segment6) > 10000000.00) then
443: --
444: -- Ensure that p_segment6 is betwween 0 and 10000000.00
445: --
446: if (to_number(p_segment6) < 0) or (to_number(p_segment6) > 10000000.00) then
447: hr_utility.set_message(800,'HR_50008_SCL_US_SPOUSE_SALARY');
448: hr_utility.raise_error;
449: end if;
450: --
451: end if;
444: -- Ensure that p_segment6 is betwween 0 and 10000000.00
445: --
446: if (to_number(p_segment6) < 0) or (to_number(p_segment6) > 10000000.00) then
447: hr_utility.set_message(800,'HR_50008_SCL_US_SPOUSE_SALARY');
448: hr_utility.raise_error;
449: end if;
450: --
451: end if;
452: hr_utility.set_location(' Leaving:'||l_proc, 15);
448: hr_utility.raise_error;
449: end if;
450: --
451: end if;
452: hr_utility.set_location(' Leaving:'||l_proc, 15);
453: --
454: end chk_us_segment6;
455: --
456: -- ----------------------------------------------------------------------------
494: where lu.lookup_type = 'YES_NO'
495: and lu.lookup_code = p_segment7;
496: --
497: begin
498: hr_utility.set_location('Entering: '||l_proc, 1);
499: --
500: If p_segment7 is not null then
501: --
502: open csr_chk_yes_no;
502: open csr_chk_yes_no;
503: fetch csr_chk_yes_no into l_exists;
504: if csr_chk_yes_no%notfound then
505: close csr_chk_yes_no;
506: hr_utility.set_message(800,'HR_50009_SCL_US_LEGAL_REP');
507: hr_utility.raise_error;
508: end if;
509: close csr_chk_yes_no;
510: --
503: fetch csr_chk_yes_no into l_exists;
504: if csr_chk_yes_no%notfound then
505: close csr_chk_yes_no;
506: hr_utility.set_message(800,'HR_50009_SCL_US_LEGAL_REP');
507: hr_utility.raise_error;
508: end if;
509: close csr_chk_yes_no;
510: --
511: end if;
508: end if;
509: close csr_chk_yes_no;
510: --
511: end if;
512: hr_utility.set_location(' Leaving:'||l_proc, 15);
513: --
514: end chk_us_segment7;
515: --
516: -- ----------------------------------------------------------------------------
585: AND ftr.assignment_id = p_assignment_id
586: AND wcr.wc_code = p_segment8;
587: --
588: begin
589: hr_utility.set_location('Entering: '||l_proc, 1);
590: --
591: If p_segment8 is not null then
592: --
593: -- Check mandatory parameters have been set
607: open csr_chk_wc_override;
608: fetch csr_chk_wc_override into l_exists;
609: if csr_chk_wc_override%notfound then
610: close csr_chk_wc_override;
611: hr_utility.set_message(800,'HR_50010_SCL_US_WORKERS_COMP');
612: hr_utility.raise_error;
613: end if;
614: close csr_chk_wc_override;
615: --
608: fetch csr_chk_wc_override into l_exists;
609: if csr_chk_wc_override%notfound then
610: close csr_chk_wc_override;
611: hr_utility.set_message(800,'HR_50010_SCL_US_WORKERS_COMP');
612: hr_utility.raise_error;
613: end if;
614: close csr_chk_wc_override;
615: --
616: end if;
613: end if;
614: close csr_chk_wc_override;
615: --
616: end if;
617: hr_utility.set_location(' Leaving:'||l_proc, 15);
618: --
619: end chk_us_segment8;
620: --
621: -- ----------------------------------------------------------------------------
659: from HR_ESTABLISHMENTS_V est
660: where est.establishment_id = p_segment9;
661: --
662: begin
663: hr_utility.set_location('Entering: '||l_proc, 1);
664: --
665: -- Check that segment9, if it is not null, is linked to a valid establishment
666: --
667: if p_segment9 is not null then
677: open csr_chk_est;
678: fetch csr_chk_est into l_business_group_id;
679: if csr_chk_est%notfound then
680: close csr_chk_est;
681: hr_utility.set_message(800,'HR_50011_SCL_US_INV_REP_EST');
682: hr_utility.raise_error;
683: end if;
684: close csr_chk_est;
685: hr_utility.set_location(l_proc, 10);
678: fetch csr_chk_est into l_business_group_id;
679: if csr_chk_est%notfound then
680: close csr_chk_est;
681: hr_utility.set_message(800,'HR_50011_SCL_US_INV_REP_EST');
682: hr_utility.raise_error;
683: end if;
684: close csr_chk_est;
685: hr_utility.set_location(l_proc, 10);
686: --
681: hr_utility.set_message(800,'HR_50011_SCL_US_INV_REP_EST');
682: hr_utility.raise_error;
683: end if;
684: close csr_chk_est;
685: hr_utility.set_location(l_proc, 10);
686: --
687: if l_business_group_id <> p_business_group_id then
688: hr_utility.set_message(800,'HR_50012_SCL_US_INV_REP_BUS');
689: hr_utility.raise_error;
684: close csr_chk_est;
685: hr_utility.set_location(l_proc, 10);
686: --
687: if l_business_group_id <> p_business_group_id then
688: hr_utility.set_message(800,'HR_50012_SCL_US_INV_REP_BUS');
689: hr_utility.raise_error;
690: end if;
691: end if;
692: --
685: hr_utility.set_location(l_proc, 10);
686: --
687: if l_business_group_id <> p_business_group_id then
688: hr_utility.set_message(800,'HR_50012_SCL_US_INV_REP_BUS');
689: hr_utility.raise_error;
690: end if;
691: end if;
692: --
693: hr_utility.set_location(' Leaving:'||l_proc, 15);
689: hr_utility.raise_error;
690: end if;
691: end if;
692: --
693: hr_utility.set_location(' Leaving:'||l_proc, 15);
694: --
695: end chk_us_segment9;
696: --
697: -- ----------------------------------------------------------------------------
749: l_n number; -- arg in error number (10..30)
750: l_v varchar2(60); -- arg in error value (10..30)
751: --
752: begin
753: hr_utility.set_location('Entering: '||l_proc, 1);
754: --
755: if p_segment10 is not null then
756: l_n := 10;
757: l_v := p_segment10;
857: l_v := p_segment30;
858: raise l_err;
859: end if;
860: --
861: hr_utility.set_location(' Leaving:'||l_proc, 15);
862: --
863: exception
864: when l_err then
865: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
861: hr_utility.set_location(' Leaving:'||l_proc, 15);
862: --
863: exception
864: when l_err then
865: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
866: hr_utility.set_message_token('ARG_NAME', 'p_segment'||to_char(l_n));
867: hr_utility.set_message_token('ARG_VALUE', l_v);
868: hr_utility.raise_error;
869: end chk_us_segment10_30;
862: --
863: exception
864: when l_err then
865: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
866: hr_utility.set_message_token('ARG_NAME', 'p_segment'||to_char(l_n));
867: hr_utility.set_message_token('ARG_VALUE', l_v);
868: hr_utility.raise_error;
869: end chk_us_segment10_30;
870: --
863: exception
864: when l_err then
865: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
866: hr_utility.set_message_token('ARG_NAME', 'p_segment'||to_char(l_n));
867: hr_utility.set_message_token('ARG_VALUE', l_v);
868: hr_utility.raise_error;
869: end chk_us_segment10_30;
870: --
871: -- ----------------------------------------------------------------------------
864: when l_err then
865: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
866: hr_utility.set_message_token('ARG_NAME', 'p_segment'||to_char(l_n));
867: hr_utility.set_message_token('ARG_VALUE', l_v);
868: hr_utility.raise_error;
869: end chk_us_segment10_30;
870: --
871: -- ----------------------------------------------------------------------------
872: -- |-------------------------------< kf >-------------------------------------|
891: from per_business_groups pbg
892: where pbg.business_group_id = p_rec.business_group_id;
893: --
894: begin
895: hr_utility.set_location('Entering:'||l_proc, 5);
896: --
897: -- ensure that p_rec.business_group_id is mandatory
898: --
899: hr_api.mandatory_arg_error
905: fetch lcsel into l_legislation_code;
906: if lcsel%notfound then
907: close lcsel;
908: -- the business group id must be invalid
909: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
910: hr_utility.raise_error;
911: end if;
912: close lcsel;
913: --
906: if lcsel%notfound then
907: close lcsel;
908: -- the business group id must be invalid
909: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
910: hr_utility.raise_error;
911: end if;
912: close lcsel;
913: --
914: if (l_legislation_code = 'US') then
927: --
928: chk_us_segment1(p_segment1 => hr_scl_shd.g_old_rec.segment1
929: ,p_business_group_id => p_rec.business_group_id);
930: --
931: hr_utility.set_location(l_proc, 15);
932: --
933: -- SEGMENT2
934: --
935: chk_us_segment2(p_segment2 => hr_scl_shd.g_old_rec.segment2
936: ,p_business_group_id => p_rec.business_group_id
937: ,p_validation_start_date => p_validation_start_date
938: ,p_validation_end_date => p_validation_end_date );
939: --
940: hr_utility.set_location(l_proc, 20);
941: --
942: -- SEGMENT3
943: --
944: chk_us_segment3(p_segment3 => hr_scl_shd.g_old_rec.segment3);
942: -- SEGMENT3
943: --
944: chk_us_segment3(p_segment3 => hr_scl_shd.g_old_rec.segment3);
945: --
946: hr_utility.set_location(l_proc, 25);
947: --
948: -- SEGMENT4
949: --
950: chk_us_segment4(p_segment4 => hr_scl_shd.g_old_rec.segment4
949: --
950: chk_us_segment4(p_segment4 => hr_scl_shd.g_old_rec.segment4
951: ,p_organization_id => p_rec.organization_id);
952: --
953: hr_utility.set_location(l_proc, 30);
954: --
955: -- SEGMENT5
956: --
957: chk_us_segment5(p_segment5 => hr_scl_shd.g_old_rec.segment5);
955: -- SEGMENT5
956: --
957: chk_us_segment5(p_segment5 => hr_scl_shd.g_old_rec.segment5);
958: --
959: hr_utility.set_location(l_proc, 35);
960: --
961: -- SEGMENT6
962: --
963: chk_us_segment6(p_segment6 => hr_scl_shd.g_old_rec.segment6);
961: -- SEGMENT6
962: --
963: chk_us_segment6(p_segment6 => hr_scl_shd.g_old_rec.segment6);
964: --
965: hr_utility.set_location(l_proc, 40);
966: --
967: -- SEGMENT7
968: --
969: chk_us_segment7(p_segment7 => hr_scl_shd.g_old_rec.segment7);
967: -- SEGMENT7
968: --
969: chk_us_segment7(p_segment7 => hr_scl_shd.g_old_rec.segment7);
970: --
971: hr_utility.set_location(l_proc, 45);
972: --
973: -- SEGMENT8
974: --
975: -- Check if assignment is being upated, as segment8 is enterable
986: ,p_location_id => p_rec.location_id
987: ,p_assignment_id => p_rec.assignment_id );
988: else
989: if hr_scl_shd.g_old_rec.segment8 is not null then
990: hr_utility.set_message(801,'HR_50013_SCL_WORKERS_OVERRIDE');
991: hr_utility.raise_error;
992: end if;
993: end if;
994: --
987: ,p_assignment_id => p_rec.assignment_id );
988: else
989: if hr_scl_shd.g_old_rec.segment8 is not null then
990: hr_utility.set_message(801,'HR_50013_SCL_WORKERS_OVERRIDE');
991: hr_utility.raise_error;
992: end if;
993: end if;
994: --
995: hr_utility.set_location(l_proc, 50);
991: hr_utility.raise_error;
992: end if;
993: end if;
994: --
995: hr_utility.set_location(l_proc, 50);
996: --
997: -- SEGMENT9
998: --
999: chk_us_segment9(p_segment9 => hr_scl_shd.g_old_rec.segment9
998: --
999: chk_us_segment9(p_segment9 => hr_scl_shd.g_old_rec.segment9
1000: ,p_business_group_id => p_rec.business_group_id);
1001: --
1002: hr_utility.set_location(l_proc, 55);
1003: --
1004: -- SEGMENT10 to 30
1005: --
1006: chk_us_segment10_30(p_segment10 => hr_scl_shd.g_old_rec.segment10
1024: ,p_segment28 => hr_scl_shd.g_old_rec.segment28
1025: ,p_segment29 => hr_scl_shd.g_old_rec.segment29
1026: ,p_segment30 => hr_scl_shd.g_old_rec.segment30 );
1027: --
1028: hr_utility.set_location(l_proc, 60);
1029:
1030: else
1031: --
1032: -- Call segment validation processes from here to check for any
1095: -- if a soft_coding_keyflex_id exists we must error because GB does not
1096: -- support SCL (i.e. segments have been specified)
1097: --
1098: if p_rec.soft_coding_keyflex_id is not null then
1099: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
1100: hr_utility.set_message_token('ARG_NAME', 'soft_coding_keyflex_id');
1101: hr_utility.set_message_token('ARG_VALUE', p_rec.soft_coding_keyflex_id);
1102: hr_utility.raise_error;
1103: end if;
1096: -- support SCL (i.e. segments have been specified)
1097: --
1098: if p_rec.soft_coding_keyflex_id is not null then
1099: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
1100: hr_utility.set_message_token('ARG_NAME', 'soft_coding_keyflex_id');
1101: hr_utility.set_message_token('ARG_VALUE', p_rec.soft_coding_keyflex_id);
1102: hr_utility.raise_error;
1103: end if;
1104: end if;
1097: --
1098: if p_rec.soft_coding_keyflex_id is not null then
1099: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
1100: hr_utility.set_message_token('ARG_NAME', 'soft_coding_keyflex_id');
1101: hr_utility.set_message_token('ARG_VALUE', p_rec.soft_coding_keyflex_id);
1102: hr_utility.raise_error;
1103: end if;
1104: end if;
1105: --
1098: if p_rec.soft_coding_keyflex_id is not null then
1099: hr_utility.set_message(801, 'HR_7296_API_ARG_NOT_SUP');
1100: hr_utility.set_message_token('ARG_NAME', 'soft_coding_keyflex_id');
1101: hr_utility.set_message_token('ARG_VALUE', p_rec.soft_coding_keyflex_id);
1102: hr_utility.raise_error;
1103: end if;
1104: end if;
1105: --
1106: hr_utility.set_location(' Leaving:'||l_proc, 10);
1102: hr_utility.raise_error;
1103: end if;
1104: end if;
1105: --
1106: hr_utility.set_location(' Leaving:'||l_proc, 10);
1107: --
1108: end kf;
1109: --
1110: end hr_scl_flex;