The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row
(
x_rowid OUT NOCOPY VARCHAR2,
x_proposal_installment_id OUT NOCOPY NUMBER,
p_proposal_award_id IN NUMBER,
p_installment_id IN NUMBER,
p_installment_number IN VARCHAR2,
p_installment_type_code IN VARCHAR2,
p_issue_date IN DATE,
p_close_date IN DATE,
p_start_date IN DATE,
p_end_date IN DATE,
p_direct_cost IN NUMBER,
p_indirect_cost IN NUMBER,
p_billable_flag IN VARCHAR2,
p_description IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
p_mode IN VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
l_last_update_date DATE := SYSDATE;
l_last_updated_by NUMBER := Nvl(Fnd_Global.User_Id,-1);
l_last_update_login NUMBER := Nvl(Fnd_Global.Login_Id,-1);
SELECT rowid
FROM igw_installments
WHERE proposal_installment_id = x_proposal_installment_id;
l_last_updated_by := 1;
l_last_update_login := 0;
INSERT INTO igw_installments
(
proposal_installment_id,
proposal_award_id,
installment_id,
installment_number,
installment_type_code,
issue_date,
close_date,
start_date,
end_date,
direct_cost,
indirect_cost,
billable_flag,
description,
record_version_number,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
(
igw_installments_s.nextval,
p_proposal_award_id,
p_installment_id,
p_installment_number,
p_installment_type_code,
p_issue_date,
p_close_date,
p_start_date,
p_end_date,
p_direct_cost,
p_indirect_cost,
p_billable_flag,
p_description,
1,
l_last_update_date,
l_last_updated_by,
l_last_update_date,
l_last_updated_by,
l_last_update_login
)
RETURNING
proposal_installment_id
INTO
x_proposal_installment_id;
END Insert_Row;
PROCEDURE Update_Row
(
p_rowid IN VARCHAR2,
p_proposal_installment_id IN NUMBER,
p_proposal_award_id IN NUMBER,
p_installment_id IN NUMBER,
p_installment_number IN VARCHAR2,
p_installment_type_code IN VARCHAR2,
p_issue_date IN DATE,
p_close_date IN DATE,
p_start_date IN DATE,
p_end_date IN DATE,
p_direct_cost IN NUMBER,
p_indirect_cost IN NUMBER,
p_billable_flag IN VARCHAR2,
p_description IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
p_mode IN VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
l_last_update_date DATE := SYSDATE;
l_last_updated_by NUMBER := Nvl(Fnd_Global.User_Id,-1);
l_last_update_login NUMBER := Nvl(Fnd_Global.Login_Id,-1);
l_last_updated_by := 1;
l_last_update_login := 0;
UPDATE igw_installments
SET proposal_award_id = p_proposal_award_id,
installment_number = p_installment_number,
installment_type_code = p_installment_type_code,
issue_date = p_issue_date,
close_date = p_close_date,
start_date = p_start_date,
end_date = p_end_date,
direct_cost = p_direct_cost,
indirect_cost = p_indirect_cost,
billable_flag = p_billable_flag,
description = p_description,
record_version_number = record_version_number + 1,
last_update_date = l_last_update_date,
last_updated_by = l_last_updated_by,
last_update_login = l_last_update_login
WHERE (rowid = p_rowid OR proposal_installment_id = p_proposal_installment_id);
END Update_Row;
PROCEDURE Delete_Row
(
p_rowid IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
DELETE igw_installments
WHERE rowid = p_rowid;
END Delete_Row;