21:
22: PROCEDURE get_calendar_schedule ( p_calendar_id IN NUMBER,
23: p_start_date IN DATE,
24: p_end_date IN DATE,
25: x_sch_record_tab OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp,
26: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
27: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
28: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
29: IS
32:
33: l_st_dt_done BOOLEAN; -- Temp variable
34: l_end_dt_done BOOLEAN; -- Temp variable
35: l_x_sch_copy_done BOOLEAN; -- Temp variable
36: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
37: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
38: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
39:
40: -- This cursor will select the schedule records of the passing calendar
33: l_st_dt_done BOOLEAN; -- Temp variable
34: l_end_dt_done BOOLEAN; -- Temp variable
35: l_x_sch_copy_done BOOLEAN; -- Temp variable
36: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
37: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
38: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
39:
40: -- This cursor will select the schedule records of the passing calendar
41: /* Bug - 1846658- Following lines are commented to incorporate the BULK SELECT to enhance the performance*/
34: l_end_dt_done BOOLEAN; -- Temp variable
35: l_x_sch_copy_done BOOLEAN; -- Temp variable
36: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
37: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
38: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
39:
40: -- This cursor will select the schedule records of the passing calendar
41: /* Bug - 1846658- Following lines are commented to incorporate the BULK SELECT to enhance the performance*/
42:
294:
295: PROCEDURE get_assignment_schedule ( p_assignment_id IN NUMBER,
296: p_start_date IN DATE,
297: p_end_date IN DATE,
298: x_sch_record_tab OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp,
299: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
300: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
301: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
302: IS
305:
306: l_st_dt_done BOOLEAN;
307: l_end_dt_done BOOLEAN;
308: l_x_sch_copy_done BOOLEAN;
309: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
310: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
311: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
312:
313: -- This cursor will select only those records of passing assignment which are open or staffed.
306: l_st_dt_done BOOLEAN;
307: l_end_dt_done BOOLEAN;
308: l_x_sch_copy_done BOOLEAN;
309: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
310: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
311: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
312:
313: -- This cursor will select only those records of passing assignment which are open or staffed.
314: -- 1561861 Added 'STAFFED_ADMIN_ASSIGNMENT' to the where clause'.
307: l_end_dt_done BOOLEAN;
308: l_x_sch_copy_done BOOLEAN;
309: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
310: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
311: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
312:
313: -- This cursor will select only those records of passing assignment which are open or staffed.
314: -- 1561861 Added 'STAFFED_ADMIN_ASSIGNMENT' to the where clause'.
315: /* Bug - 1846658- Following lines are commented to incorporate the BULK SELECT to enhance the performance*/
715: -- X_Sch_Record_Tab SCHEDULETABTYP YES It stores schedule for that assignment
716: --
717:
718: PROCEDURE get_assignment_schedule ( p_assignment_id IN NUMBER,
719: x_sch_record_tab OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp,
720: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
721: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
722: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
723: IS
725: J NUMBER;
726: l_st_dt_done BOOLEAN;
727: l_end_dt_done BOOLEAN;
728: l_x_sch_copy_done BOOLEAN;
729: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
730: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
731: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
732:
733: -- This cursor will select the schedule records corresponding to the passing assignment id
726: l_st_dt_done BOOLEAN;
727: l_end_dt_done BOOLEAN;
728: l_x_sch_copy_done BOOLEAN;
729: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
730: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
731: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
732:
733: -- This cursor will select the schedule records corresponding to the passing assignment id
734: -- 1561861 Added 'STAFFED_ADMIN_ASSIGNMENT' to the where clause.
727: l_end_dt_done BOOLEAN;
728: l_x_sch_copy_done BOOLEAN;
729: l_curr_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
730: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
731: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
732:
733: -- This cursor will select the schedule records corresponding to the passing assignment id
734: -- 1561861 Added 'STAFFED_ADMIN_ASSIGNMENT' to the where clause.
735: /* Bug - 1846658- Following lines are commented to incorporate the BULK SELECT to enhance the performance*/
935: PROCEDURE get_resource_schedule ( p_source_id IN NUMBER,
936: p_source_type IN VARCHAR2,
937: p_start_date IN DATE,
938: p_end_date IN DATE,
939: x_sch_record_tab IN OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp,
940: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
941: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
942: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
943: IS
957: l_tc_start_date DATE;
958:
959: l_invalid_source_id EXCEPTION;
960:
961: l_cur_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
962: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
963: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
964:
965: -- jmarques: 1786935: Modified cursor to include resource_type_code
958:
959: l_invalid_source_id EXCEPTION;
960:
961: l_cur_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
962: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
963: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
964:
965: -- jmarques: 1786935: Modified cursor to include resource_type_code
966: -- since resource_id is not unique. Also, added calendar_id > 0
959: l_invalid_source_id EXCEPTION;
960:
961: l_cur_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
962: l_out_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
963: l_temp_schedule_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
964:
965: -- jmarques: 1786935: Modified cursor to include resource_type_code
966: -- since resource_id is not unique. Also, added calendar_id > 0
967: -- condition so that calendar_id, resource_id index would be used.
1000: -- jmarques: 2196924: local vars
1001: l_ResStartDateTab PA_FORECAST_GLOB.DateTabTyp;
1002: l_ResEndDateTab PA_FORECAST_GLOB.DateTabTyp;
1003: i NUMBER;
1004: l_Sch_Record_Tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
1005: l_cap_start_date DATE;
1006: l_cap_end DATE;
1007: l_cap_start_index NUMBER;
1008: l_cap_end_index NUMBER;
1769: -- e.g I , U
1770: -- P_Del_Sch_Record_Tab SCHEDULETABTYP YES It has the schedule record which are marked for deletion
1771: --
1772:
1773: PROCEDURE apply_schedule_change( p_chg_sch_record_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
1774: p_del_sch_record_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
1775: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1776: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1777: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1770: -- P_Del_Sch_Record_Tab SCHEDULETABTYP YES It has the schedule record which are marked for deletion
1771: --
1772:
1773: PROCEDURE apply_schedule_change( p_chg_sch_record_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
1774: p_del_sch_record_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
1775: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1776: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1777: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1778: IS
1776: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1777: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1778: IS
1779: l_I NUMBER;
1780: l_upd_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp; -- variable used for storing the records kept for updation
1781: l_ins_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp; -- variable used for storing the records kept for insertion
1782: BEGIN
1783: -- storing status for tracking the error
1784: l_x_return_status := FND_API.G_RET_STS_SUCCESS;
1777: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1778: IS
1779: l_I NUMBER;
1780: l_upd_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp; -- variable used for storing the records kept for updation
1781: l_ins_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp; -- variable used for storing the records kept for insertion
1782: BEGIN
1783: -- storing status for tracking the error
1784: l_x_return_status := FND_API.G_RET_STS_SUCCESS;
1785: -- checking if the passing records is empty or not
1860: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
1861: --
1862:
1863: PROCEDURE create_new_schedule(
1864: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1865: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1866: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1867: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1868: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1861: --
1862:
1863: PROCEDURE create_new_schedule(
1864: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1865: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1866: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1867: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1868: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1869: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1862:
1863: PROCEDURE create_new_schedule(
1864: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1865: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1866: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1867: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1868: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1869: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
1870: IS
1974: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
1975: --
1976:
1977: PROCEDURE create_new_calendar(
1978: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1979: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1980: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1981: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1982: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1975: --
1976:
1977: PROCEDURE create_new_calendar(
1978: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1979: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1980: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1981: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1982: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1983: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1976:
1977: PROCEDURE create_new_calendar(
1978: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
1979: p_sch_record IN pa_schedule_glob.ScheduleRecord,
1980: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
1981: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1982: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
1983: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1984: )
2042: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
2043: --
2044:
2045: PROCEDURE create_new_hours(
2046: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2047: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2048: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2049: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2050: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2043: --
2044:
2045: PROCEDURE create_new_hours(
2046: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2047: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2048: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2049: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2050: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2051: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2044:
2045: PROCEDURE create_new_hours(
2046: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2047: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2048: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2049: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2050: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2051: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2052: IS
2312: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
2313: --
2314:
2315: PROCEDURE create_new_duration(
2316: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2317: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2318: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2319: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2320: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2313: --
2314:
2315: PROCEDURE create_new_duration(
2316: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2317: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2318: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2319: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2320: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2321: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2314:
2315: PROCEDURE create_new_duration(
2316: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2317: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2318: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2319: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2320: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2321: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2322: )
2459: where project_id = p_project_id and
2460: assignment_id = p_assignment_id
2461: order by start_date;
2462:
2463: l_temp_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2464: l_del_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2465: l_final_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2466:
2467: l_I NUMBER;
2460: assignment_id = p_assignment_id
2461: order by start_date;
2462:
2463: l_temp_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2464: l_del_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2465: l_final_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2466:
2467: l_I NUMBER;
2468: l_J NUMBER;
2461: order by start_date;
2462:
2463: l_temp_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2464: l_del_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2465: l_final_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2466:
2467: l_I NUMBER;
2468: l_J NUMBER;
2469: l_K NUMBER;
2648: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
2649: --
2650:
2651: PROCEDURE create_new_pattern(
2652: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2653: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2654: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2655: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2656: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2649: --
2650:
2651: PROCEDURE create_new_pattern(
2652: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2653: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2654: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2655: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2656: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2657: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2650:
2651: PROCEDURE create_new_pattern(
2652: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2653: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2654: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2655: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2656: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2657: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2658: )
2707: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
2708: --
2709:
2710: PROCEDURE create_new_status(
2711: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2712: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2713: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2714: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2715: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2708: --
2709:
2710: PROCEDURE create_new_status(
2711: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2712: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2713: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2714: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2715: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2716: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2709:
2710: PROCEDURE create_new_status(
2711: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2712: p_sch_record IN pa_schedule_glob.ScheduleRecord,
2713: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2714: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2715: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2716: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2717: )
2778: -- X_Sch_Record_Tab SCHEDULETABTYP YES It store the new schedule
2779: --
2780:
2781: PROCEDURE apply_change_duration
2782: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
2783: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2784: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2785: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2786: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2779: --
2780:
2781: PROCEDURE apply_change_duration
2782: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
2783: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2784: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2785: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2786: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2787: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2780:
2781: PROCEDURE apply_change_duration
2782: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
2783: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
2784: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
2785: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2786: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2787: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2788: IS
2785: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
2786: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2787: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2788: IS
2789: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2790: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2791: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2792: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
2793: l_I NUMBER;
2786: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
2787: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2788: IS
2789: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2790: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2791: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2792: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
2793: l_I NUMBER;
2794: l_temp_first NUMBER;
2787: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
2788: IS
2789: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2790: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2791: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2792: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
2793: l_I NUMBER;
2794: l_temp_first NUMBER;
2795: l_temp_last NUMBER;
2788: IS
2789: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2790: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2791: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
2792: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
2793: l_I NUMBER;
2794: l_temp_first NUMBER;
2795: l_temp_last NUMBER;
2796: l_stat_date_done BOOLEAN;
3138: --
3139:
3140:
3141: PROCEDURE apply_other_changes
3142: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
3143: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
3144: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
3145: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
3146: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3139:
3140:
3141: PROCEDURE apply_other_changes
3142: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
3143: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
3144: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
3145: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
3146: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3147: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3140:
3141: PROCEDURE apply_other_changes
3142: ( p_sch_record_tab IN pa_schedule_glob.ScheduleTabTyp,
3143: p_sch_except_record IN pa_schedule_glob.SchExceptRecord,
3144: x_sch_record_tab IN OUT NOCOPY pa_schedule_glob.ScheduleTabTyp,
3145: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
3146: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3147: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3148: IS
3146: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3147: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3148: IS
3149:
3150: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3151: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3152: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3153: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
3154: l_I NUMBER;
3147: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3148: IS
3149:
3150: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3151: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3152: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3153: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
3154: l_I NUMBER;
3155: l_sch_first NUMBER;
3148: IS
3149:
3150: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3151: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3152: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3153: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
3154: l_I NUMBER;
3155: l_sch_first NUMBER;
3156: l_sch_last NUMBER;
3149:
3150: l_temp_p_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3151: l_out_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3152: l_temp_tr_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3153: l_temp_except_rec PA_SCHEDULE_GLOB.SchExceptRecord;
3154: l_I NUMBER;
3155: l_sch_first NUMBER;
3156: l_sch_last NUMBER;
3157: l_chg_exp_start_date DATE;
3404: --
3405:
3406: PROCEDURE apply_assignment_change (
3407: p_record_version_number IN NUMBER,
3408: chg_tr_sch_rec_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
3409: sch_except_record_tab IN PA_SCHEDULE_GLOB.SchExceptTabTyp,
3410: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
3411: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3412: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3405:
3406: PROCEDURE apply_assignment_change (
3407: p_record_version_number IN NUMBER,
3408: chg_tr_sch_rec_tab IN PA_SCHEDULE_GLOB.ScheduleTabTyp,
3409: sch_except_record_tab IN PA_SCHEDULE_GLOB.SchExceptTabTyp,
3410: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
3411: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
3412: x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
3413: IS
3752: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
3753: )
3754: IS
3755:
3756: l_x_schedule_tab_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
3757: l_new_schedule_tab_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
3758:
3759: l_start_date DATE;
3760: l_end_date DATE;
3753: )
3754: IS
3755:
3756: l_x_schedule_tab_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
3757: l_new_schedule_tab_rec PA_SCHEDULE_GLOB.ScheduleTabTyp;
3758:
3759: l_start_date DATE;
3760: l_end_date DATE;
3761:
3952: x_msg_data OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
3953:
3954: l_assignment_id PA_PROJECT_ASSIGNMENTS.assignment_id%TYPE;
3955: l_assignment_id_tbl PA_ASSIGNMENTS_PUB.assignment_id_tbl_type;
3956: l_x_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3957: l_current_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3958: l_temp_number NUMBER;
3959: BEGIN
3960: l_assignment_id_tbl := p_assignment_id_tbl;
3953:
3954: l_assignment_id PA_PROJECT_ASSIGNMENTS.assignment_id%TYPE;
3955: l_assignment_id_tbl PA_ASSIGNMENTS_PUB.assignment_id_tbl_type;
3956: l_x_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3957: l_current_sch_rec_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
3958: l_temp_number NUMBER;
3959: BEGIN
3960: l_assignment_id_tbl := p_assignment_id_tbl;
3961: l_x_return_status := FND_API.G_RET_STS_SUCCESS;
4266: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
4267: )
4268: IS
4269:
4270: l_x_sch_record_tab PA_SCHEDULE_GLOB.ScheduleTabTyp; -- Temporary variable to store the
4271: -- schedule type table of records
4272:
4273: l_req_start_date PA_PROJECT_ASSIGNMENTS.start_date%TYPE;
4274: l_req_end_date pa_project_assignments.end_date%TYPE;
4273: l_req_start_date PA_PROJECT_ASSIGNMENTS.start_date%TYPE;
4274: l_req_end_date pa_project_assignments.end_date%TYPE;
4275: l_calendar_id pa_project_assignments.calendar_id%TYPE;
4276:
4277: l_new_schedule_tab PA_SCHEDULE_GLOB.ScheduleTabTyp;
4278:
4279: l_start_date DATE;
4280: l_end_date DATE;
4281: l_total_hours NUMBER; -- Bug 5126919
7723: --Bug 5126919: Added parameter x_total_hours which will contain the total hours for which the x_schedule_tbl
7724: --will be prepared.
7725: PROCEDURE sum_task_assignments (
7726: p_task_assignments_tbl IN SYSTEM.PA_NUM_TBL_TYPE ,
7727: p_schedule_tbl IN PA_SCHEDULE_GLOB.ScheduleTabTyp ,
7728: p_start_date IN DATE ,
7729: p_end_date IN DATE ,
7730: x_total_hours OUT NOCOPY NUMBER , -- Bug 5126919
7731: x_schedule_tbl OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp , --File.Sql.39 bug 4440895
7727: p_schedule_tbl IN PA_SCHEDULE_GLOB.ScheduleTabTyp ,
7728: p_start_date IN DATE ,
7729: p_end_date IN DATE ,
7730: x_total_hours OUT NOCOPY NUMBER , -- Bug 5126919
7731: x_schedule_tbl OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleTabTyp , --File.Sql.39 bug 4440895
7732: x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
7733: x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
7734: x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
7735: )
7784: summation_counter NUMBER;
7785: schedule_counter NUMBER;
7786: task_counter NUMBER;
7787:
7788: l_schedule_record PA_SCHEDULE_GLOB.ScheduleRecord;
7789: l_empty_schedule_record PA_SCHEDULE_GLOB.ScheduleRecord;
7790: l_debug_mode VARCHAR2(20) := 'N'; -- 4387388
7791:
7792: CURSOR C1 IS
7785: schedule_counter NUMBER;
7786: task_counter NUMBER;
7787:
7788: l_schedule_record PA_SCHEDULE_GLOB.ScheduleRecord;
7789: l_empty_schedule_record PA_SCHEDULE_GLOB.ScheduleRecord;
7790: l_debug_mode VARCHAR2(20) := 'N'; -- 4387388
7791:
7792: CURSOR C1 IS
7793: SELECT a.start_date, a.end_date, NVL(a.quantity,0),
8093:
8094: -- This procedure sets the number of hours in a given schedule record for a particular day of the week
8095: -- Input parameters
8096: -- Parameters Type Required Description
8097: -- P_Schedule_Tbl PA_SCHEDULE_GLOB.ScheduleRecord YES Schedule Record
8098: -- P_Day_Of_Week PA_SCHEDULE_PVT.DayOfWeekType YES Day of the week
8099: -- P_Hours NUMBER YES Hours for that day
8100: --
8101: -- Out parameters
8100: --
8101: -- Out parameters
8102: --
8103: PROCEDURE set_hours_by_day_of_week (
8104: p_schedule_record IN OUT NOCOPY PA_SCHEDULE_GLOB.ScheduleRecord ,
8105: p_day_of_week IN PA_SCHEDULE_PVT.DayOfWeekType ,
8106: p_hours IN NUMBER) IS
8107: BEGIN
8108: IF p_day_of_week = 'MON' THEN
9029:
9030: -- This function returns the number of hours in a given schedule record for a particular day of the week
9031: -- Input parameters
9032: -- Parameters Type Required Description
9033: -- P_Schedule_Record PA_SCHEDULE_GLOB.ScheduleRecord YES Schedule Record
9034: -- P_Day_Of_Week PA_SCHEDULE_PVT.DayOfWeekType YES Day of the week
9035: --
9036: -- Out parameters
9037: -- NUMBER YES Number of hours schedule on that day
9036: -- Out parameters
9037: -- NUMBER YES Number of hours schedule on that day
9038: --
9039: FUNCTION get_hours_by_day_of_week (
9040: p_schedule_record IN PA_SCHEDULE_GLOB.ScheduleRecord ,
9041: p_day_of_week IN PA_SCHEDULE_PVT.DayOfWeekType )
9042: RETURN NUMBER IS
9043: l_hours NUMBER := 0;
9044: BEGIN