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):