The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_api_name CONSTANT VARCHAR2(30) := 'Check_Update_Dependent_Data';
SELECT 'N'
INTO l_locked
FROM igw_prop_special_reviews
WHERE rowid = p_rowid
AND record_version_number = p_record_version_number;
** Invoke Table Handler to insert data
*/
Igw_Prop_Special_Reviews_Tbh.Insert_Row
(
x_rowid => x_rowid,
p_proposal_id => l_proposal_id,
p_special_review_code => l_special_review_code,
p_special_review_type => l_special_review_type,
p_approval_type_code => l_approval_type_code,
p_protocol_number => p_protocol_number,
p_application_date => p_application_date,
p_approval_date => p_approval_date,
p_comments => p_comments,
x_return_status => l_return_status
);
PROCEDURE Update_Prop_Special_Reviews
(
p_init_msg_list IN VARCHAR2,
p_validate_only IN VARCHAR2,
p_commit IN VARCHAR2,
p_rowid IN VARCHAR2,
p_proposal_id IN NUMBER,
p_proposal_number IN VARCHAR2,
p_special_review_code IN VARCHAR2,
p_special_review_desc IN VARCHAR2,
p_special_review_type IN VARCHAR2,
p_special_review_type_desc IN VARCHAR2,
p_approval_type_code IN VARCHAR2,
p_approval_type_desc IN VARCHAR2,
p_protocol_number IN VARCHAR2,
p_application_date IN DATE,
p_approval_date IN DATE,
p_comments IN VARCHAR2,
p_record_version_number IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Prop_Special_Reviews';
SAVEPOINT Update_Prop_Spl_Reviews_Pvt;
** Invoke Table Handler to Update data
*/
Igw_Prop_Special_Reviews_Tbh.Update_Row
(
p_rowid => p_rowid,
p_proposal_id => l_proposal_id,
p_special_review_code => l_special_review_code,
p_special_review_type => l_special_review_type,
p_approval_type_code => l_approval_type_code,
p_protocol_number => p_protocol_number,
p_application_date => p_application_date,
p_approval_date => p_approval_date,
p_comments => p_comments,
p_record_version_number => p_record_version_number,
x_return_status => x_return_status
);
ROLLBACK TO Update_Prop_Spl_Reviews_Pvt;
ROLLBACK TO Update_Prop_Spl_Reviews_Pvt;
ROLLBACK TO Update_Prop_Spl_Reviews_Pvt;
END Update_Prop_Special_Reviews;
PROCEDURE Delete_Prop_Special_Reviews
(
p_init_msg_list IN VARCHAR2,
p_validate_only IN VARCHAR2,
p_commit IN VARCHAR2,
p_rowid IN VARCHAR2,
p_proposal_id IN NUMBER,
p_record_version_number IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Prop_Person';
SAVEPOINT Delete_Prop_Spl_Reviews_Pvt;
** Invoke Table Handler to Delete data
*/
Igw_Prop_Special_Reviews_Tbh.Delete_Row
(
p_rowid => p_rowid,
p_record_version_number => p_record_version_number,
x_return_status => x_return_status
);
ROLLBACK TO Delete_Prop_Spl_Reviews_Pvt;
ROLLBACK TO Delete_Prop_Spl_Reviews_Pvt;
ROLLBACK TO Delete_Prop_Spl_Reviews_Pvt;
END Delete_Prop_Special_Reviews;