eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PS_PAT_OF_STUDY_PKG SQL Statements

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

Line: 26


    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    rowid = x_rowid;

Line: 44


    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Close cur_old_ref_values;

Line: 46


      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 68


    IF (p_action = 'UPDATE') THEN
      new_references.creation_date := old_references.creation_date;

Line: 75


    new_references.last_update_date := x_last_update_date;

Line: 76


    new_references.last_updated_by := x_last_updated_by;

Line: 77


    new_references.last_update_login := x_last_update_login;

Line: 81


  PROCEDURE BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
	v_message_name		VARCHAR2(30);

Line: 88


	-- Validate the insert/update/delete
	IF p_inserting OR p_updating THEN
		IF  IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
				new_references.course_cd,
				new_references.version_number,
				v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 108


	-- Validate the insert/update
	IF p_inserting OR p_updating THEN
		-- Validate the IGS_AD_LOCATION Code
		IF (new_references.location_cd IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.location_cd <> old_references.location_cd))) THEN
		   -- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_POS.crsp_val_loc_cd
			IF IGS_PS_VAL_UOO.crsp_val_loc_cd (
					new_references.location_cd,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 123


		IF (new_references.attendance_mode IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.attendance_mode <> old_references.attendance_mode))) THEN
			IF IGS_AD_VAL_APCOO.crsp_val_am_closed (
					new_references.attendance_mode,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 134


		IF (new_references.attendance_type IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.attendance_type <> old_references.attendance_type))) THEN
			IF IGS_AD_VAL_APCOO.crsp_val_att_closed (
					new_references.attendance_type,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 145


		IF (new_references.unit_set_cd IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.unit_set_cd <> old_references.unit_set_cd))) THEN
			IF IGS_PS_VAL_POS.crsp_val_us_active (
					new_references.unit_set_cd,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 156


		IF (new_references.admission_cal_type IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.admission_cal_type <> old_references.admission_cal_type))) THEN
			IF IGS_PS_VAL_POS.crsp_val_pos_cat (
					new_references.admission_cal_type,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 167


		IF (new_references.admission_cat IS NOT NULL AND (p_inserting OR
		   (p_updating AND new_references.admission_cat <> old_references.admission_cat))) THEN
			IF IGS_PS_VAL_POS.crsp_val_ac_closed (
					new_references.admission_cat,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 179


		    (p_inserting OR (p_updating AND
		   new_references.aprvd_ci_sequence_number <> old_references.aprvd_ci_sequence_number))) THEN
			IF IGS_AS_VAL_UAI.crsp_val_crs_ci (
					new_references.cal_type,
					new_references.aprvd_ci_sequence_number,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);

Line: 193


  END BeforeRowInsertUpdateDelete1;

Line: 364


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 378


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 392


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 406


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 424


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 443


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 457


	    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 486


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      cal_type = x_cal_type
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;

Line: 514


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    admission_cat = x_admission_cat ;

Line: 540


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    attendance_mode = x_attendance_mode ;

Line: 566


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    attendance_type = x_attendance_type ;

Line: 592


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    admission_cal_type = x_cal_type ;

Line: 619


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    cal_type = x_cal_type
      AND      aprvd_ci_sequence_number = x_sequence_number ;

Line: 648


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      cal_type = x_cal_type ;

Line: 676


      SELECT   rowid
      FROM     IGS_PS_PAT_OF_STUDY
      WHERE    location_cd = x_location_cd ;

Line: 716


    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_course_cd,
      x_version_number,
      x_cal_type,
      x_sequence_number,
      x_location_cd,
      x_attendance_mode,
      x_attendance_type,
      x_unit_set_cd,
      x_admission_cal_type,
      x_admission_cat,
      x_aprvd_ci_sequence_number,
      x_number_of_periods,
      x_always_pre_enrol_ind,
      x_acad_perd_unit_set,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 746


 IF (p_action = 'INSERT') THEN
       -- Call all the procedures related to Before Insert.
      BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );

Line: 761


 ELSIF (p_action = 'UPDATE') THEN
       -- Call all the procedures related to Before Update.
      BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );

Line: 766


 ELSIF (p_action = 'DELETE') THEN
       -- Call all the procedures related to Before Delete.
      BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );

Line: 770


 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
		    	new_references.course_cd,
		      new_references.version_number,
		      new_references.cal_type,
		      new_references.sequence_number
			) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 782


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;

Line: 784


ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 801


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_CAL_TYPE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_UNIT_SET_CD in VARCHAR2,
  X_ADMISSION_CAL_TYPE in VARCHAR2,
  X_ADMISSION_CAT in VARCHAR2,
  X_APRVD_CI_SEQUENCE_NUMBER in NUMBER,
  X_NUMBER_OF_PERIODS in NUMBER,
  X_ALWAYS_PRE_ENROL_IND in VARCHAR2,
  X_ACAD_PERD_UNIT_SET in VARCHAR2 default NULL,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_PS_PAT_OF_STUDY
      where COURSE_CD = X_COURSE_CD
      and CAL_TYPE = X_CAL_TYPE
      and VERSION_NUMBER = X_VERSION_NUMBER
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;

Line: 824


    X_LAST_UPDATE_DATE DATE;

Line: 825


    X_LAST_UPDATED_BY NUMBER;

Line: 826


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 828


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 830


    X_LAST_UPDATED_BY := 1;

Line: 831


    X_LAST_UPDATE_LOGIN := 0;

Line: 833


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 834


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 837


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 838


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 847


  Before_DML( p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_cal_type => X_CAL_TYPE,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_location_cd => X_LOCATION_CD,
    x_attendance_mode => X_ATTENDANCE_MODE,
    x_attendance_type => X_ATTENDANCE_TYPE,
    x_unit_set_cd => X_UNIT_SET_CD,
    x_admission_cal_type => X_ADMISSION_CAL_TYPE,
    x_admission_cat => X_ADMISSION_CAT,
    x_aprvd_ci_sequence_number => X_APRVD_CI_SEQUENCE_NUMBER,
    x_number_of_periods => NVL(X_NUMBER_OF_PERIODS,1),
    x_always_pre_enrol_ind => NVL(X_ALWAYS_PRE_ENROL_IND,'N'),
    X_ACAD_PERD_UNIT_SET =>  X_ACAD_PERD_UNIT_SET,
    x_creation_date => X_LAST_UPDATE_DATE,
    x_created_by => X_LAST_UPDATED_BY,
    x_last_update_date => X_LAST_UPDATE_DATE,
    x_last_updated_by => X_LAST_UPDATED_BY,
    x_last_update_login => X_LAST_UPDATE_LOGIN
  );

Line: 869


  insert into IGS_PS_PAT_OF_STUDY (
    COURSE_CD,
    VERSION_NUMBER,
    CAL_TYPE,
    SEQUENCE_NUMBER,
    LOCATION_CD,
    ATTENDANCE_MODE,
    ATTENDANCE_TYPE,
    UNIT_SET_CD,
    ADMISSION_CAL_TYPE,
    ADMISSION_CAT,
    APRVD_CI_SEQUENCE_NUMBER,
    NUMBER_OF_PERIODS,
    ALWAYS_PRE_ENROL_IND,
    ACAD_PERD_UNIT_SET,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.CAL_TYPE,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.LOCATION_CD,
    NEW_REFERENCES.ATTENDANCE_MODE,
    NEW_REFERENCES.ATTENDANCE_TYPE,
    NEW_REFERENCES.UNIT_SET_CD,
    NEW_REFERENCES.ADMISSION_CAL_TYPE,
    NEW_REFERENCES.ADMISSION_CAT,
    NEW_REFERENCES.APRVD_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.NUMBER_OF_PERIODS,
    NEW_REFERENCES.ALWAYS_PRE_ENROL_IND,
    NEW_REFERENCES.ACAD_PERD_UNIT_SET ,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 919


  p_action => 'INSERT',
  x_rowid => X_ROWID
  );

Line: 923


end INSERT_ROW;

Line: 942


  cursor c1 is select
      LOCATION_CD,
      ATTENDANCE_MODE,
      ATTENDANCE_TYPE,
      UNIT_SET_CD,
      ADMISSION_CAL_TYPE,
      ADMISSION_CAT,
      APRVD_CI_SEQUENCE_NUMBER,
      NUMBER_OF_PERIODS,
      ALWAYS_PRE_ENROL_IND,
      ACAD_PERD_UNIT_SET
    from IGS_PS_PAT_OF_STUDY
    where ROWID = X_ROWID for update nowait;

Line: 962


    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 1005


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_CAL_TYPE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_UNIT_SET_CD in VARCHAR2,
  X_ADMISSION_CAL_TYPE in VARCHAR2,
  X_ADMISSION_CAT in VARCHAR2,
  X_APRVD_CI_SEQUENCE_NUMBER in NUMBER,
  X_NUMBER_OF_PERIODS in NUMBER,
  X_ALWAYS_PRE_ENROL_IND in VARCHAR2,
  X_ACAD_PERD_UNIT_SET in VARCHAR2  default NULL,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 1024


    X_LAST_UPDATED_BY NUMBER;

Line: 1025


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 1027


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 1029


    X_LAST_UPDATED_BY := 1;

Line: 1030


    X_LAST_UPDATE_LOGIN := 0;

Line: 1032


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 1033


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 1036


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 1037


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 1061


    x_creation_date => X_LAST_UPDATE_DATE,
    x_created_by => X_LAST_UPDATED_BY,
    x_last_update_date => X_LAST_UPDATE_DATE,
    x_last_updated_by => X_LAST_UPDATED_BY,
    x_last_update_login => X_LAST_UPDATE_LOGIN
  );

Line: 1068


  update IGS_PS_PAT_OF_STUDY set
    LOCATION_CD = NEW_REFERENCES.LOCATION_CD,
    ATTENDANCE_MODE = NEW_REFERENCES.ATTENDANCE_MODE,
    ATTENDANCE_TYPE = NEW_REFERENCES.ATTENDANCE_TYPE,
    UNIT_SET_CD = NEW_REFERENCES.UNIT_SET_CD,
    ADMISSION_CAL_TYPE = NEW_REFERENCES.ADMISSION_CAL_TYPE,
    ADMISSION_CAT = NEW_REFERENCES.ADMISSION_CAT,
    APRVD_CI_SEQUENCE_NUMBER = NEW_REFERENCES.APRVD_CI_SEQUENCE_NUMBER,
    NUMBER_OF_PERIODS = NEW_REFERENCES.NUMBER_OF_PERIODS,
    ALWAYS_PRE_ENROL_IND = NEW_REFERENCES.ALWAYS_PRE_ENROL_IND,
    ACAD_PERD_UNIT_SET = NEW_REFERENCES.ACAD_PERD_UNIT_SET,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where ROWID = X_ROWID
  ;

Line: 1088


  p_action => 'UPDATE',
  x_rowid => X_ROWID
  );

Line: 1092


end UPDATE_ROW;

Line: 1112


  cursor c1 is select rowid from IGS_PS_PAT_OF_STUDY
     where COURSE_CD = X_COURSE_CD
     and CAL_TYPE = X_CAL_TYPE
     and VERSION_NUMBER = X_VERSION_NUMBER
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
  ;

Line: 1123


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_CAL_TYPE,
     X_VERSION_NUMBER,
     X_SEQUENCE_NUMBER,
     X_LOCATION_CD,
     X_ATTENDANCE_MODE,
     X_ATTENDANCE_TYPE,
     X_UNIT_SET_CD,
     X_ADMISSION_CAL_TYPE,
     X_ADMISSION_CAT,
     X_APRVD_CI_SEQUENCE_NUMBER,
     X_NUMBER_OF_PERIODS,
     X_ALWAYS_PRE_ENROL_IND,
     X_ACAD_PERD_UNIT_SET,
     X_MODE);

Line: 1143


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_CAL_TYPE,
   X_VERSION_NUMBER,
   X_SEQUENCE_NUMBER,
   X_LOCATION_CD,
   X_ATTENDANCE_MODE,
   X_ATTENDANCE_TYPE,
   X_UNIT_SET_CD,
   X_ADMISSION_CAL_TYPE,
   X_ADMISSION_CAT,
   X_APRVD_CI_SEQUENCE_NUMBER,
   X_NUMBER_OF_PERIODS,
   X_ALWAYS_PRE_ENROL_IND,
   X_ACAD_PERD_UNIT_SET,
   X_MODE);

Line: 1162


procedure DELETE_ROW (
X_ROWID in VARCHAR2
) as
begin
 Before_DML( p_action => 'DELETE',
    x_rowid => X_ROWID
  );

Line: 1170


  delete from IGS_PS_PAT_OF_STUDY
  where ROWID=X_ROWID;

Line: 1176


  p_action => 'DELETE',
  x_rowid => X_ROWID
  );

Line: 1179


end DELETE_ROW;