APPS.IGS_RU_RULE_PKG SQL Statements

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

Line: 14

    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
) as

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

Line: 32

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
      IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_RULE  : P_ACTION INSERT VALIDATE_INSERT   : IGSUI11B.PLS');

Line: 34

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

Line: 44

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

Line: 51

    new_references.last_update_date := x_last_update_date;

Line: 52

    new_references.last_updated_by := x_last_updated_by;

Line: 53

    new_references.last_update_login := x_last_update_login;

Line: 84

      SELECT   rowid
      FROM     IGS_RU_RULE
      WHERE    sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;

Line: 111

    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
  ) as
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_sequence_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 129

    IF (p_action = 'INSERT') THEN

	  IF Get_PK_For_Validation (
		new_references.sequence_number
	  ) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');

Line: 139

    ELSIF (p_action = 'UPDATE') THEN
	  Check_Constraints;

Line: 141

    ELSIF (p_action = 'DELETE') THEN
--
-- svenkata - This table handler is released as part of IGS specific forms in SEED . As a consequence ,
-- the procedure Check_Child_Existance originally a part of this  package , has been moved to Igs_Ru_Gen_005 .
-- This was done 'cos Check_Child_Existance makes calls to other procedures which are not being shipped !
-- Check_Child_Existance is called only when the user is not DATAMERGE . Hence , the proc.
-- Check_Child_Existance_ru_rule is being called using execute immediate only if the user is not DATAMERGE .
-- Bug # 2233951
--
       IF (fnd_global.user_id <>  1) THEN
       -- do execute immediate
            EXECUTE IMMEDIATE 'BEGIN  Igs_Ru_Gen_005.Check_Child_Existance_ru_rule(:1); END;'

Line: 155

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

Line: 164

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	  Check_Constraints;

Line: 166

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
--
-- svenkata - This table handler is released as part of IGS specific forms in SEED . As a consequence ,
-- the procedure Check_Child_Existance originally a part of this  package , has been moved to Igs_Ru_Gen_005 .
-- This was done 'cos Check_Child_Existance makes calls to other procedures which are not being shipped !
-- Check_Child_Existance is called only when the user is not DATAMERGE . Hence , the proc.
-- Check_Child_Existance_ru_rule is being called using execute immediate only if the user is not DATAMERGE .
-- Bug # 2233951
--
       IF (fnd_global.user_id <>  1) THEN
       -- do execute immediate
            EXECUTE IMMEDIATE 'BEGIN  Igs_Ru_Gen_005.Check_Child_Existance_ru_rule(:1); END;'

Line: 194

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_MODE in VARCHAR2
  ) as

--svenkata -	The cursor C is being modified and cursor cur_max_plus_one is being created . This is to ensure that
--		when a user defined rule is created , it picks up a sequence number more than 50000 . Bug # 2233951
  l_sequence_number NUMBER;

Line: 203

     cursor C is select ROWID from IGS_RU_RULE
     where SEQUENCE_NUMBER = L_SEQUENCE_NUMBER;

Line: 210

      SELECT   (sequence_number + 1) sequence_number
      FROM     IGS_RU_RULE
       WHERE sequence_number = (SELECT MAX(sequence_number) + 1 FROM igs_ru_rule
      where sequence_number < 499999 ) FOR UPDATE OF sequence_number NOWAIT;

Line: 215

    X_LAST_UPDATE_DATE DATE;

Line: 216

    X_LAST_UPDATED_BY NUMBER;

Line: 217

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 219

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 221

    X_LAST_UPDATED_BY := 1;

Line: 222

    X_LAST_UPDATE_LOGIN := 0;

Line: 224

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 225

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 228

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 229

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 239

   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_sequence_number=>X_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: 276

  insert into IGS_RU_RULE (
    SEQUENCE_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.SEQUENCE_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 301

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

Line: 304

end INSERT_ROW;

Line: 310

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

Line: 319

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

Line: 331

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) as
begin

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

Line: 340

  delete from IGS_RU_RULE
  where ROWID = X_ROWID;

Line: 347

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

Line: 350

end DELETE_ROW;