DBA Data[Home] [Help]

APPS.IGS_FI_ENC_DFLT_EFT_PKG SQL Statements

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

Line: 15

    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_FI_ENC_DFLT_EFT
      WHERE    rowid = x_rowid;
Line: 29

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 49

    new_references.last_updated_by := x_last_updated_by;
Line: 50

    new_references.last_update_login := x_last_update_login;
Line: 57

  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: 65

	IF p_inserting OR p_updating THEN
		IF IGS_EN_VAL_ETDE.enrp_val_et_closed (
				new_references.encumbrance_type,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 75

	IF p_inserting OR
	    (p_updating AND (old_references.s_encmb_effect_type <> new_references.s_encmb_effect_type)) THEN
		IF IGS_EN_VAL_ETDE.enrp_val_seet_closed (
				new_references.s_encmb_effect_type,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 85

  END BeforeRowInsertUpdateDelete1;
Line: 130

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

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

      SELECT   rowid
      FROM     IGS_FI_ENC_DFLT_EFT
      WHERE    encumbrance_type = x_encumbrance_type ;
Line: 177

      SELECT   rowid
      FROM     IGS_FI_ENC_DFLT_EFT
      WHERE    encumbrance_type = x_encumbrance_type
      AND      s_encmb_effect_type = x_s_encmb_effect_type
      FOR UPDATE NOWAIT;
Line: 204

    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_encumbrance_type,
      x_s_encmb_effect_type,
      x_comments,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 221

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

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

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

	ELSIF (p_action = 'VALIDATE_INSERT') THEN
	      IF  Get_PK_For_Validation (
			new_references.encumbrance_type ,
			new_references.s_encmb_effect_type
	        ) THEN
	         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 252

	ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	       Check_Constraints;
Line: 254

	ELSIF (p_action = 'VALIDATE_DELETE') THEN
	      Null;
Line: 258

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ENCUMBRANCE_TYPE in VARCHAR2,
  X_S_ENCMB_EFFECT_TYPE in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_FI_ENC_DFLT_EFT
      where ENCUMBRANCE_TYPE = X_ENCUMBRANCE_TYPE
      and S_ENCMB_EFFECT_TYPE = X_S_ENCMB_EFFECT_TYPE;
Line: 268

    X_LAST_UPDATE_DATE DATE;
Line: 269

    X_LAST_UPDATED_BY NUMBER;
Line: 270

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 272

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 274

    X_LAST_UPDATED_BY := 1;
Line: 275

    X_LAST_UPDATE_LOGIN := 0;
Line: 277

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 278

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 282

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

    p_action => 'INSERT',
    x_rowid => x_rowid,
    x_encumbrance_type => x_encumbrance_type,
    x_s_encmb_effect_type => x_s_encmb_effect_type,
    x_comments => x_comments,
	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: 302

  insert into IGS_FI_ENC_DFLT_EFT (
    ENCUMBRANCE_TYPE,
    S_ENCMB_EFFECT_TYPE,
    COMMENTS,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.ENCUMBRANCE_TYPE,
    NEW_REFERENCES.S_ENCMB_EFFECT_TYPE,
    NEW_REFERENCES.COMMENTS,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 328

end INSERT_ROW;
Line: 335

  cursor c1 is select
      COMMENTS
    from IGS_FI_ENC_DFLT_EFT
    where ROWID = X_ROWID
    for update nowait;
Line: 346

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_ENCUMBRANCE_TYPE in VARCHAR2,
  X_S_ENCMB_EFFECT_TYPE in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 372

    X_LAST_UPDATED_BY NUMBER;
Line: 373

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 375

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 377

    X_LAST_UPDATED_BY := 1;
Line: 378

    X_LAST_UPDATE_LOGIN := 0;
Line: 380

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 381

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 385

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

	    p_action => 'UPDATE',
	    x_rowid => x_rowid,
	    x_encumbrance_type => x_encumbrance_type,
	    x_s_encmb_effect_type => x_s_encmb_effect_type,
	    x_comments => x_comments,
		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: 405

  update IGS_FI_ENC_DFLT_EFT set
    COMMENTS = NEW_REFERENCES.COMMENTS,
    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: 414

end UPDATE_ROW;
Line: 422

  cursor c1 is select rowid from IGS_FI_ENC_DFLT_EFT
     where ENCUMBRANCE_TYPE = X_ENCUMBRANCE_TYPE
     and S_ENCMB_EFFECT_TYPE = X_S_ENCMB_EFFECT_TYPE
  ;
Line: 431

    INSERT_ROW (
     X_ROWID,
     X_ENCUMBRANCE_TYPE,
     X_S_ENCMB_EFFECT_TYPE,
     X_COMMENTS,
     X_MODE);
Line: 440

  UPDATE_ROW (
X_ROWID,
   X_ENCUMBRANCE_TYPE,
   X_S_ENCMB_EFFECT_TYPE,
   X_COMMENTS,
   X_MODE);
Line: 447

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

  delete from IGS_FI_ENC_DFLT_EFT
  where ROWID = X_ROWID;
Line: 460

end DELETE_ROW;