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 |