The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT pa_schedule_exceptions_s.nextval
INTO l_nextval
FROM SYS.DUAL;
PROCEDURE insert_rows ( p_sch_except_record_tab IN PA_SCHEDULE_GLOB.SchExceptTabTyp,
x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
l_schedule_exception_id PA_PLSQL_DATATYPES.IdTabTyp;
INSERT INTO PA_SCHEDULE_EXCEPTIONS
( schedule_exception_id ,
calendar_id ,
assignment_id ,
project_id ,
schedule_type_code ,
status_code ,
exception_type_code ,
duration_shift_type_code,
duration_shift_unit_code,
number_of_shift ,
start_date ,
end_date ,
resource_calendar_percent,
non_working_day_flag ,
change_hours_type_code ,
change_calendar_type_code,
-- change_calendar_name ,
change_calendar_id ,
monday_hours ,
tuesday_hours ,
wednesday_hours ,
thursday_hours ,
friday_hours ,
saturday_hours ,
sunday_hours ,
creation_date ,
created_by ,
last_update_date ,
last_update_by ,
last_update_login)
VALUES
( l_schedule_exception_id(l_J) ,
l_calendar_id(l_J) ,
l_assignment_id(l_J) ,
l_project_id(l_J) ,
l_schedule_type_code(l_J) ,
l_assignment_status_code(l_J) ,
l_exception_type_code(l_J) ,
l_duration_shift_type_code(l_J),
l_duration_shift_unit_code(l_J),
l_number_of_shift(l_J) ,
l_start_date(l_J) ,
l_end_date(l_J) ,
l_resource_calendar_percent(l_J) ,
l_non_working_day_flag(l_J) ,
l_change_hours_type_code(l_J) ,
l_change_calendar_type_code(l_J),
-- l_change_calendar_name(l_J) ,
l_change_calendar_id(l_J) ,
l_monday_hours(l_J) ,
l_tuesday_hours(l_J) ,
l_wednesday_hours(l_J) ,
l_thursday_hours(l_J) ,
l_friday_hours(l_J) ,
l_saturday_hours(l_J) ,
l_sunday_hours(l_J) ,
sysdate ,
fnd_global.user_id ,
sysdate ,
fnd_global.user_id ,
fnd_global.login_id);
p_procedure_name => 'insert_rows');
END insert_rows;
PROCEDURE insert_rows
( p_calendar_id IN Number DEFAULT NULL ,
p_assignment_id IN Number DEFAULT NULL ,
p_project_id IN Number DEFAULT NULL ,
p_schedule_type_code IN varchar2 ,
p_assignment_status_code IN varchar2 DEFAULT NULL ,
p_exception_type_code IN varchar2 ,
p_duration_shift_type_code IN varchar2 DEFAULT NULL ,
p_duration_shift_unit_code IN varchar2 DEFAULT NULL ,
p_number_of_shift IN number DEFAULT NULL ,
p_start_date IN date ,
p_end_date IN date ,
p_resource_calendar_percent IN Number DEFAULT NULL ,
p_non_working_day_flag IN varchar2 DEFAULT NULL ,
p_change_hours_type_code IN varchar2 DEFAULT NULL ,
p_change_calendar_type_code IN varchar2 DEFAULT NULL ,
-- p_change_calendar_name IN varchar2 DEFAULT NULL ,
p_change_calendar_id IN number DEFAULT NULL ,
p_monday_hours IN Number DEFAULT NULL ,
p_tuesday_hours IN Number DEFAULT NULL ,
p_wednesday_hours IN Number DEFAULT NULL ,
p_thursday_hours IN Number DEFAULT NULL ,
p_friday_hours IN Number DEFAULT NULL ,
p_saturday_hours IN Number DEFAULT NULL ,
p_sunday_hours IN Number DEFAULT NULL ,
x_exception_id OUT NOCOPY Number , --File.Sql.39 bug 4440895
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
l_t_schedule_exception_id NUMBER;
/*Bug 5854571: Added following for inserting l_t_schedule_exception_id
as schedule_exception_id into PA_SCHEDULE_EXCEPTIONS */
SELECT pa_schedule_exceptions_s.nextval
INTO l_t_schedule_exception_id
FROM dual;
INSERT INTO PA_SCHEDULE_EXCEPTIONS
( schedule_exception_id ,
calendar_id ,
assignment_id ,
project_id ,
schedule_type_code ,
status_code ,
exception_type_code ,
duration_shift_type_code,
duration_shift_unit_code,
number_of_shift ,
start_date ,
end_date ,
resource_calendar_percent,
non_working_day_flag ,
change_hours_type_code ,
change_calendar_type_code,
-- change_calendar_name ,
change_calendar_id ,
monday_hours ,
tuesday_hours ,
wednesday_hours ,
thursday_hours ,
friday_hours ,
saturday_hours ,
sunday_hours ,
creation_date ,
created_by ,
last_update_date ,
last_update_by ,
last_update_login)
VALUES
(l_t_schedule_exception_id, -- removed pa_schedule_exceptions_s.nextval /*Bug 5854571*/
p_calendar_id ,
p_assignment_id ,
p_project_id ,
p_schedule_type_code ,
p_assignment_status_code ,
p_exception_type_code ,
p_duration_shift_type_code ,
p_duration_shift_unit_code ,
p_number_of_shift ,
trunc(p_start_date) ,
trunc(p_end_date) ,
p_resource_calendar_percent ,
p_non_working_day_flag ,
p_change_hours_type_code ,
p_change_calendar_type_code ,
--p_change_calendar_name ,
p_change_calendar_id ,
p_monday_hours ,
p_tuesday_hours ,
p_wednesday_hours ,
p_thursday_hours ,
p_friday_hours ,
p_saturday_hours ,
p_sunday_hours ,
sysdate ,
fnd_global.user_id ,
sysdate ,
fnd_global.user_id ,
fnd_global.login_id);
p_procedure_name => 'insert_rows');
END insert_rows;
PROCEDURE update_rows ( p_sch_except_record_tab IN PA_SCHEDULE_GLOB.SchExceptTabTyp,
x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
l_exceptrowid PA_PLSQL_DATATYPES.RowidTabTyp;
UPDATE PA_SCHEDULE_EXCEPTIONS
SET
calendar_id = l_calendar_id(l_J),
assignment_id = l_assignment_id(l_J),
project_id = l_project_id(l_J),
schedule_type_code = l_schedule_type_code(l_J),
status_code = l_assignment_status_code(l_J),
exception_type_code = l_exception_type_code(l_J),
duration_shift_type_code = l_duration_shift_type_code(l_J),
duration_shift_unit_code = l_duration_shift_unit_code(l_J),
number_of_shift = l_number_of_shift(l_J),
start_date = l_start_date(l_J),
end_date = l_end_date(l_J),
resource_calendar_percent = l_resource_calendar_percent(l_J),
non_working_day_flag = l_non_working_day_flag(l_J) ,
change_hours_type_code = l_change_hours_type_code(l_J) ,
change_calendar_type_code = l_change_calendar_type_code(l_J),
-- change_calendar_name = l_change_calendar_name(l_J),
change_calendar_id = l_change_calendar_id(l_J),
monday_hours = l_monday_hours(l_J),
tuesday_hours = l_tuesday_hours(l_J),
wednesday_hours = l_wednesday_hours(l_J),
thursday_hours = l_thursday_hours(l_J),
friday_hours = l_friday_hours(l_J),
saturday_hours = l_saturday_hours(l_J),
sunday_hours = l_sunday_hours(l_J),
last_update_date = sysdate,
last_update_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE rowid = l_exceptrowid(l_J);
p_procedure_name => 'update_rows');
END update_rows;
PROCEDURE update_rows
( p_exceptrowid IN rowid ,
p_schedule_exception_id IN NUMBER,
p_calendar_id IN Number DEFAULT NULL ,
p_assignment_id IN Number DEFAULT NULL ,
p_project_id IN Number DEFAULT NULL ,
p_schedule_type_code IN varchar2 ,
p_assignment_status_code IN varchar2 DEFAULT NULL ,
p_exception_type_code IN varchar2 ,
p_duration_shift_type_code IN varchar2 DEFAULT NULL ,
p_duration_shift_unit_code IN varchar2 DEFAULT NULL ,
p_number_of_shift IN number DEFAULT NULL ,
p_start_date IN date ,
p_end_date IN date ,
p_resource_calendar_percent IN Number DEFAULT NULL ,
p_non_working_day_flag IN varchar2 DEFAULT NULL ,
p_change_hours_type_code IN varchar2 DEFAULT NULL ,
p_change_calendar_type_code IN varchar2 DEFAULT NULL ,
-- p_change_calendar_name IN varchar2 DEFAULT NULL ,
p_change_calendar_id IN number DEFAULT NULL ,
p_monday_hours IN Number DEFAULT NULL ,
p_tuesday_hours IN Number DEFAULT NULL ,
p_wednesday_hours IN Number DEFAULT NULL ,
p_thursday_hours IN Number DEFAULT NULL ,
p_friday_hours IN Number DEFAULT NULL ,
p_saturday_hours IN Number DEFAULT NULL ,
p_sunday_hours IN Number DEFAULT NULL ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
UPDATE PA_SCHEDULE_EXCEPTIONS
SET
calendar_id = p_calendar_id,
assignment_id = p_assignment_id,
project_id = p_project_id,
schedule_type_code = p_schedule_type_code,
status_code = p_assignment_status_code,
exception_type_code = p_exception_type_code,
duration_shift_type_code = p_duration_shift_type_code,
duration_shift_unit_code = p_duration_shift_unit_code,
number_of_shift = p_number_of_shift,
start_date = trunc(p_start_date),
end_date = trunc(p_end_date),
resource_calendar_percent = p_resource_calendar_percent ,
non_working_day_flag = p_non_working_day_flag ,
change_hours_type_code = p_change_hours_type_code ,
change_calendar_type_code = p_change_calendar_type_code,
-- change_calendar_name = p_change_calendar_name,
change_calendar_id = p_change_calendar_id,
monday_hours = p_monday_hours,
tuesday_hours = p_tuesday_hours,
wednesday_hours = p_wednesday_hours,
thursday_hours = p_thursday_hours,
friday_hours = p_friday_hours,
saturday_hours = p_saturday_hours,
sunday_hours = p_sunday_hours,
last_update_date = sysdate,
last_update_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE rowid = p_exceptrowid;
p_procedure_name => 'update_rows');
END update_rows;
PROCEDURE update_rows
( p_schedule_exception_id IN NUMBER ,
p_calendar_id IN Number DEFAULT NULL ,
p_assignment_id IN Number DEFAULT NULL ,
p_project_id IN Number DEFAULT NULL ,
p_schedule_type_code IN varchar2 ,
p_assignment_status_code IN varchar2 DEFAULT NULL ,
p_exception_type_code IN varchar2 ,
p_duration_shift_type_code IN varchar2 DEFAULT NULL ,
p_duration_shift_unit_code IN varchar2 DEFAULT NULL ,
p_number_of_shift IN number DEFAULT NULL ,
p_start_date IN date ,
p_end_date IN date ,
p_resource_calendar_percent IN Number DEFAULT NULL ,
p_non_working_day_flag IN varchar2 DEFAULT NULL ,
p_change_hours_type_code IN varchar2 DEFAULT NULL ,
p_change_calendar_type_code IN varchar2 DEFAULT NULL ,
-- p_change_calendar_name IN varchar2 DEFAULT NULL ,
p_change_calendar_id IN number DEFAULT NULL ,
p_monday_hours IN Number DEFAULT NULL ,
p_tuesday_hours IN Number DEFAULT NULL ,
p_wednesday_hours IN Number DEFAULT NULL ,
p_thursday_hours IN Number DEFAULT NULL ,
p_friday_hours IN Number DEFAULT NULL ,
p_saturday_hours IN Number DEFAULT NULL ,
p_sunday_hours IN Number DEFAULT NULL ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
UPDATE PA_SCHEDULE_EXCEPTIONS
SET
calendar_id = p_calendar_id,
assignment_id = p_assignment_id,
project_id = p_project_id,
schedule_type_code = p_schedule_type_code,
status_code = p_assignment_status_code,
exception_type_code = p_exception_type_code,
duration_shift_type_code = p_duration_shift_type_code,
duration_shift_unit_code = p_duration_shift_unit_code,
number_of_shift = p_number_of_shift,
start_date = trunc(p_start_date),
end_date = trunc(p_end_date),
resource_calendar_percent = p_resource_calendar_percent ,
non_working_day_flag = p_non_working_day_flag ,
change_hours_type_code = p_change_hours_type_code ,
change_calendar_type_code = p_change_calendar_type_code,
-- change_calendar_name = p_change_calendar_name,
change_calendar_id = p_change_calendar_id,
monday_hours = p_monday_hours,
tuesday_hours = p_tuesday_hours,
wednesday_hours = p_wednesday_hours,
thursday_hours = p_thursday_hours,
friday_hours = p_friday_hours,
saturday_hours = p_saturday_hours,
sunday_hours = p_sunday_hours,
last_update_date = sysdate,
last_update_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE schedule_exception_id = p_schedule_exception_id;
p_procedure_name => 'update_rows');
END update_rows;
PROCEDURE delete_rows ( p_sch_except_record_tab IN PA_SCHEDULE_GLOB.SchExceptTabTyp,
x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
l_schedule_exception_id PA_PLSQL_DATATYPES.IdTabTyp;
DELETE FROM PA_SCHEDULE_EXCEPTIONS WHERE schedule_exception_id = l_schedule_exception_id(l_J);
p_procedure_name => 'delete_rows');
END delete_rows;
PROCEDURE delete_rows
( p_schedule_exception_id IN Number ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
DELETE
FROM PA_SCHEDULE_EXCEPTIONS
WHERE schedule_exception_id = p_schedule_exception_id;
p_procedure_name => 'delete_rows');
END delete_rows;
PROCEDURE delete_rows
( p_exceptrowid IN rowid ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
DELETE
FROM PA_SCHEDULE_EXCEPTIONS
WHERE rowid = p_exceptrowid;
p_procedure_name => 'delete_rows');
END delete_rows;