DBA Data[Home] [Help]

APPS.IGS_PS_TYPE_FEE_TRG_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_PS_TYPE_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: 55

    new_references.logical_delete_dt := x_logical_delete_dt;
Line: 56

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

    new_references.last_update_date := x_last_update_date;
Line: 64

    new_references.last_updated_by := x_last_updated_by;
Line: 65

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

	IF p_inserting THEN
		-- Validate trigger can be defined.
		IF IGS_FI_VAL_CTFT.finp_val_ctft_ins (
				new_references.fee_type,
				v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);
Line: 87

	IF p_inserting THEN
		IF IGS_as_VAL_acot.crsp_val_cty_closed (
				new_references.course_type,
				v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 97

  END BeforeRowInsertUpdateDelete1;
Line: 99

  PROCEDURE AfterRowInsertUpdate2(
    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: 108

	IF p_inserting OR
	    (new_references.logical_delete_dt IS NULL) THEN
--
  		-- Validate for open ended IGS_PS_TYPE_FEE_TRG records.
  		IF new_references.logical_delete_dt IS NULL THEN
  			IF IGS_FI_VAL_CTFT.finp_val_ctft_open(new_references.fee_cat,
  			    	              new_references.fee_cal_type,
  				              new_references.fee_ci_sequence_number,
  			    	              new_references.fee_type,
                                      new_references.course_type,
  				              new_references.create_dt,
  				              v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);
Line: 128

  END AfterRowInsertUpdate2;
Line: 198

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

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

      SELECT   rowid
      FROM     IGS_PS_TYPE_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      course_type = x_course_type
      AND      create_dt = x_create_dt
      FOR UPDATE NOWAIT;
Line: 275

    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_course_type,
      x_create_dt,
      x_logical_delete_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 301

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

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

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

    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.course_type,
		new_references.create_dt
   	) THEN
	Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 340

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

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

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

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_FEE_CAT in VARCHAR2,
  X_FEE_TYPE in VARCHAR2,
  X_CREATE_DT in out NOCOPY DATE,
  X_COURSE_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PS_TYPE_FEE_TRG
      where FEE_CAT = X_FEE_CAT
      and FEE_TYPE = X_FEE_TYPE
      and CREATE_DT = NEW_REFERENCES.CREATE_DT
      and COURSE_TYPE = X_COURSE_TYPE
      and FEE_CI_SEQUENCE_NUMBER = X_FEE_CI_SEQUENCE_NUMBER
      and FEE_CAL_TYPE = X_FEE_CAL_TYPE;
Line: 383

    X_LAST_UPDATE_DATE DATE;
Line: 384

    X_LAST_UPDATED_BY NUMBER;
Line: 385

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 389

    X_PROGRAM_UPDATE_DATE DATE;
Line: 391

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 393

    X_LAST_UPDATED_BY := 1;
Line: 394

    X_LAST_UPDATE_LOGIN := 0;
Line: 396

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 397

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 401

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

     X_PROGRAM_UPDATE_DATE := NULL;
Line: 413

     X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 420

  Before_DML( p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_fee_cat => X_FEE_CAT,
    x_fee_cal_type => X_FEE_CAL_TYPE,
    x_fee_ci_sequence_number => X_FEE_CI_SEQUENCE_NUMBER,
    x_fee_type => X_FEE_TYPE,
    x_course_type => X_COURSE_TYPE,
    x_create_dt => NVL(X_CREATE_DT,SYSDATE),
    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: 436

insert into IGS_PS_TYPE_FEE_TRG (
    FEE_CAT,
    FEE_CAL_TYPE,
    FEE_CI_SEQUENCE_NUMBER,
    FEE_TYPE,
    COURSE_TYPE,
    CREATE_DT,
    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.FEE_CAT,
    NEW_REFERENCES.FEE_CAL_TYPE,
    NEW_REFERENCES.FEE_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.FEE_TYPE,
    NEW_REFERENCES.COURSE_TYPE,
    NEW_REFERENCES.CREATE_DT,
    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: 481

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

end INSERT_ROW;
Line: 494

  X_LOGICAL_DELETE_DT in DATE
) AS
  cursor c1 is select
      LOGICAL_DELETE_DT
    from IGS_PS_TYPE_FEE_TRG
    where ROWID = X_ROWID for update  nowait;
Line: 507

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

      if ( ((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: 527

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_FEE_CAT in VARCHAR2,
  X_FEE_TYPE in VARCHAR2,
  X_CREATE_DT in DATE,
  X_COURSE_TYPE in VARCHAR2,
  X_FEE_CI_SEQUENCE_NUMBER in NUMBER,
  X_FEE_CAL_TYPE in VARCHAR2,
  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 539

    X_LAST_UPDATED_BY NUMBER;
Line: 540

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 544

    X_PROGRAM_UPDATE_DATE DATE;
Line: 547

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 549

    X_LAST_UPDATED_BY := 1;
Line: 550

    X_LAST_UPDATE_LOGIN := 0;
Line: 552

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 553

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 557

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

 Before_DML( p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_fee_cat => X_FEE_CAT,
    x_fee_cal_type => X_FEE_CAL_TYPE,
    x_fee_ci_sequence_number => X_FEE_CI_SEQUENCE_NUMBER,
    x_fee_type => X_FEE_TYPE,
    x_course_type => X_COURSE_TYPE,
    x_create_dt => X_CREATE_DT,
    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: 591

     X_PROGRAM_UPDATE_DATE :=
                  OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 594

     X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 598

  update IGS_PS_TYPE_FEE_TRG set
    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: 614

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

end UPDATE_ROW;
Line: 627

  X_LOGICAL_DELETE_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
  cursor c1 is select rowid from IGS_PS_TYPE_FEE_TRG
     where FEE_CAT = X_FEE_CAT
     and FEE_TYPE = X_FEE_TYPE
     and CREATE_DT = NVL(X_CREATE_DT, SYSDATE)
     and COURSE_TYPE = X_COURSE_TYPE
     and FEE_CI_SEQUENCE_NUMBER = X_FEE_CI_SEQUENCE_NUMBER
     and FEE_CAL_TYPE = X_FEE_CAL_TYPE
  ;
Line: 643

    INSERT_ROW (
     X_ROWID,
     X_FEE_CAT,
     X_FEE_TYPE,
     X_CREATE_DT,
     X_COURSE_TYPE,
     X_FEE_CI_SEQUENCE_NUMBER,
     X_FEE_CAL_TYPE,
     X_LOGICAL_DELETE_DT,
     X_MODE);
Line: 656

  UPDATE_ROW (
   X_ROWID,
   X_FEE_CAT,
   X_FEE_TYPE,
   X_CREATE_DT,
   X_COURSE_TYPE,
   X_FEE_CI_SEQUENCE_NUMBER,
   X_FEE_CAL_TYPE,
   X_LOGICAL_DELETE_DT,
   X_MODE);
Line: 668

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

  delete from IGS_PS_TYPE_FEE_TRG
  where ROWID = X_ROWID;
Line: 681

  p_action => 'DELETE',
  x_rowid => X_ROWID
  );
Line: 684

end DELETE_ROW;