STANDARD DATA DICTIONARY #100.21 -- OE/RR LIST FILE 3/24/25 PAGE 1 STORED IN ^OR(100.21, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains data related to lists. Generally these lists take the form of provider(s)/patients. POINTED TO BY: COMBINATION ITEM field (#.01) of the COMBINATION ITEM sub-field (#100.241) of the OE/RR PT SEL COMBO File (#100.24) CMPLX field (#102) of the ORAM FLOWSHEET File (#103) CPRS TEAM field (#.03) of the GMRC CONSULT MAPPING File (#123.033) SERVICE TEAM TO NOTIFY field (#.01) of the SERVICE TEAM(S) TO NOTIFY sub-field (#123.53) of the REQUEST SERVICES File (#123.5) TEAM TO NOTIFY field (#2) of the NOTIFICATION BY PT LOCATION sub-field (#123.54) of the REQUEST SERVICES File (#123.5) UPDATE TEAMS W/O NOTIFICATIONS field (#.01) of the UPDATE TEAMS W/O NOTIFICATIONS sub-field (#123.57) of the REQUEST SERVICES File (#123.5) ADMINISTRATIVE UPDATE TEAM field (#.01) of the ADMINISTRATIVE UPDATE TEAMS sub-field (#123.58) of the REQUEST SERVICES File (#123.5) NAME field (#.01) of the CRHD HANDOFF PARAMETERS File (#183) PATIENT SELECTION LIST field (#101.02) of the NEW PERSON File (#200) OERR TEAM field (#.01) of the OERR TEAM sub-field (#810.17) of the REMINDER REPORT TEMPLATE File (#810.1) CPRS TEAM field (#.01) of the CPRS TEAM sub-field (#8925.714) of the TIU TEXT EVENTS File (#8925.71) ENTITY field (#.01) of the PARAMETERS File (#8989.5) SOURCE field (#.02) of the SOURCES sub-field (#800001.21) of the HMP ROSTER File (#800001.2) CROSS REFERENCED BY: MEMBER(AB), AUTOLINK(AC), NAME(B), USER(C), UPPER CASE(D) LAST MODIFIED: JUN 24,2020@12:14:45 100.21,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!($D(^OR(100.21,"B",X))) X LAST EDITED: DEC 20, 1991 HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT BE WHOLLY NUMERIC OR START WITH PUNCTUATION. IT MUST ALSO BE UNIQUE. DESCRIPTION: This is the name of the list being defined. DELETE TEST: 123.5,0)= I '($E($G(XQY0),1,4)="ORLP") W !,"Deletion of Team Lists only alowed through CPRS menu op tions. " NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 100.21^B 1)= S ^OR(100.21,"B",$E(X,1,30),DA)="" 2)= K ^OR(100.21,"B",$E(X,1,30),DA) CROSS-REFERENCE: ^^TRIGGER^100.21^.1 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y X ^DD(100.21,.01,1,2,1.1) X ^DD(100.21,.01,1,2,1.4) 1.1)= S X=DIV S X=DIV X "F %=1:1:$L(X) S:$E(X,%)?1L X=$E(X,0,%-1)_$C($A(X,%)-32)_$E(X,%+1,999)" S X =X,Y(1)=X S X=1,Y(2)=X S X=30,X=$E(Y(1),Y(2),X) 1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=100.21,DIG=.1 D ^DI CR:$O(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" X ^DD(100.21,.01,1,2,2.4) 2.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=100.21,DIG=.1 D ^DI CR:$O(^DD(DIH,DIG,1,0))>0 CREATE VALUE)= $E(UPPERCASE(NAME),1,30) DELETE VALUE)= @ FIELD)= UPPER CASE 100.21,.1 UPPER CASE 0;3 FREE TEXT (Required) INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X LAST EDITED: FEB 27, 1991 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: This is the name of the list in upper case. Used for look-up. WRITE AUTHORITY: ^ NOTES: TRIGGERED by the NAME field of the OE/RR LIST File CROSS-REFERENCE: 100.21^D 1)= S ^OR(100.21,"D",$E(X,1,30),DA)="" 2)= K ^OR(100.21,"D",$E(X,1,30),DA) The "D" cross-reference is used to look-up list names in upper case. 100.21,1 TYPE 0;2 SET (Required) 'P' FOR PERSONAL PATIENT; 'TA' FOR TEAM PATIENT AUTOLINKED; 'TM' FOR TEAM PATIENT MANUAL; 'MRAL' FOR MANUAL REMOVAL/AUTOLINK ADDITION; LAST EDITED: AUG 18, 1999 HELP-PROMPT: Enter 'P' for Personal list, 'TA' for a Team Patient Autolinked list, 'TM' for a Team List manually updated list, 'MRAL' for a Team list with Autolinked additions and manual removal. DESCRIPTION: This is the type of list being defined. List type currently includes team and personal. o Team lists o TM - Manually maintained (addition and removal) o TA - Maintained by Autolinks for addition and removal of patients. o MRAL - Manual removal of patients from the list with Autolink addition of patients to the list. o Personal lists o P - Manually maintained (addition and removal) CROSS-REFERENCE: ^^TRIGGER^100.21^1.6 1)= X ^DD(100.21,1,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,5), X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(100.21,1,1,1,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$S('$D(^ VA(200,+$P(Y(1),U,5),0)):"",1:$P(^(0),U,1))="" 1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,5)=DIV,DIH=100.21,DIG=1.6 D ^D ICR:$O(^DD(DIH,DIG,1,0))>0 2)= Q 3)= Original creator's identity cannot be changed. CREATE CONDITION)= CREATOR="" CREATE VALUE)= S X=DUZ DELETE VALUE)= NO EFFECT FIELD)= CREATOR This field is used to store the indentity of the user who created the Team list. CROSS-REFERENCE: ^^TRIGGER^100.21^1.65 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U, 7)="" I X S X=DIV S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DI V S X=DT X ^DD(100.21,1,1,2,1.4) 1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=100.21,DIG=1.65 D ^ DICR:$O(^DD(DIH,DIG,1,0))>0 2)= Q CREATE CONDITION)= CREATION D/T="" CREATE VALUE)= S X=DT DELETE VALUE)= NO EFFECT FIELD)= CREATION D/T Trigger fills CREATION D/T field. 100.21,1.5 DEVICE 0;4 POINTER TO DEVICE FILE (#3.5) LAST EDITED: DEC 01, 1997 HELP-PROMPT: Enter the device to be linked with this list. DESCRIPTION: Device from the DEVICE file linked to the list. 100.21,1.6 CREATOR 0;5 POINTER TO NEW PERSON FILE (#200) Creator of Team List LAST EDITED: AUG 11, 1999 HELP-PROMPT: Entry in this field is handled by Fileman. DESCRIPTION: This is the IEN of the user who creates the Team List. WRITE AUTHORITY: ^ UNEDITABLE NOTES: TRIGGERED by the TYPE field of the OE/RR LIST File 100.21,1.65 CREATION D/T 0;7 DATE INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:Y<1 X LAST EDITED: AUG 18, 1999 HELP-PROMPT: Date and time of list creation. DESCRIPTION: This field stores the date of creation of the list. NOTES: TRIGGERED by the TYPE field of the OE/RR LIST File 100.21,1.7 SUBSCRIBE 0;6 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: SEP 02, 2016 HELP-PROMPT: YES means users can add or remove themselves as team members (providers). DESCRIPTION: This field stores either a Y or N (for YES or NO) entry and is used in CPRS to determine whether or not individual users will be allowed to add or remove themselves as members of the team list if it is of autolink or manual type. 100.21,2 USER 1;0 POINTER Multiple #100.212 (Add New Entry without Asking) HELP-PROMPT: Enter the users associated with this list. DESCRIPTION: These are the user(s) that belong to the list. If the list is of type TEAM PATIENT or PERSONAL PATIENT, users on the list may receive clinical notifications for patients also on the list. 100.212,.01 USER 0;1 POINTER TO NEW PERSON FILE (#200) INPUT TRANSFORM: S DIC("S")="I +($$ACTIVE^XUSER(Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$G(X) DINUM=X LAST EDITED: MAY 12, 1999 HELP-PROMPT: Enter the user(s) you want associated with this list. User(s) may receive clinical notifications for patients also on the list. DESCRIPTION: This is a user that belongs to the list. If the list is of type TEAM PATIENT or PERSONAL PATIENT, users on the list may receive clinical notifications for patients also on the list. SCREEN: S DIC("S")="I +($$ACTIVE^XUSER(Y))" EXPLANATION: Screen will filter out inactive users from the selection list. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 100.21^C 1)= S ^OR(100.21,"C",$E(X,1,30),DA(1),DA)="" 2)= K ^OR(100.21,"C",$E(X,1,30),DA(1),DA) The "C" cross-reference is used to look-up users/recipients on a list. 100.212,1 LAST DATE/TIME USED 0;2 DATE INPUT TRANSFORM: S %DT="ETR" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 01, 1990 HELP-PROMPT: Enter the date/time last used for this user DESCRIPTION: This is the date/time that the user last used this list. 100.21,3 AUTOLINK 2;0 VARIABLE POINTER Multiple #100.213 DESCRIPTION: This field is used to link the list with WARDs, ROOM-BEDs, PROVIDERs, TREATING SPECIALTYs, or CLINICs. This field points to the entry in the file where the link is to occur. When ADT movement occur for patients, they are added to the appropriate OE/RR lists as identified by the AUTOLINK field (via "AC" cross-ref). Lists with autolink providers are updated (patient added) when the PROVIDER link matches the entry at the PRIMARY CARE PHYSICIAN or ATTENDING PHYSICIAN prompts. 100.213,.01 AUTOLINK 0;1 VARIABLE POINTER FILE ORDER PREFIX LAYGO MESSAGE 42 1 W n WARD 405.4 2 R n ROOM-BED 200 3 P n PROVIDER 45.7 4 S n SPECIALTY 44 5 C n CLINIC SCREEN ON FILE 42: S DIC("S")="I '$$WINACT^ORLP3U1(+Y)" SCREEN EXPLANATION: ACTIVE WARDS SCREEN ON FILE 200: S DIC("S")="I $D(X),$D(^VA(200,""AK.PROVIDER"",$P(^(0),U))),$$ACTIVE^XUSER(+Y)" SCREEN EXPLANATION: Only active providers allowed SCREEN ON FILE 44: S DIC("S")="I $D(X),$P(^SC(+Y,0),U,3)=""C"",$$ACTLOC^ORWU(+Y)=1" SCREEN EXPLANATION: Searches for active CLINICs only. LAST EDITED: DEC 15, 1999 HELP-PROMPT: Enter the file and entry this list will be linked to for automatic patient updates during ADT patient movements and CLINIC enrollments. DESCRIPTION: Links for automatic patient addition/removal based on ADT movements and CLINIC enrollments. CROSS-REFERENCE: 100.213^B 1)= S ^OR(100.21,DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^OR(100.21,DA(1),2,"B",$E(X,1,30),DA) 3)= Required Index for Variable Pointer CROSS-REFERENCE: 100.21^AC 1)= S ^OR(100.21,"AC",$E(X,1,30),DA(1),DA)="" 2)= K ^OR(100.21,"AC",$E(X,1,30),DA(1),DA) Index allowing cross-referencing the list file by AUTOLINK. 100.213,1 PRIMARY OR ATTENDING 0;2 SET 'P' FOR primary; 'A' FOR attending; 'B' FOR both; LAST EDITED: APR 28, 1994 HELP-PROMPT: Answer with one of the above codes to link this provider to all patients for which he is their Primary Care physician, Attending physician or acts as either for all inpatients. DESCRIPTION: This field will determine how the Autolinks for Providers will work. If the field is set to; "P" - Primary: The autolink will add patients to the list that have the pointed to provider assigned to them thru the MAS options as PROVIDER. "A" - Attending: The autolink will add patients to the list that have the pointed to provider assigned to them thru the MAS options as ATTENDING PHYSICIAN. "B" - Both: The autolink will add patients to the list that have the pointed to provider assigned to them thru the MAS options as 'PROVIDER' and those patients that have the pointed to provider assigned to them as ATTENDING PHYSICIAN. TECHNICAL DESCR: To autolink patients to either PROVIDER, ATTENDING PHYSICIAN or both. SCREEN: S DIC("S")="I $P(^OR(100.21,DA(1),2,DA,0),U)[""VA(200""" EXPLANATION: Select how provider autolink will work. 100.21,10 MEMBER 10;0 VARIABLE POINTER Multiple #100.2101 HELP-PROMPT: Enter the members for this list. DESCRIPTION: The list member is an item on the list. The member for personal and team patient lists is a patient (if list type is P or T, this field points to the patient file.) 100.2101,.01 MEMBER 0;1 VARIABLE POINTER (Multiply asked) FILE ORDER PREFIX LAYGO MESSAGE 2 1 PT n PATIENT LAST EDITED: MAR 15, 2017 HELP-PROMPT: If the list is a personal or team patient list, enter the patient(s) you want associated with this list. DESCRIPTION: An item on the list, member is a patient if the list type is P or T. CROSS-REFERENCE: 100.2101^B 1)= S ^OR(100.21,DA(1),10,"B",$E(X,1,30),DA)="" 2)= K ^OR(100.21,DA(1),10,"B",$E(X,1,30),DA) 3)= Required Index for Variable Pointer CROSS-REFERENCE: 100.21^AB 1)= S ^OR(100.21,"AB",$E(X,1,30),DA(1),DA)="" 2)= K ^OR(100.21,"AB",$E(X,1,30),DA(1),DA) The "AB" cross-reference is used to look-up members (patients) on a list. CROSS-REFERENCE: ^^TRIGGER^100.21^12.1 1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^OR(100.21,D0,12)):^(12),1:"") S X=$P(Y(1), U,1),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(100.2101,.01,1,3,1.4) 1.4)= S DIH=$G(^OR(100.21,DIV(0),12)),DIV=X S $P(^(12),U,1)=DIV,DIH=100.21,DIG=12.1 D ^DICR 2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^OR(100.21,D0,12)):^(12),1:"") S X=$P(Y(1), U,1),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(100.2101,.01,1,3,2.4) 2.4)= S DIH=$G(^OR(100.21,DIV(0),12)),DIV=X S $P(^(12),U,1)=DIV,DIH=100.21,DIG=12.1 D ^DICR CREATE VALUE)= NOW DELETE VALUE)= NOW FIELD)= LAST UPDATED D/T The LAST UPDATED D/T (#12.1) will be triggered whenever a MEMBER (#.01) is added or removed from the MEMBER multiple (#100.2101). The triggered value will be NOW. 100.2101,1 VIEW DATE/TIME 0;2 DATE INPUT TRANSFORM:S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: SEP 04, 1990 HELP-PROMPT: Enter the Date/time this list was last viewed. DESCRIPTION: This is the date/time this item was last viewed. 100.2101,2 *NOTIFICATION SELECTION 100.9;0 POINTER Multiple #100.21019 LAST EDITED: DEC 01, 1997 HELP-PROMPT: Enter the notifications you want to receive. DESCRIPTION: This field is unused and will be deleted post-CPRS 1. 100.21019,.01 *NOTIFICATION SELECTION 0;1 POINTER TO OE/RR NOTIFICATIONS FILE (#100.9) (Multiply asked) LAST EDITED: DEC 01, 1997 HELP-PROMPT: Enter the notification(s) you want to receive for this patient. CROSS-REFERENCE:100.21019^B 1)= S ^OR(100.21,DA(2),10,DA(1),100.9,"B",$E(X,1,30),DA)="" 2)= K ^OR(100.21,DA(2),10,DA(1),100.9,"B",$E(X,1,30),DA) 100.21,11 VISIBILITY 11;1 SET (Required) PATIENT LIST VISIBILITY '0' FOR OWNER; '1' FOR ALLUSERS; LAST EDITED: NOV 15, 2007 HELP-PROMPT: This field is used as a means to control who can see this list. If it is set to 0, then only the owner can see it. If 1 then everybody can see it. The default is owner only. DESCRIPTION: This field is used as a means to control who can see this list and the patients that are contained within it. If it is set to 0, then only the owner can see it. If it is set to 1, then everybody can see it. The default is owner only. TECHNICAL DESCR: SET OF CODES 100.21,12.1 LAST UPDATED D/T 12;1 DATE INPUT TRANSFORM: S %DT="ETR" D ^%DT S X=Y K:X<1 X LAST EDITED: JUN 15, 2017 HELP-PROMPT: Enter the date/time the members on this list were last updated. DESCRIPTION: This is the date/time the members on this list were last updated. TECHNICAL DESCR: This field is set automatically via a trigger whenever a member is added or removed from this list. NOTES: TRIGGERED by the MEMBER field of the MEMBER sub-field of the OE/RR LIST File 100.21,12.2 CURATOR 12;2 VARIABLE POINTER FILE ORDER PREFIX LAYGO MESSAGE 810.4 1 REM n REMINDER LIST RULE LAST EDITED: MAR 15, 2017 HELP-PROMPT: Enter the package or entity that curates the members on this list. DESCRIPTION: This is the package or entity that is responsible for curating the members on this list. FILES POINTED TO FIELDS DEVICE (#3.5) DEVICE (#1.5) NEW PERSON (#200) CREATOR (#1.6) USER:USER (#.01) OE/RR LIST (#100.21) MEMBER:MEMBER (#.01) OE/RR NOTIFICATIONS (#100.9) *NOTIFICATION SELECTION:*NOTIFICATION SELECTION (#.01) REMINDER LIST RULE (#810.4) CURATOR (#12.2) INPUT TEMPLATE(S): PRINT TEMPLATE(S): ORAM TEAM LIST JUN 10, 2009@16:28 USER #0 Anticoagulation Team List SORT TEMPLATE(S): ORAM TEAM LIST JUL 06, 2011@11:51 USER #0 SORT BY: @NAME// (User is asked range) WITHIN NAME, SORT BY: @MEMBER// MEMBER SUB-FIELD: MEMBER// (MEMBER not null) This sort template identifies the list of Complext Anticoagulation patients. FORM(S)/BLOCK(S):