Routine: SCRPW59

Package	Total	Call Graph
Scheduling	5	DISP0^SCRPW23 PDSC^SCRPW24 STOP^SCRPW40 ($$XY,RQUE)^SCRPW50 $$GETOE^SDOE
VA Fileman	2	NOW^%DTC ^DIR
Kernel	1	$$S^%ZTLOAD

Entry Points

Name	Comments	DBIA/ICR reference
SUBT	;Count uniques and visits
HDR	;Print header
HD1	;Print subheader
DLIST	;Create alphabetic list of divisions found
PLINE	;Print output line
STOP	;Check for stop task request
DPRT(SDV)	;Print division
SET(SDIV)	;Set division lists
VALID()	;Check encounter record
START	;Print report
EXIT
DIV()	;Check division

External References

Name	Field # of Occurrence
NOW^%DTC	START+3
$$S^%ZTLOAD	STOP+1
^DIR	EXIT, HDR+1
DISP0^SCRPW23	START+3
PDSC^SCRPW24	SET+3
STOP^SCRPW40	SET+2
$$XY^SCRPW50	HDR+2
RQUE^SCRPW50	SCRPW59+3
$$GETOE^SDOE	START+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?(IOM-$L(SDX)\2),SDX Line Location: START+4
Function Call: WRITE	Prompt: !?(C),$E($P(SDX," / ",2),1,22),?(C+24),$E($P(SDX," / "),1,20) Line Location: PLINE+2
Function Call: WRITE	Prompt: ?(C+46+(12*SDI)),$J($P(SDY,U,(SDI+1)),10,0) Line Location: PLINE+2
Function Call: WRITE	Prompt: !?(IOM-$L(SDTIT(SDI))\2),SDTIT(SDI) Line Location: HDR+3
Function Call: WRITE	Prompt: !,SDLINE,!,"For Fiscal Year activity through ",SD("PEDT"),!,"Date printed: ",SDPNOW,?(IOM-6-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE Line Location: HDR+4
Function Call: WRITE	Prompt: !?(C),"County",?(C+24),"State",?(C+50),"Visits",?(C+58),"Encounters",?(C+73),"Uniques",!?(C),$E(SDLINE,1,22),?(C+24),$E(SDLINE,1,20),?(C+46),$E(SDLINE,1,10),?(C+58),$E(SDLINE,1,10),?(C+70),$E(SDLINE,1,10) Line Location: HD1+1
Routine Call	DIR Line Location: EXIT HDR+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	START+3
^DG(40.8 - [#40.8]	DLIST+1
^SC - [#44]	VALID+1
^SCE("B"	START+2
^TMP("SCRPW"	START+1!, START+4, START+5, EXIT+1!, DPRT+6, SUBT+1, SUBT+2, SET+4

Label References

Name	Line Occurrences
$$DIV	VALID+2
$$VALID	START+2
DLIST	START+5
DPRT	START+6, START+7
EXIT	START+3, START+4, START+6, START+7
HD1	DPRT+6, PLINE+1
HDR	START+4, DPRT+6, PLINE+1
PLINE	DPRT+6
SET	START+2
STOP	START+5, HDR+2
SUBT	START+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	START+3, EXIT+1!
%H	EXIT+1!
%I	EXIT+1!
C	START+3*, EXIT+1!, PLINE+2, HD1+1
DFN	EXIT+1!, SUBT+1*
DIR	EXIT~, EXIT+1!, HDR+1~
DIR(0	EXIT, HDR+1
IOF	HDR+2
IOM	START+3, START+4, HDR+3, HDR+4
IOSL	PLINE+1
IOST	START+3, EXIT, HDR+1, HDR+2
SD	EXIT+1!
SD("EDT"	START+2
SD("FYD"	START+1
SD("PEDT"	HDR+4
SDDIV	EXIT+1!, DPRT+2, DPRT+3, DIV+1
SDDIV(	DIV+1
SDE	EXIT+1!, SUBT+2*
SDI	EXIT+1!, DPRT+4, PLINE+2, HDR+3~*
SDIV	START+2, START+5, EXIT+1!, DLIST+1, SUBT+1, SUBT+2, VALID+2, DIV+1, SET~, SET+4
SDIV(	START+6, DPRT+4, DLIST+1*
SDIVN	START+6, EXIT+1!, DPRT+2, DPRT+4
SDLINE	START+3*, EXIT+1!, HDR+3, HDR+4, HD1+1
SDMD	START+2, EXIT+1!
SDOE	START+2*, EXIT+1!
SDOE0	START+2*, EXIT+1!, VALID+1, VALID+2, SET+4
SDOUT	START+1, START+2, START+3, START+4, START+5, START+6, START+7, EXIT, EXIT+1!, DPRT+6 , PLINE+1, HDR+1, HDR+2, HD1+1, STOP+1*, SET+2
SDPAGE	START+4, EXIT+1!, DPRT+6, HDR+4*
SDPG	START+3, EXIT+1!, HDR+1, HDR+2, HDR+4
SDPNOW	START+3*, EXIT+1!, HDR+4
SDSTA	SCRPW59+2*, SCRPW59+3, START+3, EXIT+1!, VALID+2
SDSTOP	START+1, EXIT+1!, SET+2
SDT	START+1, START+2, EXIT+1!, SUBT+1*, SET+4
SDTIT	EXIT+1!
SDTIT(	DPRT+4*, HDR+3
SDTIT(1	START+3*
SDTIT(2	DPRT+2, DPRT+3
SDU	EXIT+1!, SUBT+1*, SUBT+2
SDV	EXIT+1!, DPRT~, DPRT+2, DPRT+3, DPRT+6, SUBT+1*, SUBT+2
SDVCT	START+5, START+7, EXIT+1!, DLIST+1
SDX	START+4, START+5, EXIT+1!, DPRT+6, PLINE+2, DLIST+1, SUBT+1, SUBT+2, SET+3!*, SET+4
SDX(	SET+3
SDX(""	SET+3
SDY	EXIT+1!, DPRT+6*, PLINE+2
U	START+2, DPRT+3, PLINE+2, DLIST+1, SUBT+2, VALID+1, VALID+2, SET+3, SET+4
X	EXIT+1!
Y	START+3*, EXIT+1!, HDR+1
>> ZTQUEUED	STOP+1
>> ZTSTOP	STOP+1*

Customize PDF page

Package: Scheduling

Routine: SCRPW59

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: