Routine: SDSCMSR

Package	Total	Call Graph
Scheduling	6	$$GETOE^SDOE CHECK^SDSCEDT GETDATE1^SDSCOMP RPTEND^SDSCRPT1 STDHDR^SDSCRPT2 ($$SCHNG,DIV)^SDSCUTL
Kernel	3	^%ZIS ^%ZTLOAD $$FMTE^XLFDT
VA Fileman	3	EN^DDIOL FILE^DIE ^DIR

Package	Total	Caller Graph
Scheduling	1	SDSC MANAGER SUMMARY REPORT

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Entry Point
PRTT	; Print total page
STORE(VAL)	; Total up and Store
UPD(SDENC,SDFLD,SDVAL,SDFLG)	; Update record
BEG	; Begin report
PRT	; Print report
EXT	;
FND	;
EXIT	;
BLD	;

External References

Name	Field # of Occurrence
^%ZIS	EN+19
^%ZTLOAD	EN+24
EN^DDIOL	BLD+4
FILE^DIE	UPD+3
^DIR	EN+6, EN+16
$$GETOE^SDOE	BLD+7
CHECK^SDSCEDT	FND+13
GETDATE1^SDSCOMP	EN+12
RPTEND^SDSCRPT1	EXT+2
STDHDR^SDSCRPT2	PRT+3, PRTT+2
$$SCHNG^SDSCUTL	FND+18
DIV^SDSCUTL	EN+5
$$FMTE^XLFDT	PRT+6, PRTT+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"REQUEST QUEUED" Line Location: EN+24
Function Call: WRITE	Prompt: "!X" Line Location: FND+14
Function Call: WRITE	Prompt: SDHDR,?67,"PAGE: ",P Line Location: PRT+5
Function Call: WRITE	Prompt: !,?5,"For Encounters Dated ",$$FMTE^XLFDT(SDSCTDT,2)," THRU ",$$FMTE^XLFDT(SDEDT,2)," For Division: ",SDSCDNM,!! Line Location: PRT+6
Function Call: WRITE	Prompt: ! Line Location: PRT+7
Function Call: WRITE	Prompt: "-" Line Location: PRT+7
Function Call: WRITE	Prompt: !,"All Checked Out Encounters: ",?52,$J(ATOTAL,10) Line Location: PRT+9
Function Call: WRITE	Prompt: !,"ASCD Encounters that are potentially billable: ",?55,$J(TOTAL,7) Line Location: PRT+10
Function Call: WRITE	Prompt: !,?55,$J("-------",7) Line Location: PRT+11
Function Call: WRITE	Prompt: !,"Encounters verified with Rated Disability Codes: ",?55,$J(SBTOT,7) Line Location: PRT+14
Function Call: WRITE	Prompt: !,"Encounters where SC NOT changed: ",?55,$J(SBTOT,7) Line Location: PRT+17
Function Call: WRITE	Prompt: !,"Encounters where SC was changed to NSC: ",?55,$J(SBTOT,7) Line Location: PRT+20
Function Call: WRITE	Prompt: !,"Encounters where NSC was changed to SC: ",?55,$J(SBTOT,7) Line Location: PRT+23
Function Call: WRITE	Prompt: !,"Encounters sent to Clinical Review: ",?55,$J(SBTOT,7) Line Location: PRT+26
Function Call: WRITE	Prompt: !,"Encounters not editable: ",?55,$J(SBTOT,7) Line Location: PRT+29
Function Call: WRITE	Prompt: !,"Encounters not yet processed: ",?55,$J(TOTAL-SUBTOT,7) Line Location: PRT+30
Function Call: WRITE	Prompt: !!! Line Location: PRT+31
Function Call: WRITE	Prompt: SDHDR,?67,"PAGE: ",P Line Location: PRTT+4
Function Call: WRITE	Prompt: !,HHDR Line Location: PRTT+13
Function Call: WRITE	Prompt: !,?5,HHDR4 Line Location: PRTT+14
Function Call: WRITE	Prompt: ! Line Location: PRTT+15
Function Call: WRITE	Prompt: "-" Line Location: PRTT+15
Function Call: WRITE	Prompt: !,"All Checked Out Encounters: ",?52,$J(DATOTAL,10) Line Location: PRTT+17
Function Call: WRITE	Prompt: !,"ASCD Encounters w/ SC='Yes' & potentially billable: ",?55,$J(DTOTAL,7) Line Location: PRTT+18
Function Call: WRITE	Prompt: !,?55,$J("-------",7) Line Location: PRTT+19
Function Call: WRITE	Prompt: !,"Encounters verified with Rated Disability Codes: ",?55,$J(DTOT("VBA"),7) Line Location: PRTT+20
Function Call: WRITE	Prompt: !,"Encounters where SC NOT changed: ",?55,$J(DTOT("NO CHANGE"),7) Line Location: PRTT+21
Function Call: WRITE	Prompt: !,"Encounters where SC was changed to NSC: ",?55,$J(DTOT("SCNSC"),7) Line Location: PRTT+22
Function Call: WRITE	Prompt: !,"Encounters where NSC was changed to SC: ",?55,$J(DTOT("NSCSC"),7) Line Location: PRTT+23
Function Call: WRITE	Prompt: !,"Encounters sent to Clinical Review: ",?55,$J(DTOT("REV"),7) Line Location: PRTT+24
Function Call: WRITE	Prompt: !,"Encounters not editable: ",?55,$J(DTOT("NOT"),7) Line Location: PRTT+25
Function Call: WRITE	Prompt: !,"Encounters not yet processed: ",?55,$J(DTOT("NPROC"),7) Line Location: PRTT+26
Function Call: WRITE	Prompt: !!! Line Location: PRTT+27
Routine Call	DIE Line Location: UPD+3
Routine Call	DIR Line Location: EN+6 EN+16
Routine Call	%ZIS Line Location: EN+19

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	BEG+10
^SCE - [#409.68]	FND+9
^SCE("B"	EN+11, BLD+5, BLD+6
^SDSC(409.48 - [#409.48]	FND+2, FND+4, FND+5, FND+6, FND+15
^TMP("SDSCMGR"	EN+3!, PRT+12, PRT+13, PRT+15, PRT+16, PRT+18, PRT+19, PRT+21, PRT+22, PRT+24 , PRT+25, PRT+27, PRT+28, PRT+32!, STORE+1, STORE+2

Label References

Name	Line Occurrences
BLD	BEG+6, BEG+10
EXIT	EN+7, EN+12, EN+17, EN+19, EN+20
EXT	BEG+6, BEG+11
PRTT	EXT+1
STORE	FND+14, FND+16, FND+17, FND+19, FND+20, FND+21
UPD	FND+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN+19!*
AI	BEG+1~, BEG+9*
AJ	BEG+1~, BEG+4*
ATOTAL	BLD+1~, BLD+3, BLD+9, PRT+9
CT	BEG+1~, BEG+2, BEG+10, EXT+1
DATOTAL	BEG+1~, BEG+2, PRT+9, PRTT+17
DIR	EN+1~, EN+13!
DIR("A"	EN+15*
DIR("B"	EN+15*
DIR(0	EN+14*
DIRUT	EXIT+1!
DIV	BLD+1~, PRT+12, PRT+13, PRT+15, PRT+16, PRT+18, PRT+19, PRT+21, PRT+22, PRT+24* , PRT+25, PRT+27*, PRT+28
DT	EN+11
DTOT	BEG+1~
DTOT(	BEG+4*
DTOT("NO CHAN	GE" , PRT+17*, PRTT+21
DTOT("NOT"	PRT+29*, PRTT+25
DTOT("NPROC"	PRT+30*, PRTT+26
DTOT("NSCSC"	PRT+23*, PRTT+23
DTOT("REV"	PRT+26*, PRTT+24
DTOT("SCNSC"	PRT+20*, PRTT+22
DTOT("VBA"	PRT+14*, PRTT+20
DTOTAL	BEG+1~, BEG+2, PRT+10, PRTT+18
DTOUT	EN+7, EN+17, EXIT+1!
DUOUT	EN+7, EN+17, EXIT+1!
EDIV	BLD+1~, FND+6, FND+8, FND+9, FND+10*, FND+11, STORE+1, STORE+2
ENC	BLD+1~, BLD+6*, BLD+7
HHDR	PRTT+1~, PRTT+9, PRTT+10, PRTT+12*, PRTT+13
HHDR1	PRTT+1~, PRTT+5*, PRTT+7, PRTT+9, PRTT+11, PRTT+12
HHDR2	PRTT+1~, PRTT+6*, PRTT+7, PRTT+8, PRTT+11, PRTT+12
HHDR3	PRTT+1~, PRTT+8*, PRTT+9
HHDR4	PRTT+1~, PRTT+8*, PRTT+10, PRTT+14
I	PRT+7, PRTT+1~, PRTT+15
IO	PRT+3, PRTT+2
IO("Q"	EN+20, EN+24!
IOC	EN+19!
IOM	PRTT+7, PRTT+11
IOP	EN+19!
L	BEG+1~, BEG+3*
P	BEG+1~, BEG+3*, PRT+5, PRTT+4
POP	EN+1~, EN+19
SBTOT	BLD+2~, PRT+12, PRT+13, PRT+14, PRT+15, PRT+16, PRT+17, PRT+18, PRT+19, PRT+20 , PRT+21, PRT+22, PRT+23, PRT+24, PRT+25, PRT+26, PRT+27, PRT+28, PRT+29
SCLN	EN+8, EXIT+1!
SCVAL	BLD+2~, FND+18*, FND+19, FND+20
SDABRT	BEG+1~, BEG+3*, BEG+9, PRT+3, EXT+1, PRTT+2
SDEDT	BLD+5, FND+2, PRT+6, EXIT+1!, PRTT+5
SDEFLG	BLD+1~, FND+13*, FND+14
SDENC	UPD~, UPD+2
SDFLD	UPD~, UPD+2
SDFLG	UPD~, UPD+3, EXIT+2!
SDHDR	PRT+2*, PRT+5, EXIT+1!, PRTT+4
SDNWPV	BLD+1~, PRT+4*
SDOE	BLD+2~, FND+3, FND+4, FND+5, FND+6, FND+9, FND+11, FND+15, FND+18, STORE+2
SDOE0	BLD+1~, BLD+7*, BLD+8, BLD+9
SDOEDAT	EXIT+2!
SDOEDT	BLD+1~, BLD+3, BLD+5, BLD+6, FND+1, FND+2, FND+4
SDOSC	EXIT+2!
SDPAT	EXIT+2!
SDPD	UPD+1~
SDPD(	UPD+2*
SDSCBDT	EN+2~, EN+10, EN+11
SDSCDATA	BLD+2~, FND+15*, FND+16, FND+17, FND+18
SDSCDIV	BEG+1~, BEG+5, BEG+6, BEG+7, BEG+9, BEG+10, BLD+8, FND+5
SDSCDNM	BEG+1~, BEG+6, BEG+10, PRT+6
SDSCDVLN	EN+1~, EN+8*, BEG+5
SDSCDVSL	EN+1~, EN+8*, BEG+5, BEG+9
SDSCEDT	EN+10, EN+11, EXIT+1!
SDSCMSG	EXIT+2!
SDSCPKG	EXIT+2!
SDSCSRC	EXIT+2!
SDSCTDT	EN+12, BLD+3, FND+1, PRT+6, EXIT+1!, PRTT+5
SDTYPE	EXIT+1!
SDV0	EXIT+2!
SDVAL	UPD~, UPD+2
SI	BLD+1~
SUBTOT	BLD+1~, PRT+1, PRT+14, PRT+17, PRT+20, PRT+23, PRT+26, PRT+29*, PRT+30
THDR	BEG+1~, BEG+8, BEG+10, PRTT+3*, PRTT+6
TOTAL	BLD+1~, FND+1, FND+6, PRT+10, PRT+30
U	BLD+8, BLD+9, FND+5, FND+6, FND+9, FND+16, FND+17, FND+18
VAL	STORE~, STORE+1, STORE+2, STORE+3!
WHO	EN+1~, EN+18*, BLD+3, PRT+9, PRTT+17
X	EN+1~, EN+13!
Y	EN+1~, EN+8, EN+13!, EN+18
ZTDESC	EN+1~, EN+21*
ZTDTH	EN+1~, EN+21*
ZTIO	EN+19!
ZTQUEUED	EN+1~, BLD+4, BLD+9
ZTRTN	EN+1~, EN+21*
ZTSAVE	EN+1~
ZTSAVE("SDEDT"	EN+23*
ZTSAVE("SDSCBDT"	EN+22*
ZTSAVE("SDSCDVLN"	EN+23*
ZTSAVE("SDSCDVSL"	EN+22*
ZTSAVE("SDSCEDT"	EN+22*
ZTSAVE("SDSCTDT"	EN+23*
ZTSAVE("WHO"	EN+22*

Customize PDF page

Package: Scheduling

Routine: SDSCMSR

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: