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

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

Line: 19


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

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

Line: 38


    IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 54


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

Line: 61


    new_references.last_update_date := x_last_update_date;

Line: 62


    new_references.last_updated_by := x_last_updated_by;

Line: 63


    new_references.last_update_login := x_last_update_login;

Line: 73


  PROCEDURE BeforeRowInsertUpdate1(
    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: 81


	IF p_inserting THEN
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_PR_VAL_PRR.PRGP_VAL_PRGC_CLOSED" to program unit "IGS_PR_VAL_PRA.PRGP_VAL_PRGC_CLOSED". -- kdande
*/
		IF IGS_PR_VAL_PRA.prgp_val_prgc_closed (
					new_references.progression_rule_cat,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 96


  END BeforeRowInsertUpdate1;

Line: 108


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

Line: 122


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

Line: 147


      SELECT   rowid
      FROM     IGS_PR_RULE_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat
      AND      progression_rule_cd = x_progression_rule_cd
      FOR UPDATE NOWAIT;

Line: 174


      SELECT   rowid
      FROM     IGS_PR_RULE_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat ;

Line: 200


      SELECT   rowid
      FROM     IGS_PR_RULE_ALL
      WHERE    rul_sequence_number = x_sequence_number ;

Line: 232


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

    Set_Column_Values (
      p_action,
      x_rowid,
      x_progression_rule_cat,
      x_progression_rule_cd,
      x_description,
      x_rul_sequence_number,
      x_closed_ind,
      x_message,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id
    );

Line: 256


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

Line: 271


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

Line: 276


    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      Check_Child_Existance;

Line: 279


	ELSIF (p_action = 'VALIDATE_INSERT') THEN
		IF Get_PK_For_Validation (
	    new_references.progression_rule_cat,
	    new_references.progression_rule_cd
			    ) THEN
	Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');

Line: 290


	ELSIF (p_action = 'VALIDATE_UPDATE') THEN
		CHECK_CONSTRAINTS;

Line: 292


	ELSIF (p_action = 'VALIDATE_DELETE') THEN
		Check_Child_Existance;

Line: 302


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PROGRESSION_RULE_CD in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_RUL_SEQUENCE_NUMBER in NUMBER,
  X_CLOSED_IND in VARCHAR2,
  X_MESSAGE in VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID in NUMBER
  ) AS
    cursor C is select ROWID from IGS_PR_RULE_ALL
      where PROGRESSION_RULE_CAT = X_PROGRESSION_RULE_CAT
      and PROGRESSION_RULE_CD = X_PROGRESSION_RULE_CD;

Line: 316


    X_LAST_UPDATE_DATE DATE;

Line: 317


    X_LAST_UPDATED_BY NUMBER;

Line: 318


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 320


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 322


    X_LAST_UPDATED_BY := 1;

Line: 323


    X_LAST_UPDATE_LOGIN := 0;

Line: 325


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 326


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 329


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 330


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 339


    p_action => 'INSERT',
    x_rowid => x_rowid,
    x_progression_rule_cat => x_progression_rule_cat,
    x_progression_rule_cd => x_progression_rule_cd,
    x_description => x_description,
    x_rul_sequence_number => x_rul_sequence_number,
    x_closed_ind => nvl( x_closed_ind, 'N'),
    x_message => x_message,
    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,
    x_org_id=>igs_ge_gen_003.get_org_id
  ) ;

Line: 354


  insert into IGS_PR_RULE_ALL (
    PROGRESSION_RULE_CAT,
    PROGRESSION_RULE_CD,
    DESCRIPTION,
    RUL_SEQUENCE_NUMBER,
    CLOSED_IND,
    MESSAGE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID
  ) values (
    NEW_REFERENCES.PROGRESSION_RULE_CAT,
    NEW_REFERENCES.PROGRESSION_RULE_CD,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.RUL_SEQUENCE_NUMBER,
    NEW_REFERENCES.CLOSED_IND,
    NEW_REFERENCES.MESSAGE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.ORG_ID
  );

Line: 389


end INSERT_ROW;

Line: 400


  cursor c1 is select
      DESCRIPTION,
      RUL_SEQUENCE_NUMBER,
      CLOSED_IND,
      MESSAGE
    from IGS_PR_RULE_ALL
    where ROWID = X_ROWID for update nowait;

Line: 413


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

Line: 437


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PROGRESSION_RULE_CD in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_RUL_SEQUENCE_NUMBER in NUMBER,
  X_CLOSED_IND in VARCHAR2,
  X_MESSAGE in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 448


    X_LAST_UPDATED_BY NUMBER;

Line: 449


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 451


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 453


    X_LAST_UPDATED_BY := 1;

Line: 454


    X_LAST_UPDATE_LOGIN := 0;

Line: 456


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 457


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 460


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 461


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 470


    p_action => 'UPDATE',
    x_rowid => x_rowid,
    x_progression_rule_cat => x_progression_rule_cat,
    x_progression_rule_cd => x_progression_rule_cd,
    x_description => x_description,
    x_rul_sequence_number => x_rul_sequence_number,
    x_closed_ind => x_closed_ind,
    x_message => x_message,
    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: 486


  update IGS_PR_RULE_ALL set
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    RUL_SEQUENCE_NUMBER = NEW_REFERENCES.RUL_SEQUENCE_NUMBER,
    CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
    MESSAGE = NEW_REFERENCES.MESSAGE,
    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: 499


end UPDATE_ROW;

Line: 512


  cursor c1 is select rowid from IGS_PR_RULE_ALL
     where PROGRESSION_RULE_CAT = X_PROGRESSION_RULE_CAT
     and PROGRESSION_RULE_CD = X_PROGRESSION_RULE_CD
  ;

Line: 521


    INSERT_ROW (
     X_ROWID,
     X_PROGRESSION_RULE_CAT,
     X_PROGRESSION_RULE_CD,
     X_DESCRIPTION,
     X_RUL_SEQUENCE_NUMBER,
     X_CLOSED_IND,
     X_MESSAGE,
     X_MODE,
     X_ORG_ID);

Line: 534


  UPDATE_ROW (
   X_ROWID ,
   X_PROGRESSION_RULE_CAT,
   X_PROGRESSION_RULE_CD,
   X_DESCRIPTION,
   X_RUL_SEQUENCE_NUMBER,
   X_CLOSED_IND,
   X_MESSAGE,
   X_MODE
   );

Line: 546


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

Line: 555


  delete from IGS_PR_RULE_ALL
  where ROWID = X_ROWID;

Line: 561


end DELETE_ROW;