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

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

Line: 16


    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 : sokaul
  Date Created By : 11-MAY-2000
  Purpose : NEW TABLE
  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_FACILITY
      WHERE    rowid = x_rowid;

Line: 45


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

Line: 47


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

Line: 59


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

Line: 66


    new_references.last_update_date := x_last_update_date;

Line: 67


    new_references.last_updated_by := x_last_updated_by;

Line: 68


    new_references.last_update_login := x_last_update_login;

Line: 141


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

Line: 155


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

Line: 178


      SELECT   rowid
      FROM     igs_ps_unit_facility
      WHERE    unit_media_id = x_unit_media_id
      FOR UPDATE NOWAIT;

Line: 216


      SELECT   rowid
      FROM     igs_ps_unit_facility
      WHERE    media_code = x_media_code
      AND      unit_code = x_unit_code
      AND      unit_version_number = x_unit_version_number 	and      ((l_rowid is null) or (rowid <> l_rowid))

      ;

Line: 253


      SELECT   rowid
      FROM     igs_ps_unit_facility
      WHERE    media_code = x_media_code ;

Line: 291


      SELECT   rowid
      FROM     igs_ps_unit_facility
      WHERE    unit_code = x_unit_cd
      AND      unit_version_number = x_version_number ;

Line: 322


    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 : sokaul
  Date Created By : 11-MAY-2000
  Purpose : NEW TABLE
  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_media_id,
      x_unit_code,
      x_unit_version_number,
      x_media_code,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 353


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

Line: 365


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

Line: 371


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

Line: 374


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

Line: 384


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;

Line: 387


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Null;

Line: 414


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

Line: 417


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

Line: 420


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

Line: 429


 procedure INSERT_ROW (
      X_ROWID in out NOCOPY VARCHAR2,
       x_UNIT_MEDIA_ID IN OUT NOCOPY NUMBER,
       x_UNIT_CODE IN VARCHAR2,
       x_UNIT_VERSION_NUMBER IN NUMBER,
       x_MEDIA_CODE IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
  Created By : sokaul
  Date Created By : 11-MAY-2000
  Purpose : NEW TABLE
  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_FACILITY
             where                 UNIT_MEDIA_ID= X_UNIT_MEDIA_ID
;

Line: 451


     X_LAST_UPDATE_DATE DATE ;

Line: 452


     X_LAST_UPDATED_BY NUMBER ;

Line: 453


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 455


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 457


        X_LAST_UPDATED_BY := 1;

Line: 458


        X_LAST_UPDATE_LOGIN := 0;

Line: 460


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 461


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 464


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 465


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 473


   Select IGS_PS_UNIT_FACILITY_S.NEXTVAL into x_unit_media_id from dual;

Line: 475


 		p_action=>'INSERT',
 		x_rowid=>X_ROWID,
 	       x_unit_media_id=>X_UNIT_MEDIA_ID,
 	       x_unit_code=>X_UNIT_CODE,
 	       x_unit_version_number=>X_UNIT_VERSION_NUMBER,
 	       x_media_code=>X_MEDIA_CODE,
	       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: 486


     insert into IGS_PS_UNIT_FACILITY (
		UNIT_MEDIA_ID
		,UNIT_CODE
		,UNIT_VERSION_NUMBER
		,MEDIA_CODE
	        ,CREATION_DATE
		,CREATED_BY
		,LAST_UPDATE_DATE
		,LAST_UPDATED_BY
		,LAST_UPDATE_LOGIN
        ) values  (
	        NEW_REFERENCES.UNIT_MEDIA_ID
	        ,NEW_REFERENCES.UNIT_CODE
	        ,NEW_REFERENCES.UNIT_VERSION_NUMBER
	        ,NEW_REFERENCES.MEDIA_CODE
	        ,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_LOGIN
);

Line: 515


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

Line: 517


end INSERT_ROW;

Line: 535


   cursor c1 is select
      UNIT_CODE
,      UNIT_VERSION_NUMBER
,      MEDIA_CODE
    from IGS_PS_UNIT_FACILITY
    where ROWID = X_ROWID
    for update nowait;

Line: 547


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

Line: 566


 Procedure UPDATE_ROW (
      X_ROWID in  VARCHAR2,
       x_UNIT_MEDIA_ID IN NUMBER,
       x_UNIT_CODE IN VARCHAR2,
       x_UNIT_VERSION_NUMBER IN NUMBER,
       x_MEDIA_CODE IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
  Created By : sokaul
  Date Created By : 11-MAY-2000
  Purpose : NEW TABLE
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

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

     X_LAST_UPDATE_DATE DATE ;

Line: 586


     X_LAST_UPDATED_BY NUMBER ;

Line: 587


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 589


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 591


        X_LAST_UPDATED_BY := 1;

Line: 592


        X_LAST_UPDATE_LOGIN := 0;

Line: 594


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 595


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 598


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 599


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 608


 		p_action=>'UPDATE',
 		x_rowid=>X_ROWID,
 	       x_unit_media_id=>X_UNIT_MEDIA_ID,
 	       x_unit_code=>X_UNIT_CODE,
 	       x_unit_version_number=>X_UNIT_VERSION_NUMBER,
 	       x_media_code=>X_MEDIA_CODE,
	       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: 619


   update IGS_PS_UNIT_FACILITY set
      UNIT_CODE =  NEW_REFERENCES.UNIT_CODE,
      UNIT_VERSION_NUMBER =  NEW_REFERENCES.UNIT_VERSION_NUMBER,
      MEDIA_CODE =  NEW_REFERENCES.MEDIA_CODE,
	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: 632


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

Line: 635


end UPDATE_ROW;

Line: 655


    cursor c1 is select ROWID from IGS_PS_UNIT_FACILITY
             where     UNIT_MEDIA_ID= X_UNIT_MEDIA_ID
;

Line: 663


    INSERT_ROW (
      X_ROWID,
       X_UNIT_MEDIA_ID,
       X_UNIT_CODE,
       X_UNIT_VERSION_NUMBER,
       X_MEDIA_CODE,
      X_MODE );

Line: 673


UPDATE_ROW (
      X_ROWID,
       X_UNIT_MEDIA_ID,
       X_UNIT_CODE,
       X_UNIT_VERSION_NUMBER,
       X_MEDIA_CODE,
      X_MODE );

Line: 681


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
  /*************************************************************
  Created By : sokaul
  Date Created By : 11-MAY-2000
  Purpose : NEW TABLE
  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: 700


 delete from IGS_PS_UNIT_FACILITY
 where ROWID = X_ROWID;

Line: 706


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

Line: 709


end DELETE_ROW;