DBA Data[Home] [Help]

APPS.IGS_PS_GRP_FEE_TRG_PKG SQL Statements

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

Line: 17

    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_GRP_FEE_TRG
      WHERE    rowid = x_rowid;
Line: 38

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

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

    new_references.logical_delete_dt := x_logical_delete_dt;
Line: 55

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

    new_references.last_update_date := x_last_update_date;
Line: 63

    new_references.last_updated_by := x_last_updated_by;
Line: 64

    new_references.last_update_login := x_last_update_login;
Line: 74

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

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

	IF p_inserting OR p_updating THEN
		-- Validate IGS_PS_COURSE Group not closed.
		IF IGS_EN_VAL_PCGE.enrp_val_crs_gp_clsd (
				new_references.course_group_cd,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 103

  END BeforeRowInsertUpdateDelete1;
Line: 111

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

	IF p_inserting OR
	    (new_references.logical_delete_dt IS NULL) THEN
		 -- Save the rowid of the current row.
		-- Validate for open ended IGS_PS_GRP_FEE_TRG records.
  		IF new_references.logical_delete_dt IS NULL THEN
  			IF IGS_FI_VAL_CGFT.finp_val_cgft_open(new_references.fee_cat,
			    	              new_references.fee_cal_type,
  				              new_references.fee_ci_sequence_number,
  			    	              new_references.fee_type,
  			    	              new_references.course_group_cd,
  				              new_references.create_dt,
  				              v_message_name) = FALSE THEN
  				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 141

  END AfterRowInsertUpdate2;
Line: 208

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

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

      SELECT   rowid
      FROM     IGS_PS_GRP_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_group_cd = x_course_group_cd
      AND      create_dt = x_create_dt
      FOR UPDATE NOWAIT;
Line: 284

    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_group_cd,
      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: 310

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

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

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

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

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

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

    X_LAST_UPDATE_DATE DATE;
Line: 383

    X_LAST_UPDATED_BY NUMBER;
Line: 384

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 388

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

       X_PROGRAM_UPDATE_DATE := NULL;
Line: 414

	 X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 424

    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_group_cd => X_COURSE_GROUP_CD,
    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: 440

  insert into IGS_PS_GRP_FEE_TRG (
    FEE_CAT,
    FEE_CAL_TYPE,
    FEE_CI_SEQUENCE_NUMBER,
    FEE_TYPE,
    COURSE_GROUP_CD,
    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_GROUP_CD,
    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: 483

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

end INSERT_ROW;
Line: 499

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

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

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

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

    X_LAST_UPDATED_BY NUMBER;
Line: 546

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 550

    X_PROGRAM_UPDATE_DATE DATE;
Line: 553

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 555

    X_LAST_UPDATED_BY := 1;
Line: 556

    X_LAST_UPDATE_LOGIN := 0;
Line: 558

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 559

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 563

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

    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_group_cd => X_COURSE_GROUP_CD,
    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: 599

     X_PROGRAM_UPDATE_DATE :=
                  OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 602

     X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 606

  update IGS_PS_GRP_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: 621

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

end UPDATE_ROW;
Line: 634

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

    INSERT_ROW (
     X_ROWID,
     X_FEE_CAT,
     X_CREATE_DT,
     X_COURSE_GROUP_CD,
     X_FEE_CAL_TYPE,
     X_FEE_TYPE,
     X_FEE_CI_SEQUENCE_NUMBER,
     X_LOGICAL_DELETE_DT,
     X_MODE);
Line: 663

  UPDATE_ROW (
   X_ROWID,
   X_FEE_CAT,
   X_CREATE_DT,
   X_COURSE_GROUP_CD,
   X_FEE_CAL_TYPE,
   X_FEE_TYPE,
   X_FEE_CI_SEQUENCE_NUMBER,
   X_LOGICAL_DELETE_DT,
   X_MODE);
Line: 675

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

  delete from IGS_PS_GRP_FEE_TRG
  where ROWID = X_ROWID;
Line: 689

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

end DELETE_ROW;