9: -- -----------------------
10: IS
11: l_proc VARCHAR2(61) := g_package || 'CLOSE_CURSOR';
12: begin
13: hr_utility.set_location('Entering :' || l_proc, 10);
14: IF c_extra_info%ISOPEN THEN
15: hr_utility.set_location('Cursor Closed :' || l_proc, 10);
16: CLOSE c_extra_info;
17: END IF;
11: l_proc VARCHAR2(61) := g_package || 'CLOSE_CURSOR';
12: begin
13: hr_utility.set_location('Entering :' || l_proc, 10);
14: IF c_extra_info%ISOPEN THEN
15: hr_utility.set_location('Cursor Closed :' || l_proc, 10);
16: CLOSE c_extra_info;
17: END IF;
18: hr_utility.set_location('Leaving :' || l_proc, 10);
19: END;
14: IF c_extra_info%ISOPEN THEN
15: hr_utility.set_location('Cursor Closed :' || l_proc, 10);
16: CLOSE c_extra_info;
17: END IF;
18: hr_utility.set_location('Leaving :' || l_proc, 10);
19: END;
20:
21: -- -----------------------
22: FUNCTION OPEN_FETCH_CURSOR (
33: c_extra_info c_extra_info_type;
34: r_short_extra_info r_short_extra_info_type;
35: BEGIN
36:
37: hr_utility.set_location('Entering :' || l_proc, 10);
38: hr_utility.set_location('ID :' || to_char(p_id) || l_proc, 11);
39: hr_utility.set_location('Date Effective : ' || to_char(p_date_effective, 'YYYY/MM/DD') || l_proc, 12);
40: hr_utility.set_location('Form Name :' || p_form_name || l_proc, 13);
41: hr_utility.set_location('Info Type :' || p_information_type || l_proc, 14);
34: r_short_extra_info r_short_extra_info_type;
35: BEGIN
36:
37: hr_utility.set_location('Entering :' || l_proc, 10);
38: hr_utility.set_location('ID :' || to_char(p_id) || l_proc, 11);
39: hr_utility.set_location('Date Effective : ' || to_char(p_date_effective, 'YYYY/MM/DD') || l_proc, 12);
40: hr_utility.set_location('Form Name :' || p_form_name || l_proc, 13);
41: hr_utility.set_location('Info Type :' || p_information_type || l_proc, 14);
42: g_records_fetched := 0;
35: BEGIN
36:
37: hr_utility.set_location('Entering :' || l_proc, 10);
38: hr_utility.set_location('ID :' || to_char(p_id) || l_proc, 11);
39: hr_utility.set_location('Date Effective : ' || to_char(p_date_effective, 'YYYY/MM/DD') || l_proc, 12);
40: hr_utility.set_location('Form Name :' || p_form_name || l_proc, 13);
41: hr_utility.set_location('Info Type :' || p_information_type || l_proc, 14);
42: g_records_fetched := 0;
43: g_current_record := 1;
36:
37: hr_utility.set_location('Entering :' || l_proc, 10);
38: hr_utility.set_location('ID :' || to_char(p_id) || l_proc, 11);
39: hr_utility.set_location('Date Effective : ' || to_char(p_date_effective, 'YYYY/MM/DD') || l_proc, 12);
40: hr_utility.set_location('Form Name :' || p_form_name || l_proc, 13);
41: hr_utility.set_location('Info Type :' || p_information_type || l_proc, 14);
42: g_records_fetched := 0;
43: g_current_record := 1;
44: IF p_form_name IN ('PERWSPOI','GHRWSPOC') THEN
37: hr_utility.set_location('Entering :' || l_proc, 10);
38: hr_utility.set_location('ID :' || to_char(p_id) || l_proc, 11);
39: hr_utility.set_location('Date Effective : ' || to_char(p_date_effective, 'YYYY/MM/DD') || l_proc, 12);
40: hr_utility.set_location('Form Name :' || p_form_name || l_proc, 13);
41: hr_utility.set_location('Info Type :' || p_information_type || l_proc, 14);
42: g_records_fetched := 0;
43: g_current_record := 1;
44: IF p_form_name IN ('PERWSPOI','GHRWSPOC') THEN
45: open c_extra_info for
100: r_extra_info_tab(g_records_fetched).extra_info_id := r_short_extra_info.extra_info_id;
101: r_extra_info_tab(g_records_fetched).information_type := r_short_extra_info.information_type;
102: r_extra_info_tab(g_records_fetched).id := r_short_extra_info.id;
103:
104: hr_utility.set_location('Calling ghr_history_fetch.fetch_.....ei' || l_proc, 20);
105:
106: IF p_form_name IN ('PERWSPOI','GHRWSPOC') THEN
107:
108: ghr_history_fetch.fetch_positionei(
318: ,p_result_code => l_result_code
319: );
320:
321: END IF;
322: hr_utility.set_location('Back to ' || l_proc, 30);
323:
324: hr_utility.set_location('Result Code :' || NVL(l_result_code, 'NULL'), 34);
325:
326: hr_utility.set_location('Current Record :' || to_char(g_current_record), 35);
320:
321: END IF;
322: hr_utility.set_location('Back to ' || l_proc, 30);
323:
324: hr_utility.set_location('Result Code :' || NVL(l_result_code, 'NULL'), 34);
325:
326: hr_utility.set_location('Current Record :' || to_char(g_current_record), 35);
327: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 36);
328:
322: hr_utility.set_location('Back to ' || l_proc, 30);
323:
324: hr_utility.set_location('Result Code :' || NVL(l_result_code, 'NULL'), 34);
325:
326: hr_utility.set_location('Current Record :' || to_char(g_current_record), 35);
327: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 36);
328:
329: IF l_result_code IS NOT NULL THEN
330: r_extra_info_tab(g_records_fetched).extra_info_id := r_short_extra_info.extra_info_id;
323:
324: hr_utility.set_location('Result Code :' || NVL(l_result_code, 'NULL'), 34);
325:
326: hr_utility.set_location('Current Record :' || to_char(g_current_record), 35);
327: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 36);
328:
329: IF l_result_code IS NOT NULL THEN
330: r_extra_info_tab(g_records_fetched).extra_info_id := r_short_extra_info.extra_info_id;
331: r_extra_info_tab(g_records_fetched).information_type := r_short_extra_info.information_type;
330: r_extra_info_tab(g_records_fetched).extra_info_id := r_short_extra_info.extra_info_id;
331: r_extra_info_tab(g_records_fetched).information_type := r_short_extra_info.information_type;
332: r_extra_info_tab(g_records_fetched).id := r_short_extra_info.id;
333: -- g_records_fetched := g_records_fetched - 1;
334: hr_utility.set_location('Current Record :' || to_char(g_current_record), 37);
335: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 38);
336: END IF;
337: r_extra_info_tab(g_records_fetched).object_version_number := r_short_extra_info.object_version_number;
338: r_extra_info_tab(g_records_fetched).last_update_date := r_short_extra_info.last_update_date;
331: r_extra_info_tab(g_records_fetched).information_type := r_short_extra_info.information_type;
332: r_extra_info_tab(g_records_fetched).id := r_short_extra_info.id;
333: -- g_records_fetched := g_records_fetched - 1;
334: hr_utility.set_location('Current Record :' || to_char(g_current_record), 37);
335: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 38);
336: END IF;
337: r_extra_info_tab(g_records_fetched).object_version_number := r_short_extra_info.object_version_number;
338: r_extra_info_tab(g_records_fetched).last_update_date := r_short_extra_info.last_update_date;
339: r_extra_info_tab(g_records_fetched).last_updated_by := r_short_extra_info.last_updated_by;
340: r_extra_info_tab(g_records_fetched).last_update_login := r_short_extra_info.last_update_login;
341: r_extra_info_tab(g_records_fetched).created_by := r_short_extra_info.created_by;
342: r_extra_info_tab(g_records_fetched).creation_date := r_short_extra_info.creation_date;
343: END LOOP;
344: hr_utility.set_location('Leaving :' || l_proc, 40);
345: END;
346: -- -----------------------
347: FUNCTION FETCH_CURSOR(
348: -- -----------------------
416: RETURN VARCHAR2
417: IS
418: l_proc VARCHAR2(61) := g_package || 'FETCH_CURSOR';
419: BEGIN
420: hr_utility.set_location('Entering :' || l_proc, 10);
421: hr_utility.set_location('Current Record :' || to_char(g_current_record), 13);
422: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 18);
423: IF g_current_record > g_records_fetched THEN
424: hr_utility.set_location('Leaving :' || l_proc, 20);
417: IS
418: l_proc VARCHAR2(61) := g_package || 'FETCH_CURSOR';
419: BEGIN
420: hr_utility.set_location('Entering :' || l_proc, 10);
421: hr_utility.set_location('Current Record :' || to_char(g_current_record), 13);
422: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 18);
423: IF g_current_record > g_records_fetched THEN
424: hr_utility.set_location('Leaving :' || l_proc, 20);
425: RETURN 'FALSE';
418: l_proc VARCHAR2(61) := g_package || 'FETCH_CURSOR';
419: BEGIN
420: hr_utility.set_location('Entering :' || l_proc, 10);
421: hr_utility.set_location('Current Record :' || to_char(g_current_record), 13);
422: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 18);
423: IF g_current_record > g_records_fetched THEN
424: hr_utility.set_location('Leaving :' || l_proc, 20);
425: RETURN 'FALSE';
426: END IF;
420: hr_utility.set_location('Entering :' || l_proc, 10);
421: hr_utility.set_location('Current Record :' || to_char(g_current_record), 13);
422: hr_utility.set_location('Records Fetched :' || to_char(g_records_fetched), 18);
423: IF g_current_record > g_records_fetched THEN
424: hr_utility.set_location('Leaving :' || l_proc, 20);
425: RETURN 'FALSE';
426: END IF;
427: p_extra_info_id := r_extra_info_tab(g_current_record).extra_info_id;
428: p_id := r_extra_info_tab(g_current_record).id;
490: p_created_by := r_extra_info_tab(g_current_record).created_by;
491: p_creation_date := r_extra_info_tab(g_current_record).creation_date;
492:
493:
494: hr_utility.set_location('Current Record ' || to_char(g_current_record)|| l_proc, 15);
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
491: p_creation_date := r_extra_info_tab(g_current_record).creation_date;
492:
493:
494: hr_utility.set_location('Current Record ' || to_char(g_current_record)|| l_proc, 15);
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
492:
493:
494: hr_utility.set_location('Current Record ' || to_char(g_current_record)|| l_proc, 15);
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
493:
494: hr_utility.set_location('Current Record ' || to_char(g_current_record)|| l_proc, 15);
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
494: hr_utility.set_location('Current Record ' || to_char(g_current_record)|| l_proc, 15);
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
502:
495: hr_utility.set_location('extra_info_id :' || r_extra_info_tab(g_current_record).extra_info_id || l_proc, 20);
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
502:
503: g_current_record := g_current_record + 1;
496: hr_utility.set_location('Information1 :' || r_extra_info_tab(g_current_record).information1|| l_proc, 30);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
502:
503: g_current_record := g_current_record + 1;
504: hr_utility.set_location('Leaving :' || l_proc, 90);
497: hr_utility.set_location('Information2 :' || r_extra_info_tab(g_current_record).information2|| l_proc, 40);
498: hr_utility.set_location('Information3 :' || r_extra_info_tab(g_current_record).information3|| l_proc, 50);
499: hr_utility.set_location('Information4 :' || r_extra_info_tab(g_current_record).information4|| l_proc, 60);
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
502:
503: g_current_record := g_current_record + 1;
504: hr_utility.set_location('Leaving :' || l_proc, 90);
505: RETURN 'TRUE';
500: hr_utility.set_location('Information5 :' || r_extra_info_tab(g_current_record).information5|| l_proc, 70);
501: hr_utility.set_location('Information6 :' || r_extra_info_tab(g_current_record).information6|| l_proc, 80);
502:
503: g_current_record := g_current_record + 1;
504: hr_utility.set_location('Leaving :' || l_proc, 90);
505: RETURN 'TRUE';
506: END;
507: END;