Routine: ORWRP16

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ($$DEL,$$FTG)^%ZISH
Lab Service	2	(CLEAN,OERR,SET)^LRAPS3 (CLEAN,OERR,SET)^LRBLPD1
Order Entry Results Reporting	2	PQ^ORPRS13 @(^ORPRS14
Toolkit	1	GETLST^XPAR
VA Fileman	1	C^%DTC

Entry Points

Name	Comments	DBIA/ICR reference
HSB(ORDFN,ORHS)	; - build health summary report
NOTYET(ROOT)	; -- standard not available display text
RPTLIST	; -- list of reports
VITALSB(DFN,DTRANGE,ORTAG)	; -- build vitals report
RPT(ROOT,DFN,RPTID,HSTYPE,DTRANGE,SECTION)	; -- return report text ; RPC: ORWRP REPORT TEXT ; See RPC definition for details on input and output parameters
FINAL	; -- set 'x of y' for each section
SETITEM(ROOT,X)	; -- set item in list
BL(ORDFN)	; -- get blood bank report
CLOSE(ORRM,ORHFS,ORSUB,ORIO)	; -- close WORKSTATION device ; ORSUB: unique subscript name for output
RPTQ
GETDT(ROOT,EOF)	; -- get date range choices
VITALS(DFN,DTRANGE,ORTAG)	; -- get vitals report
INIT	; -- initialize counts and global section
HFS()	; -- get hfs file name ; -- need to define better unique algorithm
GETHS(ROOT,EOF)	; --get list of health summary types
BLB(ORDFN)	; -- build blood bank report
DTLIST	; -- list of date ranges
DIETB(DFN)	; -- get dietetics profile
PATHB(ORDFN)	; -- build anatomic path report
BUILD	; -- build tmp global for report
OPEN(ORRM,ORHFS,ORMODE,ORIO)	; -- open WORKSTATION device ; ORRM: right margin ; ORHFS: host file name ; ORMODE: open file in 'R'ead or 'W'rite mode
PATH(ORDFN)	; -- get anatomic path report
USEHFS	; -- use host file to build global array
LIST(ROOT)	; -- return lists for list boxes ; RPC: ORWRP REPORT LIST ; See RPC definition for details on input and output parameters
DIET(ROOT,DFN)	; -- get dietetics profile
HS(ORDFN,ORHS)	; - get health summary report
GETRPTS(ROOT,EOF)	; -- get list of reports

External References

Name	Field # of Occurrence
C^%DTC	VITALSB+7
^%ZIS	OPEN+7
^%ZISC	CLOSE+2
$$DEL^%ZISH	USEHFS+9
$$FTG^%ZISH	USEHFS+4
CLEAN^LRAPS3	PATHB+7
OERR^LRAPS3	PATHB+6
SET^LRAPS3	PATHB+3
CLEAN^LRBLPD1	BLB+7
OERR^LRBLPD1	BLB+6
SET^LRBLPD1	BLB+3
PQ^ORPRS13	HSB+5
@(^ORPRS14	VITALSB+9
GETLST^XPAR	GETHS+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Dietetics Profile not yet available." Line Location: DIETB+1
Function Call: READ	Timeout: 5 Variable: X Line Location: BUILD+6
Routine Call	%ZIS Line Location: OPEN+7

Used in RPC

RPC Name	Call Tags
ORWRP16 REPORT TEXT	RPT
ORWRP16 REPORT LISTS	LIST

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142 - [#142]	HSB+3
^TMP(	INIT+2, FINAL+2*
^TMP("ORDATA"	RPT+4, RPT+5, RPT+8!, RPT+9
^TMP($J	LIST+5, USEHFS+3!, USEHFS+4, USEHFS+6!, BUILD+5

Label References

Name	Line Occurrences
$$HFS	HS+2, BL+2, PATH+2, VITALS+2
BL	RPT+13
BLB	BL+5
BUILD	USEHFS+5
CLOSE	HS+7, BL+7, PATH+7, VITALS+7
DIET	RPT+15
FINAL	BUILD+11
GETDT	LIST+13
GETHS	LIST+11
GETRPTS	LIST+9
HS	RPT+12
HSB	HS+5
INIT	BUILD+3, BUILD+7
NOTYET	RPT+20, DIET+1
OPEN	HS+3, BL+3, PATH+3, VITALS+3
PATH	RPT+14
PATHB	PATH+5
RPTQ	RPT+4, RPT+12, RPT+13, RPT+14, RPT+15, RPT+16, RPT+17
SETITEM	GETRPTS+2, GETRPTS+3, GETHS+4, GETHS+5, GETHS+6, GETDT+2, GETDT+3, NOTYET+1
USEHFS	CLOSE+4
VITALS	RPT+16, RPT+17
VITALSB	VITALS+5

Naked Globals

Name	Field # of Occurrence
^(	BUILD+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	OPEN+7!
%ZIS("HFSMODE"	OPEN+6*
%ZIS("HFSNAME"	OPEN+6*
CNT	BUILD+1~, BUILD+7, BUILD+10, INIT+1
DFN	RPT~, RPT+12, RPT+13, RPT+14, RPT+15, RPT+16, RPT+17, BLB+1~, BLB+5, PATHB+1~ , PATHB+5, DIET~, DIETB~, VITALS~, VITALS+5, VITALSB~, VITALSB+3
DT	VITALSB+4, VITALSB+8
DTRANGE	RPT~, RPT+16, RPT+17, VITALS~, VITALS+5, VITALSB~, VITALSB+6
EOF	LIST+4~, LIST+5*, LIST+9, LIST+11, LIST+13, GETRPTS~, GETRPTS+3, GETHS~, GETHS+6, GETDT~ , GETDT+3
GMTYP	HSB+1~
GMTYP(0	HSB+4*
GMTYP(1	HSB+4*
HSPARM	GETHS+1~, GETHS+2
HSPARM(	GETHS+5
HSTYPE	RPT~, RPT+12
I	GETRPTS+1~, GETRPTS+3, GETHS+1~, GETHS+5, GETDT+1~, GETDT+3, FINAL+1~, FINAL+2
INC	BUILD+1~, BUILD+9, INIT+1
IO	OPEN+8, CLOSE+2, CLOSE+3, CLOSE+5, USEHFS+1~
IOP	OPEN+5*, OPEN+7!
IOPAR	OPEN+4!
LN	BUILD+1~, BUILD+5*
MAX	BUILD+1~, BUILD+2*, BUILD+7
ORARR	USEHFS+8~, USEHFS+9
ORARR(	USEHFS+8*
ORDFN	HS~, HS+5, HSB~, HSB+2, BL~, BL+5, BLB~, BLB+5, PATH~, PATH+5 , PATHB~, PATHB+5
>> OREND	BLB+4, PATHB+4
ORHFS	HS+1~, HS+2, HS+3, HS+7, BL+1~, BL+2, BL+3, BL+7, PATH+1~, PATH+2* , PATH+3, PATH+7, VITALS+1~, VITALS+2*, VITALS+3, VITALS+7, OPEN~, OPEN+6, CLOSE~, USEHFS+4 , USEHFS+8
ORHS	HS~, HS+5, HSB~, HSB+3, HSB+4
ORIO	HS+1~, HS+3, HS+7, BL+1~, BL+3, BL+7, PATH+1~, PATH+3, PATH+7, VITALS+1~ , VITALS+3, VITALS+7, OPEN~, OPEN+8*, CLOSE~, CLOSE+2
ORMODE	OPEN~, OPEN+6
OROK	USEHFS+1~, USEHFS+4, USEHFS+9
ORRM	HS+1~, HS+2, HS+3, HS+7, BL+1~, BL+2, BL+3, BL+7, PATH+1~, PATH+2* , PATH+3, PATH+7, VITALS+1~, VITALS+2*, VITALS+3, VITALS+7, OPEN~, OPEN+5, CLOSE~
ORSSTOP	VITALSB+1~
ORSSTOP(	VITALSB+8*
ORSSTRT	VITALSB+1~
ORSSTRT(	VITALSB+8*
ORSUB	HS+1~, HS+2, HS+7, BL+1~, BL+2, BL+7, PATH+1~, PATH+2, PATH+7, VITALS+1~ , VITALS+2, VITALS+7, CLOSE~, INIT+2, FINAL+2
ORTAG	VITALS~, VITALS+5, VITALSB~, VITALSB+9
ORVP	HSB+1~, HSB+2, VITALSB+1~, VITALSB+3
ROOT	LIST~, LIST+5, LIST+6, LIST+9, LIST+11, LIST+13, GETRPTS~, GETRPTS+2, GETRPTS+3, GETHS~ , GETHS+4, GETHS+5, GETHS+6, GETDT~, GETDT+2, GETDT+3, SETITEM~, SETITEM+1, RPT~, RPT+5 , RPT+9, RPT+15, RPT+20, DIET~, DIET+1, NOTYET~, NOTYET+1, NOTYET+2, BUILD+1~, BUILD+9 , INIT+2, INIT+3
RPTID	RPT~, RPT+12, RPT+13, RPT+14, RPT+15, RPT+16, RPT+17
SECTION	RPT~, RPT+4, RPT+5, BUILD+1~, BUILD+2, INIT+1, INIT+2, FINAL+2
STRIP	BUILD+1~, BUILD+2*, BUILD+8
U	HSB+3, HSB+4, FINAL+2
X	GETRPTS+1~, GETRPTS+3, GETDT+1~, GETDT+3, SETITEM~, SETITEM+1, VITALSB+8, BUILD+5, BUILD+8, BUILD+9 , BUILD+10
>> X1	VITALSB+4*
>> X2	VITALSB+6*
XQORNOD	VITALSB+1~, VITALSB+3*, VITALSB+8
Y	HSB+1~, HSB+3*, HSB+4
ZTQUEUED	HS+1~, BL+1~, PATH+1~, VITALS+1~, OPEN+4*

Marked Items

Name	Field # of Occurrence
$T(DTLIST+I	GETDT+3
$T(RPTLIST+I	GETRPTS+3

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWRP16

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items