The following lines contain the word 'select', 'insert', 'update' or 'delete':
IGW_SUBJECT_INFORMATION_TBH.INSERT_ROW (
X_ROWID => x_rowid,
X_STUDY_TITLE_ID => p_study_title_id,
X_SUBJECT_TYPE_CODE => p_subject_type_code,
X_SUBJECT_RACE_CODE => p_subject_race_code,
X_SUBJECT_ETHNICITY_CODE => p_subject_ethnicity_code,
X_NO_OF_SUBJECTS => p_no_of_subjects,
X_RETURN_STATUS => l_return_status);
PROCEDURE UPDATE_SUBJECT_INFORMATION
(p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, p_validate_only IN VARCHAR2 := FND_API.G_TRUE
, p_study_title_id IN NUMBER
, p_subject_type_code IN VARCHAR2
, p_subject_race_code IN VARCHAR2
, p_subject_ethnicity_code IN VARCHAR2
, p_no_of_subjects IN NUMBER
, p_rowid IN ROWID
, 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_msg_data VARCHAR2(250);
SAVEPOINT update_study_title;
IGW_SUBJECT_INFORMATION_TBH.UPDATE_ROW (
X_ROWID => p_rowid,
X_STUDY_TITLE_ID => p_study_title_id,
X_SUBJECT_TYPE_CODE => p_subject_type_code,
X_SUBJECT_RACE_CODE => p_subject_race_code,
X_SUBJECT_ETHNICITY_CODE => p_subject_ethnicity_code,
X_NO_OF_SUBJECTS => p_no_of_subjects,
X_RECORD_VERSION_NUMBER => p_record_version_number,
X_RETURN_STATUS => l_return_status);
ROLLBACK TO update_study_title;
ROLLBACK TO update_study_title;
ROLLBACK TO update_study_title;
p_procedure_name => 'UPDATE_SUBJECT_INFORMATION');
END UPDATE_SUBJECT_INFORMATION;
PROCEDURE DELETE_SUBJECT_INFORMATION (
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
,p_commit IN VARCHAR2 := FND_API.G_FALSE
,p_validate_only IN VARCHAR2 := FND_API.G_FALSE
,x_rowid IN VARCHAR2
,p_study_title_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_msg_count NUMBER;
SAVEPOINT delete_study_title;
IGW_SUBJECT_INFORMATION_TBH.DELETE_ROW(
x_rowid => x_rowid,
x_record_version_number => p_record_version_number,
x_return_status => x_return_status);
ROLLBACK TO delete_study_title;
ROLLBACK TO update_study_title;
ROLLBACK TO update_study_title;
p_procedure_name => 'DELETE_SUBJECT_INFORMATION');
select 1
into l_dummy
from igw_subject_information
where rowid = x_rowid
and record_version_number = p_record_version_number;