Routine: ORWDLR32

Package	Total	Call Graph
Lab Service	2	($$DEFURG,TEST)^LR7OR3 $$ON^LR7OV4
Order Entry Results Reporting	2	DG^ORCHANG1 GETQLST^ORWDXQ
Pharmacy Data Management	1	AP^PSS51P1
Toolkit	1	($$GET,GETLST)^XPAR
VA Fileman	1	C^%DTC

Entry Points

Name	Comments	DBIA/ICR reference
SHORT	; from DEF, get short list of lab quick orders
SCHED	; return list of schedules available for lab tests
DOWNAME(DOW)	; function ; Returns Day of Week name (DOW should be $H#7)
COLLTYP	; Collection Types in effect for this division
DEF(LST,ALOC,ADIV)	; procedure ; For Event Delay Order ; ALOC: Delay Event's default location ; ADIV: Delay Event's default division ; get dialog definition specific to lab
NXT()	; called by TESTINFO, increments ILST
ONESPEC(LST,IEN)	;return one specimen
INCDATE(ADATE)	; called from COLLTM, increments date nodes in .ADATE
WCOLLTM	; get Ward Collect times
LCOLLTM	; get collection times
SENDTM	; get send patient times
ALLSAMP(LST)	; procedure ; returns all collection samples ; n^SampIEN^SampName^SpecPtr^TubeTop^^^LabCollect^^SpecName
ABBSPEC(LST)	; procedure ; returns specimens with abbreviation (uses 'E' xref)
ONESAMP(LST,IEN)	;Return data for one colelction sample ; n^SampIEN^SampName^SpecPtr^TubeTop^^^LabCollect^^SpecName
LOAD(LST,TESTID)	; procedure ; Return sample, specimen, & urgency info about a lab test
URGENCY	; return default urgency for lab
COMMON	; return list of commonly ordered lab tests

External References

Name	Field # of Occurrence
C^%DTC	INCDATE+2
$$DEFURG^LR7OR3	URGENCY+2
TEST^LR7OR3	LOAD+14
$$ON^LR7OV4	COLLTYP+5
DG^ORCHANG1	SHORT+3
GETQLST^ORWDXQ	SHORT+7
AP^PSS51P1	SCHED+3
$$GET^XPAR	LCOLLTM+4, LCOLLTM+5, LCOLLTM+6, LCOLLTM+7, LCOLLTM+8, LCOLLTM+9, LCOLLTM+10, LCOLLTM+11, LCOLLTM+12, COLLTYP+6
GETLST^XPAR	LCOLLTM+17, LCOLLTM+18, COMMON+2

Used in RPC

RPC Name	Call Tags
ORWDLR32 DEF	DEF
ORWDLR32 LOAD	LOAD
ORWDLR32 ALLSAMP	ALLSAMP
ORWDLR32 ABBSPEC	ABBSPEC
ORWDLR32 ONE SAMPLE	ONESAMP
ORWDLR32 ONE SPECIMEN	ONESPEC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HOLIDAY - [#40.5]	LCOLLTM+13, LCOLLTM+15
^LAB(60 - [#60]	LOAD+8, LOAD+9
^LAB(61 - [#61]	LOAD+35, ALLSAMP+10, ONESAMP+8, ONESPEC+1, ONESPEC+2, ABBSPEC+3, ABBSPEC+4
^LAB(62 - [#62]	ALLSAMP+5, ALLSAMP+6, ALLSAMP+7, ONESAMP+5
^LAB(62.05 - [#62.05]	URGENCY+3, URGENCY+4
^ORD(100.98 - [#100.98]	SHORT+2, SHORT+6
^ORD(101.43 - [#101.43]	COMMON+5, LOAD+3, LOAD+8, LOAD+11, LOAD+12, LOAD+13
^TMP($J	LCOLLTM+34*, WCOLLTM+2, WCOLLTM+3, WCOLLTM+6!, SCHED+2!, SCHED+4, SCHED+5, SCHED+6, SCHED+7, SCHED+11!

Label References

Name	Line Occurrences
$$DOWNAME	LCOLLTM+26, LCOLLTM+29
$$NXT	DEF+6, DEF+7, DEF+8, DEF+9, DEF+10, DEF+11, DEF+12, DEF+13, SHORT+9, LCOLLTM+20 , LCOLLTM+33, LCOLLTM+37, WCOLLTM+3, WCOLLTM+4, SENDTM+2, SENDTM+4, COLLTYP+2, COLLTYP+3, COLLTYP+4, COLLTYP+5 , COLLTYP+7, URGENCY+3, URGENCY+4, SCHED+9, SCHED+10, COMMON+5, LOAD+4, LOAD+5, LOAD+6, LOAD+7 , LOAD+11, LOAD+12, LOAD+16, LOAD+18, LOAD+20, LOAD+22, LOAD+24, LOAD+26, LOAD+28, LOAD+29 , LOAD+30, LOAD+31, LOAD+37, ALLSAMP+4, ALLSAMP+12, ALLSAMP+13, ALLSAMP+14, ONESAMP+4, ONESAMP+10, ONESAMP+11 , ONESAMP+12, ABBSPEC+4
COLLTYP	DEF+10
COMMON	DEF+13
INCDATE	LCOLLTM+3, LCOLLTM+14, LCOLLTM+16
LCOLLTM	DEF+7
SCHED	DEF+12
SENDTM	DEF+9
SHORT	DEF+6
URGENCY	DEF+11
WCOLLTM	DEF+8

Naked Globals

Name	Field # of Occurrence
^(	LOAD+12, ABBSPEC+3
^(0	LOAD+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%H	INCDATE+1~
A	SHORT+1~, SHORT+8*, SHORT+9
ADATE	INCDATE~, INCDATE+2*
ADATE("DOW"	INCDATE+4*
ADATE("H"	INCDATE+3*, INCDATE+4
ADATE("TX"	INCDATE+5*
ADIV	DEF~, LCOLLTM+17
ALOC	DEF~, LCOLLTM+4, COLLTYP+6
AMPM	LCOLLTM+1~, LCOLLTM+30*, LCOLLTM+33, LCOLLTM+34
CNT	LCOLLTM+1~, LCOLLTM+13, LCOLLTM+14, LCOLLTM+15, LCOLLTM+16
DAY	LCOLLTM+1~, LCOLLTM+24, LCOLLTM+25, LCOLLTM+26, LCOLLTM+29, LCOLLTM+33, LCOLLTM+34
DOW	LCOLLTM+1~, DOWNAME~, DOWNAME+2, DOWNAME+3, DOWNAME+4, DOWNAME+5, DOWNAME+6, DOWNAME+7, DOWNAME+8
DOW(	LCOLLTM+13, LCOLLTM+15
DOW(0	LCOLLTM+6*
DOW(1	LCOLLTM+7*
DOW(2	LCOLLTM+8*
DOW(3	LCOLLTM+9*
DOW(4	LCOLLTM+10*
DOW(5	LCOLLTM+11*
DOW(6	LCOLLTM+12*
DT	LCOLLTM+2
DUZ(2	COLLTYP+5
FREQ	SCHED+1~, SCHED+7*, SCHED+8, SCHED+9
I	SHORT+1~, SHORT+2, SHORT+3, SHORT+4, SHORT+5, SHORT+6, SHORT+7, WCOLLTM+1, WCOLLTM+2, WCOLLTM+3 , COMMON+1~, COMMON+3, COMMON+4, LOAD+2~, LOAD+12, LOAD+27, LOAD+28, LOAD+29, LOAD+30, LOAD+31 , LOAD+34, LOAD+36, LOAD+37
ICTM	LCOLLTM+1~, LCOLLTM+21*, LCOLLTM+22, LCOLLTM+30, LCOLLTM+31, LCOLLTM+32
IEN	SCHED+1~, SCHED+5, SCHED+6, SCHED+7, SCHED+9, SCHED+10, COMMON+1~, COMMON+4, COMMON+5, ALLSAMP+3~ , ALLSAMP+6, ALLSAMP+7, ALLSAMP+8, ONESAMP~, ONESAMP+3, ONESAMP+5, ONESAMP+6, ONESPEC~, ONESPEC+1, ONESPEC+2 , ABBSPEC+2~, ABBSPEC+3, ABBSPEC+4
IGNOR	LCOLLTM+1~, LCOLLTM+5*, LCOLLTM+13, LCOLLTM+15
ILST	DEF+5, LCOLLTM+34, LOAD+2~, LOAD+3, LOAD+10, LOAD+33, LOAD+35, ALLSAMP+3~, ALLSAMP+4, ONESAMP+2~ , ONESAMP+4, ABBSPEC+2~, NXT+1, NXT+2
J	LOAD+2~, LOAD+36*, LOAD+37
LST	DEF~, LOAD~, ALLSAMP~, ONESAMP~, ONESPEC~, ONESPEC+2*, ABBSPEC~
LST(	DEF+6, DEF+7, DEF+8, DEF+9, DEF+10, DEF+11, DEF+12, DEF+13, SHORT+9, LCOLLTM+20 , LCOLLTM+33, LCOLLTM+37, WCOLLTM+3, WCOLLTM+4, SENDTM+2, SENDTM+4, COLLTYP+2, COLLTYP+3, COLLTYP+4, COLLTYP+5 , COLLTYP+7, URGENCY+3, URGENCY+4, SCHED+9, SCHED+10, COMMON+5, LOAD+4, LOAD+5, LOAD+6, LOAD+7 , LOAD+10, LOAD+11, LOAD+12, LOAD+16, LOAD+18, LOAD+20, LOAD+22, LOAD+24, LOAD+26, LOAD+28 , LOAD+29, LOAD+30, LOAD+31, LOAD+33, LOAD+35, LOAD+37, ALLSAMP+4, ALLSAMP+12, ALLSAMP+13, ALLSAMP+14 , ONESAMP+4, ONESAMP+10, ONESAMP+11, ONESAMP+12, ABBSPEC+4*
ORCTM	LCOLLTM+1~, LCOLLTM+17, LCOLLTM+18
ORCTM(	LCOLLTM+21, LCOLLTM+22, LCOLLTM+30, LCOLLTM+31, LCOLLTM+32
ORDG	SHORT+1~, SHORT+3
ORDG(	SHORT+5
ORLABID	LOAD+2~, LOAD+3*, LOAD+7
ORLST	COMMON+1~, COMMON+2
ORLST(	COMMON+3, COMMON+4
ORTMP	SHORT+1~, SHORT+7, SHORT+10!
ORTMP(	SHORT+8, SHORT+9
ORY	LOAD+2~, LOAD+14
ORY(	LOAD+15, LOAD+27, LOAD+28, LOAD+29, LOAD+30, LOAD+31, LOAD+34, LOAD+36, LOAD+37
ORY("Default	CollSamp" , LOAD+20, Urgency" , LOAD+24
ORY("Lab Coll	Samp" , LOAD+26, LOAD+33
ORY("ReqCom"	LOAD+18
ORY("Unique C	ollSamp" , LOAD+22
PARAM	LOAD+2~, LOAD+15*, LOAD+16, LOAD+17, LOAD+19, LOAD+21, LOAD+23, LOAD+25, LOAD+27, LOAD+28 , LOAD+29, LOAD+30, LOAD+31, LOAD+32, LOAD+34, LOAD+36, LOAD+37
SMP	ALLSAMP+3~, ALLSAMP+5*, ALLSAMP+6, ALLSAMP+8
SPC	ALLSAMP+3~, ALLSAMP+14, ONESAMP+2~, ONESAMP+12
SPC(	ALLSAMP+11, ALLSAMP+14, ONESAMP+9, ONESAMP+12
TDAY	LCOLLTM+1~, LCOLLTM+2*, LCOLLTM+3, LCOLLTM+13, LCOLLTM+14
TDAY("DOW"	LCOLLTM+2*, LCOLLTM+13, LCOLLTM+26
TDAY("H"	LCOLLTM+2*, LCOLLTM+24, LCOLLTM+25, LCOLLTM+26
TDAY("TX"	LCOLLTM+2*, LCOLLTM+23
TESTID	LOAD~, LOAD+3, LOAD+8, LOAD+11, LOAD+12, LOAD+13*
TIME	LCOLLTM+1~, LCOLLTM+32*, LCOLLTM+33, LCOLLTM+34
TMRW	LCOLLTM+1~, LCOLLTM+3*, LCOLLTM+15, LCOLLTM+16
TMRW("DOW"	LCOLLTM+15, LCOLLTM+29
TMRW("H"	LCOLLTM+29
TMRW("TX"	LCOLLTM+28
TXDT	LCOLLTM+1~, LCOLLTM+23, LCOLLTM+28, LCOLLTM+31*, LCOLLTM+33, LCOLLTM+34
TYPE	SCHED+1~, SCHED+6*, SCHED+8, SCHED+9
U	LCOLLTM+22, LCOLLTM+30, LCOLLTM+32, LCOLLTM+33, LCOLLTM+34, URGENCY+3, URGENCY+4, SCHED+6, SCHED+9, SCHED+10 , COMMON+4, COMMON+5, LOAD+3, LOAD+8, LOAD+9, LOAD+10, LOAD+13, LOAD+31, LOAD+33, LOAD+34 , LOAD+35, ALLSAMP+8, ALLSAMP+9, ALLSAMP+10, ALLSAMP+11, ALLSAMP+14, ONESAMP+6, ONESAMP+7, ONESAMP+8, ONESAMP+9 , ONESAMP+12, ONESPEC+2, ABBSPEC+4
URG	URGENCY+1~, URGENCY+2*, URGENCY+3, URGENCY+4
X	INCDATE+1~, INCDATE+2, SCHED+1~, SCHED+4, SCHED+5, SCHED+9, SCHED+10, LOAD+2~, LOAD+3, LOAD+5 , LOAD+34, LOAD+35, ALLSAMP+3~, ALLSAMP+8, ALLSAMP+10, ALLSAMP+11, ALLSAMP+12, ONESAMP+2~, ONESAMP+6, ONESAMP+8* , ONESAMP+9, ONESAMP+10, ABBSPEC+2~, ABBSPEC+3*
X0	SCHED+1~, ALLSAMP+3~, ALLSAMP+7, ALLSAMP+8, ALLSAMP+9, ALLSAMP+10, ONESAMP+2~, ONESAMP+5, ONESAMP+6, ONESAMP+7 , ONESAMP+8
X1	INCDATE+1~, INCDATE+2, LOAD+2~, LOAD+8, LOAD+9, LOAD+14
X2	INCDATE+1~, INCDATE+2*
X4	LOAD+2~, LOAD+9*, LOAD+10
Y	COLLTYP+1~, COLLTYP+6, COLLTYP+7

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWDLR32

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: