The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
p_award_budget_id NUMBER
,p_proposal_installment_id NUMBER
,p_budget_period_id NUMBER
,p_expenditure_type_cat VARCHAR2
,p_expenditure_category_flag VARCHAR2
,p_budget_amount NUMBER
,p_indirect_flag VARCHAR2
,p_project_id NUMBER
,p_task_id NUMBER
,p_period_name VARCHAR2
,p_start_date DATE
,p_end_date DATE
,p_transferred_flag VARCHAR2
,x_rowid OUT NOCOPY VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2) IS
cursor c_budget_line is
select rowid
from igw_award_budgets
where award_budget_id = p_award_budget_id;
l_last_updated_by NUMBER := FND_GLOBAL.USER_ID;
l_last_update_login NUMBER := FND_GLOBAL.LOGIN_ID;
l_last_update_date DATE := SYSDATE;
insert into igw_award_budgets(
award_budget_id
,proposal_installment_id
,budget_period_id
,expenditure_type_cat
,expenditure_category_flag
,budget_amount
,indirect_flag
,project_id
,task_id
,period_name
,start_date
,end_date
,transferred_flag
,last_update_date
,last_updated_by
,creation_date
,created_by
,last_update_login
,record_version_number)
values
( p_award_budget_id
,p_proposal_installment_id
,p_budget_period_id
,p_expenditure_type_cat
,p_expenditure_category_flag
,p_budget_amount
,p_indirect_flag
,p_project_id
,p_task_id
,p_period_name
,p_start_date
,p_end_date
,p_transferred_flag
,l_last_update_date
,l_last_updated_by
,l_last_update_date
,l_last_updated_by
,l_last_update_login
,1);
,p_procedure_name => 'INSERT_ROW' );
end insert_row;
procedure UPDATE_ROW (
p_rowid ROWID
,p_award_budget_id NUMBER
,p_proposal_installment_id NUMBER
,p_budget_period_id NUMBER
,p_expenditure_type_cat VARCHAR2
,p_expenditure_category_flag VARCHAR2
,p_budget_amount NUMBER
,p_indirect_flag VARCHAR2
,p_project_id NUMBER
,p_task_id NUMBER
,p_period_name VARCHAR2
,p_start_date DATE
,p_end_date DATE
,p_transferred_flag VARCHAR2
,p_record_version_number NUMBER
,x_return_status OUT NOCOPY VARCHAR2) IS
l_last_updated_by NUMBER := FND_GLOBAL.USER_ID;
l_last_update_login NUMBER := FND_GLOBAL.LOGIN_ID;
l_last_update_date DATE := SYSDATE;
SELECT rowid
from igw_award_budgets
where award_budget_id = p_award_budget_id;
update igw_award_budgets
set budget_period_id = p_budget_period_id
, expenditure_type_cat = p_expenditure_type_cat
, expenditure_category_flag = p_expenditure_category_flag
, budget_amount = p_budget_amount
, indirect_flag = p_indirect_flag
, project_id = p_project_id
, task_id = p_task_id
, period_name = p_period_name
, start_date = p_start_date
, end_date = p_end_date
, transferred_flag = p_transferred_flag
, record_version_number = record_version_number + 1
where rowid = l_row_id
and record_version_number = p_record_version_number;
,p_procedure_name => 'UPDATE_ROW' );
end update_row;
procedure DELETE_ROW (
p_rowid IN ROWID
,p_award_budget_id IN NUMBER
,p_record_version_number IN NUMBER
,x_return_status OUT NOCOPY VARCHAR2) is
l_row_id ROWID := p_rowid;
SELECT rowid
from igw_award_budgets
where award_budget_id = p_award_budget_id;
delete from igw_award_budgets
where rowid = l_row_id
and record_version_number = p_record_version_number;
,p_procedure_name => 'DELETE_ROW' );
end DELETE_ROW;