STANDARD DATA DICTIONARY #131.7 -- OPERATING ROOM FILE 9/29/25 PAGE 1
STORED IN ^SRS( *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains information regarding the operating rooms. It includes a number of fields that cannot be edited using fileman.
Those fields include the PATTERN, BLOCK SCHEDULE DATE and SERVICE BLOCKOUT.
POINTED TO BY: OP ROOM PROCEDURE PERFORMED field (#.02) of the SURGERY File (#130)
OPERATING ROOM field (#.01) of the OPERATING ROOM sub-field (#131.81) of the SURGERY UTILIZATION File (#131.8)
OPERATING ROOM field (#130.02) of the INVENTORY DISTRIBUTED PATIENT SUPPLIES File (#446.1)
CROSS
REFERENCED BY: NAME(B), SERVICE(C)
131.7,.01 NAME 0;1 POINTER TO HOSPITAL LOCATION FILE (#44) (Required)
Operating Room Name
INPUT TRANSFORM: S DIC("S")="I $D(^SC(""AC"",""OR"",Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: APR 05, 1990
HELP-PROMPT: To enter a new operating room, see your IRM staff.
DESCRIPTION: This is the name of the operating room.
SCREEN: S DIC("S")="I $D(^SC(""AC"",""OR"",Y))"
EXPLANATION: SELECT OR ONLY
CROSS-REFERENCE: 131.7^B
1)= S ^SRS("B",$E(X,1,30),DA)=""
2)= K ^SRS("B",$E(X,1,30),DA)
131.7,1 LOCATION 0;2 FREE TEXT
Location of the Operating Room
INPUT TRANSFORM: K:$L(X)>50!($L(X)<2) X
HELP-PROMPT: ANSWER MUST BE 2-50 CHARACTERS IN LENGTH
DESCRIPTION: This is the physical location of the operating room.
131.7,2 PERSON RESP. 0;3 POINTER TO NEW PERSON FILE (#200)
Person Responsible for this Operating Room
LAST EDITED: DEC 05, 1991
HELP-PROMPT: Enter the name of the person responsible for this operating room.
DESCRIPTION: This is the name of the person responsible for this operating room.
131.7,3 TELEPHONE 0;4 FREE TEXT
Telephone Number
INPUT TRANSFORM: K:$L(X)>9!($L(X)<2) X
HELP-PROMPT: ANSWER MUST BE 2-9 CHARACTERS IN LENGTH
DESCRIPTION: This is the telephone number of the operating room.
131.7,4 REMARKS 0;5 FREE TEXT
Remarks or Comments Relating Specifically to this Room
INPUT TRANSFORM: K:$L(X)>64!($L(X)<2) X
HELP-PROMPT: ANSWER MUST BE 2-64 CHARACTERS IN LENGTH
DESCRIPTION: These are comments relating specifically to this operating room.
131.7,6 SCHEDULE DATE S;0 DATE Multiple #131.701 (Add New Entry without Asking)
DESCRIPTION: This is information about the Schedule date.
WRITE AUTHORITY: ^
131.701,.01 SCHEDULE DATE 0;1 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: AUG 10, 1987
DESCRIPTION: This is the date used to display the scheduling pattern.
WRITE AUTHORITY: ^
UNEDITABLE
131.701,1 PATTERN 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>150!($L(X)<1) X
LAST EDITED: AUG 10, 1987
HELP-PROMPT: ANSWER MUST BE 1-150 CHARACTERS IN LENGTH
DESCRIPTION: This is the pattern displaying scheduled cases for this operating room.
UNEDITABLE
131.7,7 BLOCK SCHEDULE DATE SS;0 DATE Multiple #131.702 (Add New Entry without Asking)
DESCRIPTION: This is the block schedule date. This field should not be modified through Fileman.
WRITE AUTHORITY: ^
131.702,.01 BLOCK SCHEDULE DATE 0;1 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: AUG 10, 1987
DESCRIPTION: This is the block schedule date.
WRITE AUTHORITY: ^
UNEDITABLE
131.702,1 PATTERN 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>150!($L(X)<1) X
LAST EDITED: AUG 10, 1987
HELP-PROMPT: ANSWER MUST BE 1-150 CHARACTERS IN LENGTH
DESCRIPTION: This is the pattern stored for the block schedule date.
WRITE AUTHORITY: ^
UNEDITABLE
131.7,8 SERVICE BLOCKOUT 1;0 Multiple #131.703 (Add New Entry without Asking)
DESCRIPTION: This is information related to service blockouts.
WRITE AUTHORITY: ^
131.703,.01 DAY 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<1) X
LAST EDITED: AUG 10, 1987
HELP-PROMPT: THIS FIELD SHOULD BE BE MODIFIED BY A PROGRAMMER ONLY !!
DESCRIPTION: This is the day of the week for this blockout.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 131.703^B
1)= S ^SRS(DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^SRS(DA(1),1,"B",$E(X,1,30),DA)
131.703,1 SERVICE 1;0 Multiple #131.704 (Add New Entry without Asking)
DESCRIPTION: This is information related to the service for which the operating room time will be blocked out.
WRITE AUTHORITY: ^
131.704,.01 SERVICE 0;1 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<1) X
LAST EDITED: APR 11, 1988
HELP-PROMPT: THIS FIELD SHOULD BE MODIFIED BY A PROGRAMMER ONLY !!
DESCRIPTION: This is the name of the service.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 131.704^B
1)= S ^SRS(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^SRS(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 131.7^C^MUMPS
1)= S ^SRS("C",X)=""
2)= K ^SRS("C",X)
The C cross reference on the SERVICE field is used for lookup purposes.
131.704,1 START TIME 1;0 Multiple #131.705 (Add New Entry without Asking)
DESCRIPTION: This is information related to the start time of this blockout.
131.705,.01 START TIME 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>5!($L(X)<1) X
LAST EDITED: AUG 10, 1987
HELP-PROMPT: THIS FIELD SHOULD BE MODIFIED BY A PROGRAMMER ONLY !!
DESCRIPTION: This is the time that the blockout begins.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 131.705^B
1)= S ^SRS(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^SRS(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
131.705,1 END TIME 0;2 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
LAST EDITED: APR 11, 1988
HELP-PROMPT: THIS FIELD SHOULD BE MODIFIED BY A PROGRAMMER ONLY !!
DESCRIPTION: This is the time that the blockout ends.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 131.705^R^MUMPS
1)= D R^SROXREF
2)= Q
The R cross reference on the END TIME field is used when creating, updating and deleting
service blockouts from the operating room display graph.
CROSS-REFERENCE: 131.705^SER^MUMPS
1)= D SER^SROXREF
2)= Q
The SER cross reference on the END TIME field is used when creating and updating the service
blockouts for an operating room.
131.705,2 HOW OFTEN 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>3!($L(X)<1) X
LAST EDITED: AUG 10, 1987
HELP-PROMPT: ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
DESCRIPTION: This indicates how often this blockout should occur. For example, every week, once per
month, or every other week.
WRITE AUTHORITY: ^
UNEDITABLE
131.704,2 SCHEDULED BY 0;2 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: DEC 05, 1991
HELP-PROMPT: Enter the name of the scheduler.
DESCRIPTION: This is the name of the person blocking out time on the display for this operating room.
WRITE AUTHORITY: ^
131.7,9 TYPE 2;1 POINTER TO OPERATING ROOM TYPE FILE (#134) (Required)
Operating Room Type
LAST EDITED: SEP 24, 1987
DESCRIPTION: This is the operating room type.
131.7,10 CLEANING TIME 3;1 NUMBER (Required)
Average Time to Clean this Operating Room
INPUT TRANSFORM: K:+X'=X!(X>240)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAR 30, 1990
HELP-PROMPT: Type a Number between 1 and 240, 0 Decimal Digits
DESCRIPTION: This is the average number of minutes required to clean this operating room after completion of a
case. It will be used in determining operating room utilization.
131.7,11 NORMAL DAILY SCHEDULE 4;0 SET Multiple #131.711
LAST EDITED: SEP 22, 1992
DESCRIPTION: This is the normal daily schedule for each operating room.
131.711,.01 DAY OF THE WEEK 0;1 SET (Multiply asked)
Day of the Week
'0' FOR SUNDAY;
'1' FOR MONDAY;
'2' FOR TUESDAY;
'3' FOR WEDNESDAY;
'4' FOR THURSDAY;
'5' FOR FRIDAY;
'6' FOR SATURDAY;
LAST EDITED: MAY 18, 1992
HELP-PROMPT: Enter the day of week as a numeric from 0 to 6, where 0 means Sunday and 6 means Saturday.
DESCRIPTION: This is the day of the week (Sunday, Monday, Tuesday, etc.). Each day of the week will have a
start time and end time associated with it for each operating room if using a normal daily
schedule. If the room is not used on the selected day of the week, you can "flag" it as
inactive.
CROSS-REFERENCE: 131.711^B
1)= S ^SRS(DA(1),4,"B",$E(X,1,30),DA)=""
2)= K ^SRS(DA(1),4,"B",$E(X,1,30),DA)
131.711,1 NORMAL START TIME 0;2 FREE TEXT
Normal Starting Time
INPUT TRANSFORM:K:$L(X)>5!($L(X)<5)!'(X?2N1":"2N)!($P(X,":")>23)!($P(X,":",2)>59) X Q:'$D(X) S X=$E(X,1,2)_$E(X,4,
5)
OUTPUT TRANSFORM:S:$L(Y) Y=$E(Y,1,2)_":"_$E(Y,3,4)
LAST EDITED: NOV 04, 1992
HELP-PROMPT: Enter the usual time (00:00 to 23:59) at which this operating room is scheduled for use.
DESCRIPTION: This is the usual time of day when this operating room goes into use. This entry must be in
military time format with leading zeros. For example, a time of 7:00 AM MUST be entered in the
format 07:00. The time 7:00 PM would be entered 19:00. If this operating room is not normally
scheduled for use on this day, leave this field blank.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
131.711,2 NORMAL END TIME 0;3 FREE TEXT
Normal Ending Time
INPUT TRANSFORM:K:$L(X)>5!($L(X)<5)!'(X?2N1":"2N)!($P(X,":")>23)!($P(X,":",2)>59) X Q:'$D(X) S X=$E(X,1,2)_$E(X,4,
5)
OUTPUT TRANSFORM:S:$L(Y) Y=$E(Y,1,2)_":"_$E(Y,3,4)
LAST EDITED: NOV 04, 1992
HELP-PROMPT: Enter the usual time (00:00 to 23:59) after which this operating room is not scheduled for use.
DESCRIPTION: This is the usual time of day after which this operating room is not scheduled for use. This entry
must be in military time format with leading zeros. For example, a time of 7:00 PM MUST be entered
in the format 07:00. The time 7:00 PM would be entered 19:00. If this operating room is not
normally scheduled for use on this day of the week, leave this field blank.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
131.711,3 INACTIVE (Y/N) 0;4 SET
Inactive (Y/N)
'1' FOR YES;
'0' FOR NO;
LAST EDITED: MAY 20, 1992
HELP-PROMPT: Enter 'YES' if this operating room is inactive on this day of the week.
DESCRIPTION: If this operating room is normally inactive on this day of the week, enter 'YES'. If this
operating room is normally active on this day of the week, enter 'NO' or leave blank. This field
is used in determining the utilization of this operating room.
131.7,99 INACTIVE? 0;6 SET
Inactive?
'1' FOR YES;
LAST EDITED: JUN 08, 1992
HELP-PROMPT: Enter 'YES' to inactivate this operating room.
DESCRIPTION: Enter 'YES' to make this operating room inactive and to prevent its selection and use by users of
the Surgery package. A 'YES' in this field indicates that this operating room is not in service.
FILES POINTED TO FIELDS
HOSPITAL LOCATION (#44) NAME (#.01)
NEW PERSON (#200) PERSON RESP. (#2)
SERVICE:SCHEDULED BY (#2)
OPERATING ROOM TYPE (#134) TYPE (#9)
INPUT TEMPLATE(S):
SRO-ROOM APR 15, 1993@09:13 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):