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

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

Line: 17


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

Line: 35


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

Line: 37


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

Line: 49


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

Line: 56


    new_references.last_update_date := x_last_update_date;

Line: 57


    new_references.last_updated_by := x_last_updated_by;

Line: 58


    new_references.last_update_login := x_last_update_login;

Line: 62


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


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


	IF p_inserting OR p_updating THEN
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_PS_VAL_CVR.RULP_VAL_RUL_SRC" to program unit "IGS_FI_VAL_FDFR.RULP_VAL_RUL_SRC". -- kdande
*/
		IF  IGS_FI_VAL_FDFR.rulp_val_rul_src(
				new_references.s_rule_call_cd,
				'COURSE',
				new_references.rul_sequence_number,
				v_message_name) = FALSE THEN
			FND_MESSAGE.SET_NAME('IGS',v_message_name);

Line: 107


  END BeforeRowInsertUpdateDelete1;

Line: 166


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

Line: 179


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

Line: 192


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

Line: 206


      SELECT   rowid
      FROM     IGS_PS_VER_RU
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      s_rule_call_cd = x_s_rule_call_cd
      FOR UPDATE NOWAIT;

Line: 235


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

Line: 262


      SELECT   rowid
      FROM     IGS_PS_VER_RU
      WHERE    rul_sequence_number = x_sequence_number ;

Line: 288


      SELECT   rowid
      FROM     IGS_PS_VER_RU
      WHERE    s_rule_call_cd = x_s_rule_call_cd ;

Line: 318


    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_s_rule_call_cd,
      x_rul_sequence_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 338


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

Line: 352


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

Line: 357


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

Line: 360


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

Line: 371


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
     	Check_Constraints;

Line: 389


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_S_RULE_CALL_CD in VARCHAR2,
  X_RUL_SEQUENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PS_VER_RU
      where COURSE_CD = X_COURSE_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and S_RULE_CALL_CD = X_S_RULE_CALL_CD;

Line: 401


    X_LAST_UPDATE_DATE DATE;

Line: 402


    X_LAST_UPDATED_BY NUMBER;

Line: 403


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 405


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 407


    X_LAST_UPDATED_BY := 1;

Line: 408


    X_LAST_UPDATE_LOGIN := 0;

Line: 410


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 411


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 414


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 415


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 426


  p_action => 'INSERT',
  x_rowid => X_ROWID,
  x_course_cd => X_COURSE_CD,
  x_version_number => X_VERSION_NUMBER,
  x_s_rule_call_cd => X_S_RULE_CALL_CD,
  x_rul_sequence_number => X_RUL_SEQUENCE_NUMBER,
  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: 438


  insert into IGS_PS_VER_RU (
    COURSE_CD,
    VERSION_NUMBER,
    S_RULE_CALL_CD,
    RUL_SEQUENCE_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.S_RULE_CALL_CD,
    NEW_REFERENCES.RUL_SEQUENCE_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 468


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

Line: 471


end INSERT_ROW;

Line: 480


  cursor c1 is select
      RUL_SEQUENCE_NUMBER
    from IGS_PS_VER_RU
    where ROWID = X_ROWID for update nowait;

Line: 491


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

Line: 509


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_S_RULE_CALL_CD in VARCHAR2,
  X_RUL_SEQUENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 518


    X_LAST_UPDATED_BY NUMBER;

Line: 519


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 521


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 523


    X_LAST_UPDATED_BY := 1;

Line: 524


    X_LAST_UPDATE_LOGIN := 0;

Line: 526


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 527


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 530


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 531


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 540


  p_action => 'UPDATE',
  x_rowid => X_ROWID,
  x_course_cd => X_COURSE_CD,
  x_version_number => X_VERSION_NUMBER,
  x_s_rule_call_cd => X_S_RULE_CALL_CD,
  x_rul_sequence_number => X_RUL_SEQUENCE_NUMBER,
  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: 552


  update IGS_PS_VER_RU set
    RUL_SEQUENCE_NUMBER = NEW_REFERENCES.RUL_SEQUENCE_NUMBER,
    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: 563


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

Line: 567


end UPDATE_ROW;

Line: 577


  cursor c1 is select rowid from IGS_PS_VER_RU
     where COURSE_CD = X_COURSE_CD
     and VERSION_NUMBER = X_VERSION_NUMBER
     and S_RULE_CALL_CD = X_S_RULE_CALL_CD
  ;

Line: 587


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_VERSION_NUMBER,
     X_S_RULE_CALL_CD,
     X_RUL_SEQUENCE_NUMBER,
     X_MODE);

Line: 597


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_VERSION_NUMBER,
   X_S_RULE_CALL_CD,
   X_RUL_SEQUENCE_NUMBER,
   X_MODE);

Line: 606


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

Line: 614


  delete from IGS_PS_VER_RU
  where ROWID = X_ROWID;

Line: 620


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

Line: 624


end DELETE_ROW;