DBA Data[Home] [Help]

APPS.IGS_FI_FEE_AS_RT_PKG SQL Statements

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

Line: 22

    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_FEE_AS_RT
      WHERE    rowid = x_rowid;
Line: 36

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

      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
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: 71

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

	IF p_inserting THEN
		IF  IGS_FI_VAL_CFAR.finp_val_cfar_ins(
					new_references.person_id,
					new_references.course_cd,
					new_references.fee_type,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 90

	IF p_inserting OR
	  (p_updating AND new_references.end_dt IS NOT NULL AND
	  (new_references.start_dt <> old_references.start_dt OR new_references.end_dt <> old_references.end_dt)) THEN
		IF IGS_FI_VAL_CFAR.finp_val_cfar_end_dt(
					new_references.start_dt,
					new_references.end_dt,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 102

	IF p_inserting OR (p_updating AND
	  new_references.fee_type <> old_references.fee_type) THEN
		IF  IGS_FI_VAL_CFAR.finp_val_ft_closed(
					new_references.fee_type,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 112

	IF p_inserting OR (p_updating AND
	  new_references.attendance_type <> old_references.attendance_type) THEN
		IF  IGS_FI_VAL_CFAR.finp_val_att_closed(
					new_references.attendance_type,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 122

	IF p_inserting OR (p_updating AND
	  new_references.attendance_mode <> old_references.attendance_mode) THEN
		IF  IGS_FI_VAL_CFAR.finp_val_am_closed(
					new_references.attendance_mode,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 132

	IF p_inserting OR (p_updating AND
	  new_references.location_cd <> old_references.location_cd) THEN
		IF  IGS_FI_VAL_CFAR.finp_val_loc_closed(
					new_references.location_cd,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 142

  END BeforeRowInsertUpdate1;
Line: 148

  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_cfar_hist(old_references.person_id,
		old_references.course_cd,
		old_references.fee_type,
		old_references.start_dt,
		new_references.end_dt,
		old_references.end_dt,
		new_references.location_cd,
		old_references.location_cd,
		new_references.attendance_type,
		old_references.attendance_type,
		new_references.attendance_mode,
		old_references.attendance_mode,
		new_references.chg_rate,
		old_references.chg_rate,
		new_references.lower_nrml_rate_ovrd_ind,
		old_references.lower_nrml_rate_ovrd_ind,
		new_references.last_updated_by,
		old_references.last_updated_by,
		new_references.last_update_date,
		old_references.last_update_date);
Line: 175

  END AfterRowUpdate3;
Line: 180

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

  	IF p_inserting OR p_updating THEN
  		IF  new_references.end_dt IS NULL THEN
  			IF IGS_FI_VAL_CFAR.finp_val_cfar_open (
  				              new_references.person_id,
  		    		              new_references.course_cd,
  				              new_references.fee_type,
  		    		              new_references.start_dt,
  				              v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 213

  END AfterStmtInsertUpdate4;
Line: 323

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

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

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

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

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

      SELECT   rowid
      FROM     IGS_FI_FEE_AS_RT
      WHERE    person_id = x_person_id
      AND      course_cd = x_course_cd
      AND      fee_type = x_fee_type
      AND      start_dt = x_start_dt
      FOR UPDATE NOWAIT;
Line: 412

      SELECT   rowid
      FROM     IGS_FI_FEE_AS_RT
      WHERE    attendance_mode = x_attendance_mode ;
Line: 432

      SELECT   rowid
      FROM     IGS_FI_FEE_AS_RT
      WHERE    attendance_type = x_attendance_type ;
Line: 453

      SELECT   rowid
      FROM     IGS_FI_FEE_AS_RT
      WHERE    location_cd = x_location_cd ;
Line: 474

      SELECT   rowid
      FROM     IGS_FI_FEE_AS_RT
      WHERE    person_id = x_person_id
      AND      course_cd = x_course_cd ;
Line: 506

    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_person_id,
      x_course_cd,
      x_fee_type,
      x_start_dt,
      x_end_dt,
      x_location_cd,
      x_attendance_type,
      x_attendance_mode,
      x_chg_rate,
      x_lower_nrml_rate_ovrd_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 530

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

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

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      Null;
Line: 553

	  ELSIF (p_action = 'VALIDATE_INSERT') THEN
	        IF  Get_PK_For_Validation (
			new_references.person_id ,
			new_references.course_cd ,
			new_references.fee_type ,
    		new_references.start_dt
			) THEN
	           Fnd_Message.Set_Name ('IGS', 'IGS_FI_CONTRACT_EXISTS_FEETYP');
Line: 565

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

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

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

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

      AfterStmtInsertUpdate4 ( p_updating => TRUE );
Line: 584

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to After Delete.
      Null;
Line: 589

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_COURSE_CD in VARCHAR2,
  X_FEE_TYPE in VARCHAR2,
  X_START_DT in DATE,
  X_END_DT in DATE,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_CHG_RATE in NUMBER,
  X_LOWER_NRML_RATE_OVRD_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_FI_FEE_AS_RT
      where PERSON_ID = X_PERSON_ID
      and COURSE_CD = X_COURSE_CD
      and FEE_TYPE = X_FEE_TYPE
      and START_DT = X_START_DT;
Line: 608

    X_LAST_UPDATE_DATE DATE;
Line: 609

    X_LAST_UPDATED_BY NUMBER;
Line: 610

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 614

    X_PROGRAM_UPDATE_DATE DATE;
Line: 616

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 618

    X_LAST_UPDATED_BY := 1;
Line: 619

    X_LAST_UPDATE_LOGIN := 0;
Line: 621

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 622

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 626

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

      X_PROGRAM_UPDATE_DATE := NULL;
Line: 638

      X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 646

  p_action=>'INSERT',
  x_rowid=>X_ROWID,
  x_attendance_mode=>X_ATTENDANCE_MODE,
  x_attendance_type=>X_ATTENDANCE_TYPE,
  x_chg_rate=>X_CHG_RATE,
  x_course_cd=>X_COURSE_CD,
  x_end_dt=>X_END_DT,
  x_fee_type=>X_FEE_TYPE,
  x_location_cd=>X_LOCATION_CD,
  x_lower_nrml_rate_ovrd_ind=>NVL(X_LOWER_NRML_RATE_OVRD_IND,'N'),
  x_person_id=>X_PERSON_ID,
  x_start_dt=>X_START_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: 667

  insert into IGS_FI_FEE_AS_RT (
    PERSON_ID,
    COURSE_CD,
    FEE_TYPE,
    START_DT,
    END_DT,
    LOCATION_CD,
    ATTENDANCE_TYPE,
    ATTENDANCE_MODE,
    CHG_RATE,
    LOWER_NRML_RATE_OVRD_IND,
    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.PERSON_ID,
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.FEE_TYPE,
    NEW_REFERENCES.START_DT,
    NEW_REFERENCES.END_DT,
    NEW_REFERENCES.LOCATION_CD,
    NEW_REFERENCES.ATTENDANCE_TYPE,
    NEW_REFERENCES.ATTENDANCE_MODE,
    NEW_REFERENCES.CHG_RATE,
    NEW_REFERENCES.LOWER_NRML_RATE_OVRD_IND,
    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: 720

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

end INSERT_ROW;
Line: 750

  cursor c1 is select
      END_DT,
      LOCATION_CD,
      ATTENDANCE_TYPE,
      ATTENDANCE_MODE,
      CHG_RATE,
      LOWER_NRML_RATE_OVRD_IND
    from IGS_FI_FEE_AS_RT
    where ROWID = X_ROWID
    for update nowait;
Line: 766

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_COURSE_CD in VARCHAR2,
  X_FEE_TYPE in VARCHAR2,
  X_START_DT in DATE,
  X_END_DT in DATE,
  X_LOCATION_CD in VARCHAR2,
  X_ATTENDANCE_TYPE in VARCHAR2,
  X_ATTENDANCE_MODE in VARCHAR2,
  X_CHG_RATE in NUMBER,
  X_LOWER_NRML_RATE_OVRD_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;
Line: 810

    X_LAST_UPDATED_BY NUMBER;
Line: 811

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 815

    X_PROGRAM_UPDATE_DATE DATE;
Line: 817

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 819

    X_LAST_UPDATED_BY := 1;
Line: 820

    X_LAST_UPDATE_LOGIN := 0;
Line: 822

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 823

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 827

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

  p_action=>'UPDATE',
  x_rowid=>X_ROWID,
  x_attendance_mode=>X_ATTENDANCE_MODE,
  x_attendance_type=>X_ATTENDANCE_TYPE,
  x_chg_rate=>X_CHG_RATE,
  x_course_cd=>X_COURSE_CD,
  x_end_dt=>X_END_DT,
  x_fee_type=>X_FEE_TYPE,
  x_location_cd=>X_LOCATION_CD,
  x_lower_nrml_rate_ovrd_ind=>X_LOWER_NRML_RATE_OVRD_IND,
  x_person_id=>X_PERSON_ID,
  x_start_dt=>X_START_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: 856

      X_PROGRAM_UPDATE_DATE := OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 858

      X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 868

  update IGS_FI_FEE_AS_RT set
    END_DT = NEW_REFERENCES.END_DT,
    LOCATION_CD = NEW_REFERENCES.LOCATION_CD,
    ATTENDANCE_TYPE = NEW_REFERENCES.ATTENDANCE_TYPE,
    ATTENDANCE_MODE = NEW_REFERENCES.ATTENDANCE_MODE,
    CHG_RATE = NEW_REFERENCES.CHG_RATE,
    LOWER_NRML_RATE_OVRD_IND = NEW_REFERENCES.LOWER_NRML_RATE_OVRD_IND,
    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: 894

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

end UPDATE_ROW;
Line: 925

  cursor c1 is select rowid from IGS_FI_FEE_AS_RT
     where PERSON_ID = X_PERSON_ID
     and COURSE_CD = X_COURSE_CD
     and FEE_TYPE = X_FEE_TYPE
     and START_DT = X_START_DT
  ;
Line: 936

    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_COURSE_CD,
     X_FEE_TYPE,
     X_START_DT,
     X_END_DT,
     X_LOCATION_CD,
     X_ATTENDANCE_TYPE,
     X_ATTENDANCE_MODE,
     X_CHG_RATE,
     X_LOWER_NRML_RATE_OVRD_IND,
     X_MODE);
Line: 952

  UPDATE_ROW (
X_ROWID,
   X_PERSON_ID,
   X_COURSE_CD,
   X_FEE_TYPE,
   X_START_DT,
   X_END_DT,
   X_LOCATION_CD,
   X_ATTENDANCE_TYPE,
   X_ATTENDANCE_MODE,
   X_CHG_RATE,
   X_LOWER_NRML_RATE_OVRD_IND,
   X_MODE);
Line: 966

procedure DELETE_ROW (
  X_ROWID in VARCHAR2,
  x_mode IN VARCHAR2
) as
begin
Before_DML(
 p_action => 'DELETE',
 x_rowid  => X_ROWID
);
Line: 978

  delete from IGS_FI_FEE_AS_RT
  where ROWID = X_ROWID;
Line: 991

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

END delete_row;