Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^OR(100.21

Package: Order Entry Results Reporting

Global: ^OR(100.21


Information

FileMan FileNo FileMan Filename Package
100.21 OE/RR LIST Order Entry Results Reporting

Description

Directly Accessed By Routines, Total: 46

Package Total Routines
Order Entry Results Reporting 33 *NOTIFICATION SELECTION    AUTOLINK    MEMBER    ORB31    ORB3C1    ORB3C2    ORB3REG    ORB3SPEC
ORB3USER    ORLA1    ORLP    ORLP0    ORLP1    ORLP2    ORLP3U2    ORLPAUT0
ORLPL    ORLPR    ORLPR0    ORLPTU    ORLPURG    ORQPT    ORQPT1    ORQPTQ1
ORQPTQ11    ORQPTQ5    ORU1    ORWPT    ORWTPL    ORWTPT    ORY44C    USER
^OR(100.21    
Registration 4 DGQPT    DGQPT1    DGQPTQ1    DGQPTQ5    
Adverse Reaction Tracking 2 GMRASEN2    GMRASEND    
IHS Electronic Health Record 2 BEHOPTP1    BEHOPTP3    
Care Management 1 ORRCTSK    
Clinical Reminders 1 PXRMLPOE    
IHS Patient Merge 1 BPMXVP    
Local Area Programs 1 AZAXDPM2    
Toolkit 1 XUCT01    

Accessed By FileMan Db Calls, Total: 15

Package Total Routines
Order Entry Results Reporting 12 ORLP    ORLP0    ORLP1    ORLP2    ORLP3U2    ORLPL    ORLPR    ORLPURG
ORLSTVIZ    ORQPTQ1    ORWTPL    ORY44C    
Health Summary 1 GMTSXAW3    
IHS Electronic Health Record 1 BEHOPTP3    
Registration 1 DGQPTQ1    

Pointed To By FileMan Files, Total: 5

Package Total FileMan Files
Clinical Reminders 1 REMINDER REPORT TEMPLATE(#810.1)[#810.17(.01)]    
Consult Request Tracking 1 REQUEST SERVICES(#123.5)[#123.53(.01), #123.54(2), #123.57(.01), #123.58(.01)]    
Kernel 1 NEW PERSON(#200)[101.02]    
Order Entry Results Reporting 1 OE/RR PT SEL COMBO(#100.24)[#100.241(.01)]    
Toolkit 1 PARAMETERS(#8989.5)[.01]    

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
Registration 4 ROOM-BED(#405.4)[#100.213(.01)]    WARD LOCATION(#42)[#100.213(.01)]    FACILITY TREATING SPECIALTY(#45.7)[#100.213(.01)]    VA PATIENT(#2)[#100.2101(.01)]    
Kernel 2 DEVICE(#3.5)[1.5]    NEW PERSON(#200)[1.6, #100.212(.01), #100.213(.01)]
Order Entry Results Reporting 1 OE/RR NOTIFICATIONS(#100.9)[#100.21019(.01)]    
Scheduling 1 HOSPITAL LOCATION(#44)[#100.213(.01)]    

Fields, Total: 11

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • 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 options. "
  • 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 ^DICR:$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 ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= $E(UPPERCASE(NAME),1,30)
    DELETE VALUE)= @
    FIELD)= UPPER CASE
.1 UPPER CASE 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • 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.
1 TYPE 0;2 SET
************************REQUIRED FIELD************************
  • '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 ^DICR:$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=DIV 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.





1.5
DEVICE
0;4
POINTER TO DEVICE FILE (#3.5)
DEVICE(#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.





1.6
CREATOR
0;5
POINTER TO NEW PERSON FILE (#200)
NEW PERSON(#200)
  • 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





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





1.7
SUBSCRIBE
0;6
SET

  • 'Y' FOR YES;
  • 'N' FOR NO;
  • LAST EDITED:  AUG 11, 1999
  • 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 type.





2
USER
1;0
POINTER Multiple #100.212 
100.212
  • 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.





3
AUTOLINK
2;0
VARIABLE POINTER  Multiple #100.213
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.





10
MEMBER
10;0
VARIABLE POINTER  Multiple #100.2101
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.)





11
VISIBILITY
11;1
SET 

************************REQUIRED FIELD************************
  • '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







External References







Name
Field # of Occurrence




^%DT
1.65+1




^DICR
.01(XREF 2n1.4), .01(XREF 2n2.4), 1(XREF 1n1.4), 1(XREF 2n1.4)








Global Variables Directly Accessed







Name
Line Occurrences  (* Changed,  ! Killed)




^DD(
.01(XREF 2n1.4), .01(XREF 2n2.4), 1(XREF 1n1.4), 1(XREF 2n1.4)




^DD(100.21
.01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 2S)




^OR(100.21 - [#100.21]
.01+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), .1(XREF 1S), .1(XREF 1K), 1(XREF 1S)
, 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4)		




^VA(200 - [#200]
1(XREF 1n1.3)








Naked Globals







Name
Field # of Occurrence




^(0
.01(XREF 2S), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4)








Local Variables




  

    
Legend:

    

      
        

           >> 
           Not killed explicitly
          

           * 
          Changed
          

           ! 
          Killed
          

          ~
          Newed
        

      
    

    

  





Name
Field # of Occurrence




>> %DT
1.65+1*




>> D0
.01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 2S)




>> DA
.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .1(XREF 1S), .1(XREF 1K), 1(XREF 1n1.3), 1(XREF 2S)




>> DIG
.01(XREF 2n1.4), .01(XREF 2n2.4), 1(XREF 1n1.4), 1(XREF 2n1.4)




>> DIH
.01(XREF 2n1.4), .01(XREF 2n2.4), 1(XREF 1n1.4), 1(XREF 2n1.4)




>> DIU
.01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 2S)




DIV
.01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4)





DIV(0
.01(XREF 2S), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4)




DT
1(XREF 2S)




DUZ
1(XREF 1S)




U
.01(XREF 2S), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4)




X
.01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2n1.4), .01(XREF 2K), .01(XREF 2n2.4), .1+1!, .1(XREF 1S)
, .1(XREF 1K), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 1n1.4), 1(XREF 2S), 1(XREF 2n1.4), 1.65+1*!		




>> XQY0
.01DEL123.5+1




Y
.01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 2S), 1.65+1




Y(0
1(XREF 1n1.3), 1(XREF 2S)




Y(1
.01(XREF 2S), .01(XREF 2n1.1), .01(XREF 2K), 1(XREF 1S), 1(XREF 1n1.3), 1(XREF 2S)




Y(2
.01(XREF 2n1.1)








    



Info | 
Desc | 
Directly Accessed By Routines | 
Accessed By FileMan Db Calls | 
Pointed To By FileMan Files | 
Pointer To FileMan Files | 
Fields | 
External References | 
Global Variables Directly Accessed | 
Naked Globals | 
Local Variables | 
All