Routine: PXRRPCE

Information

PXRRPCE ;HIN/MjK - Clinic Specific Workload Reports ;8/28/96

Source file <PXRRPCE.m>

Package	Total	Call Graph
PCE Patient Care Encounter	9	^PXRRPCE1 ^PXRRPCE2 ^PXRRPCE3 MEAN^PXRRPCE5 (,CLEAN)^PXRRPCEQ (HDR,MEAN)^PXRRPCR ^PXRRPCR1 ^PXRRPCR2 ^PXRRPCR3
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
VA Fileman	2	^DIC ^DIR
Scheduling	1	SET^SDCWL3

Package	Total	Caller Graph
PCE Patient Care Encounter	1	PXRR CASELOAD PROFILE BY CL

Name	Comments	DBIA/ICR reference
LOAD
NONE
EN
STOPCL
ZIS
VIS	;_._._._._._._._._._._._.Clinic Workload_._._._._._._._._._._._._
DTRANGE	;_._._._._._._._._.Select Date Range For Values_._._._._._._._._.
STOP	;_._._._._._._._._.Select Stop Code for Report_._._._._._._._._.
STPVAUTC	;_._.Set up VAUTC array for Stop Code_._._.
ST
REPORT
ACTIVTY	;_._._._._._._._._._._._Caseload Activity_._._._._._._._._._._._.
DEMOGR	;_._._._._._._._._._._._Caseload Demographics_._._._._._._._._._.
6
CLIN	;_._._._._._._._._.Select Clinic for Report_._._._._._._._._.
CQT
CLSTOP	;_._._._._._._._._._._Clinic Vs Stop Code_._._._._._._._._._._.
QT

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CLSTOP+1
Function Call: WRITE	Prompt: ! Line Location: STOP+1
Function Call: WRITE	Prompt: !! Line Location: DTRANGE+1
Function Call: WRITE	Prompt: ! Line Location: ZIS+0
Function Call: WRITE	Prompt: !?5,"o There were no appts for this clinic in this date range",!?5,"o Note: This report is run from patient appts., not clinic enrollment." Line Location: NONE+0
Function Call: WRITE	Prompt: !,"Request Cancelled" Line Location: LOAD+1
Function Call: WRITE	Prompt: !,"Request queued, task number "_ZTSK Line Location: LOAD+2
Routine Call	DIC Line Location: CLIN+2 STOP+1
Routine Call	DIR Line Location: CLSTOP+1 DTRANGE+2
Routine Call	%ZIS Line Location: ZIS

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	6, STPVAUTC+1, STPVAUTC+2, STPVAUTC+3
^SC("AC"	STPVAUTC+1
^TMP($J	EN!, 6+1, REPORT, DEMOGR+3

Name	Line Occurrences
CLIN	CLIN+2
DEMOGR	STOPCL+1
LOAD	ZIS+1
NONE	6+1
QT	CLSTOP+1, CLIN+3, STOP+1, DTRANGE+2, ZIS, ZIS+1, REPORT, VIS+1, ACTIVTY+1, DEMOGR+1 , NONE, LOAD+3
STOP	CLSTOP+1
STPVAUTC	STOPCL, ST

Name	Field # of Occurrence
%ZIS	ZIS*!
DIC	CLIN+1, CLIN+3!, STOP+1!
DIC("A"	CLIN+1, STOP+1
DIC("S"	CLIN+1, STOP+1
DIC(0	CLIN+1, STOP+1
DIR	CLSTOP+1!, DTRANGE+2!
DIR("??"	DTRANGE+1, DTRANGE+2
DIR("A"	CLSTOP+1, DTRANGE+1, DTRANGE+2*
DIR("B"	DTRANGE+2*
DIR(0	CLSTOP+1, DTRANGE+1, DTRANGE+2*
>> DIRUT	CLSTOP+1
DT	DTRANGE+2
>> DUOUT	CLIN+3
>> I	6*
IO	STOPCL
IO("Q"	ZIS!, ZIS+1
IOP	ZIS!, ZIS+1!
POP	ZIS*, LOAD+3~
>> PXR	DEMOGR+4*
>> PXRC	DEMOGR+2*
>> PXRI	CLSTOP+1, CLIN+1, CLIN+2, STPVAUTC+2, STPVAUTC+3
>> PXRI(	CLIN+2*
PXRRBDT	DTRANGE+2*, CQT!
>> PXRRCASE	VIS+1, ACTIVTY+1
PXRRCLIN	CLIN+3, STOP+1, ST, DEMOGR+2, DEMOGR+4, CQT!
PXRRCLIN(	CLIN+2, DEMOGR+2, DEMOGR+4, STPVAUTC+2, STPVAUTC+3*
>> PXRRDEMG	EN, CLSTOP+1, ZIS+1, STOPCL+1, VIS+1, DEMOGR+1
PXRREDT	DTRANGE+3*, CQT!
>> PXRRSC	STOP+1*, STOPCL, ST, STPVAUTC+1
PXRSTPNM	STOP+1*, CQT!
>> SD1	6*
>> SDADD	ST+1*
>> SDALL	ST+1*
>> SDBD	DTRANGE+2*
>> SDCL	ST+1*
>> SDED	DTRANGE+3*
>> SDF	ST+1*
>> SDHR	6*
>> SDNAM	ST+1*
>> SDOB	6*
>> SDPG	6*
>> SDPRE	ST+1*
>> SDRT	ST+1*
>> SDS	ST+1*
U	CLIN+2, DEMOGR+2, DEMOGR+4, STPVAUTC+1, STPVAUTC+2, STPVAUTC+3
>> VAUTC	CLIN+2, 6, STPVAUTC+1
>> VAUTC(	CLIN+2, 6, STPVAUTC+2, STPVAUTC+3*
>> VAUTD	EN*
>> X	LOAD+3, STPVAUTC+1, STPVAUTC+2, STPVAUTC+3
>> Y	CLSTOP+1, CLIN+2, STOP+1, DTRANGE+2, DTRANGE+3, STPVAUTC+3*
>> Y(0	CLIN+2, STOP+1
>> ZTDESC	ZIS+1*
>> ZTQUEUED	LOAD+3
>> ZTRTN	ZIS+1*
>> ZTSAVE("PXR*"	ZIS+1*
>> ZTSAVE("SD*"	ZIS+1*
>> ZTSAVE("V*"	ZIS+1*
>> ZTSK	LOAD+1, LOAD+2, LOAD+3