DBA Data[Home] [Help]

APPS.IGS_FI_UNIT_FEE_TRG_PKG SQL Statements

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

Line: 22

    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_UNIT_FEE_TRG
      WHERE    rowid = x_rowid;
Line: 39

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

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

    new_references.logical_delete_dt := x_logical_delete_dt;
Line: 62

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

    new_references.last_update_date := x_last_update_date;
Line: 70

    new_references.last_updated_by := x_last_updated_by;
Line: 71

    new_references.last_update_login := x_last_update_login;
Line: 79

  PROCEDURE BeforeRowInsertUpdate1(
    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: 87

        IF p_inserting THEN
                -- Validate unit fee trigger can be inserted
                IF IGS_FI_VAL_UFT.finp_val_uft_ins (
                                new_references.fee_type,
                                v_message_name) = FALSE THEN
                        Fnd_Message.Set_Name('IGS',v_message_name);
Line: 100

       IF  NOT (new_references.LOGICAL_DELETE_DT IS NOT NULL AND p_updating ) THEN
        -- Validate unit version is is active or planned.
          IF (new_references.unit_cd IS NOT NULL AND
               new_references.version_number IS NOT NULL) THEN
               -- As part of the bug# 1956374 changed to the below call from IGS_FI_VAL_UFT.crsp_val_uv_sys_sts
                  IF IGS_PS_VAL_CALUL.crsp_val_uv_sys_sts (
                                  new_references.unit_cd,
                                  new_references.version_number,
                                  v_message_name) = FALSE THEN
                          Fnd_Message.Set_Name('IGS',v_message_name);
Line: 173

  END BeforeRowInsertUpdate1;
Line: 178

  PROCEDURE AfterRowUpdate3(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
  BEGIN
        -- create a history
        IGS_FI_GEN_002.FINP_INS_UFT_HIST( old_references.fee_cat,
                old_references.fee_cal_type,
                old_references.fee_ci_sequence_number,
                old_references.fee_type,
                old_references.unit_cd,
                old_references.sequence_number,
                new_references.version_number,
                old_references.version_number,
                new_references.cal_type,
                old_references.cal_type,
                new_references.ci_sequence_number,
                old_references.ci_sequence_number,
                new_references.location_cd,
                old_references.location_cd,
                new_references.unit_class,
                old_references.unit_class,
                new_references.create_dt,
                old_references.create_dt,
                new_references.fee_trigger_group_number,
                old_references.fee_trigger_group_number,
                new_references.last_updated_by,
                old_references.last_updated_by,
                new_references.last_update_date,
                old_references.last_update_date);
Line: 209

  END AfterRowUpdate3;
Line: 213

  PROCEDURE AfterStmtInsertUpdate4(
    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: 222

        IF (p_inserting OR p_updating) THEN
                IF new_references.logical_delete_dt IS NULL THEN
                        IF IGS_FI_VAL_UFT.finp_val_uft_open(
                                        new_references.fee_cat,
                                        new_references.fee_cal_type,
                                        new_references.fee_ci_sequence_number,
                                        new_references.fee_type,
                                        new_references.unit_cd,
                                        new_references.sequence_number,
                                        new_references.version_number,
                                        new_references.cal_type,
                                        new_references.ci_sequence_number,
                                        new_references.unit_class,
                                        new_references.location_cd,
                                        new_references.create_dt,
                                        new_references.fee_trigger_group_number,
                                        v_message_name) = FALSE THEN
                                Fnd_Message.Set_Name('IGS',v_message_name);
Line: 245

  END AfterStmtInsertUpdate4;
Line: 384

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

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

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

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

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

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

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

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

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    fee_cat = x_fee_cat
      AND      fee_cal_type = x_fee_cal_type
      AND      fee_ci_sequence_number = x_fee_ci_sequence_number
      AND      fee_type = x_fee_type
      AND      unit_cd = x_unit_cd
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;
Line: 546

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    fee_cat = x_fee_cat
      AND      fee_cal_type = x_fee_cal_type
      AND      fee_ci_sequence_number = x_fee_ci_sequence_number
      AND      fee_type = x_fee_type
      AND      unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      cal_type = x_cal_type
      AND      ci_sequence_number = x_ci_sequence_number
      AND      location_cd = x_location_cd
      AND      unit_class = x_unit_class
      AND      create_dt = x_create_dt
      AND      ((l_rowid IS NULL) OR (rowid <> l_rowid))
          FOR UPDATE NOWAIT;
Line: 577

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    cal_type = x_cal_type ;
Line: 598

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    cal_type = x_cal_type
      AND      ci_sequence_number = x_sequence_number ;
Line: 624

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    fee_cat = x_fee_cat
      AND      fee_cal_type = x_fee_cal_type
      AND      fee_ci_sequence_number = x_fee_ci_sequence_number
      AND      fee_type = x_fee_type
      AND      fee_trigger_group_number = x_fee_trigger_group_number ;
Line: 648

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    location_cd = x_location_cd ;
Line: 668

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    unit_cd = x_unit_cd ;
Line: 689

      SELECT   rowid
      FROM     IGS_FI_UNIT_FEE_TRG
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number ;
Line: 722

    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_fee_cat,
      x_fee_cal_type,
      x_fee_ci_sequence_number,
      x_fee_type,
      x_unit_cd,
      x_sequence_number,
      x_version_number,
      x_cal_type,
      x_ci_sequence_number,
      x_location_cd,
      x_unit_class,
      x_create_dt,
      x_fee_trigger_group_number,
      x_logical_delete_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 753

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF (Get_PK_For_Validation (
            new_references.fee_cat,
            new_references.fee_cal_type,
            new_references.fee_ci_sequence_number,
            new_references.fee_type,
            new_references.unit_cd,
            new_references.sequence_number
          )) THEN
        Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 792

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

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

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

      AfterStmtInsertUpdate4 ( p_updating => TRUE );
Line: 812

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_FEE_CAT in VARCHAR2,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_FEE_TYPE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_CAL_TYPE in VARCHAR2,
  X_CI_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_UNIT_CLASS in VARCHAR2,
  X_CREATE_DT in DATE,
  X_FEE_TRIGGER_GROUP_NUMBER in NUMBER,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_FI_UNIT_FEE_TRG
      where FEE_CAT = X_FEE_CAT
      and FEE_CAL_TYPE = X_FEE_CAL_TYPE
      and FEE_CI_SEQUENCE_NUMBER = X_FEE_CI_SEQUENCE_NUMBER
      and UNIT_CD = X_UNIT_CD
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
      and FEE_TYPE = X_FEE_TYPE;
Line: 837

    X_LAST_UPDATE_DATE DATE;
Line: 838

    X_LAST_UPDATED_BY NUMBER;
Line: 839

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 841

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 843

    X_LAST_UPDATED_BY := 1;
Line: 844

    X_LAST_UPDATE_LOGIN := 0;
Line: 846

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 847

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 851

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

  p_action=>'INSERT',
  x_rowid=>X_ROWID,
  x_cal_type=>X_CAL_TYPE,
  x_ci_sequence_number=>X_CI_SEQUENCE_NUMBER,
  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_trigger_group_number=>X_FEE_TRIGGER_GROUP_NUMBER,
  x_fee_type=>X_FEE_TYPE,
  x_location_cd=>X_LOCATION_CD,
  x_sequence_number=>X_SEQUENCE_NUMBER,
  x_unit_cd=>X_UNIT_CD,
  x_unit_class=>X_UNIT_CLASS,
  x_version_number=>X_VERSION_NUMBER,
  x_logical_delete_dt => X_LOGICAL_DELETE_DT,
  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: 882

  insert into IGS_FI_UNIT_FEE_TRG (
    FEE_CAT,
    FEE_CAL_TYPE,
    FEE_CI_SEQUENCE_NUMBER,
    FEE_TYPE,
    UNIT_CD,
    SEQUENCE_NUMBER,
    VERSION_NUMBER,
    CAL_TYPE,
    CI_SEQUENCE_NUMBER,
    LOCATION_CD,
    UNIT_CLASS,
    CREATE_DT,
    FEE_TRIGGER_GROUP_NUMBER,
    LOGICAL_DELETE_DT,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.FEE_CAT,
    NEW_REFERENCES.FEE_CAL_TYPE,
    NEW_REFERENCES.FEE_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.FEE_TYPE,
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.CAL_TYPE,
    NEW_REFERENCES.CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.LOCATION_CD,
    NEW_REFERENCES.UNIT_CLASS,
    NEW_REFERENCES.CREATE_DT,
    NEW_REFERENCES.FEE_TRIGGER_GROUP_NUMBER,
    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
  );
Line: 930

end INSERT_ROW;
Line: 946

  X_LOGICAL_DELETE_DT in DATE
) AS
  cursor c1 is select
      VERSION_NUMBER,
      CAL_TYPE,
      CI_SEQUENCE_NUMBER,
      LOCATION_CD,
      UNIT_CLASS,
      CREATE_DT,
      FEE_TRIGGER_GROUP_NUMBER,
      LOGICAL_DELETE_DT
    from IGS_FI_UNIT_FEE_TRG
    where ROWID=X_ROWID
    for update nowait;
Line: 966

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

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_FEE_CAT in VARCHAR2,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_FEE_TYPE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_CAL_TYPE in VARCHAR2,
  X_CI_SEQUENCE_NUMBER in NUMBER,
  X_LOCATION_CD in VARCHAR2,
  X_UNIT_CLASS in VARCHAR2,
  X_CREATE_DT in DATE,
  X_FEE_TRIGGER_GROUP_NUMBER in NUMBER,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 1022

    X_LAST_UPDATED_BY NUMBER;
Line: 1023

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 1025

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 1027

    X_LAST_UPDATED_BY := 1;
Line: 1028

    X_LAST_UPDATE_LOGIN := 0;
Line: 1030

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 1031

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 1035

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

  p_action=>'UPDATE',
  x_rowid=>X_ROWID,
  x_cal_type=>X_CAL_TYPE,
  x_ci_sequence_number=>X_CI_SEQUENCE_NUMBER,
  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_trigger_group_number=>X_FEE_TRIGGER_GROUP_NUMBER,
  x_fee_type=>X_FEE_TYPE,
  x_location_cd=>X_LOCATION_CD,
  x_sequence_number=>X_SEQUENCE_NUMBER,
  x_unit_cd=>X_UNIT_CD,
  x_unit_class=>X_UNIT_CLASS,
  x_version_number=>X_VERSION_NUMBER,
  x_logical_delete_dt=>X_LOGICAL_DELETE_DT,
  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: 1066

  update IGS_FI_UNIT_FEE_TRG set
    VERSION_NUMBER = NEW_REFERENCES.VERSION_NUMBER,
    CAL_TYPE = NEW_REFERENCES.CAL_TYPE,
    CI_SEQUENCE_NUMBER = NEW_REFERENCES.CI_SEQUENCE_NUMBER,
    LOCATION_CD = NEW_REFERENCES.LOCATION_CD,
    UNIT_CLASS = NEW_REFERENCES.UNIT_CLASS,
    CREATE_DT = NEW_REFERENCES.CREATE_DT,
    FEE_TRIGGER_GROUP_NUMBER = NEW_REFERENCES.FEE_TRIGGER_GROUP_NUMBER,
    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
  where ROWID=X_ROWID
  ;
Line: 1084

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

end UPDATE_ROW;
Line: 1103

  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
  cursor c1 is select rowid from IGS_FI_UNIT_FEE_TRG
     where FEE_CAT = X_FEE_CAT
     and FEE_CAL_TYPE = X_FEE_CAL_TYPE
     and FEE_CI_SEQUENCE_NUMBER = X_FEE_CI_SEQUENCE_NUMBER
     and UNIT_CD = X_UNIT_CD
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
     and FEE_TYPE = X_FEE_TYPE
  ;
Line: 1119

    INSERT_ROW (
     X_ROWID,
     X_FEE_CAT,
     X_FEE_CAL_TYPE,
     X_FEE_CI_SEQUENCE_NUMBER,
     X_UNIT_CD,
     X_SEQUENCE_NUMBER,
     X_FEE_TYPE,
     X_VERSION_NUMBER,
     X_CAL_TYPE,
     X_CI_SEQUENCE_NUMBER,
     X_LOCATION_CD,
     X_UNIT_CLASS,
     X_CREATE_DT,
     X_FEE_TRIGGER_GROUP_NUMBER,
     X_LOGICAL_DELETE_DT,
     X_MODE);
Line: 1139

  UPDATE_ROW (
   X_ROWID,
   X_FEE_CAT,
   X_FEE_CAL_TYPE,
   X_FEE_CI_SEQUENCE_NUMBER,
   X_UNIT_CD,
   X_SEQUENCE_NUMBER,
   X_FEE_TYPE,
   X_VERSION_NUMBER,
   X_CAL_TYPE,
   X_CI_SEQUENCE_NUMBER,
   X_LOCATION_CD,
   X_UNIT_CLASS,
   X_CREATE_DT,
   X_FEE_TRIGGER_GROUP_NUMBER,
   X_LOGICAL_DELETE_DT,
   X_MODE);
Line: 1157

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin
  delete from IGS_FI_UNIT_FEE_TRG
  where ROWID=X_ROWID;
Line: 1166

end DELETE_ROW;