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

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

Line: 18


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

Line: 36


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

Line: 38


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

Line: 52


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

Line: 59


    new_references.last_update_date := x_last_update_date;

Line: 60


    new_references.last_updated_by := x_last_updated_by;

Line: 61


    new_references.last_update_login := x_last_update_login;

Line: 65


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


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


  END BeforeRowInsertUpdateDelete1;

Line: 105


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


	IF p_inserting OR p_updating THEN
		 -- Save the rowid of the current row.
  		-- Validate the IGS_PS_STAGE_TYPE is unique for this IGS_PS_COURSE version
  		IF IGS_PS_VAL_CST.crsp_val_cst_cstt(
  				NEW_REFERENCES.course_cd,
  				NEW_REFERENCES.version_number,
  				NEW_REFERENCES.sequence_number,
  				NEW_REFERENCES.course_stage_type,
  				v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);

Line: 129


  END AfterRowInsertUpdate2;

Line: 192


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

Line: 205


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

Line: 231


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

Line: 260


      SELECT   rowid
      FROM     IGS_PS_STAGE
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number ;

Line: 287


      SELECT   rowid
      FROM     IGS_PS_STAGE
      WHERE    course_stage_type = x_course_stage_type ;

Line: 319


    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_sequence_number,
      x_course_stage_type,
      x_description,
      x_comments,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 341


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

Line: 355


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

Line: 360


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

Line: 364


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

Line: 374


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
     	Check_Constraints;

Line: 376


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 389


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

Line: 392


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

Line: 399


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_COURSE_STAGE_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PS_STAGE
      where COURSE_CD = X_COURSE_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;

Line: 413


    X_LAST_UPDATE_DATE DATE;

Line: 414


    X_LAST_UPDATED_BY NUMBER;

Line: 415


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 417


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 419


    X_LAST_UPDATED_BY := 1;

Line: 420


    X_LAST_UPDATE_LOGIN := 0;

Line: 422


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 423


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 426


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 427


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 436


  Before_DML( p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_course_stage_type => X_COURSE_STAGE_TYPE,
    x_description => X_DESCRIPTION,
    x_comments => X_COMMENTS,
    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: 450


  insert into IGS_PS_STAGE (
    COURSE_CD,
    VERSION_NUMBER,
    SEQUENCE_NUMBER,
    COURSE_STAGE_TYPE,
    DESCRIPTION,
    COMMENTS,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.COURSE_STAGE_TYPE,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.COMMENTS,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 485


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

Line: 489


end INSERT_ROW;

Line: 500


  cursor c1 is select
      COURSE_STAGE_TYPE,
      DESCRIPTION,
      COMMENTS
    from IGS_PS_STAGE
    where ROWID = X_ROWID
    for update nowait;

Line: 514


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

Line: 538


procedure UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_COURSE_STAGE_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 549


    X_LAST_UPDATED_BY NUMBER;

Line: 550


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 552


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 554


    X_LAST_UPDATED_BY := 1;

Line: 555


    X_LAST_UPDATE_LOGIN := 0;

Line: 557


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 558


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 561


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 562


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 571


   Before_DML( p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_sequence_number => X_SEQUENCE_NUMBER,
    x_course_stage_type => X_COURSE_STAGE_TYPE,
    x_description => X_DESCRIPTION,
    x_comments => X_COMMENTS,
    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: 586


    update IGS_PS_STAGE set
    COURSE_STAGE_TYPE = NEW_REFERENCES.COURSE_STAGE_TYPE,
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    COMMENTS = NEW_REFERENCES.COMMENTS,
    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: 600


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

Line: 603


end UPDATE_ROW;

Line: 615


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

Line: 625


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_VERSION_NUMBER,
     X_SEQUENCE_NUMBER,
     X_COURSE_STAGE_TYPE,
     X_DESCRIPTION,
     X_COMMENTS,
     X_MODE);

Line: 637


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_VERSION_NUMBER,
   X_SEQUENCE_NUMBER,
   X_COURSE_STAGE_TYPE,
   X_DESCRIPTION,
   X_COMMENTS,
   X_MODE);

Line: 648


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

Line: 656


  delete from IGS_PS_STAGE
    where ROWID = X_ROWID;

Line: 662


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

Line: 665


end DELETE_ROW;