ORQ11 ;slc/dcm-Get patient orders in context ;31-Dec-2012 10:30;PLS
Source file <ORQ11.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EXG | ; 5 -- Expiring | |
| AW | ; -- loop through "AW" x-ref | |
| CURX | ||
| SIG | ; 11 -- Unsigned | |
| AWIN | ;Jump in here to add active orders to AW context | |
| ACT | ; 6 -- Recent Activity (Order Summary) | |
| LPS1 | ; 22 -- secondary pass for Lapsed | |
| NEW | ; 19 -- New Orders, plus other unsigned orders by current provider | |
| VPU1 | ; 14 -- secondary pass for Verbal/Phone Unsigned | |
| UVC1 | ; 10 -- secondary pass for Unverified/Clerk ; Include if: unverified, released, inpt, not repl/canc/lapsed | |
| NW1 | ||
| FLG1 | ; 12 -- secondary pass for Flagged | |
| INPT() | ; -- Returns 1 or 0, if inpt order using X0=^OR(100,IFN,0) | |
| COM1 | ; 4 -- secondary pass for Completed/Expired | |
| LP1 | ; -- main secondary loop | |
| EXG1 | ; 5 -- secondary pass for Expiring | |
| AVT1 | ; 23 -- secondary pass for Active/Pending sts only | |
| VP1 | ; 13 -- secondary pass for Verbal/Phone | |
| CUR | ; 2 -- Active/Current | |
| PEN1 | ; 7 -- secondary pass for Pending | |
| CHTSUM | ; 21 -- secondary pass for Chart copy summary ; Included based on Nature of Order | |
| UVR1 | ; 8 -- secondary pass for Unverified ; Include if: unverified, released, inpt, not repl/canc/lapsed | |
| ALL1 | ; 1 -- secondary pass for All, Recent Orders, Unsigned | |
| HLD1 | ; 18 -- secondary pass for On Hold | |
| DC1 | ; 3 -- secondary pass for DC | |
| QUIT | ; -- stop | |
| CUR1 | ; 2 -- secondary pass for Active/Current | |
| UVN1 | ; 9 -- secondary pass for Unverified/Nurse ; Include if: unverified, released, inpt, not repl/canc/lapsed | |
| CHT1 | ; 20 -- secondary pass for Chart Review ; Include if: unverified, released, inpt, not repl/canc/lapsed | |
| LOOP | ; -- main loop through "ACT" x-ref | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DT | EXG+6 | 
| YMD^%DTC | CUR+3 | 
| ^DIC | EXG+5 | 
| $$LAPSED^OREVNTX | LP1+5 | 
| $$TYPE^OREVNTX | INPT+1 | 
| EXPD^ORQ12 | LOOP+2 | 
| GET^ORQ12 | ALL1+1, CURX, DC1+2, COM1+2, EXG1+2, PEN1+1, UVR1+2, UVN1+2, UVC1+2, FLG1+1 , VP1+2, VPU1+2, HLD1+1, NEW+5, CHT1+2, CHTSUM+7, CHTSUM+9, CHTSUM+10, LPS1+1, AVT1+1 | 
| GETEIE^ORQ12 | DC1+1 | 
| $$CHART^ORX1 | CHTSUM+7 | 
| $$FMADD^XLFDT | EXG+3 | 
| $$NOW^XLFDT | AWIN+2, AW+3, EXG+7 | 
| $$GET^XPAR | AW+11, CUR+3, NEW+8, CHTSUM+3 | 
| FileNo | Call Tags | 
|---|---|
| ^HOLIDAY - [#40.5] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^OR(100 - [#100] | AWIN+3, AWIN+4, AWIN+7, AW+4, AW+5, AW+8, AW+9, LP1+4, CUR+4, CUR+6 , CUR+7!, CUR+8!, CUR+9!, CUR1+2!, CUR1+4!, CUR1+5!, ACT+3, ACT+4, ACT+5, SIG+2 , SIG+3, SIG+4!, SIG+6, SIG+7!, FLG1+1, NEW+4, NEW+9, NEW+10, NEW+11, NEW+13 , CHTSUM+5 | 
| ^ORD(100.02 - [#100.02] | VP1+2, VPU1+2 | 
| ^ORD(100.98 - [#100.98] | CUR+2 | 
| ^TMP("ORGOTIT" | LOOP+3!, AWIN+4, AWIN+7, AW+1!, AW+5, AW+9, AW+12! | 
| ^TMP("ORNEW" | NEW+2, NEW+3, NEW+12 | 
| ^TMP("ORR" | AWIN+8*, AW+10*, CUR+14*, ACT+6*, SIG+9*, NW1* | 
| ^TMP("ORSORT" | AW+1!, AW+6*, AW+7, AW+8, AW+12! | 
| ^VA(200 - [#200] | NEW+7 | 
| ^XUSEC("ORES" | NEW+6 | 
| Name | Line Occurrences | 
|---|---|
| $$INPT | UVR1+2, UVN1+2, UVC1+2, CHT1+2 | 
| @( | LP1+8 | 
| AW | LOOP+1 | 
| AWIN | AW+11 | 
| CUR | EXG+8 | 
| CURX | CUR1+3 | 
| LP1 | AWIN+7, AW+9, CUR+13, ACT+5, SIG+8, NEW+14 | 
| NW1 | NEW+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | AWIN+4, AWIN+7, AW+8, AW+9, CUR+4, CUR+6, ACT+5 | 
| ^(3 | AWIN+4, AW+8, CUR+4, ACT+4, SIG+3, NEW+13 | 
| ^(5 | NEW+7 | 
| ^(7 | AWIN+7, AW+9 | 
| ^(8 | NEW+4, NEW+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | CUR+1~, CUR+3 | 
| %DT | EXG+1~, EXG+6* | 
| %H | CUR+1~, CUR+3* | 
| ACTOR | AWIN+1~, AWIN+7*, AW+2~, AW+9*, ALL1+1, CUR+1~, CUR+5*, CUR+6*, CUR+7, CUR+8 , CUR+9, CURX, DC1+1, DC1+2, COM1+2, EXG1+2, ACT+2~, ACT+5*, PEN1+1, UVR1+2 , UVN1+2, UVC1+2, SIG+1~, SIG+6*, SIG+7, FLG1+1, VP1+2, VPU1+2, HLD1+1, NEW+1~ , NEW+3*, NEW+4, NEW+5, NEW+11*, NEW+12, NEW+13, CHT1+2, CHTSUM+7, CHTSUM+9, CHTSUM+10 , LPS1+1, AVT1+1 | 
| >> DETAIL | ALL1+1, CURX, DC1+1, DC1+2, COM1+2, EXG1+2, PEN1+1, UVR1+2, UVN1+2, UVC1+2 , FLG1+1, VP1+2, VPU1+2, HLD1+1, NEW+5, CHT1+2, CHTSUM+7, CHTSUM+9, CHTSUM+10, LPS1+1 , AVT1+1 | 
| >> DGPMT | CUR+2 | 
| DIC | EXG+1~, EXG+4* | 
| DT | EXG+3 | 
| DUZ | NEW+6, NEW+7, NEW+14 | 
| >> EDATE | AWIN+3, AW+3*, AW+4, AW+11*, CUR+4, ACT+3, SIG+2, NEW+9 | 
| >> FLG | LOOP+2, AWIN+7, LP1+4, LP1+6, LP1+7, DC1+1 | 
| >> GETKID | LP1+4 | 
| >> GROUP | CUR+2 | 
| IFN | AWIN+1~, AWIN+4*, AWIN+7, AW+2~, AW+5*, AW+6, AW+8*, AW+9, ALL1+1, CUR+1~ , CUR+4*, CUR+6, CUR+7, CUR+8, CUR+9, CUR1+2, CUR1+4, CUR1+5, CURX, DC1+1 , DC1+2, COM1+2, EXG1+2, ACT+2~, ACT+4*, ACT+5, PEN1+1, UVR1+2, UVN1+2, UVC1+2 , SIG+1~, SIG+2*, SIG+3, SIG+4, SIG+6, SIG+7, FLG1+1, VP1+2, VPU1+2, HLD1+1 , NEW+1~, NEW+2*, NEW+3, NEW+4, NEW+5, NEW+10*, NEW+11, NEW+12, NEW+13, CHT1+2 , CHTSUM+5, CHTSUM+7, CHTSUM+9, CHTSUM+10, LPS1+1, AVT1+1 | 
| >> MULT | AWIN+4, AWIN+7, AW+5 | 
| NAT | CHTSUM+2~, CHTSUM+5*, CHTSUM+6*, CHTSUM+7 | 
| NORX | CUR+1~, CUR+2*, CUR1+6 | 
| NOW | AWIN+1~, AWIN+2*, AW+2~, AW+3*, COM1+2, EXG+1~, EXG+7*, EXG1+2 | 
| OACT | CUR+1~ | 
| OIEN | CUR+1~ | 
| ORDT | EXG+1~, EXG+3*, EXG+4 | 
| ORDW | EXG+1~, EXG+2, EXG+3* | 
| ORENT | NEW+1~, NEW+7*, NEW+8 | 
| >> ORGRP( | AWIN+3, AW+4, CUR+5, ACT+4, SIG+5 | 
| ORHOL | EXG+1~, EXG+2, EXG+5* | 
| >> ORLIST | AWIN+8, AW+10, ALL1+1, CUR+14, CURX, DC1+1, DC1+2, COM1+2, EXG1+2, ACT+6 , PEN1+1, UVR1+2, UVN1+2, UVC1+2, SIG+9, FLG1+1, VP1+2, VPU1+2, HLD1+1, NEW+5 , NW1, CHT1+2, CHTSUM+7, CHTSUM+9, CHTSUM+10, LPS1+1, AVT1+1 | 
| >> ORLST | AWIN+8, AW+10, CUR+14, ACT+6, SIG+9, NW1 | 
| ORNATR | VP1+1~*, VP1+2, VPU1+1~*, VPU1+2 | 
| ORNG | EXG+1~, EXG+2*, EXG+3, EXG+6 | 
| ORPAR | NEW+1~, NEW+8*, NEW+9, NEW+14 | 
| >> ORWARD | CUR+2 | 
| >> PAT | AWIN+3, AWIN+4, AWIN+7, AW+4, AW+5, AW+9, CUR+4, CUR+6, CUR+7, CUR+8 , CUR+9, CUR1+2, CUR1+4, CUR1+5, ACT+3, ACT+4, ACT+5, SIG+2, SIG+4, SIG+6 , SIG+7, NEW+9, NEW+10, NEW+11 | 
| >> SDATE | AWIN+2, AW+3*, AW+4, AW+11*, CUR+4, ACT+3, SIG+1, NEW+9 | 
| STOP | CUR1+1~*, CUR1+5, COM1+1~*, COM1+2, EXG1+1~*, EXG1+2 | 
| STS | LP1+1~, LP1+3*, LP1+5, CUR1+2, CUR1+4, CUR1+5, DC1+2, COM1+2, EXG1+2, PEN1+1 , UVR1+2, UVN1+2, UVC1+2, HLD1+1, CHT1+2, LPS1+1, AVT1+1 | 
| TAG | LP1+2~, LP1+6*, LP1+7*, LP1+8 | 
| TM | AWIN+1~, AWIN+2*, AWIN+3*, AWIN+4, AWIN+7, AW+2~, AW+4*, AW+5, AW+6, AW+7* , AW+8, CUR+1~, CUR+4*, CUR+6, CUR+7, CUR+8, CUR+9, CUR1+2, CUR1+4, CUR1+5 , ACT+2~, ACT+3*, ACT+4, ACT+5, SIG+1~*, SIG+2*, SIG+4, SIG+6, SIG+7, NEW+1~ , NEW+9*, NEW+10, NEW+11 | 
| TMW | EXG+1~, EXG+7*, EXG1+2 | 
| TO | AWIN+1~, AWIN+3*, AWIN+4, AWIN+7, AW+2~, AW+3*, AW+4*, AW+5, AW+6, AW+7* , AW+8, AW+9 | 
| U | AWIN+7, AW+9, LP1+3, LP1+4, LP1+5, CUR+5, CUR+7, CUR+8, CUR+9, CUR1+1 , CUR1+3, CUR1+4, CUR1+5, CUR1+6, COM1+1, EXG1+1, ACT+4, ACT+5, UVR1+2, UVN1+2 , UVC1+2, INPT+1, SIG+5, SIG+7, VP1+1, VP1+2, VPU1+1, VPU1+2, NEW+14, CHT1+2 , CHTSUM+5, CHTSUM+6 | 
| USTS | AWIN+1~, AW+2~ | 
| X | AWIN+1~, AW+2~, LP1+5*, CUR+1~, CUR+3*, EXG+1~, EXG+4*, EXG+6* | 
| X0 | AWIN+1~, AWIN+4*, AW+2~, AW+8*, AW+9, LP1+5, CUR+1~, CUR+4*, CUR+5, CUR1+1 , CUR1+6, COM1+1, EXG1+1, ACT+2~, ACT+4*, INPT+1, SIG+1~, SIG+3*, SIG+4, SIG+5 , NEW+1~, NEW+13* | 
| X1 | CUR+1~, CUR+3* | 
| X2 | CUR+1~, CUR+3* | 
| X3 | AWIN+1~, AWIN+4*, AW+2~, AW+8*, LP1+3, LP1+4, CUR+1~, CUR+3*, CUR+4*, CUR+9 , ACT+2~, ACT+4*, SIG+1~, SIG+3*, NEW+1~, NEW+13* | 
| X7 | AWIN+1~, AWIN+7*, AW+2~, AW+9*, CHTSUM+9 | 
| X8 | AWIN+1~, AWIN+7*, AW+2~, AW+9*, CUR+1~, CUR+6*, CUR+7, CUR+8, CUR+9, CUR1+3 , ACT+2~, ACT+5*, UVR1+2, UVN1+2, UVC1+2, VP1+1, VPU1+1, VPU1+2, NEW+1~, NEW+13* , NEW+14, CHT1+2, CHTSUM+6 | 
| XP | CHTSUM+2~, CHTSUM+3*, CHTSUM+4, CHTSUM+8 | 
| >> XREF | LOOP+1 | 
| Y | EXG+1~, EXG+5, EXG+7 | 
| YD | CUR+1~, CUR+3*, CUR+8, CUR1+4, CUR1+5 |