The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure fetch_and_delete(
p_mov_grp_id in number,
p_mov_allocs in out nocopy wip_move_txn_allocations_rec) is
i number := 0;
select
TRANSACTION_ID,
REPETITIVE_SCHEDULE_ID,
ORGANIZATION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
TRANSACTION_QUANTITY,
PRIMARY_QUANTITY
from wip_move_txn_allocations
where transaction_id in
(select transaction_id
from wip_move_txn_interface
where group_id = c_mov_grp_id);
p_mov_allocs.LAST_UPDATE_DATE(i) := mov_alloc_rec.LAST_UPDATE_DATE;
p_mov_allocs.LAST_UPDATED_BY(i) := mov_alloc_rec.LAST_UPDATED_BY;
p_mov_allocs.LAST_UPDATE_LOGIN(i) := mov_alloc_rec.LAST_UPDATE_LOGIN;
p_mov_allocs.PROGRAM_UPDATE_DATE(i) := mov_alloc_rec.PROGRAM_UPDATE_DATE;
delete from wip_move_txn_allocations
where transaction_id in
(select transaction_id
from wip_move_txn_interface
where group_id = p_mov_grp_id);
end fetch_and_delete;
procedure insert_rows(
p_mov_allocs in wip_move_txn_allocations_rec) is
i number := 1;
insert into wip_move_txn_allocations (
TRANSACTION_ID,
REPETITIVE_SCHEDULE_ID,
ORGANIZATION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
TRANSACTION_QUANTITY,
PRIMARY_QUANTITY
) values (
p_mov_allocs.TRANSACTION_ID(i),
p_mov_allocs.REPETITIVE_SCHEDULE_ID(i),
p_mov_allocs.ORGANIZATION_ID(i),
p_mov_allocs.LAST_UPDATE_DATE(i),
p_mov_allocs.LAST_UPDATED_BY(i),
p_mov_allocs.CREATION_DATE(i),
p_mov_allocs.CREATED_BY(i),
p_mov_allocs.LAST_UPDATE_LOGIN(i),
p_mov_allocs.REQUEST_ID(i),
p_mov_allocs.PROGRAM_APPLICATION_ID(i),
p_mov_allocs.PROGRAM_ID(i),
p_mov_allocs.PROGRAM_UPDATE_DATE(i),
p_mov_allocs.TRANSACTION_QUANTITY(i),
p_mov_allocs.PRIMARY_QUANTITY(i)
);
end insert_rows;