DBA Data[Home] [Help]

APPS.PAY_FR_MAP_CALC dependencies on HR_UTILITY

Line 37: hr_utility.set_location('Deduction',10);

33: l_outputs ff_exec.outputs_t;
34:
35: begin
36:
37: hr_utility.set_location('Deduction',10);
38:
39: IF g_map_arch.deduct_formula is null then
40:
41: hr_utility.set_message(801, 'PY_75027_SICK_DEDUCT_FF_NULL');

Line 41: hr_utility.set_message(801, 'PY_75027_SICK_DEDUCT_FF_NULL');

37: hr_utility.set_location('Deduction',10);
38:
39: IF g_map_arch.deduct_formula is null then
40:
41: hr_utility.set_message(801, 'PY_75027_SICK_DEDUCT_FF_NULL');
42: hr_utility.raise_error;
43:
44: END IF;
45:

Line 42: hr_utility.raise_error;

38:
39: IF g_map_arch.deduct_formula is null then
40:
41: hr_utility.set_message(801, 'PY_75027_SICK_DEDUCT_FF_NULL');
42: hr_utility.raise_error;
43:
44: END IF;
45:
46: /* set context value before calling fast formula */

Line 68: hr_utility.set_location('Deduct',30);

64: , g_map_arch.date_earned
65: , l_inputs
66: , l_outputs);
67:
68: hr_utility.set_location('Deduct',30);
69:
70: For i in 1..l_inputs.count Loop
71: IF l_inputs(i).name = 'DEDUCTION_START_DATE' THEN
72: l_inputs(i).value := fnd_date.date_to_canonical(g_map_calc.start_date);

Line 96: hr_utility.set_location('Deduction',50);

92: l_inputs(i).value:= g_map_arch.element_entry_id;
93: END IF;
94: END Loop;
95:
96: hr_utility.set_location('Deduction',50);
97:
98: /* define output values for fast formula */
99:
100: l_outputs(1).name := 'L_SICKNESS_DEDUCTION';

Line 117: hr_utility.set_message (801, 'PY_75065_DEDUCT_WORK_PAT_NULL');

113: g_map_calc.deduction_rate := l_outputs(2).value;
114: g_map_calc.deduction_base := l_outputs(3).value;
115:
116: IF g_map_calc.deduction_base = -1 then
117: hr_utility.set_message (801, 'PY_75065_DEDUCT_WORK_PAT_NULL');
118: hr_utility.raise_error;
119: END IF;
120:
121: hr_utility.set_location('Deduction',100);

Line 118: hr_utility.raise_error;

114: g_map_calc.deduction_base := l_outputs(3).value;
115:
116: IF g_map_calc.deduction_base = -1 then
117: hr_utility.set_message (801, 'PY_75065_DEDUCT_WORK_PAT_NULL');
118: hr_utility.raise_error;
119: END IF;
120:
121: hr_utility.set_location('Deduction',100);
122:

Line 121: hr_utility.set_location('Deduction',100);

117: hr_utility.set_message (801, 'PY_75065_DEDUCT_WORK_PAT_NULL');
118: hr_utility.raise_error;
119: END IF;
120:
121: hr_utility.set_location('Deduction',100);
122:
123: end Calculate_Maternity_Deduction;
124:
125: -----------------------------------------------------------------------

Line 218: hr_utility.set_location('IJSS',10);

214: l_postnatal_duration_max number := 0;
215:
216: begin
217:
218: hr_utility.set_location('IJSS',10);
219:
220: l_count_dependent_children := count_children(
221: G_MAP_CALC.person_id,
222: G_MAP_CALC.start_date);

Line 254: hr_utility.set_location('IJSS'|| l_criteria,30);

250: end if;
251:
252: -- if the absence is post natal check against max IJSS duration
253:
254: hr_utility.set_location('IJSS'|| l_criteria,30);
255:
256: BEGIN
257:
258: l_postnatal_duration_max := hruserdt.get_table_value(

Line 270: hr_utility.set_location('IJSS'|| l_postnatal_duration_max,31);

266: l_postnatal_duration_max := 0;
267:
268: END;
269:
270: hr_utility.set_location('IJSS'|| l_postnatal_duration_max,31);
271:
272: IF G_MAP_CALC.absence_category = 'FR_M' then
273:
274: if p_end_date >= G_MAP_CALC.birth_date then -- { post natal

Line 309: hr_utility.set_location('IJSS'|| l_postnatal_duration,32);

305:
306: END IF;
307:
308: -- if postnatal duration is exceeded then set the end of the IJSS Payment to that maximum
309: hr_utility.set_location('IJSS'|| l_postnatal_duration,32);
310:
311: if l_postnatal_duration > l_postnatal_duration_max then -- { over max
312: g_map_calc.IJSS_GROSS_END_DATE := p_end_date - ( l_postnatal_duration - l_postnatal_duration_max);
313:

Line 324: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_days,32);

320:
321: if g_map_calc.IJSS_GROSS_END_DATE is not null and g_map_calc.IJSS_GROSS_START_DATE is not null then -- { ijss calc needed
322: g_map_calc.IJSS_GROSS_DAYS := (g_map_calc.IJSS_GROSS_END_DATE - g_map_calc.IJSS_GROSS_START_DATE) +1;
323:
324: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_days,32);
325: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_start_date),32);
326: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_end_date),32);
327:
328: -- fetch reference salary

Line 325: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_start_date),32);

321: if g_map_calc.IJSS_GROSS_END_DATE is not null and g_map_calc.IJSS_GROSS_START_DATE is not null then -- { ijss calc needed
322: g_map_calc.IJSS_GROSS_DAYS := (g_map_calc.IJSS_GROSS_END_DATE - g_map_calc.IJSS_GROSS_START_DATE) +1;
323:
324: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_days,32);
325: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_start_date),32);
326: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_end_date),32);
327:
328: -- fetch reference salary
329: -- reference period is the 3 calendar months that preceed the start of the maternity

Line 326: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_end_date),32);

322: g_map_calc.IJSS_GROSS_DAYS := (g_map_calc.IJSS_GROSS_END_DATE - g_map_calc.IJSS_GROSS_START_DATE) +1;
323:
324: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_days,32);
325: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_start_date),32);
326: hr_utility.set_location('IJSS'|| fnd_date.date_to_canonical(g_map_calc.ijss_gross_end_date),32);
327:
328: -- fetch reference salary
329: -- reference period is the 3 calendar months that preceed the start of the maternity
330: l_ref_date := least(g_map_calc.parent_absence_start_date, g_map_calc.birth_date);

Line 338: hr_utility.set_location('IJSS',50);

334: l_ref_sal := PAY_FR_SICKNESS_CALC.fr_rolling_balance(p_assignment_id,
335: 'FR_MAP_IJSS_REFERENCE_SALARY',
336: l_ref_start_date,
337: l_ref_end_date);
338: hr_utility.set_location('IJSS',50);
339:
340: l_ref_sal := l_ref_sal / 90; -- convert to daily rate
341:
342: -- cap daily rate at social security ceiling limit

Line 350: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_rate,32);

346: g_map_calc.IJSS_GROSS := g_map_calc.IJSS_GROSS_RATE * g_map_calc.IJSS_GROSS_DAYS;
347:
348: g_map_calc.IJSS_NET_PAYMENT := g_map_calc.IJSS_GROSS * (100 - g_ijss_net_rate)/100;
349:
350: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_rate,32);
351: hr_utility.set_location('IJSS'|| g_map_calc.ijss_net_payment,32);
352:
353: end if; -- } ijss calc needed
354: --

Line 351: hr_utility.set_location('IJSS'|| g_map_calc.ijss_net_payment,32);

347:
348: g_map_calc.IJSS_NET_PAYMENT := g_map_calc.IJSS_GROSS * (100 - g_ijss_net_rate)/100;
349:
350: hr_utility.set_location('IJSS'|| g_map_calc.ijss_gross_rate,32);
351: hr_utility.set_location('IJSS'|| g_map_calc.ijss_net_payment,32);
352:
353: end if; -- } ijss calc needed
354: --
355: hr_utility.set_location('IJSS',100);

Line 355: hr_utility.set_location('IJSS',100);

351: hr_utility.set_location('IJSS'|| g_map_calc.ijss_net_payment,32);
352:
353: end if; -- } ijss calc needed
354: --
355: hr_utility.set_location('IJSS',100);
356:
357: end CALC_MAP_IJSS;
358:
359: PROCEDURE calc_map is

Line 390: hr_utility.set_location('CALC_MAP',10);

386: and abs_information1 is null;
387:
388: begin
389:
390: hr_utility.set_location('CALC_MAP',10);
391:
392: if g_map_calc.absence_category = 'FR_M' and nvl(g_map_calc.birth_date, hr_general.end_of_time) = hr_general.end_of_time then
393:
394: OPEN csr_global_value('FR_MATERNITY_MAX_EXTENSION',g_map_arch.date_earned);

Line 398: hr_utility.set_location('CALC_MAP'|| l_ante_duration_max,12);

394: OPEN csr_global_value('FR_MATERNITY_MAX_EXTENSION',g_map_arch.date_earned);
395: FETCH csr_global_value INTO l_ante_duration_max;
396: CLOSE csr_global_value;
397:
398: hr_utility.set_location('CALC_MAP'|| l_ante_duration_max,12);
399:
400: open c_prev_ante_natal_abs(g_map_calc.start_date,g_map_calc.person_id);
401: fetch c_prev_ante_natal_abs into l_ante_duration;
402: close c_prev_ante_natal_abs;

Line 404: hr_utility.set_location('CALC_MAP'|| l_ante_duration,14);

400: open c_prev_ante_natal_abs(g_map_calc.start_date,g_map_calc.person_id);
401: fetch c_prev_ante_natal_abs into l_ante_duration;
402: close c_prev_ante_natal_abs;
403:
404: hr_utility.set_location('CALC_MAP'|| l_ante_duration,14);
405:
406: l_ante_duration := (g_map_calc.end_date - g_map_calc.start_date + 1) + nvl(l_ante_duration,0);
407: hr_utility.set_location('CALC_MAP'|| l_ante_duration,16);
408: if (nvl(l_ante_duration,0) > nvl(l_ante_duration_max,0) ) then

Line 407: hr_utility.set_location('CALC_MAP'|| l_ante_duration,16);

403:
404: hr_utility.set_location('CALC_MAP'|| l_ante_duration,14);
405:
406: l_ante_duration := (g_map_calc.end_date - g_map_calc.start_date + 1) + nvl(l_ante_duration,0);
407: hr_utility.set_location('CALC_MAP'|| l_ante_duration,16);
408: if (nvl(l_ante_duration,0) > nvl(l_ante_duration_max,0) ) then
409:
410: hr_utility.set_message (801, 'PAY_75052_MAT_EXT_EXCEEDED');
411: hr_utility.raise_error;

Line 410: hr_utility.set_message (801, 'PAY_75052_MAT_EXT_EXCEEDED');

406: l_ante_duration := (g_map_calc.end_date - g_map_calc.start_date + 1) + nvl(l_ante_duration,0);
407: hr_utility.set_location('CALC_MAP'|| l_ante_duration,16);
408: if (nvl(l_ante_duration,0) > nvl(l_ante_duration_max,0) ) then
409:
410: hr_utility.set_message (801, 'PAY_75052_MAT_EXT_EXCEEDED');
411: hr_utility.raise_error;
412:
413: end if;
414:

Line 411: hr_utility.raise_error;

407: hr_utility.set_location('CALC_MAP'|| l_ante_duration,16);
408: if (nvl(l_ante_duration,0) > nvl(l_ante_duration_max,0) ) then
409:
410: hr_utility.set_message (801, 'PAY_75052_MAT_EXT_EXCEEDED');
411: hr_utility.raise_error;
412:
413: end if;
414:
415: end if;

Line 431: hr_utility.set_location('CALC_MAP'|| g_ijss_net_rate,30);

427: if g_map_calc.start_date < g_map_arch.action_start_date then
428: g_map_calc.start_date := g_map_arch.action_start_date;
429: end if;
430:
431: hr_utility.set_location('CALC_MAP'|| g_ijss_net_rate,30);
432:
433: if g_map_calc.end_date > g_map_arch.action_end_date then
434: g_map_calc.end_date := g_map_arch.action_end_date;
435: end if;

Line 461: hr_utility.set_location('CALC_MAP',50);

457: OPEN csr_global_value('FR_HOURLY_SMIC_RATE',l_ref_bal_date_from);
458: FETCH csr_global_value INTO l_smic_hourly_rate;
459: CLOSE csr_global_value;
460:
461: hr_utility.set_location('CALC_MAP',50);
462: --
463: l_smid_rate := hruserdt.get_table_value(g_map_arch.business_group_id,'FR_CONTRIBUTION_RATES','Value (EUR)','EE_SMID',l_ref_bal_date_from);
464: --
465: l_global_smic_ded := l_smic_multiplier * l_smic_hourly_rate * l_smid_rate / 100;

Line 467: hr_utility.set_location('CALC_MAP'|| l_global_smic_ded,50);

463: l_smid_rate := hruserdt.get_table_value(g_map_arch.business_group_id,'FR_CONTRIBUTION_RATES','Value (EUR)','EE_SMID',l_ref_bal_date_from);
464: --
465: l_global_smic_ded := l_smic_multiplier * l_smic_hourly_rate * l_smid_rate / 100;
466:
467: hr_utility.set_location('CALC_MAP'|| l_global_smic_ded,50);
468: hr_utility.set_location('CALC_MAP'|| g_map_calc.ELIG_IJSS_CONTRIB,50);
469:
470: IF g_map_calc.ELIG_IJSS_CONTRIB > l_global_smic_ded THEN -- { ELIG_CONTRIB
471: g_map_calc.ELIG_IJSS := 'Y';

Line 468: hr_utility.set_location('CALC_MAP'|| g_map_calc.ELIG_IJSS_CONTRIB,50);

464: --
465: l_global_smic_ded := l_smic_multiplier * l_smic_hourly_rate * l_smid_rate / 100;
466:
467: hr_utility.set_location('CALC_MAP'|| l_global_smic_ded,50);
468: hr_utility.set_location('CALC_MAP'|| g_map_calc.ELIG_IJSS_CONTRIB,50);
469:
470: IF g_map_calc.ELIG_IJSS_CONTRIB > l_global_smic_ded THEN -- { ELIG_CONTRIB
471: g_map_calc.ELIG_IJSS := 'Y';
472: END IF; -- } ELIG_CONTRIB

Line 480: hr_utility.set_location('CALC_MAP',70);

476: END IF; -- } not ELIG_CONTRIB
477:
478: END IF; -- } not eligible hours
479:
480: hr_utility.set_location('CALC_MAP',70);
481:
482: if g_map_calc.ELIG_IJSS = 'Y'and g_map_calc.estimated_IJSS = 'Y' then -- { ELIG_IJSS
483: calc_map_ijss(g_map_arch.assignment_id,
484: g_map_calc.start_date,

Line 495: hr_utility.set_location('CALC_MAP',90);

491: END IF;
492:
493: end if; -- } ELIG_IJSS
494:
495: hr_utility.set_location('CALC_MAP',90);
496:
497: IF g_map_calc.gi_eligible = 'ALL' then
498: g_map_calc.GI_ELIGIBLE := 'Y';
499: g_map_calc.GI_PAYMENT := g_map_calc.DEDUCTION;

Line 507: hr_utility.set_location('CALC_MAP',100);

503: ELSE
504: g_map_calc.GI_ELIGIBLE := 'N';
505: END IF;
506:
507: hr_utility.set_location('CALC_MAP',100);
508:
509: end calc_map;
510:
511: --

Line 614: hr_utility.set_location('INIT_MAP',10);

610: l_proc varchar2(72) := g_package||'init_absence';
611:
612: begin
613:
614: hr_utility.set_location('INIT_MAP',10);
615:
616: -- fetch the dates and the creator_id (which records the absence_attendance_id of
617: -- the absence being processed ) for the element being processed
618: open c_get_entry_dates;

Line 646: hr_utility.set_location('INIT_MAP',30);

642: abs_rec.abs_information10;
643:
644: close c_get_absence;
645:
646: hr_utility.set_location('INIT_MAP',30);
647:
648: -- set the columns that are relevent to the child absence/same value for child
649: -- and parent
650: g_map_calc.absence_id := abs_rec.absence_id;

Line 685: hr_utility.set_location('INIT_MAP',50);

681: (abs_rec.abs_information4), hr_general.end_of_time) ;
682: g_map_calc.ELIG_IJSS_HOURS := abs_rec.abs_information8;
683: g_map_calc.ELIG_IJSS_CONTRIB := fnd_number.canonical_to_number
684: (abs_rec.abs_information9) ;
685: hr_utility.set_location('INIT_MAP',50);
686:
687: else -- }{ processed absence is child fetch parent
688: g_map_calc.parent_absence_id := to_number(abs_rec.abs_information1);
689:

Line 690: hr_utility.set_location('INIT_MAP'|| g_map_calc.parent_absence_id,50);

686:
687: else -- }{ processed absence is child fetch parent
688: g_map_calc.parent_absence_id := to_number(abs_rec.abs_information1);
689:
690: hr_utility.set_location('INIT_MAP'|| g_map_calc.parent_absence_id,50);
691:
692: open c_get_absence(g_map_calc.parent_absence_id);
693: fetch c_get_absence into abs_rec.date_start,
694: abs_rec.date_end,

Line 711: hr_utility.set_message (801, 'PAY_75031_INVALID_LINK_ABS');

707: abs_rec.abs_information10;
708:
709: if c_get_absence%NOTFOUND then
710: close c_get_absence;
711: hr_utility.set_message (801, 'PAY_75031_INVALID_LINK_ABS');
712: hr_utility.raise_error;
713: end if;
714:
715: close c_get_absence;

Line 712: hr_utility.raise_error;

708:
709: if c_get_absence%NOTFOUND then
710: close c_get_absence;
711: hr_utility.set_message (801, 'PAY_75031_INVALID_LINK_ABS');
712: hr_utility.raise_error;
713: end if;
714:
715: close c_get_absence;
716:

Line 728: hr_utility.set_location('INIT_MAP',70);

724: (abs_rec.abs_information4),hr_general.end_of_time);
725: g_map_calc.ELIG_IJSS_HOURS := abs_rec.abs_information8;
726: g_map_calc.ELIG_IJSS_CONTRIB := fnd_number.canonical_to_number
727: (abs_rec.abs_information9) ;
728: hr_utility.set_location('INIT_MAP',70);
729:
730: end if ; -- } fetch parent
731: end if; -- } maternity
732:

Line 750: hr_utility.set_location('INIT_MAP',80);

746: g_map_calc.ELIG_IJSS_CONTRIB := fnd_number.canonical_to_number
747: (abs_rec.abs_information6) ;
748: g_map_calc.SPOUSES_LEAVE := fnd_number.canonical_to_number
749: (abs_rec.abs_information7) ;
750: hr_utility.set_location('INIT_MAP',80);
751:
752: end if; -- } adoption
753:
754: if abs_rec.abs_information_category = 'FR_FR_PATERNITY'

Line 769: hr_utility.set_location('INIT_MAP',90);

765: (abs_rec.abs_information1), hr_general.end_of_time) ;
766: g_map_calc.ELIG_IJSS_HOURS := abs_rec.abs_information5;
767: g_map_calc.ELIG_IJSS_CONTRIB := fnd_number.canonical_to_number
768: (abs_rec.abs_information6) ;
769: hr_utility.set_location('INIT_MAP',90);
770:
771: end if; -- } end Paternity
772:
773: hr_utility.set_location('INIT_MAP',100);

Line 773: hr_utility.set_location('INIT_MAP',100);

769: hr_utility.set_location('INIT_MAP',90);
770:
771: end if; -- } end Paternity
772:
773: hr_utility.set_location('INIT_MAP',100);
774:
775: return 'Y';
776:
777: end init_map_absence;

Line 834: hr_utility.set_location('INIT_CPAM',10);

830: l_proc varchar2(72) := g_package||'init_absence';
831:
832: begin
833:
834: hr_utility.set_location('INIT_CPAM',10);
835:
836: -- fetch the details of the absence looking for a maternity absence that is current
837: -- on the payment_start_date. If no maternity is found raise error. If maternity
838: -- exists but has been estimated then skip. If the absence fetched is a child absence

Line 848: hr_utility.set_message (801, 'PAY_75049_IJSS_NO_ABSENCE');

844: abs_rec.date_end,
845: abs_rec.parent_absence_id,
846: abs_rec.estimated_ijss;
847: if c_get_absence%notfound THEN
848: hr_utility.set_message (801, 'PAY_75049_IJSS_NO_ABSENCE');
849: hr_utility.raise_error;
850: end if;
851: close c_get_absence;
852:

Line 849: hr_utility.raise_error;

845: abs_rec.parent_absence_id,
846: abs_rec.estimated_ijss;
847: if c_get_absence%notfound THEN
848: hr_utility.set_message (801, 'PAY_75049_IJSS_NO_ABSENCE');
849: hr_utility.raise_error;
850: end if;
851: close c_get_absence;
852:
853: g_map_arch.element_type_id := p_element_type_id;

Line 867: hr_utility.set_location('INIT_CPAM',30);

863: g_map_calc.ijss_gross := p_gross_amount;
864: g_map_calc.ijss_net_payment := p_net_amount;
865: g_map_calc.initiator := 'CPAM';
866:
867: hr_utility.set_location('INIT_CPAM',30);
868:
869: end;
870:
871: -- set the columns that are relevent to the child absence/same value for child

Line 881: hr_utility.set_location('INIT_CPAM',50);

877: fetch c_get_parent_absence into abs_rec.estimated_ijss;
878: close c_get_parent_absence;
879: end if;
880:
881: hr_utility.set_location('INIT_CPAM',50);
882:
883: g_map_calc.estimated_ijss := abs_rec.estimated_ijss;
884:
885: -- if the absence is already estimated then don't iterate and skip

Line 891: hr_utility.set_location('INIT_CPAM',100);

887: if (g_map_calc.ESTIMATED_IJSS = 'N'and g_map_calc.ijss_gross > 0 and g_map_calc.ijss_net_payment > 0) then
888: g_map_calc.IJSS_ADJUSTMENT := 'Y';
889: end if;
890:
891: hr_utility.set_location('INIT_CPAM',100);
892:
893: return g_map_calc.estimated_ijss;
894:
895: end init_cpam_absence;

Line 902: hr_utility.set_location('SKIP',10);

898: RETURN Varchar2 is
899:
900: begin
901:
902: hr_utility.set_location('SKIP',10);
903:
904: return g_map_calc.estimated_ijss;
905:
906: end get_map_skip;

Line 924: hr_utility.set_location('Iterate',10);

920:
921: --
922: -- Checking for change in assignment, absence and initialising Variables
923: --
924: hr_utility.set_location('Iterate',10);
925:
926: IF (NVL(g_map_arch.assignment_id, -1) <> p_assignment_id) OR
927: (g_map_arch.element_entry_id IS NULL) OR
928: (g_map_arch.date_earned <> p_date_earned) THEN

Line 934: hr_utility.set_location('actual net'|| p_net_pay,20);

930: g_map_arch.assignment_id := p_assignment_id;
931: g_map_arch.date_earned := p_date_earned;
932: g_map_arch.element_entry_id := p_element_entry_id;
933: g_map_arch.net := p_net_pay;
934: hr_utility.set_location('actual net'|| p_net_pay,20);
935: hr_utility.set_location('Iterate',20);
936:
937: IF g_map_calc.initiator <> 'CPAM' THEN
938: calc_map();

Line 935: hr_utility.set_location('Iterate',20);

931: g_map_arch.date_earned := p_date_earned;
932: g_map_arch.element_entry_id := p_element_entry_id;
933: g_map_arch.net := p_net_pay;
934: hr_utility.set_location('actual net'|| p_net_pay,20);
935: hr_utility.set_location('Iterate',20);
936:
937: IF g_map_calc.initiator <> 'CPAM' THEN
938: calc_map();
939: END IF;

Line 944: hr_utility.set_location('arch net'|| g_map_arch.net,30);

940:
941: ELSE
942: increment_iteration;
943:
944: hr_utility.set_location('arch net'|| g_map_arch.net,30);
945: hr_utility.set_location('actual net'|| p_net_pay,30);
946:
947: IF nvl(g_map_calc.ijss_adjustment,'N') <> 'Y' OR
948: (g_map_arch.net + cs_MARGIN >= p_net_pay AND

Line 945: hr_utility.set_location('actual net'|| p_net_pay,30);

941: ELSE
942: increment_iteration;
943:
944: hr_utility.set_location('arch net'|| g_map_arch.net,30);
945: hr_utility.set_location('actual net'|| p_net_pay,30);
946:
947: IF nvl(g_map_calc.ijss_adjustment,'N') <> 'Y' OR
948: (g_map_arch.net + cs_MARGIN >= p_net_pay AND
949: g_map_arch.net - cs_MARGIN <= p_net_pay)THEN

Line 951: hr_utility.set_location('Iterate',30);

947: IF nvl(g_map_calc.ijss_adjustment,'N') <> 'Y' OR
948: (g_map_arch.net + cs_MARGIN >= p_net_pay AND
949: g_map_arch.net - cs_MARGIN <= p_net_pay)THEN
950:
951: hr_utility.set_location('Iterate',30);
952:
953: reset_data_structures;
954: p_stop_processing := 'Y';
955: ELSE

Line 961: hr_utility.set_location('Iterate',100);

957: END IF;
958:
959: END IF;
960:
961: hr_utility.set_location('Iterate',100);
962:
963: RETURN 0;
964: EXCEPTION
965: WHEN OTHERS THEN

Line 966: hr_utility.set_location('iterate ',-10);

962:
963: RETURN 0;
964: EXCEPTION
965: WHEN OTHERS THEN
966: hr_utility.set_location('iterate ',-10);
967: hr_utility.trace(SQLCODE);
968: hr_utility.trace(SQLERRM);
969: hr_utility.trace_off;
970: RAISE;

Line 967: hr_utility.trace(SQLCODE);

963: RETURN 0;
964: EXCEPTION
965: WHEN OTHERS THEN
966: hr_utility.set_location('iterate ',-10);
967: hr_utility.trace(SQLCODE);
968: hr_utility.trace(SQLERRM);
969: hr_utility.trace_off;
970: RAISE;
971:

Line 968: hr_utility.trace(SQLERRM);

964: EXCEPTION
965: WHEN OTHERS THEN
966: hr_utility.set_location('iterate ',-10);
967: hr_utility.trace(SQLCODE);
968: hr_utility.trace(SQLERRM);
969: hr_utility.trace_off;
970: RAISE;
971:
972: end iterate;

Line 969: hr_utility.trace_off;

965: WHEN OTHERS THEN
966: hr_utility.set_location('iterate ',-10);
967: hr_utility.trace(SQLCODE);
968: hr_utility.trace(SQLERRM);
969: hr_utility.trace_off;
970: RAISE;
971:
972: end iterate;
973:

Line 999: hr_utility.set_location('Indirect',10);

995: RETURN Number is
996:
997: begin
998:
999: hr_utility.set_location('Indirect',10);
1000:
1001: p_absence_id := g_map_calc.absence_id;
1002: p_ijss_gross := g_map_calc.ijss_gross;
1003: p_ijss_gross_rate := g_map_calc.ijss_gross_days;

Line 1017: hr_utility.set_location('Iterate',100);

1013: p_map_deduct_end_date := g_map_calc.deduction_end_date;
1014: p_map_gi_payment := g_map_calc.gi_payment;
1015: p_map_ijss_adjustment := g_map_calc.gi_ijss_adj;
1016:
1017: hr_utility.set_location('Iterate',100);
1018:
1019: return 0;
1020:
1021: end indirects;

Line 1031: hr_utility.set_location('Reset Data Str',10);

1027:
1028: PROCEDURE reset_data_structures IS
1029: BEGIN
1030:
1031: hr_utility.set_location('Reset Data Str',10);
1032:
1033: g_map_calc := blank_map_calc;
1034: g_map_arch := blank_map_arch;
1035: g_ctl := blank_ctl;

Line 1037: hr_utility.set_location('Reset Data Str',100);

1033: g_map_calc := blank_map_calc;
1034: g_map_arch := blank_map_arch;
1035: g_ctl := blank_ctl;
1036:
1037: hr_utility.set_location('Reset Data Str',100);
1038: END reset_data_structures;
1039:
1040: --
1041: -- Increments the iteration.

Line 1047: hr_utility.set_location('Increment Iteration',10);

1043: --
1044:
1045: PROCEDURE increment_iteration IS
1046: BEGIN
1047: hr_utility.set_location('Increment Iteration',10);
1048: g_ctl.iter := g_ctl.iter + 1;
1049: hr_utility.set_location('Increment Iteration',100);
1050: END increment_iteration;
1051:

Line 1049: hr_utility.set_location('Increment Iteration',100);

1045: PROCEDURE increment_iteration IS
1046: BEGIN
1047: hr_utility.set_location('Increment Iteration',10);
1048: g_ctl.iter := g_ctl.iter + 1;
1049: hr_utility.set_location('Increment Iteration',100);
1050: END increment_iteration;
1051:
1052: --
1053: --

Line 1070: hr_utility.set_location('Set Adjustment',10);

1066: l_diff NUMBER;
1067: l_map_adj NUMBER;
1068: l_init NUMBER := 0;
1069: BEGIN
1070: hr_utility.set_location('Set Adjustment',10);
1071: --
1072: --
1073: -- Get the target net for the current guarantee.
1074: --

Line 1079: hr_utility.set_location('Set Adjustment target net: ' || l_target_net,15);

1075: l_target_net := nvl(g_map_arch.net,0);
1076:
1077: select decode(l_target_net,0,1,l_target_net) into l_init from dual;
1078:
1079: hr_utility.set_location('Set Adjustment target net: ' || l_target_net,15);
1080: hr_utility.set_location('Set Adjustment init: ' || l_init,17);
1081:
1082: --
1083: -- There has not been an adjustment so set an initial value.

Line 1080: hr_utility.set_location('Set Adjustment init: ' || l_init,17);

1076:
1077: select decode(l_target_net,0,1,l_target_net) into l_init from dual;
1078:
1079: hr_utility.set_location('Set Adjustment target net: ' || l_target_net,15);
1080: hr_utility.set_location('Set Adjustment init: ' || l_init,17);
1081:
1082: --
1083: -- There has not been an adjustment so set an initial value.
1084: --

Line 1087: hr_utility.set_location('IJSS Adjustment: ' ||g_map_calc.gi_ijss_adj,19);

1083: -- There has not been an adjustment so set an initial value.
1084: --
1085: IF g_map_calc.gi_ijss_adj IS NULL THEN
1086:
1087: hr_utility.set_location('IJSS Adjustment: ' ||g_map_calc.gi_ijss_adj,19);
1088:
1089: l_dummy := pay_iterate.initialise(g_map_arch.element_entry_id, l_init, - 1 * l_init, l_init);
1090:
1091: l_map_adj := pay_iterate.get_interpolation_guess(g_map_arch.element_entry_id, 0) ;

Line 1092: hr_utility.set_location('Set Adjustment',20);

1088:
1089: l_dummy := pay_iterate.initialise(g_map_arch.element_entry_id, l_init, - 1 * l_init, l_init);
1090:
1091: l_map_adj := pay_iterate.get_interpolation_guess(g_map_arch.element_entry_id, 0) ;
1092: hr_utility.set_location('Set Adjustment',20);
1093: --
1094: --
1095: -- Refine the adjustment.
1096: --

Line 1098: hr_utility.set_location('IJSS Adjustment: ' ||g_map_calc.gi_ijss_adj,29);

1094: --
1095: -- Refine the adjustment.
1096: --
1097: ELSE
1098: hr_utility.set_location('IJSS Adjustment: ' ||g_map_calc.gi_ijss_adj,29);
1099: l_diff := l_target_net - p_net_pay;
1100: l_map_adj := pay_iterate.get_interpolation_guess(g_map_arch.element_entry_id, l_diff);
1101:
1102: END IF;

Line 1108: hr_utility.set_location('Set Adjustment',100);

1104: --
1105: -- Set the maternity adjustment.
1106: --
1107: g_map_calc.gi_ijss_adj := l_map_adj;
1108: hr_utility.set_location('Set Adjustment',100);
1109:
1110: END set_adjustment;
1111:
1112: --