APPS.IGS_PS_UNIT_RU_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_PS_UNIT_RU
      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: 47

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

Line: 54

    new_references.last_update_date := x_last_update_date;

Line: 55

    new_references.last_updated_by := x_last_updated_by;

Line: 56

    new_references.last_update_login := x_last_update_login;

Line: 101

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

Line: 115

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

Line: 129

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

Line: 145

      SELECT   rowid
      FROM     IGS_PS_UNIT_RU
      WHERE    unit_cd = x_unit_cd
      AND      s_rule_call_cd = x_s_rule_call_cd
      FOR UPDATE NOWAIT;

Line: 172

      SELECT   rowid
      FROM     IGS_PS_UNIT_RU
      WHERE    s_rule_call_cd = x_s_rule_call_cd ;

Line: 198

      SELECT   rowid
      FROM     IGS_PS_UNIT_RU
      WHERE    unit_cd = x_unit_cd ;

Line: 224

      SELECT   rowid
      FROM     IGS_PS_UNIT_RU
      WHERE    rul_sequence_number = x_sequence_number ;

Line: 253

    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_cd,
      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: 272

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
	   IF Get_PK_For_Validation (New_References.unit_cd,
						New_References.s_rule_call_cd) THEN
		      Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 282

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
	Check_Constraints;

Line: 288

	ELSIF (p_action = 'VALIDATE_INSERT') THEN
	   IF Get_PK_For_Validation (New_References.unit_cd,
						New_References.s_rule_call_cd) THEN
			      Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 296

   ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	   Check_Constraints;

Line: 314

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  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_UNIT_RU
      where UNIT_CD = X_UNIT_CD
      and S_RULE_CALL_CD = X_S_RULE_CALL_CD;

Line: 324

    X_LAST_UPDATE_DATE DATE;

Line: 325

    X_LAST_UPDATED_BY NUMBER;

Line: 326

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 328

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 330

    X_LAST_UPDATED_BY := 1;

Line: 331

    X_LAST_UPDATE_LOGIN := 0;

Line: 333

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 334

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 337

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 338

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 348

  p_action => 'INSERT',
  x_rowid => X_ROWID,
  x_unit_cd => X_UNIT_CD,
  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: 360

  insert into IGS_PS_UNIT_RU (
    UNIT_CD,
    S_RULE_CALL_CD,
    RUL_SEQUENCE_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.UNIT_CD,
    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: 388

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

Line: 392

end INSERT_ROW;

Line: 400

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

Line: 411

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

Line: 429

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

    X_LAST_UPDATED_BY NUMBER;

Line: 438

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 440

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 442

    X_LAST_UPDATED_BY := 1;

Line: 443

    X_LAST_UPDATE_LOGIN := 0;

Line: 445

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 446

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 449

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 450

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 460

  p_action => 'UPDATE',
  x_rowid => X_ROWID,
  x_unit_cd => X_UNIT_CD,
  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: 472

  update IGS_PS_UNIT_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: 483

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

Line: 487

end UPDATE_ROW;

Line: 496

  cursor c1 is select rowid from IGS_PS_UNIT_RU
     where UNIT_CD = X_UNIT_CD
     and S_RULE_CALL_CD = X_S_RULE_CALL_CD
  ;

Line: 505

    INSERT_ROW (
     X_ROWID,
     X_UNIT_CD,
     X_S_RULE_CALL_CD,
     X_RUL_SEQUENCE_NUMBER,
     X_MODE);

Line: 514

  UPDATE_ROW (
   X_ROWID,
   X_UNIT_CD,
   X_S_RULE_CALL_CD,
   X_RUL_SEQUENCE_NUMBER,
   X_MODE);

Line: 522

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

Line: 530

  delete from IGS_PS_UNIT_RU
  where ROWID = X_ROWID;

Line: 536

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

Line: 539

end DELETE_ROW;