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_STUDY_PRD_PKG SQL Statements

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

Line: 20


    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_STUDY_PRD
      WHERE    rowid = x_rowid;

Line: 38


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

Line: 40


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

Line: 56


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

Line: 63


    new_references.last_update_date := x_last_update_date;

Line: 64


    new_references.last_updated_by := x_last_updated_by;

Line: 65


    new_references.last_update_login := x_last_update_login;

Line: 68


  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: 75


	-- 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: 95


	-- Validate the insert/update
	IF p_inserting OR p_updating THEN
		-- Validate the Teaching Calendar Type
		IF IGS_PS_VAL_POSp.crsp_val_posp_cat (
				new_references.teach_cal_type,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);

Line: 107


  END BeforeRowInsertUpdateDelete1;

Line: 109


  PROCEDURE AfterRowInsertUpdate2(
    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: 132


  END AfterRowInsertUpdate2;

Line: 236


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

Line: 257


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

Line: 286


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

Line: 315


      SELECT   rowid
      FROM     IGS_PS_PAT_STUDY_PRD
      WHERE    teach_cal_type = x_cal_type ;

Line: 344


      SELECT   rowid
      FROM     IGS_PS_PAT_STUDY_PRD
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      cal_type = x_cal_type
      AND      pos_sequence_number = x_sequence_number ;

Line: 381


    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_pos_sequence_number,
      x_sequence_number,
      x_acad_period_num,
      x_teach_cal_type,
      x_description,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 404


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

Line: 420


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

Line: 425


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

Line: 429


 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.pos_sequence_number,
			    new_references.sequence_number
					) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 442


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;

Line: 444


ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 457


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

Line: 460


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

Line: 468


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_POS_SEQUENCE_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_CAL_TYPE in VARCHAR2,
  X_ACAD_PERIOD_NUM in NUMBER,
  X_TEACH_CAL_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_PS_PAT_STUDY_PRD
      where COURSE_CD = X_COURSE_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and POS_SEQUENCE_NUMBER = X_POS_SEQUENCE_NUMBER
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
      and CAL_TYPE = X_CAL_TYPE;

Line: 486


    X_LAST_UPDATE_DATE DATE;

Line: 487


    X_LAST_UPDATED_BY NUMBER;

Line: 488


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 490


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 492


    X_LAST_UPDATED_BY := 1;

Line: 493


    X_LAST_UPDATE_LOGIN := 0;

Line: 495


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 496


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 499


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 500


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 508


   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_pos_sequence_number => X_POS_SEQUENCE_NUMBER,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_acad_period_num => X_ACAD_PERIOD_NUM,
    x_teach_cal_type => X_TEACH_CAL_TYPE,
    x_description => X_DESCRIPTION,
    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: 525


  insert into IGS_PS_PAT_STUDY_PRD (
    COURSE_CD,
    VERSION_NUMBER,
    CAL_TYPE,
    POS_SEQUENCE_NUMBER,
    SEQUENCE_NUMBER,
    ACAD_PERIOD_NUM,
    TEACH_CAL_TYPE,
    DESCRIPTION,
    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.POS_SEQUENCE_NUMBER,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.ACAD_PERIOD_NUM,
    NEW_REFERENCES.TEACH_CAL_TYPE,
    NEW_REFERENCES.DESCRIPTION,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 564


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

Line: 568


end INSERT_ROW;

Line: 581


  cursor c1 is select
      ACAD_PERIOD_NUM,
      TEACH_CAL_TYPE,
      DESCRIPTION
    from IGS_PS_PAT_STUDY_PRD
    where ROWID = X_ROWID  for update nowait;

Line: 594


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

Line: 616


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_POS_SEQUENCE_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_CAL_TYPE in VARCHAR2,
  X_ACAD_PERIOD_NUM in NUMBER,
  X_TEACH_CAL_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 629


    X_LAST_UPDATED_BY NUMBER;

Line: 630


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 632


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 634


    X_LAST_UPDATED_BY := 1;

Line: 635


    X_LAST_UPDATE_LOGIN := 0;

Line: 637


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 638


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 641


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 642


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 650


 Before_DML( p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_cal_type => X_CAL_TYPE,
    x_pos_sequence_number => X_POS_SEQUENCE_NUMBER,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_acad_period_num => X_ACAD_PERIOD_NUM,
    x_teach_cal_type => X_TEACH_CAL_TYPE,
    x_description => X_DESCRIPTION,
    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: 667


  update IGS_PS_PAT_STUDY_PRD set
    ACAD_PERIOD_NUM = NEW_REFERENCES.ACAD_PERIOD_NUM,
    TEACH_CAL_TYPE = NEW_REFERENCES.TEACH_CAL_TYPE,
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    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: 680


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

Line: 684


end UPDATE_ROW;

Line: 698


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

Line: 710


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_VERSION_NUMBER,
     X_POS_SEQUENCE_NUMBER,
     X_SEQUENCE_NUMBER,
     X_CAL_TYPE,
     X_ACAD_PERIOD_NUM,
     X_TEACH_CAL_TYPE,
     X_DESCRIPTION,
     X_MODE);

Line: 724


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_VERSION_NUMBER,
   X_POS_SEQUENCE_NUMBER,
   X_SEQUENCE_NUMBER,
   X_CAL_TYPE,
   X_ACAD_PERIOD_NUM,
   X_TEACH_CAL_TYPE,
   X_DESCRIPTION,
   X_MODE);

Line: 737


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

Line: 744


  delete from IGS_PS_PAT_STUDY_PRD
  where ROWID = X_ROWID;

Line: 750


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

Line: 754


end DELETE_ROW;