DBA Data[Home] [Help]

APPS.IGS_EN_UNIT_SET_RULE_PKG SQL Statements

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

Line: 16

    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_EN_UNIT_SET_RULE
      WHERE    rowid = x_rowid;
Line: 34

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

      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 48

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

    new_references.last_update_date := x_last_update_date;
Line: 56

    new_references.last_updated_by := x_last_updated_by;
Line: 57

    new_references.last_update_login := x_last_update_login;
Line: 67

  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_COUSR.crsp_val_iud_us_dtl(
				new_references.unit_set_cd,
				new_references.version_number,
				v_message_name) = FALSE THEN
			    Fnd_Message.Set_Name('IGS', v_message_name);
Line: 96

	IF p_inserting OR p_updating THEN
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_PS_VAL_USR.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,
				'USET',
				new_references.rul_sequence_number,
				v_message_name) = FALSE THEN
			    Fnd_Message.Set_Name('IGS', v_message_name);
Line: 113

  END BeforeRowInsertUpdateDelete1;
Line: 173

        Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 186

        Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 202

        Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 217

      SELECT   rowid
      FROM     IGS_EN_UNIT_SET_RULE
      WHERE    unit_set_cd = x_unit_set_cd
      AND      version_number = x_version_number
      AND      s_rule_call_cd = x_s_rule_call_cd
      FOR UPDATE NOWAIT;
Line: 245

      SELECT   rowid
      FROM     IGS_EN_UNIT_SET_RULE
      WHERE    rul_sequence_number = x_sequence_number ;
Line: 271

      SELECT   rowid
      FROM     IGS_EN_UNIT_SET_RULE
      WHERE    s_rule_call_cd = x_s_rule_call_cd ;
Line: 298

      SELECT   rowid
      FROM     IGS_EN_UNIT_SET_RULE
      WHERE    unit_set_cd = x_unit_set_cd
      AND      version_number = x_version_number ;
Line: 329

    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_unit_set_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: 349

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

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      If Get_PK_For_Validation(
	    new_references.unit_set_cd ,
	    new_references.version_number ,
	    new_references.s_rule_call_cd
         ) THEN
         FND_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
Line: 382

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_constraints;
Line: 384

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      null;
Line: 398

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      Null;
Line: 401

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      Null;
Line: 404

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to After Delete.
      Null;
Line: 411

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_UNIT_SET_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_EN_UNIT_SET_RULE
      where UNIT_SET_CD = X_UNIT_SET_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and S_RULE_CALL_CD = X_S_RULE_CALL_CD;
Line: 423

    X_LAST_UPDATE_DATE DATE;
Line: 424

    X_LAST_UPDATED_BY NUMBER;
Line: 425

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 427

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 429

    X_LAST_UPDATED_BY := 1;
Line: 430

    X_LAST_UPDATE_LOGIN := 0;
Line: 432

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 433

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 436

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 437

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 446

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_unit_set_cd => X_UNIT_SET_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: 458

  insert into IGS_EN_UNIT_SET_RULE (
    UNIT_SET_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.UNIT_SET_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: 488

    p_action => 'INSERT',
    x_rowid =>  X_ROWID
  );
Line: 491

end INSERT_ROW;
Line: 500

  cursor c1 is select
      RUL_SEQUENCE_NUMBER
    from IGS_EN_UNIT_SET_RULE
   where ROWID = X_ROWID
    for update nowait;
Line: 512

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 530

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_UNIT_SET_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: 539

    X_LAST_UPDATED_BY NUMBER;
Line: 540

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 542

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 544

    X_LAST_UPDATED_BY := 1;
Line: 545

    X_LAST_UPDATE_LOGIN := 0;
Line: 547

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 548

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 551

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 552

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 561

    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_unit_set_cd => X_UNIT_SET_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: 573

  update IGS_EN_UNIT_SET_RULE 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: 584

    p_action => 'UPDATE',
    x_rowid =>  X_ROWID
  );
Line: 587

end UPDATE_ROW;
Line: 597

  cursor c1 is select rowid from IGS_EN_UNIT_SET_RULE
     where UNIT_SET_CD = X_UNIT_SET_CD
     and VERSION_NUMBER = X_VERSION_NUMBER
     and S_RULE_CALL_CD = X_S_RULE_CALL_CD
  ;
Line: 607

    INSERT_ROW (
     X_ROWID,
     X_UNIT_SET_CD,
     X_VERSION_NUMBER,
     X_S_RULE_CALL_CD,
     X_RUL_SEQUENCE_NUMBER,
     X_MODE);
Line: 617

  UPDATE_ROW (
   X_ROWID,
   X_UNIT_SET_CD,
   X_VERSION_NUMBER,
   X_S_RULE_CALL_CD,
   X_RUL_SEQUENCE_NUMBER,
   X_MODE);
Line: 626

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

  delete from IGS_EN_UNIT_SET_RULE
  where ROWID = X_ROWID;
Line: 640

    p_action => 'DELETE',
    x_rowid =>  X_ROWID
  );
Line: 643

end DELETE_ROW;