DBA Data[Home] [Help]

APPS.IGS_AD_ROOM_PKG SQL Statements

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

Line: 20

    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 :hsahni
  Date Created By :10-MAY-2000
  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_AD_ROOM_ALL
      WHERE    rowid = x_rowid;
Line: 49

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 75

    new_references.last_updated_by := x_last_updated_by;
Line: 76

    new_references.last_update_login := x_last_update_login;
Line: 160

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

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

      SELECT   rowid
      FROM     igs_ad_room_all
      WHERE    room_id = x_room_id AND
               closed_ind = NVL(x_closed_ind,closed_ind)
      FOR UPDATE NOWAIT;
Line: 266

      SELECT   rowid
      FROM     igs_ad_room_all
      WHERE    building_id = x_building_id  AND
              room_cd = x_room_cd 	AND
             ((l_rowid is null) or (rowid <> l_rowid)) AND
               closed_ind = NVL(x_closed_ind,closed_ind)

      ;
Line: 304

      SELECT   rowid
      FROM     igs_ad_room_all
      WHERE    building_id = x_building_id ;
Line: 339

    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 :hsahni
  Date Created By :10-MAY-2000
  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_org_id,
      x_room_id,
      x_building_id,
      x_room_cd,
      x_description,
      x_primary_use_cd,
      x_capacity,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 374

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

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	 -- Call all the procedures related to Before Insert.
      IF Get_PK_For_Validation (
    		new_references.room_id)  THEN
	       Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
Line: 406

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;
Line: 409

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;
Line: 435

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

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

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

 procedure INSERT_ROW (
      X_ROWID in out NOCOPY VARCHAR2,
			x_ORG_ID IN NUMBER,
       x_ROOM_ID IN OUT NOCOPY NUMBER,
       x_BUILDING_ID IN NUMBER,
       x_ROOM_CD IN VARCHAR2,
       x_DESCRIPTION IN VARCHAR2,
       x_PRIMARY_USE_CD IN VARCHAR2,
       x_CAPACITY IN NUMBER,
       x_CLOSED_IND IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
  Created By :hsahni
  Date Created By :10-MAY-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

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

    cursor C is select ROWID from IGS_AD_ROOM_ALL
             where                 ROOM_ID= X_ROOM_ID
;
Line: 476

     X_LAST_UPDATE_DATE DATE ;
Line: 477

     X_LAST_UPDATED_BY NUMBER ;
Line: 478

     X_LAST_UPDATE_LOGIN NUMBER ;
Line: 480

     X_LAST_UPDATE_DATE := SYSDATE;
Line: 482

        X_LAST_UPDATED_BY := 1;
Line: 483

        X_LAST_UPDATE_LOGIN := 0;
Line: 485

               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 486

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

            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 490

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

 		p_action=>'INSERT',
 		x_rowid=>X_ROWID,
		x_org_id => igs_ge_gen_003.get_org_id,
 	       x_room_id=>X_ROOM_ID,
 	       x_building_id=>X_BUILDING_ID,
 	       x_room_cd=>X_ROOM_CD,
 	       x_description=>X_DESCRIPTION,
 	       x_primary_use_cd=>X_PRIMARY_USE_CD,
 	       x_capacity=>X_CAPACITY,
 	       x_closed_ind=>X_CLOSED_IND,
	       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: 516

     insert into IGS_AD_ROOM_ALL (
		ORG_ID,
		ROOM_ID
		,BUILDING_ID
		,ROOM_CD
		,DESCRIPTION
		,PRIMARY_USE_CD
		,CAPACITY
		,CLOSED_IND
	        ,CREATION_DATE
		,CREATED_BY
		,LAST_UPDATE_DATE
		,LAST_UPDATED_BY
		,LAST_UPDATE_LOGIN
        ) values  (
	        NEW_REFERENCES.ORG_ID,
	        IGS_AD_ROOM_S.NEXTVAL
	        ,NEW_REFERENCES.BUILDING_ID
	        ,NEW_REFERENCES.ROOM_CD
	        ,NEW_REFERENCES.DESCRIPTION
	        ,NEW_REFERENCES.PRIMARY_USE_CD
	        ,NEW_REFERENCES.CAPACITY
	        ,NEW_REFERENCES.CLOSED_IND
	        ,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY

		,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_LOGIN
)RETURNING ROOM_ID INTO x_ROOM_ID;
Line: 554

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

end INSERT_ROW;
Line: 577

   cursor c1 is select
      BUILDING_ID
,      ROOM_CD
,      DESCRIPTION
,      PRIMARY_USE_CD
,      CAPACITY
,      CLOSED_IND
    from IGS_AD_ROOM_ALL
    where ROWID = X_ROWID
    for update nowait;
Line: 592

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

 Procedure UPDATE_ROW (
      X_ROWID in  VARCHAR2,
       x_ROOM_ID IN NUMBER,
       x_BUILDING_ID IN NUMBER,
       x_ROOM_CD IN VARCHAR2,
       x_DESCRIPTION IN VARCHAR2,
       x_PRIMARY_USE_CD IN VARCHAR2,
       x_CAPACITY IN NUMBER,
       x_CLOSED_IND IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
  /*************************************************************
  Created By :hsahni
  Date Created By :10-MAY-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

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

     X_LAST_UPDATE_DATE DATE ;
Line: 637

     X_LAST_UPDATED_BY NUMBER ;
Line: 638

     X_LAST_UPDATE_LOGIN NUMBER ;
Line: 640

     X_LAST_UPDATE_DATE := SYSDATE;
Line: 643

        X_LAST_UPDATED_BY := 1;
Line: 644

        X_LAST_UPDATE_LOGIN := 0;
Line: 646

               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 647

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

            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 651

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

 		p_action=>'UPDATE',
 		x_rowid=>X_ROWID,
 	       x_room_id=>X_ROOM_ID,
 	       x_building_id=>X_BUILDING_ID,
 	       x_room_cd=>X_ROOM_CD,
 	       x_description=>X_DESCRIPTION,
 	       x_primary_use_cd=>X_PRIMARY_USE_CD,
 	       x_capacity=>X_CAPACITY,
 	       x_closed_ind=>X_CLOSED_IND,
	       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: 674

   update IGS_AD_ROOM_ALL set
      BUILDING_ID =  NEW_REFERENCES.BUILDING_ID,
      ROOM_CD =  NEW_REFERENCES.ROOM_CD,
      DESCRIPTION =  NEW_REFERENCES.DESCRIPTION,
      PRIMARY_USE_CD =  NEW_REFERENCES.PRIMARY_USE_CD,
      CAPACITY =  NEW_REFERENCES.CAPACITY,
      CLOSED_IND =  NEW_REFERENCES.CLOSED_IND,
	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: 690

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

end UPDATE_ROW;
Line: 717

    cursor c1 is select ROWID from IGS_AD_ROOM_ALL
             where     ROOM_ID= X_ROOM_ID
;
Line: 725

    INSERT_ROW (
      X_ROWID,
			X_ORG_ID,
       X_ROOM_ID,
       X_BUILDING_ID,
       X_ROOM_CD,
       X_DESCRIPTION,
       X_PRIMARY_USE_CD,
       X_CAPACITY,
       X_CLOSED_IND,
      X_MODE );
Line: 739

UPDATE_ROW (
      X_ROWID,
       X_ROOM_ID,
       X_BUILDING_ID,

       X_ROOM_CD,
       X_DESCRIPTION,
       X_PRIMARY_USE_CD,
       X_CAPACITY,
       X_CLOSED_IND,
      X_MODE );
Line: 751

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
  /*************************************************************
  Created By :hsahni
  Date Created By :10-MAY-2000
  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: 770

 delete from IGS_AD_ROOM_ALL
 where ROWID = X_ROWID;
Line: 776

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

end DELETE_ROW;