eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PS_FIELD_STUDY_PKG SQL Statements

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

Line: 18


    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_FIELD_STUDY
      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: 51


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

Line: 58


    new_references.last_update_date := x_last_update_date;

Line: 59


    new_references.last_updated_by := x_last_updated_by;

Line: 60


    new_references.last_update_login := x_last_update_login;

Line: 70


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


	ELSE -- p_inserting or p_updating
		v_course_cd := new_references.course_cd;

Line: 90


	-- Validate the insert/update/delete.
	IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (
			v_course_cd,
			v_version_number,
			v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);

Line: 99


	-- Validate field of study.  Field of study is not updateable.
	IF p_inserting THEN
		IF IGS_PS_VAL_CFOS.crsp_val_cfos_fos (
				new_references.field_of_study,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 109


	-- Insert history record on update.
	IF p_updating THEN
		IF old_references.percentage <> new_references.percentage OR
				old_references.major_field_ind <> new_references.major_field_ind THEN
			SELECT	DECODE(old_references.percentage,new_references.percentage,NULL,old_references.percentage),
				DECODE(old_references.major_field_ind,new_references.major_field_ind,NULL,old_references.major_field_ind)
			INTO	v_percentage,
				v_major_field_ind
			FROM	dual;

Line: 118


			-- Create history record for update
			IGS_PS_GEN_002.CRSP_INS_CFOS_HIST(
				old_references.course_cd,
				old_references.version_number,
				old_references.field_of_study,
				old_references.last_update_date,
				new_references.last_update_date,
				old_references.last_updated_by,
				v_percentage,
				v_major_field_ind);

Line: 136


			old_references.last_update_date,
			SYSDATE,
			old_references.last_updated_by,
			old_references.percentage,
			old_references.major_field_ind);

Line: 144


  END BeforeRowInsertUpdateDelete1;

Line: 180


		    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 193


		    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 209


      SELECT   rowid
      FROM     IGS_PS_FIELD_STUDY
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number
      AND      field_of_study = x_field_of_study
      FOR UPDATE NOWAIT;

Line: 237


      SELECT   rowid
      FROM     IGS_PS_FIELD_STUDY
      WHERE    course_cd = x_course_cd
      AND      version_number = x_version_number ;

Line: 269


    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_course_cd,
      x_version_number,
      x_field_of_study,
      x_major_field_ind,
      x_percentage,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 290


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

Line: 303


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

Line: 308


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

Line: 311


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF  Get_PK_For_Validation (
      new_references.course_cd ,
      new_references.version_number ,
      new_references.field_of_study) THEN
	    Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 321


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 337


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_FIELD_OF_STUDY in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_MAJOR_FIELD_IND in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PS_FIELD_STUDY
      where COURSE_CD = X_COURSE_CD
      and FIELD_OF_STUDY = X_FIELD_OF_STUDY
      and VERSION_NUMBER = X_VERSION_NUMBER;

Line: 350


    X_LAST_UPDATE_DATE DATE;

Line: 351


    X_LAST_UPDATED_BY NUMBER;

Line: 352


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 354


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 356


    X_LAST_UPDATED_BY := 1;

Line: 357


    X_LAST_UPDATE_LOGIN := 0;

Line: 359


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 360


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 363


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 364


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 373


    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_field_of_study => X_FIELD_OF_STUDY,
    x_major_field_ind => NVL(X_MAJOR_FIELD_IND,'Y') ,
    x_percentage => X_PERCENTAGE ,
    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: 387


  insert into IGS_PS_FIELD_STUDY (
    COURSE_CD,
    VERSION_NUMBER,
    FIELD_OF_STUDY,
    MAJOR_FIELD_IND,
    PERCENTAGE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.FIELD_OF_STUDY,
    NEW_REFERENCES.MAJOR_FIELD_IND,
    NEW_REFERENCES.PERCENTAGE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 419


	p_action => 'INSERT',
	x_rowid => X_ROWID
);

Line: 422


end INSERT_ROW;

Line: 432


  cursor c1 is select
      MAJOR_FIELD_IND,
      PERCENTAGE
    from IGS_PS_FIELD_STUDY
    where ROWID = X_ROWID
    for update nowait;

Line: 445


    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 464


procedure UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_FIELD_OF_STUDY in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_MAJOR_FIELD_IND in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 474


    X_LAST_UPDATED_BY NUMBER;

Line: 475


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 477


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 479


    X_LAST_UPDATED_BY := 1;

Line: 480


    X_LAST_UPDATE_LOGIN := 0;

Line: 482


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 483


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 486


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 487


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 496


    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_version_number => X_VERSION_NUMBER,
    x_field_of_study => X_FIELD_OF_STUDY,
    x_major_field_ind => X_MAJOR_FIELD_IND ,
    x_percentage => X_PERCENTAGE ,
    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: 510


  update IGS_PS_FIELD_STUDY set
    MAJOR_FIELD_IND = NEW_REFERENCES.MAJOR_FIELD_IND,
    PERCENTAGE = NEW_REFERENCES.PERCENTAGE,
    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: 522


	p_action => 'UPDATE',
	x_rowid => X_ROWID
);

Line: 525


end UPDATE_ROW;

Line: 536


  cursor c1 is select rowid from IGS_PS_FIELD_STUDY
     where COURSE_CD = X_COURSE_CD
     and FIELD_OF_STUDY = X_FIELD_OF_STUDY
     and VERSION_NUMBER = X_VERSION_NUMBER
  ;

Line: 546


    INSERT_ROW (
     X_ROWID,
     X_COURSE_CD,
     X_FIELD_OF_STUDY,
     X_VERSION_NUMBER,
     X_MAJOR_FIELD_IND,
     X_PERCENTAGE,
     X_MODE);

Line: 557


  UPDATE_ROW (
   X_ROWID,
   X_COURSE_CD,
   X_FIELD_OF_STUDY,
   X_VERSION_NUMBER,
   X_MAJOR_FIELD_IND,
   X_PERCENTAGE,
   X_MODE);

Line: 567


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

Line: 575


  delete from IGS_PS_FIELD_STUDY
  where ROWID = X_ROWID;

Line: 581


	p_action => 'DELETE',
	x_rowid => X_ROWID
);

Line: 584


end DELETE_ROW;