DBA Data[Home] [Help]

APPS.PER_FR_D2_PKG dependencies on HR_UTILITY

Line 111: hr_utility.set_location('entering '||l_proc,0);

107: i binary_integer;
108: begin
109: --Initialising Local Variables
110: l_proc :='set_headcounts';
111: hr_utility.set_location('entering '||l_proc,0);
112: --
113: -- initialize OUT parameters
114: l_return := 0;
115: p_headcount_obligation := 0;

Line 140: hr_utility.set_location(l_proc,5);

136: ,p_1jan));
137: --
138: get_formula_ref (p_31dec, l_business_group_id, l_formula_id, l_formula_start_date);
139: --
140: hr_utility.set_location(l_proc,5);
141: --
142: -- work out list of disabled employees (regardless of headcounts)
143: --
144: l_list_disabled := list_disabled (p_establishment_id, p_1jan, p_31dec);

Line 213: hr_utility.set_location('headcount for '||to_char(rec_emp_year.person_id)||' is '||to_char(l_employee_count),50);

209: l_formula_id,
210: l_formula_start_date);
211: end if;
212: --
213: hr_utility.set_location('headcount for '||to_char(rec_emp_year.person_id)||' is '||to_char(l_employee_count),50);
214: --
215: if l_employee_count > 0 then -- update headcounts
216: --
217: p_headcount_obligation := p_headcount_obligation + l_employee_count;

Line 255: hr_utility.set_location('leaving '||l_proc,80);

251: -- #4068197
252: p_breakdown_particular := string_of_particular(pcs_count, pcs_codes);
253: -- #4068197
254: --
255: hr_utility.set_location('leaving '||l_proc,80);
256: return l_return;
257: --
258: exception
259: when others then

Line 260: hr_utility.set_location('SetHeaERR:'||substr(sqlerrm,1,80),90);

256: return l_return;
257: --
258: exception
259: when others then
260: hr_utility.set_location('SetHeaERR:'||substr(sqlerrm,1,80),90);
261: return 1;
262: end set_headcounts;
263: --
264: --

Line 404: hr_utility.set_location('leaving ff with debug_text='||l_debug_text,70);

400: l_debug_text := l_outputs(l_out_cnt).value;
401: end if;
402: end loop;
403: --
404: hr_utility.set_location('leaving ff with debug_text='||l_debug_text,70);
405: --
406: end if;
407: --
408: return l_flag;

Line 412: hr_utility.set_location('ConProERR:'||substr(sqlerrm,1,80),90);

408: return l_flag;
409: --
410: exception
411: when others then
412: hr_utility.set_location('ConProERR:'||substr(sqlerrm,1,80),90);
413: return 0;
414: end contract_prorated;
415: --
416: --

Line 456: hr_utility.set_location('enter '||l_proc,5);

452: begin
453: --Initialising Local Variables
454: l_proc := 'Update_pcs_code';
455:
456: hr_utility.set_location('enter '||l_proc,5);
457: --
458: --Get the Effective Date
459: IF p_report_qualifier = 'DADS' THEN
460: l_unused_date := to_date('31-12-2002', 'DD-MM-YYYY');

Line 464: hr_utility.set_location('The last date of the old period date is '||l_unused_date,10);

460: l_unused_date := to_date('31-12-2002', 'DD-MM-YYYY');
461: ELSE
462: l_unused_date := to_date('31-12-2003', 'DD-MM-YYYY');
463: END IF;
464: hr_utility.set_location('The last date of the old period date is '||l_unused_date,10);
465: --
466: -- Check for the date
467: IF p_effective_date <= l_unused_date THEN
468: hr_utility.set_location('In old period '||l_proc,20);

Line 468: hr_utility.set_location('In old period '||l_proc,20);

464: hr_utility.set_location('The last date of the old period date is '||l_unused_date,10);
465: --
466: -- Check for the date
467: IF p_effective_date <= l_unused_date THEN
468: hr_utility.set_location('In old period '||l_proc,20);
469: --The Code should be an old code
470: --Check whether the obtained code is new code or not
471: IF ascii(substr(p_pcs_code, -1 )) < ascii(0) OR ascii(substr(p_pcs_code, -1)) > ascii(9) THEN
472: l_unused_number := 0;

Line 490: hr_utility.set_location('In new period '||l_proc,30);

486: and description = p_pcs_code;
487: END IF;
488: END IF; --Ignore when it is a old code
489: ELSE
490: hr_utility.set_location('In new period '||l_proc,30);
491: --The code should be a new code
492: --Check whether the obtained code is old code or not
493: IF ascii(substr(p_pcs_code, -1 )) >= ascii(0) AND ascii(substr(p_pcs_code, -1)) <= ascii(9) THEN
494: --Then check whether there is mapping or not

Line 519: hr_utility.set_location('leaving '||l_proc,50);

515: p_pcs_code := l_unused_char;
516: END IF;
517: END IF; --Ignore when it is a new code
518: END IF;
519: hr_utility.set_location('leaving '||l_proc,50);
520: --
521: Exception
522: when others then
523: hr_utility.set_location('Error has been created in the package'||l_proc, 60);

Line 523: hr_utility.set_location('Error has been created in the package'||l_proc, 60);

519: hr_utility.set_location('leaving '||l_proc,50);
520: --
521: Exception
522: when others then
523: hr_utility.set_location('Error has been created in the package'||l_proc, 60);
524: hr_utility.set_location('Error is '||sqlerrm, 70);
525: end get_pcs_code;
526: --
527: --

Line 524: hr_utility.set_location('Error is '||sqlerrm, 70);

520: --
521: Exception
522: when others then
523: hr_utility.set_location('Error has been created in the package'||l_proc, 60);
524: hr_utility.set_location('Error is '||sqlerrm, 70);
525: end get_pcs_code;
526: --
527: --
528: -- overloaded procedure get_job_info 115.15

Line 648: hr_utility.set_location('entering list_disabled',5);

644: is
645: l_list varchar2(32000);
646: first boolean:=true;
647: begin
648: hr_utility.set_location('entering list_disabled',5);
649: --
650: for rec_disabled in csr_get_disabled (p_establishment_id,p_1jan,p_31dec) loop
651: --
652: if not first then

Line 659: hr_utility.set_location('list of disabled ='||l_list,15);

655: l_list := l_list || to_char(rec_disabled.id);
656: first := false;
657: end loop;
658: --
659: hr_utility.set_location('list of disabled ='||l_list,15);
660: --
661: return l_list;
662: --
663: exception

Line 665: hr_utility.set_location('LisDisERR:'||substr(sqlerrm,1,80),90);

661: return l_list;
662: --
663: exception
664: when others then
665: hr_utility.set_location('LisDisERR:'||substr(sqlerrm,1,80),90);
666: return '-1';
667: end list_disabled;
668: --
669: --

Line 692: hr_utility.set_location('removed '||l_id_text||' from list of disabled',50);

688: l_length := l_length + 1;
689: end if;
690: end if;
691: p_list := substr(p_list,1,l_pos-1) || substr(p_list,l_pos+l_length);
692: hr_utility.set_location('removed '||l_id_text||' from list of disabled',50);
693: hr_utility.set_location('new list is '||substr(p_list,1,80),70);
694: end if;
695: end if;
696: end trunc_list_disabled;

Line 693: hr_utility.set_location('new list is '||substr(p_list,1,80),70);

689: end if;
690: end if;
691: p_list := substr(p_list,1,l_pos-1) || substr(p_list,l_pos+l_length);
692: hr_utility.set_location('removed '||l_id_text||' from list of disabled',50);
693: hr_utility.set_location('new list is '||substr(p_list,1,80),70);
694: end if;
695: end if;
696: end trunc_list_disabled;
697: --

Line 726: hr_utility.set_location('update_particular pcs_code='||l_pcs_code_text,10);

722: p_31dec,
723: l_pcs_code_text,
724: l_job_title);
725: --
726: hr_utility.set_location('update_particular pcs_code='||l_pcs_code_text,10);
727: --
728: --
729: Begin
730: l_pcs_particular := hruserdt.get_table_value (p_business_group_id,

Line 746: hr_utility.set_location('update_particular l_pcs_particular = '||l_pcs_particular, 11);

742: Exception
743: When no_data_found then
744: l_pcs_particular := 'N';
745: end;
746: hr_utility.set_location('update_particular l_pcs_particular = '||l_pcs_particular, 11);
747: --
748: if l_pcs_particular = 'Y' then
749: p_headcount_particular := p_headcount_particular + p_employee_count;
750: l_pcs_code_count := p_pcs_count.first;

Line 786: hr_utility.set_location('UpdParERR:'||substr(sqlerrm,1,80),90);

782: exception
783: when no_data_found then
784: null;
785: when others then
786: hr_utility.set_location('UpdParERR:'||substr(sqlerrm,1,80),90);
787: end update_particular;
788: --
789: --
790: function string_of_particular (p_pcs_count in table_of_number,

Line 800: hr_utility.set_location('enter string_of_particular',5);

796: first boolean:= true;
797: begin
798: l_string := '';
799: --
800: hr_utility.set_location('enter string_of_particular',5);
801: --
802: i := p_pcs_count.first;
803: while i is not null loop
804: --

Line 805: hr_utility.set_location('table of particular not empty',10);

801: --
802: i := p_pcs_count.first;
803: while i is not null loop
804: --
805: hr_utility.set_location('table of particular not empty',10);
806: --
807: if not first then
808: l_string := l_string || ' union ';
809: end if;

Line 816: hr_utility.set_location('string_of_particular is '||l_string,50);

812: i := p_pcs_count.next(i);
813: first := false;
814: end loop;
815: --
816: hr_utility.set_location('string_of_particular is '||l_string,50);
817: --
818: if l_string is null then
819: l_string := 'select 0 pc, 0 ph from dual';
820: end if;

Line 822: hr_utility.set_location('string_of_particular is '||l_string,55);

818: if l_string is null then
819: l_string := 'select 0 pc, 0 ph from dual';
820: end if;
821: --
822: hr_utility.set_location('string_of_particular is '||l_string,55);
823: --
824: return l_string;
825: --
826: exception

Line 828: hr_utility.set_location('StrOfParERR:'||substr(sqlerrm,1,80),90);

824: return l_string;
825: --
826: exception
827: when others then
828: hr_utility.set_location('StrOfParERR:'||substr(sqlerrm,1,80),90);
829: return 'select 0 pc, 0 ph from dual';
830: end string_of_particular;
831: --
832: --

Line 843: hr_utility.set_location('enter '||l_proc,5);

839: l_proc varchar2(50);
840: begin
841: -- Initialising Local Variables
842: l_proc :='update_count_disabled';
843: hr_utility.set_location('enter '||l_proc,5);
844: --
845: l_pos := posid_in_list(p_person_id,p_list);
846: --
847: if l_pos > 0 then

Line 849: hr_utility.set_location(to_char(p_person_id)||' is disabled',10);

845: l_pos := posid_in_list(p_person_id,p_list);
846: --
847: if l_pos > 0 then
848: --
849: hr_utility.set_location(to_char(p_person_id)||' is disabled',10);
850: --
851: p_count_disabled := p_count_disabled || to_char(p_person_id) || '=';
852: p_count_disabled := p_count_disabled || to_char(round(p_employee_count,2)) || ';';
853: --

Line 858: hr_utility.set_location('UpdCouDisERR:'||substr(sqlerrm,1,80),90);

854: end if;
855: --
856: exception
857: when others then
858: hr_utility.set_location('UpdCouDisERR:'||substr(sqlerrm,1,80),90);
859: end update_count_disabled;
860: --
861: --
862: procedure get_formula_ref (p_effective_date in date,

Line 948: hr_utility.set_location('id-string found in list but not a proper id',50);

944: end if;
945: if l_char_before in ('0','1','2','3','4','5','6','7','8','9')
946: or l_char_after in ('0','1','2','3','4','5','6','7','8','9') then
947: l_pos := 0;
948: hr_utility.set_location('id-string found in list but not a proper id',50);
949: end if;
950: end if;
951: return l_pos;
952: end posid_in_list;

Line 1048: hr_utility.set_location('GetExtUniERR:'||substr(sqlerrm,1,80),90);

1044: p_xipp_high_units := g_extra_units.rec.x_ipp_high_units;
1045: p_hire_units := g_extra_units.rec.x_hire_units;
1046: exception
1047: when others then
1048: hr_utility.set_location('GetExtUniERR:'||substr(sqlerrm,1,80),90);
1049: end get_extra_units;
1050: --
1051: --
1052: procedure populate_blocks_table (p_establishment_id in number,

Line 1098: hr_utility.set_location('PopBloTabERR:'||substr(sqlerrm,1,80),90);

1094: end loop;
1095: end loop;
1096: exception
1097: when others then
1098: hr_utility.set_location('PopBloTabERR:'||substr(sqlerrm,1,80),90);
1099: end populate_blocks_table;
1100: --
1101: --
1102: function latest_block (p_assignment_id in number,

Line 1131: hr_utility.set_location('LatBloERR:'||substr(sqlerrm,1,80),90);

1127: return to_date('31124712','DDMMYYYY');
1128: end if;
1129: exception
1130: when others then
1131: hr_utility.set_location('LatBloERR:'||substr(sqlerrm,1,80),90);
1132: end latest_block;
1133: --
1134: --
1135: function beginning_of_block (p_assignment_id in number,

Line 1204: hr_utility.set_location('BegOfBloERR:'||substr(sqlerrm,1,80),90);

1200: exception
1201: when no_data_found then
1202: return p_1jan;
1203: when others then
1204: hr_utility.set_location('BegOfBloERR:'||substr(sqlerrm,1,80),90);
1205: end beginning_of_block;
1206: --
1207: --
1208: procedure add_block_row (p_block_table in out nocopy table_of_block,

Line 1318: hr_utility.set_location('AddBloRowERR:'||substr(sqlerrm,1,80),90);

1314: close csr_get_person_type_usages;
1315: --
1316: exception
1317: when others then
1318: hr_utility.set_location('AddBloRowERR:'||substr(sqlerrm,1,80),90);
1319: end add_block_row;
1320: --
1321: --
1322: END PER_FR_D2_PKG;