Routine: LRAPWEA

Package	Total	Call Graph
Lab Service	1	DA^LRU
VA Fileman	1	(,DD)^%DT

Package

Total

Call Graph

Lab Service

DA^LRU

VA Fileman

(,DD)^%DT

Package	Total	Caller Graph
Lab Service	1	LRAPWE

Package

Total

Caller Graph

Lab Service

LRAPWE

Name	Field # of Occurrence
^%DT	GS, PM
DD^%DT	CK, CK1
DA^LRU	GS, PM

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "Select *BLOCK ID#: " Formatting: ! Timeout: DTIME Variable: LRX Line Location: LRAPWEA+5
Function Call: WRITE	Prompt: $C(7)," Select a number from 1 to ",LR Line Location: LRAPWEA+5
Function Call: READ	Timeout: DTIME Variable: X Line Location: NGS+0
Function Call: WRITE	Prompt: !!,"TOTAL NUMBER of grids scanned:",LRZ(8),$S(LRZ(8):"//",1:"") Line Location: NGS+0
Function Call: WRITE	Prompt: $C(7),!,$G(^(3)) Line Location: NGS+0
Function Call: WRITE	Prompt: $C(7),!,"Total number of grids scanned cannot exceed number of grids prepared" Line Location: NGS+1
Function Call: WRITE	Prompt: $C(7),!,"Total number of grids scanned cannot be less than previous count (",LRZ(1),")" Line Location: NGS+2
Function Call: WRITE	Prompt: ! Line Location: PM+0
Function Call: WRITE	Prompt: $C(7),!,"No prints can be made if no grids prepared." Line Location: NPM+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: NPM+1
Function Call: WRITE	Prompt: !!,"TOTAL NUMBER of prints made:",LRZ(10),$S(LRZ(10):"//",1:"") Line Location: NPM+1
Function Call: WRITE	Prompt: $C(7),!,$G(^(3)) Line Location: NPM+1
Function Call: WRITE	Prompt: $C(7),!,"Total number of prints made cannot be less than previous count (",LRZ(2),")" Line Location: NPM+2
Function Call: WRITE	Prompt: $C(7),!?3,"Date/time grids scanned (" Line Location: CK+0
Function Call: WRITE	Prompt: Y,") cannot be before",!?3,"Date/time grids prepared" Line Location: CK+0
Function Call: WRITE	Prompt: " (",Y,")" Condition for execution: Y]"" Line Location: CK+0
Function Call: WRITE	Prompt: $C(7),!?3,"Date/time prints made (" Line Location: CK1+0
Function Call: WRITE	Prompt: Y,") cannot be before",!?3,"Date/time grids prepared" Line Location: CK1+0
Function Call: WRITE	Prompt: " (",Y,")" Condition for execution: Y]"" Line Location: CK1+0

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.20211	NGS, NPM+1
^LR - [#63]	LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3

Name	Line Occurrences
CK	GS
CK1	PM
GS	LRAPWEA+6, GS
LRAPWEA	LRAPWEA+5, LRAPWEA+6
NGS	NGS, NGS+1, NGS+2
NPM	NPM+1, NPM+2
PM	LRAPWEA+6, PM

Name	Field # of Occurrence
^(0	GS, PM
^(3	NGS, NPM+1
^(4	NGS, NPM+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	GS!, PM!
%DT("A"	GS, PM
%DT("B"	GS, PM
%DT(0	GS, PM
>> A	LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> B	LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
DTIME	LRAPWEA+5, NGS, NPM+1
>> E	LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LR	LRAPWEA+5
>> LR(	LRAPWEA+5, LRAPWEA+6, GS+1, NGS+1, NGS+3, PM+1, NPM, NPM+3
>> LR(2	LRAPWEA+4, LRAPWEA+6
>> LRDFN	LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRI	LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRSS	LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRV	LRAPWEA+6
>> LRW	GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRX	LRAPWEA+4, LRAPWEA+5, LRAPWEA+6, GS+1, NGS+1, NGS+3, PM+1, NPM, NPM+3
>> LRZ(1	LRAPWEA+6*, NGS+2
>> LRZ(10	LRAPWEA+6, NPM+1, NPM+2
>> LRZ(2	LRAPWEA+6*, NPM+2
>> LRZ(4	GS, PM, CK, CK1
>> LRZ(8	LRAPWEA+6*, NGS
U	LRAPWEA+5, LRAPWEA+6, GS, GS+1, NGS, NGS+1, NGS+3, PM, PM+1, NPM , NPM+1, NPM+3
>> X	LRAPWEA+6, NGS, NGS+1, NGS+2, NGS+3, NPM+1*, NPM+2, NPM+3
>> Y	GS, GS+1, PM, PM+1, CK, CK1

Customize PDF page

Package: Lab Service

Routine: LRAPWEA

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: