Routine: SCRPW54

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

Entry Points

Name	Comments	DBIA/ICR reference
HDR	;Print header
PLINE1(SDH)	;Print output line
HD1(SDR)	;Print subheader
MOT()
DLIST	;Create alphabetic list of divisions found
PLINE2(SDLT)	;Print output line
STOP	;Check for stop task request
DIV()	;Check division
DPRT(SDV)	;Print division
SET(SDIV)	;Set division lists
AA(SDIV)	;Average age
VALID()	;Check encounter record
START	;Print report
EXIT
POW()
S1(SDMT)
PL(SDLAB,SDMT)	;Print line
AGE()
SEX()
HD2	;Print subheader

External References

Name	Field # of Occurrence
NOW^%DTC	START+17
$$S^%ZTLOAD	STOP+1
^DIR	EXIT, HDR+1
$$MTI^SCDXUTL0	SET+3
DISP0^SCRPW23	START+18
STOP^SCRPW40	SET+2
$$XY^SCRPW50	HDR+2
RQUE^SCRPW50	SCRPW54+3
$$GETOE^SDOE	START+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?(IOM-$L(SDX)\2),SDX Line Location: START+19
Function Call: WRITE	Prompt: ! Line Location: DPRT+7
Function Call: WRITE	Prompt: ! Line Location: DPRT+8
Function Call: WRITE	Prompt: !!?(132-$L(SDX)\2),SDX Line Location: PLINE1+14
Function Call: WRITE	Prompt: !?18,$J(SDLAB_":",33),?54,$J(SDMO,9,0),?69,$J(SDLAB_":",33),?105,$J(SDYR,9,0) Line Location: PL+5
Function Call: WRITE	Prompt: ?104,$J(SDTOT,10,0) Line Location: PLINE2+4
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: !!?(132-$L(SDX)\2),$E(SDLINE,1,$L(SDX)),!?(132-$L(SDX)\2),SDX,!?(132-$L(SDX)\2),$E(SDLINE,1,$L(SDX)) Line Location: HD1+1
Function Call: WRITE	Prompt: !!?18,$J(SDX_":",33),?58,"TOTAL" Line Location: HD1+2
Function Call: WRITE	Prompt: ?69,$J(SDX_":",33),?109,"TOTAL",!?18,$E(SDLINE,1,45),?69,$E(SDLINE,1,45) Line Location: HD1+3
Function Call: WRITE	Prompt: !!?(132-$L(SDX)\2),$E(SDLINE,1,$L(SDX)),!?(132-$L(SDX)\2),SDX,!?(132-$L(SDX)\2),$E(SDLINE,1,$L(SDX)) Line Location: HD2+1
Function Call: WRITE	Prompt: !?24,"SC",?35,"NSC",?45,"TOTAL" Line Location: HD2+2
Function Call: WRITE	Prompt: !?20,"MT COPAY",?32,"MT COPAY",?44,"MT COPAY",?56,"MT COPAY",?68,"GMT COPAY",?87,"NON",?99,"NOT",?109,"GRAND" Line Location: HD2+3
Function Call: WRITE	Prompt: !?10,"UNIQUES:",?21,"EXEMPT",?33,"EXEMPT",?45,"EXEMPT",?56,"REQUIRED",?68,"REQUIRED",?83,"VETERAN",?92,"APPLICABLE",?109,"TOTAL" Line Location: HD2+4
Function Call: WRITE	Prompt: !?6,$E(SDLINE,1,12) Line Location: HD2+5
Function Call: WRITE	Prompt: ?(20+(12*SDI)),$E(SDLINE,1,10) Line Location: HD2+5
Routine Call	DIR Line Location: EXIT HDR+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	START+17
^DG(40.8 - [#40.8]	DLIST+1
^DPT - [#2]	S1+3, POW
^SC - [#44]	VALID+1
^SCE("ADFN"	START+2
^TMP("SCRPW"	START+1!, START+5, START+7, START+8, START+11, START+12, START+13, START+14, START+19, EXIT+1! , PL+2, PL+3, PLINE2+3, SET+3, S1, S1+1, S1+4, AGE

Label References

Name	Line Occurrences
$$AGE	S1+3
$$DIV	VALID+2
$$MOT	S1+3
$$POW	S1+3
$$SEX	S1+3
$$VALID	START+3
AA	START+16
DLIST	START+5
DPRT	START+20, START+21
EXIT	START+4, START+17, START+19, START+20, START+21
HD1	DPRT+6, DPRT+7, PL+1
HD2	DPRT+8, PLINE2+2
HDR	START+19, DPRT+6, DPRT+7, DPRT+8, PL+1, PLINE2+2
PL	PLINE1+4, PLINE1+6, PLINE1+8, PLINE1+10, PLINE1+11, PLINE1+12, PLINE1+13
PLINE1	DPRT+6, DPRT+7
PLINE2	DPRT+9
S1	START+11, S1+2
SET	START+3
STOP	START+5, HDR+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	START+17, EXIT+1!
%H	EXIT+1!
%I	EXIT+1!
DFN	START+1, START+2, START+7, START+8, START+11, EXIT+1!, SET+3, S1+3, POW
DIR	EXIT~, EXIT+1!, HDR+1~
DIR(0	EXIT, HDR+1
IOF	HDR+2
IOM	START+17, START+19, HDR+3, HDR+4
IOSL	DPRT+7, DPRT+8, PL+1, PLINE2+2
IOST	START+18, EXIT, HDR+1, HDR+2
SD	EXIT+1!
SD("EDT"	START+2
SD("FYD"	START+2
SD("MOD"	S1+1, MOT
SD("PEDT"	HDR+4
SDAGE	EXIT+1!, AGE*, AGE+1, AGE+2
SDDIV	EXIT+1!, DPRT+2, DPRT+3, DIV+1
SDDIV(	DIV+1
SDFAA	EXIT+1!
SDFAA(	AA+1, AA+2, PLINE2+4, AGE+1*
SDFTOT	EXIT+1!
SDFTOT(	AA+1, AA+2, AGE+1
SDFV	START+11*, EXIT+1!, S1+2
SDH	EXIT+1!, PLINE1~, PL+1, PL+2, PL+3
SDI	EXIT+1!, DPRT+4, PLINE2+3, HDR+3~, HD2+5, S1+4*
SDIV	START+3, START+4, START+5*, START+7, START+8, START+11, START+12, START+13, START+14, START+16 , EXIT+1!, AA~, AA+1, AA+2, DLIST+1, VALID+2, DIV+1, SET~, SET+3, S1 , S1+1, S1+4, AGE, AGE+1
SDIV(	START+20, DPRT+4, DLIST+1*
SDIVN	START+20, EXIT+1!, DPRT+2, DPRT+4
SDLAB	EXIT+1!, PL~, PL+5
SDLINE	START+17*, EXIT+1!, HDR+3, HDR+4, HD1+1, HD1+3, HD2+1, HD2+5
SDLT	EXIT+1!, DPRT+9*, PLINE2~, PLINE2+3, PLINE2+4
SDMD	START+3, EXIT+1!
SDMO	EXIT+1!, PL+2*, PL+4, PL+5
SDMOTO	EXIT+1!, PLINE1+2, PLINE1+14, PL+4
SDMT	START+6, START+7, START+8, START+11, START+12, START+13, START+14, EXIT+1!, PL~, PL+2 , PL+3, PLINE2+3, SET+3*, S1~, S1+1, S1+2, S1+4, AGE, AGE+1
SDOE	START+2*, START+3, EXIT+1!, SET+3
SDOE0	START+3*, EXIT+1!, VALID+1, VALID+2, SET+3
SDOUT	START+1, START+2, START+4, START+5, START+17, START+19, START+20, START+21, EXIT, EXIT+2! , DPRT+6, DPRT+7, DPRT+8, DPRT+9, PLINE1+4, PLINE1+6, PLINE1+8, PLINE1+10, PLINE1+11, PLINE1+12 , PLINE1+13, PL+1, PLINE2+2, HDR+1, HDR+2, HD1+1, HD2+1, STOP+1*, SET+2
SDPAGE	START+19, EXIT+2!, DPRT+6, HDR+4*
SDPATE	EXIT+2!
SDPG	START+17, EXIT+2!, HDR+1, HDR+2, HDR+4
SDPNOW	START+17*, EXIT+2!, HDR+4
SDPT0	EXIT+2!, S1+3*, SEX, AGE
SDR	EXIT+2!, HD1~, HD1+1, HD1+2, HD1+3
SDSC	EXIT+2!, DPRT+6*
SDSTA	SCRPW54+2*, SCRPW54+3, START+17, EXIT+1!, VALID+2
SDSTOP	START+1, EXIT+2!, SET+2
SDT	START+2, START+8, START+11*, EXIT+2!, SET+3, S1+1, MOT, AGE
SDTIT	EXIT+2!
SDTIT(	DPRT+4*, HDR+3
SDTIT(1	START+17*
SDTIT(2	DPRT+2, DPRT+3
SDTOT	EXIT+2!, PLINE2+3, PLINE2+4
SDV	EXIT+2!, DPRT~, DPRT+2, DPRT+3, PL+2, PL+3, PLINE2+3, PLINE2+4
SDVCT	START+4, START+21, EXIT+2!, DLIST+1
SDX	START+19, EXIT+2!, PLINE1+14, PLINE2+3, HD1+1, HD1+2, HD1+3, HD2+1, DLIST+1, S1+3* , S1+4
SDYR	EXIT+2!, PL+3*, PL+4, PL+5
SDYRTO	EXIT+2!, PLINE1+2, PLINE1+14, PL+4
U	START+3, DPRT+3, DLIST+1, VALID+1, VALID+2, SET+3, S1+3, S1+4, SEX, POW , AGE
X	EXIT+2!
Y	START+17*, EXIT+2!, HDR+1
>> ZTQUEUED	STOP+1
>> ZTSTOP	STOP+1*

Customize PDF page

Package: Scheduling

Routine: SCRPW54

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: