DBA Data[Home] [Help]

APPS.IGS_FI_ELM_RANGE_RT_PKG SQL Statements

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

Line: 18

    x_logical_delete_dt IN DATE DEFAULT NULL,
    x_creation_date IN DATE DEFAULT NULL,
    x_created_by IN NUMBER DEFAULT NULL,
    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_ELM_RANGE_RT
      WHERE    rowid = x_rowid;
Line: 35

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

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

    new_references.logical_delete_dt := x_logical_delete_dt;
Line: 54

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

    new_references.last_update_date := x_last_update_date;
Line: 62

    new_references.last_updated_by := x_last_updated_by;
Line: 63

    new_references.last_update_login := x_last_update_login;
Line: 69

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

	IF p_inserting THEN
		-- Validate elements range rate can only be matched to a fee_ass_rate
		-- at the same level (ie FTCI or FCFL).
		IF IGS_FI_VAL_ERR.finp_val_err_ins (
				new_references.fee_type,
				new_references.fee_cal_type,
				new_references.fee_ci_sequence_number,
				new_references.s_relation_type,
				new_references.rate_number,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 92

		-- (elements_range and fee_ass_rate are not logically deleted).
		IF IGS_FI_VAL_ERR.finp_val_err_create (
				new_references.fee_type,
				new_references.fee_cal_type,
				new_references.fee_ci_sequence_number,
				new_references.s_relation_type,
				new_references.fee_cat,
				new_references.range_number,
				new_references.rate_number,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 107

  END BeforeRowInsertUpdateDelete1;
Line: 111

  PROCEDURE AfterStmtInsertUpdate3(
    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: 120

  	IF p_inserting OR p_updating THEN
  		IF IGS_FI_VAL_ERR.finp_val_err_active(new_references.fee_type,
  		    	              new_references.fee_cal_type,
  			              new_references.fee_ci_sequence_number,
  		    	              new_references.fee_cat,
  			              new_references.range_number,
  			              new_references.rate_number,
  		    	              new_references.s_relation_type,
  		    	              new_references.create_dt,
  			              v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 135

  END AfterStmtInsertUpdate3;
Line: 248

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

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

      SELECT   rowid
      FROM     IGS_FI_ELM_RANGE_RT
      WHERE    ERR_ID = x_ERR_ID
      FOR UPDATE NOWAIT;
Line: 311

      SELECT   rowid
      FROM     IGS_FI_ELM_RANGE_RT
      WHERE    fee_type = x_fee_type
	  AND      fee_cal_type = x_fee_cal_type
	  AND      fee_ci_sequence_number = x_fee_ci_sequence_number
	  AND      range_number = x_range_number
	  AND      rate_number = x_rate_number
	  AND      create_dt = x_create_dt
	  AND      fee_cat = x_fee_cat
	  AND      fee_cal_type = x_fee_cal_type
      AND      ((l_rowid IS NULL) OR (rowid <> l_rowid))
      FOR UPDATE NOWAIT;
Line: 339

      SELECT   rowid
      FROM     IGS_FI_ELM_RANGE_RT
      WHERE    ERR_ID = x_ERR_ID
      AND      ((l_rowid IS NULL) OR (rowid <> l_rowid))
      FOR UPDATE NOWAIT;
Line: 365

      SELECT   rowid
      FROM     IGS_FI_ELM_RANGE_RT
      WHERE    fee_type = x_fee_type
      AND      fee_cal_type = x_fee_cal_type
      AND      fee_ci_sequence_number = x_fee_ci_sequence_number
      AND      s_relation_type = x_s_relation_type
      AND      range_number = x_range_number
      AND      fee_cat = x_fee_cat ;
Line: 395

      SELECT   rowid
      FROM     IGS_FI_ELM_RANGE_RT
      WHERE    fee_type = x_fee_type
      AND      fee_cal_type = x_fee_cal_type
      AND      fee_ci_sequence_number = x_fee_ci_sequence_number
      AND      s_relation_type = x_s_relation_type
      AND      rate_number = x_rate_number
      AND      fee_cat = x_fee_cat ;
Line: 428

    x_logical_delete_dt IN DATE DEFAULT NULL,
    x_creation_date IN DATE DEFAULT NULL,
    x_created_by IN NUMBER DEFAULT NULL,
    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_ERR_ID,
      x_fee_type,
      x_fee_cal_type,
      x_fee_ci_sequence_number,
      x_s_relation_type,
      x_range_number,
      x_rate_number,
      x_create_dt,
      x_fee_cat,
      x_logical_delete_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 455

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

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

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

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

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;
Line: 498

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      AfterStmtInsertUpdate3 ( p_inserting => TRUE );
Line: 501

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      AfterStmtInsertUpdate3 ( p_updating => TRUE );
Line: 506

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ERR_ID IN OUT NOCOPY NUMBER,
  X_FEE_TYPE in VARCHAR2,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_S_RELATION_TYPE in VARCHAR2,
  X_RANGE_NUMBER in NUMBER,
  X_RATE_NUMBER in NUMBER,
  X_CREATE_DT in DATE,
  X_FEE_CAT in VARCHAR2,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C (cp_range_id IN NUMBER) is select ROWID from IGS_FI_ELM_RANGE_RT
      where ERR_ID = cp_range_id;
Line: 522

    X_LAST_UPDATE_DATE DATE;
Line: 523

    X_LAST_UPDATED_BY NUMBER;
Line: 524

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 528

    X_PROGRAM_UPDATE_DATE DATE;
Line: 530

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 532

    X_LAST_UPDATED_BY := 1;
Line: 533

    X_LAST_UPDATE_LOGIN := 0;
Line: 535

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 536

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 540

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

      X_PROGRAM_UPDATE_DATE:=NULL;
Line: 552

      X_PROGRAM_UPDATE_DATE:=SYSDATE;
Line: 559

  SELECT   IGS_FI_ELM_RANGE_RT_ERR_ID_S.NextVal
  INTO     x_ERR_ID
  FROM     dual;
Line: 563

 p_action=>'INSERT',
 x_rowid=>X_ROWID,
 x_ERR_ID => x_ERR_ID,
 x_create_dt=>NVL(X_CREATE_DT,sysdate),
 x_fee_cal_type=>X_FEE_CAL_TYPE,
 x_fee_cat=>X_FEE_CAT,
 x_fee_ci_sequence_number=>X_FEE_CI_SEQUENCE_NUMBER,
 x_fee_type=>X_FEE_TYPE,
 x_logical_delete_dt=>X_LOGICAL_DELETE_DT,
 x_range_number=>X_RANGE_NUMBER,
 x_rate_number=>X_RATE_NUMBER,
 x_s_relation_type=>X_S_RELATION_TYPE,
 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: 581

  insert into IGS_FI_ELM_RANGE_RT (
    ERR_ID,
    FEE_TYPE,
    FEE_CAL_TYPE,
    FEE_CI_SEQUENCE_NUMBER,
    S_RELATION_TYPE,
    RANGE_NUMBER,
    RATE_NUMBER,
    CREATE_DT,
    FEE_CAT,
    LOGICAL_DELETE_DT,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    REQUEST_ID,
    PROGRAM_ID,
    PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE
  ) values (
    NEW_REFERENCES.ERR_ID,
    NEW_REFERENCES.FEE_TYPE,
    NEW_REFERENCES.FEE_CAL_TYPE,
    NEW_REFERENCES.FEE_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.S_RELATION_TYPE,
    NEW_REFERENCES.RANGE_NUMBER,
    NEW_REFERENCES.RATE_NUMBER,
    NEW_REFERENCES.CREATE_DT,
    NEW_REFERENCES.FEE_CAT,
    NEW_REFERENCES.LOGICAL_DELETE_DT,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_REQUEST_ID,
    X_PROGRAM_ID,
    X_PROGRAM_APPLICATION_ID,
    X_PROGRAM_UPDATE_DATE
  );
Line: 630

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

end INSERT_ROW;
Line: 645

  X_LOGICAL_DELETE_DT in DATE
) AS
  cursor c1 is select
      FEE_TYPE,
      FEE_CAL_TYPE,
      FEE_CI_SEQUENCE_NUMBER,
      S_RELATION_TYPE,
      RANGE_NUMBER,
      RATE_NUMBER,
      CREATE_DT,
      FEE_CAT,
      LOGICAL_DELETE_DT
    from IGS_FI_ELM_RANGE_RT
    where ROWID=X_ROWID
    for update nowait;
Line: 666

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

      AND ((tlinfo.LOGICAL_DELETE_DT = X_LOGICAL_DELETE_DT)
           OR ((tlinfo.LOGICAL_DELETE_DT is null)
               AND (X_LOGICAL_DELETE_DT is null)))
  ) then
    null;
Line: 694

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  x_ERR_ID IN NUMBER,
  X_FEE_TYPE in VARCHAR2,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_S_RELATION_TYPE in VARCHAR2,
  X_RANGE_NUMBER in NUMBER,
  X_RATE_NUMBER in NUMBER,
  X_CREATE_DT in DATE,
  X_FEE_CAT in VARCHAR2,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 709

    X_LAST_UPDATED_BY NUMBER;
Line: 710

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 714

    X_PROGRAM_UPDATE_DATE DATE;
Line: 716

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 718

    X_LAST_UPDATED_BY := 1;
Line: 719

    X_LAST_UPDATE_LOGIN := 0;
Line: 721

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 722

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 726

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

      X_PROGRAM_UPDATE_DATE:=OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 738

      X_PROGRAM_UPDATE_DATE:=SYSDATE;
Line: 746

  p_action=>'UPDATE',
  x_rowid=>X_ROWID,
  x_ERR_ID => x_ERR_ID,
  x_create_dt=>X_CREATE_DT,
  x_fee_cal_type=>X_FEE_CAL_TYPE,
  x_fee_cat=>X_FEE_CAT,
  x_fee_ci_sequence_number=>X_FEE_CI_SEQUENCE_NUMBER,
  x_fee_type=>X_FEE_TYPE,
  x_logical_delete_dt=>X_LOGICAL_DELETE_DT,
  x_range_number=>X_RANGE_NUMBER,
  x_rate_number=>X_RATE_NUMBER,
  x_s_relation_type=>X_S_RELATION_TYPE,
  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: 764

  update IGS_FI_ELM_RANGE_RT set
    FEE_TYPE = NEW_REFERENCES.FEE_TYPE,
    FEE_CAL_TYPE = NEW_REFERENCES.FEE_CAL_TYPE,
    FEE_CI_SEQUENCE_NUMBER = NEW_REFERENCES.FEE_CI_SEQUENCE_NUMBER,
    S_RELATION_TYPE = NEW_REFERENCES.S_RELATION_TYPE,
    RANGE_NUMBER = NEW_REFERENCES.RANGE_NUMBER,
    RATE_NUMBER = NEW_REFERENCES.RATE_NUMBER,
    CREATE_DT = NEW_REFERENCES.CREATE_DT,
    FEE_CAT = NEW_REFERENCES.FEE_CAT,
    LOGICAL_DELETE_DT = NEW_REFERENCES.LOGICAL_DELETE_DT,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    REQUEST_ID=X_REQUEST_ID,
    PROGRAM_ID=X_PROGRAM_ID,
    PROGRAM_APPLICATION_ID=X_PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE=X_PROGRAM_UPDATE_DATE
  where ROWID=X_ROWID
  ;
Line: 787

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

end UPDATE_ROW;
Line: 802

  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
  cursor c1 is select rowid from IGS_FI_ELM_RANGE_RT
     where ERR_ID = x_ERR_ID
  ;
Line: 813

    INSERT_ROW (
     X_ROWID,
     X_ERR_ID,
     X_FEE_TYPE,
     X_FEE_CAL_TYPE,
     X_FEE_CI_SEQUENCE_NUMBER,
     X_S_RELATION_TYPE,
     X_RANGE_NUMBER,
     X_RATE_NUMBER,
     X_CREATE_DT,
     X_FEE_CAT,
     X_LOGICAL_DELETE_DT,
     X_MODE);
Line: 829

  UPDATE_ROW (
   X_ROWID,
   x_ERR_ID,
   X_FEE_TYPE,
   X_FEE_CAL_TYPE,
   X_FEE_CI_SEQUENCE_NUMBER,
   X_S_RELATION_TYPE,
   X_RANGE_NUMBER,
   X_RATE_NUMBER,
   X_CREATE_DT,
   X_FEE_CAT,
   X_LOGICAL_DELETE_DT,
   X_MODE);
Line: 843

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

  delete from IGS_FI_ELM_RANGE_RT
  where ROWID=X_ROWID;
Line: 856

end DELETE_ROW;