APPS.IGS_AD_TAC_AD_CD_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_AD_TAC_AD_CD
      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: 60

  PROCEDURE BeforeRowUpdate1(
    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

  END BeforeRowUpdate1;

Line: 128

      SELECT   rowid
      FROM     IGS_AD_TAC_AD_CD
      WHERE    tac_admission_cd = x_tac_admission_cd AND
               closed_ind = NVL(x_closed_ind,closed_ind);

Line: 157

    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_tac_admission_cd,
      x_description,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 176

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

Line: 186

    ELSIF (p_action = 'UPDATE') THEN
      BeforeRowUpdate1 ( p_updating => TRUE );

Line: 189

    ELSIF (p_action = 'DELETE') THEN
      Null;

Line: 192

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

Line: 201

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 203

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 217

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_TAC_ADMISSION_CD in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_AD_TAC_AD_CD
      where TAC_ADMISSION_CD = X_TAC_ADMISSION_CD;

Line: 226

    X_LAST_UPDATE_DATE DATE;

Line: 227

    X_LAST_UPDATED_BY NUMBER;

Line: 228

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 230

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 232

    X_LAST_UPDATED_BY := 1;

Line: 233

    X_LAST_UPDATE_LOGIN := 0;

Line: 235

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 236

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 239

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 240

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 250

     p_action => 'INSERT',
     x_rowid => X_ROWID,
     x_tac_admission_cd => X_TAC_ADMISSION_CD,
     x_description => X_DESCRIPTION,
     x_closed_ind => NVL(X_CLOSED_IND,'N'),
     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: 262

  insert into IGS_AD_TAC_AD_CD (
    TAC_ADMISSION_CD,
    DESCRIPTION,
    CLOSED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.TAC_ADMISSION_CD,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.CLOSED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 290

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

Line: 294

end INSERT_ROW;

Line: 302

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

Line: 314

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

Line: 333

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_TAC_ADMISSION_CD in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 341

    X_LAST_UPDATED_BY NUMBER;

Line: 342

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 344

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 346

    X_LAST_UPDATED_BY := 1;

Line: 347

    X_LAST_UPDATE_LOGIN := 0;

Line: 349

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 350

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 353

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 354

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 363

     p_action => 'UPDATE',
     x_rowid => X_ROWID,
     x_tac_admission_cd => X_TAC_ADMISSION_CD,
     x_description => X_DESCRIPTION,
     x_closed_ind => X_CLOSED_IND,
     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: 375

  update IGS_AD_TAC_AD_CD set
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
    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: 387

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

Line: 390

end UPDATE_ROW;

Line: 399

  cursor c1 is select rowid from IGS_AD_TAC_AD_CD
     where TAC_ADMISSION_CD = X_TAC_ADMISSION_CD
  ;

Line: 407

    INSERT_ROW (
     X_ROWID,
     X_TAC_ADMISSION_CD,
     X_DESCRIPTION,
     X_CLOSED_IND,
     X_MODE);

Line: 416

  UPDATE_ROW (
   X_ROWID,
   X_TAC_ADMISSION_CD,
   X_DESCRIPTION,
   X_CLOSED_IND,
   X_MODE);

Line: 424

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

Line: 432

  delete from IGS_AD_TAC_AD_CD
   where ROWID = X_ROWID;

Line: 438

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

Line: 441

end DELETE_ROW;