Routine: ORWRPBHS

Information

ORWRPBHS ;IHS/CIA/DKM - IHS Health Summary Support for Reports Component ;27-Feb-2007 11:27;DKM

Source file <ORWRPBHS.m>

Package	Total	Call Graph
Order Entry Results Reporting	3	SETITEM^ORWRP PREPORT^ORWRP2 SITE^ORWRPP
CIA Utilities	2	CAPTURE^CIAUHFS $$TRAP^CIAUOS
Kernel	2	$$EC^%ZOSV ^%ZTER
Patient Care Component	1	START^APCHS0
Toolkit	1	($$GET,GETLST)^XPAR

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORWRP

Name	Comments	DBIA/ICR reference
HSB(ROOT,ORDFN,ORHSTYPE,ORALPHA,OROMEGA,ORDTRNG,REMOTE,ORMAX,ORFHIE)	;
HS(ORROOT,ORDFN,ORHS,ALPHA,OMEGA,DTRANGE,REMOTE,ORMAX,ORFHIE)	; - get health summary report
HSXERR
HSX(ROOT,APCHSPAT,APCHSTYP,ALPHA,OMEGA,DTRANGE,REMOTE,ORMAX,ORFHIE)	;
GETHS(ROOT,EOF)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,APCHSTYP_" not found on remote system",! Line Location: HSX+5
Function Call: WRITE	Prompt: !,"Report not Available" Line Location: HSX+7
Function Call: WRITE	Prompt: "An error was encountered generating this report.",! Line Location: HSXERR+0
Function Call: WRITE	Prompt: "The error was: ",$$EC^%ZOSV,! Line Location: HSXERR+1

Name	Line Occurrences (* Changed, ! Killed)
^APCHSCTL("B"	HSX+4, GETHS+4

Name	Line Occurrences
HSX	HSB+2

Name	Field # of Occurrence
^(	GETHS+4

Name	Field # of Occurrence
ALPHA	HS~, HSX~
APCHSPAT	HSX~
APCHSTYP	HSX~, HSX+3, HSX+4, HSX+5, HSX+6, HSX+7, HSX+8
C	GETHS+1~, GETHS+3, GETHS+4
DTRANGE	HS~, HSX~
EOF	GETHS~
HS	GETHS+1~, GETHS+5
HS(	GETHS+4, GETHS+7, GETHS+8, GETHS+9
I	GETHS+1~, GETHS+3, GETHS+4, GETHS+6, GETHS+7, GETHS+8, GETHS+9
IO	HSX+5
OMEGA	HS~, HSX~
ORALPHA	HSB~, HSB+2
>> ORCOMP	HSB+1
>> ORCOMP(0	HSB+1
ORDFN	HS~, HSB~, HSB+1, HSB+2
ORDTRNG	HSB~, HSB+2
ORFHIE	HS~, HSX~, HSB~, HSB+2
ORHS	HS~
ORHSTYPE	HSB~, HSB+2
ORMAX	HS~, HSX~, HSB~, HSB+2
OROMEGA	HSB~, HSB+2
ORROOT	HS~
REMOTE	HS~, HSX~, HSX+3, HSB~, HSB+2
ROOT	HS+1, HSX~, HSB~, HSB+1, HSB+2, GETHS~, GETHS+9
>> STATION	HSB+1, HSB+2
U	GETHS+4, GETHS+8
Y	HSX+1~, HSX+4*, HSX+5, HSX+6