Routine: SCRPW304

Package	Total	Call Graph
Kernel	4	$$S^%ZTLOAD ($$FMTE,$$HTE)^XLFDT PARENT^XUAF4 EN^XUTMDEVQ
Scheduling	4	WAIT^SCRPW301 $$DATE^SCRPW302 ROLLUP^SCRPW303 GETDATA^SDPMUT1
Registration	1	$$SITE^VASITE
VA Fileman	1	$$OREF^DILF

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Main Entry Point
PRTHEAD	;Page Header
EN1	;Tasked entry point
EXIT	;Kill temporary arrays
EX1
PRTSUMS	;Print summaries

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	EN1+17
$$OREF^DILF	EN+16, EN+20
WAIT^SCRPW301	EN1+18, EN1+25
$$DATE^SCRPW302	EN+9
ROLLUP^SCRPW303	EN+7
GETDATA^SDPMUT1	EN1+11
$$SITE^VASITE	PRTHEAD+14
$$FMTE^XLFDT	PRTHEAD+20, PRTHEAD+21
$$HTE^XLFDT	PRTHEAD+19
PARENT^XUAF4	PRTHEAD+15
EN^XUTMDEVQ	EN+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EN+11
Function Call: WRITE	Prompt: @IOF Line Location: PRTHEAD+10
Function Call: WRITE	Prompt: !,"Performance Monitor National Summary Report",?70,"Page: ",PAGENUM Line Location: PRTHEAD+11
Function Call: WRITE	Prompt: !!,LINE Line Location: PRTHEAD+18
Function Call: WRITE	Prompt: !,"Run Date: ",$$HTE^XLFDT($H) Line Location: PRTHEAD+19
Function Call: WRITE	Prompt: !,"Encounter Date Range: ",$$FMTE^XLFDT($P(@SCRNARR@("RANGE"),U,1)) Line Location: PRTHEAD+20
Function Call: WRITE	Prompt: " to ",$$FMTE^XLFDT($P(@SCRNARR@("RANGE"),U,2)) Line Location: PRTHEAD+21
Function Call: WRITE	Prompt: !,"Total number of encounters (denominator): ",LINE Line Location: PRTHEAD+24
Function Call: WRITE	Prompt: !!,"Total number of encounters in the denominator are those included in the" Line Location: PRTHEAD+25
Function Call: WRITE	Prompt: !,"Performance Monitor cohort" Line Location: PRTHEAD+26
Function Call: WRITE	Prompt: !!,"Signed",?21,"Elapsed Time (Days)" Line Location: PRTSUMS+23
Function Call: WRITE	Prompt: !,"within",?14,"0-1",?22,">1-2",?31,">2-3",?39,">3-4",?47,">4-5" Line Location: PRTSUMS+24
Function Call: WRITE	Prompt: ?55,">5-6",?63,">6-7",?71,">7-8" Line Location: PRTSUMS+25
Function Call: WRITE	Prompt: !,?13,DASH6,?21,DASH6,?30,DASH6,?38,DASH6,?46,DASH6,?54,DASH6 Line Location: PRTSUMS+26
Function Call: WRITE	Prompt: ?62,DASH6,?70,DASH6 Line Location: PRTSUMS+27
Function Call: WRITE	Prompt: !,"Encounters",?13,+$P(PINODE,U,1),?21,+$P(PINODE,U,2) Line Location: PRTSUMS+28
Function Call: WRITE	Prompt: ?30,+$P(PINODE,U,3),?38,+$P(PINODE,U,4),?46,+$P(PINODE,U,5) Line Location: PRTSUMS+29
Function Call: WRITE	Prompt: ?54,+$P(PINODE,U,6),?62,+$P(PINODE,U,7),?70,+$P(PINODE,U,8) Line Location: PRTSUMS+30
Function Call: WRITE	Prompt: !,"Percentage",?13,$P(PRCNT,U,1),?21,$P(PRCNT,U,2) Line Location: PRTSUMS+31
Function Call: WRITE	Prompt: ?30,$P(PRCNT,U,3),?38,$P(PRCNT,U,4),?46,$P(PRCNT,U,5) Line Location: PRTSUMS+32
Function Call: WRITE	Prompt: ?54,$P(PRCNT,U,6),?62,$P(PRCNT,U,7),?70,$P(PRCNT,U,8) Line Location: PRTSUMS+33
Function Call: WRITE	Prompt: !!,"Signed",?21,"Elapsed Time (Days)",?45,"Pending",?60,"Scanned" Line Location: PRTSUMS+35
Function Call: WRITE	Prompt: !,"within",?14,">8-9",?22,">9-10",?32,">10",?38,"Signatures" Line Location: PRTSUMS+36
Function Call: WRITE	Prompt: ?50,"Notes",?59,"Note Only" Line Location: PRTSUMS+37
Function Call: WRITE	Prompt: !,?13,DASH6,?21,DASH6,?30,DASH6,?38,DASH6_"----" Line Location: PRTSUMS+38
Function Call: WRITE	Prompt: ?50,DASH6,?59,DASH6_"---" Line Location: PRTSUMS+39
Function Call: WRITE	Prompt: !,"Encounters",?13,+$P(PINODE,U,9),?21,+$P(PINODE,U,10) Line Location: PRTSUMS+40
Function Call: WRITE	Prompt: ?30,+$P(PINODE,U,11),?38,TOTENC-CMPENC-NPN-SCANNED-(+$P(PINODE,U,11)) Line Location: PRTSUMS+41
Function Call: WRITE	Prompt: ?50,NPN,?59,SCANNED Line Location: PRTSUMS+42
Function Call: WRITE	Prompt: !,"Percentage",?13,$P(PRCNT,U,9),?21,$P(PRCNT,U,10) Line Location: PRTSUMS+43
Function Call: WRITE	Prompt: ?30,$P(PRCNT,U,11) Line Location: PRTSUMS+44
Function Call: WRITE	Prompt: ?38,VAL,?50,NPNVAL,?59,"N/A" Line Location: PRTSUMS+50

Label References

Name	Line Occurrences
EX1	EN+9, EN+24
EXIT	EN1+18, EN1+27
PRTHEAD	EN1+14, EN1+21
PRTSUMS	EN1+17, EN1+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CMPENC	PRTSUMS+10~, PRTSUMS+15*, PRTSUMS+41, PRTSUMS+48
DASH6	PRTSUMS+10~, PRTSUMS+11*, PRTSUMS+26, PRTSUMS+27, PRTSUMS+38, PRTSUMS+39
DIV	EN1+5~, EN1+13, EN1+20, EN1+22, EN1+23, PRTHEAD+12, PRTHEAD+13, PRTHEAD+22, PRTHEAD+23
IOF	PRTHEAD+10
LINE	PRTHEAD+9~, PRTHEAD+12, PRTHEAD+17, PRTHEAD+18, PRTHEAD+22, PRTHEAD+23, PRTHEAD+24
NPN	PRTSUMS+10~, PRTSUMS+17*, PRTSUMS+41, PRTSUMS+42, PRTSUMS+46, PRTSUMS+48
>> NPNVAL	PRTSUMS+45, PRTSUMS+46, PRTSUMS+47*, PRTSUMS+50
OUTARR	EN1+5~, EN1+6*, EN1+8, EN1+11, EN1+15, EN1+16, EN1+20, EN1+22, EN1+23, PRTHEAD+22 , PRTHEAD+23, EXIT+1
PAGENUM	EN1+5~, EN1+9, PRTHEAD+11, PRTHEAD+27
PINODE	EN1+5~, EN1+16, EN1+23, PRTSUMS+5, PRTSUMS+20, PRTSUMS+28, PRTSUMS+29, PRTSUMS+30, PRTSUMS+40, PRTSUMS+41 , PRTSUMS+48
PRCNT	PRTSUMS+10~, PRTSUMS+12, PRTSUMS+21, PRTSUMS+31, PRTSUMS+32, PRTSUMS+33, PRTSUMS+43, PRTSUMS+44
SCANNED	PRTSUMS+10~, PRTSUMS+16*, PRTSUMS+20, PRTSUMS+41, PRTSUMS+42, PRTSUMS+46, PRTSUMS+48
SCRNARR	EN+2~, EN+3*, EN+5, EN+7, EN+9, EN+16, EN+18, EN1+11, PRTHEAD+20, PRTHEAD+21 , EX1
SORTARR	EN+2~, EN+4*, EN+5, EN+7, EN+20, EN+22, EN1+11, EX1
STOP	EN1+5~, EN1+7*, EN1+18, EN1+20, EN1+25
SUMNODE	EN1+5~, EN1+15, EN1+22, PRTSUMS+5, PRTSUMS+14, PRTSUMS+15, PRTSUMS+16, PRTSUMS+17
TMP	EN+12~, EN+16, EN+17, EN+20, EN+21, PRTHEAD+9~, PRTHEAD+14, PRTHEAD+15, PRTHEAD+17, PRTSUMS+10~ , PRTSUMS+19, PRTSUMS+20, PRTSUMS+21
TOTENC	PRTSUMS+10~, PRTSUMS+14*, PRTSUMS+19, PRTSUMS+20, PRTSUMS+41, PRTSUMS+46, PRTSUMS+48
U	PRTHEAD+12, PRTHEAD+15, PRTHEAD+17, PRTHEAD+20, PRTHEAD+21, PRTSUMS+12, PRTSUMS+14, PRTSUMS+15, PRTSUMS+16, PRTSUMS+17 , PRTSUMS+20, PRTSUMS+21, PRTSUMS+28, PRTSUMS+29, PRTSUMS+30, PRTSUMS+31, PRTSUMS+32, PRTSUMS+33, PRTSUMS+40, PRTSUMS+41 , PRTSUMS+43, PRTSUMS+44, PRTSUMS+48
VAL	PRTSUMS+10~, PRTSUMS+19, PRTSUMS+20, PRTSUMS+21, PRTSUMS+45, PRTSUMS+48, PRTSUMS+49*, PRTSUMS+50
VISN	PRTHEAD+9~, PRTHEAD+16*, PRTHEAD+17
VISN("P"	PRTHEAD+16, PRTHEAD+17
ZTDESC	EN+12~, EN+14*, EN+23
ZTIO	EN+12~, EN+13*
ZTSAVE	EN+12~, EN+23
ZTSAVE(	EN+17, EN+18, EN+21, EN+22
ZTSAVE("SCRNARR"	EN+15*
ZTSAVE("SORTARR"	EN+19*

Customize PDF page

Package: Scheduling

Routine: SCRPW304

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: