The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure insert_row(p_rowid in out nocopy varchar2,
p_cost_allocation_id in number,
p_effective_start_date in date,
p_effective_end_date in date,
p_business_group_id in number,
p_cost_allocation_keyflex_id in number,
p_assignment_id in number,
p_proportion in number,
p_request_id in number,
p_program_application_id in number,
p_program_id in number,
p_program_update_date in date) IS
--
begin
--
insert into PAY_COST_ALLOCATIONS_F
( COST_ALLOCATION_ID,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE,
BUSINESS_GROUP_ID,
COST_ALLOCATION_KEYFLEX_ID,
ASSIGNMENT_ID,
PROPORTION,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE)
values
( p_cost_allocation_id,
p_effective_start_date,
p_effective_end_date,
p_business_group_id,
p_cost_allocation_keyflex_id,
p_assignment_id,
p_proportion,
p_request_id,
p_program_application_id,
p_program_id,
p_program_update_date);
select rowid
into p_rowid
from PAY_COST_ALLOCATIONS_F
where COST_ALLOCATION_ID = p_cost_allocation_id
and EFFECTIVE_START_DATE = p_effective_start_date
and EFFECTIVE_END_DATE = p_effective_end_date;
end insert_row;
procedure update_row(p_rowid in varchar2,
p_cost_allocation_id in number,
p_effective_start_date in date,
p_effective_end_date in date,
p_business_group_id in number,
p_cost_allocation_keyflex_id in number,
p_assignment_id in number,
p_proportion in number,
p_request_id in number,
p_program_application_id in number,
p_program_id in number,
p_program_update_date in date) is
begin
--
update PAY_COST_ALLOCATIONS_F
set COST_ALLOCATION_ID = p_cost_allocation_id,
EFFECTIVE_START_DATE = p_effective_start_date,
EFFECTIVE_END_DATE = p_effective_end_date,
BUSINESS_GROUP_ID = p_business_group_id,
COST_ALLOCATION_KEYFLEX_ID = p_cost_allocation_keyflex_id,
ASSIGNMENT_ID = p_assignment_id,
PROPORTION = p_proportion,
REQUEST_ID = p_request_id,
PROGRAM_APPLICATION_ID = p_program_application_id,
PROGRAM_ID = p_program_id,
PROGRAM_UPDATE_DATE = p_program_update_date
where ROWID = p_rowid;
end update_row;
procedure delete_row(p_rowid in varchar2) is
--
begin
--
delete from PAY_COST_ALLOCATIONS_F
where ROWID = p_rowid;
end delete_row;
p_program_update_date in date) is
--
cursor C is select *
from PAY_COST_ALLOCATIONS_F
where rowid = p_rowid
for update of COST_ALLOCATION_ID nowait;
and ( (rowinfo.PROGRAM_UPDATE_DATE = p_program_update_date)
or (rowinfo.PROGRAM_UPDATE_DATE is null and p_program_update_date is null))) then
return;