Routine: SCRPW43

Information

SCRPW43 ;RENO/KEITH - Means Test/Eligibility/Enrollment Report ; 24 Aug 99 9:25 PM

Source Information

Source file <SCRPW43.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Scheduling	8	$$MTI^SCDXUTL0 BLD^SCRPW21 $$ENROL^SCRPW24 ASK1^SCRPW41 EXIT1^SCRPW42 (,HDR)^SCRPW44 SUBT^SCRPW50 $$GETOE^SDOE
Kernel	1	$$S^%ZTLOAD
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Scheduling	2	SCRPW41 SCRPW44

Entry Points

Name	Comments	DBIA/ICR reference
LC(X)	;Lowercase value
PDP(SDT,SDX,SDP,SDL,SDL1)	;Print parameter display line
GET	;Gather report information
PDIS	;Parameter display
STOP	;Check for stop task request
SORT(SDACR)	;Return sort value
INCL()	;Determine if encounter should be included in detailed report
START	;Print report
SET1(SDIV)	;Set TMP global for detail
SET0(SDIV)	;Set TMP global for summary
EXIT
PD1(SDI)	;Print parameters
DIV(SDIV)	;Evaluate division
DSV(SDIV,S0,S1,S2,S3,S4)	;Produce detail sort value
WAIT	;Do CRT pause
SCAT	;Select format subcategory
SDEL	;Delete sub-category
SCAT1

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	STOP+1
^DIR	SCAT1, SDEL+1, PDIS+2, WAIT+1
$$MTI^SCDXUTL0	GET+3
BLD^SCRPW21	START+1
$$ENROL^SCRPW24	GET+5
ASK1^SCRPW41	SCRPW43+2
EXIT1^SCRPW42	EXIT
^SCRPW44	START+5
HDR^SCRPW44	PD1+14, PDP+7
SUBT^SCRPW50	PDIS+1
$$GETOE^SDOE	START+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PDIS+1
Function Call: WRITE	Prompt: ! Line Location: PDIS+1
Function Call: WRITE	Prompt: ! Condition for execution: SDI>1 Line Location: PD1+16
Function Call: WRITE	Prompt: ?($S($E(IOST)="P":(IOM\2-1),1:C+19+(3*SDI))) Line Location: PD1+16
Function Call: WRITE	Prompt: $E($P(SDX,U,2),1,SDL)_$S($P(SDX,U,3):" <pagefeed>",1:"") Line Location: PD1+16
Function Call: WRITE	Prompt: ! Line Location: PDP+8
Function Call: WRITE	Prompt: ?(IOM\2-1),$P(SDX,U,SDP) Line Location: PDP+9
Function Call: WRITE	Prompt: ! Line Location: WAIT+1
Routine Call	DIR Line Location: SCAT1 SDEL+1 PDIS+2 WAIT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(8 - [#8]	GET+8
^DPT - [#2]	SET1+1
^SCE("B"	START+3
^TMP("SCRPW"	SET0+1, SET0+2, SET0+3, SET0+4, SET0+5, SET0+6, SET0+7, SET0+8, SET1+3, SET1+4 , SET1+5, SET1+6, SET1+8, SET1+9, SET1+10, DSV+3, DSV+4, DSV+5*, SORT+3

Label References

Name	Line Occurrences
$$DIV	START+4
$$DSV	SET1+7
$$INCL	GET+5
$$LC	PD1+8
$$SORT	SET1+2
EXIT	START+5
GET	START+4
PD1	PDIS+1
PDP	PD1+2, PD1+3, PD1+4, PD1+5, PD1+6, PD1+7, PD1+8, PD1+10, PD1+12
SCAT1	SCAT+14
SDEL	SCAT1+2
SET0	GET+10
SET1	GET+12
STOP	GET+2
WAIT	PD1+13, PDP+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	PD1+2~*, PD1+15, PD1+16
>> DFN	GET+2*, GET+3, SET0+2, SET0+4, SET0+6, SET0+8, SET1+1, SET1+3, SET1+4, SET1+5 , SET1+6, SET1+8, SET1+9, SET1+10, SORT+3
DIR	SCAT+1!, SDEL+1~, PDIS+2!, WAIT+1~
DIR("?"	SCAT+3, SCAT+7, SCAT+12*
DIR("A"	SCAT+3, SCAT+6, SCAT+11, SCAT+14, SDEL+1, PDIS+2
DIR("B"	PDIS+2*
DIR(0	SCAT+2, SCAT+6, SCAT+10, SDEL+1, PDIS+2, WAIT+1
DT	GET+5
>> DTOUT	SCAT1, SDEL+1, PDIS+2
>> DUOUT	SCAT1, SDEL+1, PDIS+2
IOM	PD1+2, PD1+15, PD1+16, PDP+9
IOSL	PD1+14, PDP+7
IOST	PD1+13, PD1+14, PD1+15, PD1+16, PDP+6, PDP+7
S0	DSV~, DSV+3, DSV+5
S1	DSV~, DSV+3, DSV+5
S2	DSV~, DSV+3, DSV+5
S3	DSV~, DSV+3, DSV+5
S4	DSV~, DSV+3, DSV+5
>> SD("BDT"	START+2, PD1+5
>> SD("EDT"	START+3, PD1+5
>> SD("FMT"	SCAT+1, SCAT+5, SCAT+9, SCAT+15, SCAT1+2, SCAT1+3, SDEL+2!, PD1+6, PD1+7, PD1+8 , PD1+11, GET+10, GET+11, GET+12, INCL+2, INCL+3, INCL+4, INCL+5, INCL+6, INCL+7
>> SD("SORT"	PD1+12, PD1+13, PD1+14, PD1+16, SET1+2, SET1+3, SET1+4, SET1+5, SET1+6, SET1+8 , SET1+9, SET1+10
>> SD("STAT"	START+4, PD1+10
>> SD0	SET1+1*
SDACR	SORT~, SORT+3
SDACT	SORT+2~, SORT+3*
>> SDDIV	START+2, PD1+3, DIV+1
>> SDDIV(	START+2, PD1+2, PD1+4, DIV+1
>> SDEL	GET+4, GET+8, GET+11, SET0+3, SET0+4, INCL+6
>> SDEP	GET+5, GET+9, GET+11, SET0+5, SET0+6, INCL+7
SDFMT	INCL+3~*, INCL+5, INCL+6, INCL+7
SDI	PD1~, PD1+2, PD1+3, PD1+4, PD1+7, PD1+8, PD1+10, PD1+16, LC+1~, SET1+2*
>> SDII	PD1+7, PD1+8, PD1+10*
SDINC	GET+1~, GET+5*, GET+12
SDIV	DIV~, DIV+1, GET+2*, GET+10, SET0~, SET0+1, SET0+2, SET0+3, SET0+4, SET0+5 , SET0+6, SET0+7, SET0+8, SET1~, SET1+3, SET1+4, SET1+5, SET1+6, SET1+7, SET1+8 , SET1+9, SET1+10, DSV~, DSV+3, DSV+4, DSV+5
SDL	PD1+16*, PDP~, PDP+9
SDL1	PD1+7, PD1+8, PD1+10*, PDP~, PDP+8
SDLF	PD1+2~, PD1+13, PDP+6, PDP+8*
>> SDMD	START+2*, GET+10, GET+12
>> SDMT	GET+3, GET+4, GET+6, GET+7, GET+11, SET0+1, SET0+2, INCL+5
>> SDNUL	SCAT+1, SCAT+14, SCAT+15, SCAT1+1
>> SDOE	START+3*, START+4, GET+3
SDOE0	START+4, GET+2, GET+3, GET+4, GET+12, SET0+2, SET0+4, SET0+6, SET0+8, SORT+2~ , SORT+3
>> SDOUT	START+2, START+3, START+5, SCAT+1, SCAT+14, SCAT+15, SCAT1, SDEL+1, PDIS+2, PDIS+3 , PD1+2, PD1+3, PD1+4, PD1+5, PD1+6, PD1+7, PD1+8, PD1+10, PD1+13, PD1+14 , PDP+6, PDP+7, WAIT+1, GET+2, STOP+1
SDP	PDP~, PDP+9
>> SDPNAM	SET1+1*, SET1+3, SET1+4, SET1+5, SET1+6, SET1+8, SET1+9, SET1+10
SDS	SET1+2~
SDS(	SET1+2*
SDS(1	SET1+4, SET1+5, SET1+6, SET1+7, SET1+8, SET1+9, SET1+10
SDS(2	SET1+5, SET1+6, SET1+7, SET1+8, SET1+9, SET1+10
SDS(3	SET1+6, SET1+7, SET1+8, SET1+9, SET1+10
SDS(4	SET1+7, SET1+8, SET1+9, SET1+10
SDS(5	SET1+9, SET1+10
SDS(6	SET1+10
>> SDSSN	SET1+1*, SET1+3, SET1+4, SET1+5, SET1+6, SET1+8, SET1+9, SET1+10
>> SDSTOP	START+2, GET+2
SDT	START+2, START+3, PDP~, PDP+9
>> SDUI	SET1+7*, SET1+8, SET1+9, SET1+10
SDX	PD1+11, PD1+12, PD1+15, PD1+16, PDP~, PDP+9, GET+11, SET1+3, SET1+4, SET1+5 , SET1+6, SET1+7, SET1+8, SET1+9, SET1+10, DSV+3~, DSV+4, DSV+5, SORT+2~, SORT+4
SDX(	SORT+4
SDX(""	SORT+4
>> SDY	GET+11*, SET1+3, SET1+4, SET1+5, SET1+6, SET1+8, SET1+9, SET1+10
>> T	START+1*, SORT+3
U	START+2, START+4, SCAT+1, SCAT+5, SCAT+9, SCAT1+2, SCAT1+3, SDEL+2, PD1+6, PD1+8 , PD1+11, PD1+16, PDP+9, GET+2, GET+3, GET+4, GET+5, GET+8, GET+10, GET+11 , GET+12, SET0+2, SET0+4, SET0+6, SET0+8, SET1+1, SET1+2, SET1+3, SET1+4, SET1+5 , SET1+6, SET1+8, SET1+9, SET1+10, SORT+3, SORT+4, INCL+2, INCL+3
X	SCAT1+1, LC~, LC+1*, LC+2
>> Y	SCAT1+2, SCAT1+3, SDEL+2, PDIS+3, WAIT+1
>> Y(0	SCAT1+3
>> ZTQUEUED	STOP+1
>> ZTSTOP	STOP+1*

Customize PDF page

Package: Scheduling

Routine: SCRPW43

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: