DBA Data[Home] [Help]

APPS.IGW_SUBJECT_INFORMATION_TBH SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 3

procedure INSERT_ROW (
  X_ROWID                           out NOCOPY rowid,
  X_STUDY_TITLE_ID                  IN  NUMBER,
  X_SUBJECT_TYPE_CODE               IN  VARCHAR2,
  X_SUBJECT_RACE_CODE               IN  VARCHAR2,
  X_SUBJECT_ETHNICITY_CODE	    IN  VARCHAR2,
  X_NO_OF_SUBJECTS                  IN  NUMBER,
  X_RETURN_STATUS   OUT NOCOPY VARCHAR2
  ) is
    cursor C is select ROWID from IGW_SUBJECT_INFORMATION
    where STUDY_TITLE_ID = X_STUDY_TITLE_ID and SUBJECT_TYPE_CODE = X_SUBJECT_TYPE_CODE;
Line: 16

  insert into IGW_SUBJECT_INFORMATION (
   STUDY_TITLE_ID,
   SUBJECT_TYPE_CODE,
   SUBJECT_RACE_CODE,
   SUBJECT_ETHNICITY_CODE,
   NO_OF_SUBJECTS,
   RECORD_VERSION_NUMBER)
   values (
   X_STUDY_TITLE_ID,
   X_SUBJECT_TYPE_CODE,
   X_SUBJECT_RACE_CODE,
   X_SUBJECT_ETHNICITY_CODE,
   X_NO_OF_SUBJECTS,
   1);
Line: 42

                              ,p_procedure_name => 'INSERT_ROW' );
Line: 46

end INSERT_ROW;
Line: 50

procedure UPDATE_ROW (
  X_ROWID                           IN ROWID,
  X_STUDY_TITLE_ID                  IN  NUMBER,
  X_SUBJECT_TYPE_CODE               IN  VARCHAR2,
  X_SUBJECT_RACE_CODE               IN  VARCHAR2,
  X_SUBJECT_ETHNICITY_CODE	    IN  VARCHAR2,
  X_NO_OF_SUBJECTS                  IN  NUMBER,
  X_RECORD_VERSION_NUMBER           IN NUMBER,
  X_RETURN_STATUS                   OUT NOCOPY VARCHAR2
  ) is

begin

  x_return_status := FND_API.G_RET_STS_SUCCESS;
Line: 69

  update igw_subject_information set
    study_title_id = x_study_title_id,
    subject_type_code = x_subject_type_code,
    subject_race_code = x_subject_race_code,
    subject_ethnicity_code = x_subject_ethnicity_code,
    no_of_subjects = x_no_of_subjects,
    record_version_number = x_record_version_number +1
  where rowid = x_rowid
    and   record_version_number = x_record_version_number;
Line: 88

                              ,p_procedure_name => 'UPDATE_ROW' );
Line: 92

end UPDATE_ROW;
Line: 96

procedure DELETE_ROW (
  x_rowid in rowid
  ,x_record_version_number in number
  ,X_RETURN_STATUS   OUT NOCOPY VARCHAR2
) is

  l_record_version_number  NUMBER;
Line: 108

  delete from igw_subject_information
  where rowid = x_rowid
  and   record_version_number = x_record_version_number;
Line: 119

                              ,p_procedure_name => 'DELETE_ROW' );
Line: 122

end DELETE_ROW;