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_UNIT_FLD_STDY_PKG SQL Statements

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

Line: 26


    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
  /*************************************************************
   Created By : kdande@in
   Date Created By :2000/05/11
   Purpose :
   Know limitations, enhancements or remarks
   Change History
   Who             When            What

   (reverse chronological order - newest change first)
  ***************************************************************/

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_UNIT_FLD_STDY
      WHERE    rowid = x_rowid;

Line: 54


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

Line: 56


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

Line: 68


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

Line: 75


    new_references.last_update_date := x_last_update_date;

Line: 76


    new_references.last_updated_by := x_last_updated_by;

Line: 77


    new_references.last_update_login := x_last_update_login;

Line: 126


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

Line: 148


      SELECT   rowid
      FROM     igs_ps_unit_fld_stdy
      WHERE    unit_field_of_study_id = x_unit_field_of_study_id
      FOR UPDATE NOWAIT;

Line: 185


      SELECT   rowid
      FROM     igs_ps_unit_fld_stdy
      WHERE    field_of_study = x_field_of_study
      AND      unit_code = x_unit_code
      AND      version_number = x_version_number
      AND      ((l_rowid is null) or (rowid <> l_rowid));

Line: 222


      SELECT   rowid
      FROM     igs_ps_unit_fld_stdy
      WHERE    field_of_study = x_field_of_study;

Line: 259


      SELECT   rowid
      FROM     igs_ps_unit_fld_stdy
      WHERE    unit_code = x_unit_cd
      AND      version_number = x_version_number ;

Line: 290


    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
  /*************************************************************
   Created By : kdande@in
   Date Created By :2000/05/11
   Purpose :
   Know limitations, enhancements or remarks
   Change History
   Who             When            What

   (reverse chronological order - newest change first)
  ***************************************************************/
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_unit_field_of_study_id,
      x_unit_code,
      x_version_number,
      x_field_of_study,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 320


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
	     IF Get_Pk_For_Validation(
    		new_references.unit_field_of_study_id)  THEN
	       Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');

Line: 330


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      Check_Uniqueness;

Line: 334


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

Line: 337


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	 -- Call all the procedures related to Before Insert.
         IF Get_PK_For_Validation (
    		new_references.unit_field_of_study_id)  THEN
	       Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');

Line: 346


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;

Line: 348


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Null;

Line: 374


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      Null;

Line: 377


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      Null;

Line: 380


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

Line: 390


  procedure INSERT_ROW (
      X_ROWID in out NOCOPY VARCHAR2,
       x_UNIT_FIELD_OF_STUDY_ID IN OUT NOCOPY NUMBER,
       x_UNIT_CODE IN VARCHAR2,
       x_VERSION_NUMBER IN NUMBER,
       x_FIELD_OF_STUDY IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
   Created By : kdande@in
   Date Created By :2000/05/11
   Purpose :
   Know limitations, enhancements or remarks
   Change History
   Who             When            What

   (reverse chronological order - newest change first)
  ***************************************************************/

    cursor C is select ROWID from IGS_PS_UNIT_FLD_STDY
             where UNIT_FIELD_OF_STUDY_ID= X_UNIT_FIELD_OF_STUDY_ID;

Line: 411


     X_LAST_UPDATE_DATE DATE ;

Line: 412


     X_LAST_UPDATED_BY NUMBER ;

Line: 413


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 415


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 417


        X_LAST_UPDATED_BY := 1;

Line: 418


        X_LAST_UPDATE_LOGIN := 0;

Line: 420


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 421


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 424


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 425


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 433


       SELECT   igs_ps_unit_fld_stdy_s.nextval
       INTO     x_unit_field_of_study_id
       FROM     dual;

Line: 437


 		p_action=>'INSERT',
 		x_rowid=>X_ROWID,
 	       x_unit_field_of_study_id=>X_UNIT_FIELD_OF_STUDY_ID,
 	       x_unit_code=>X_UNIT_CODE,
 	       x_version_number=>X_VERSION_NUMBER,
 	       x_field_of_study=>X_FIELD_OF_STUDY,
	       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: 448


       insert into IGS_PS_UNIT_FLD_STDY (
		UNIT_FIELD_OF_STUDY_ID
		,UNIT_CODE
		,VERSION_NUMBER
		,FIELD_OF_STUDY
	        ,CREATION_DATE
		,CREATED_BY
		,LAST_UPDATE_DATE
		,LAST_UPDATED_BY
		,LAST_UPDATE_LOGIN
        ) values  (
	        NEW_REFERENCES.UNIT_FIELD_OF_STUDY_ID
	        ,NEW_REFERENCES.UNIT_CODE
	        ,NEW_REFERENCES.VERSION_NUMBER
	        ,NEW_REFERENCES.FIELD_OF_STUDY
	        ,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_LOGIN
        );

Line: 477


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

Line: 479


  END INSERT_ROW;

Line: 486


   cursor c1 is select
      UNIT_CODE
,      VERSION_NUMBER
,      FIELD_OF_STUDY
    from IGS_PS_UNIT_FLD_STDY
    where ROWID = X_ROWID
    for update nowait;

Line: 498


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

Line: 518


 Procedure UPDATE_ROW (
      X_ROWID in  VARCHAR2,
       x_UNIT_FIELD_OF_STUDY_ID IN NUMBER,
       x_UNIT_CODE IN VARCHAR2,
       x_VERSION_NUMBER IN NUMBER,
       x_FIELD_OF_STUDY IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
   Created By : kdande@in
   Date Created By :2000/05/11
   Purpose :
   Know limitations, enhancements or remarks
   Change History
   Who             When            What

   (reverse chronological order - newest change first)
  ***************************************************************/
     X_LAST_UPDATE_DATE DATE ;

Line: 537


     X_LAST_UPDATED_BY NUMBER ;

Line: 538


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 540


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 542


        X_LAST_UPDATED_BY := 1;

Line: 543


        X_LAST_UPDATE_LOGIN := 0;

Line: 545


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 546


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 549


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 550


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 559


 		p_action=>'UPDATE',
 		x_rowid=>X_ROWID,
 	       x_unit_field_of_study_id=>X_UNIT_FIELD_OF_STUDY_ID,
 	       x_unit_code=>X_UNIT_CODE,
 	       x_version_number=>X_VERSION_NUMBER,
 	       x_field_of_study=>X_FIELD_OF_STUDY,
	       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: 570


   update IGS_PS_UNIT_FLD_STDY set
      UNIT_CODE =  NEW_REFERENCES.UNIT_CODE,
      VERSION_NUMBER =  NEW_REFERENCES.VERSION_NUMBER,
      FIELD_OF_STUDY =  NEW_REFERENCES.FIELD_OF_STUDY,
	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: 583


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

Line: 586


  end UPDATE_ROW;

Line: 606


    cursor c1 is select ROWID from IGS_PS_UNIT_FLD_STDY
             where     UNIT_FIELD_OF_STUDY_ID= X_UNIT_FIELD_OF_STUDY_ID ;

Line: 613


    INSERT_ROW (
      X_ROWID,
       X_UNIT_FIELD_OF_STUDY_ID,
       X_UNIT_CODE,
       X_VERSION_NUMBER,
       X_FIELD_OF_STUDY,
      X_MODE );

Line: 623


  UPDATE_ROW (
      X_ROWID,
       X_UNIT_FIELD_OF_STUDY_ID,
       X_UNIT_CODE,
       X_VERSION_NUMBER,
       X_FIELD_OF_STUDY,
      X_MODE );

Line: 632


  procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
  /*************************************************************
   Created By : kdande@in
   Date Created By :2000/05/11
   Purpose :
   Know limitations, enhancements or remarks
   Change History
   Who             When            What

   (reverse chronological order - newest change first)
  ***************************************************************/
begin
Before_DML (
p_action => 'DELETE',
x_rowid => X_ROWID
);

Line: 650


 delete from IGS_PS_UNIT_FLD_STDY
 where ROWID = X_ROWID;

Line: 656


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

Line: 659


END DELETE_ROW;