Routine: LRCAPAM1

Package	Total	Call Graph
Kernel	3	^%ZISC (T0,T1)^%ZOSV ($$FMTE,$$NOW)^XLFDT
VA Fileman	2	^DIC FILE^DICN
Lab Service	1	^LRCAPAM0

Package	Total	Caller Graph
Lab Service	2	LR WKLD LMIP 1 LRCAPAM0

Entry Points

Name	Comments	DBIA/ICR reference
EN1	;
CLEAR	;
EN	;
END	;
NEWIN	;Add new division

External References

Name	Field # of Occurrence
^%ZISC	CLEAR+4
T0^%ZOSV	EN+2
T1^%ZOSV	CLEAR+2
^DIC	EN1+6, EN1+15
FILE^DICN	EN+5, NEWIN+2
^LRCAPAM0	EN+1
$$FMTE^XLFDT	EN1+3, EN1+4
$$NOW^XLFDT	EN1+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?10,$$FMTE^XLFDT(LRDAT)," Compiled previously " Line Location: EN1+3
Function Call: WRITE	Prompt: !!?10,"Error Processing WKLD "_LRCAPNA,!?5,LRCAPN,!! Line Location: EN1+16
Function Call: WRITE	Prompt: !!?10,"FINISHED",!! Line Location: EN1+39
Routine Call	DIC Line Location: EN1+6 EN1+15

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^LRO(67.9 - [#67.9]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42.4 - [#42.4]	EN1+32
^DIC(45.7 - [#45.7]	EN1+20
^LAM - [#64]	EN1+11, EN1+12*
^LAM("AC"	EN1+12*
^LRO(64.1 - [#64.1]	EN1+2, EN1+10, EN1+18, EN1+36
^LRO(67.9 - [#67.9]	EN+4, EN+5, EN1+1, EN1+7, EN1+8, EN1+17, EN1+18, EN1+26, EN1+28, EN1+29 , EN1+30, EN1+31, EN1+34, EN1+38, NEWIN+1, NEWIN+3, CLEAR+1

Label References

Name	Line Occurrences
CLEAR	EN1+39
END	EN+1
NEWIN	EN1+1

Naked Globals

Name	Field # of Occurrence
^(	EN1+2, EN1+18, EN1+31*
^("S"	EN1+36
^(0	EN+4, EN1+2, EN1+8, EN1+18, EN1+20, EN1+29, EN1+30, EN1+32, EN1+34, EN1+35 , NEWIN+1*
^(2	EN1+17*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	CLEAR+5!
DA	EN+5!, EN1+5!, EN1+13!, EN1+14, NEWIN+2*, CLEAR+5!
DA(1	EN+5, EN1+6, EN1+15, NEWIN+2
DA(2	EN1+6, EN1+15
DA(3	EN1+15*
DD	NEWIN+2!
DIC	EN+5!, EN1+5!, EN1+6, EN1+13!, EN1+14, NEWIN+2!, CLEAR+5!
DIC(0	EN+5, EN1+6, EN1+15, NEWIN+2
DIE	CLEAR+5!
DINUM	EN+1!, EN+5, EN1+1!, EN1+5!, EN1+13!, NEWIN+2, NEWIN+3!, CLEAR+5!
DLAYGO	EN+5, EN1+6, EN1+15!, NEWIN+2, CLEAR+5!
DO	EN+5!, NEWIN+2!
DR	EN+5!, EN1+5!, EN1+13!, CLEAR+5!
INP	EN1+20*, CLEAR+5!
IO("Q"	CLEAR+7!
LINE	CLEAR+5!
LRACT	EN1+11*, EN1+12, CLEAR+8!
LRCAP	EN1+9, EN1+10, EN1+11, EN1+12, EN1+18, EN1+36, CLEAR+5!
LRCAPN	EN1+11*, EN1+14, EN1+16, EN1+17, CLEAR+5!
LRCAPNA	EN1+11*, EN1+16, EN1+17, CLEAR+5!
LRCHK	EN1+2*, EN1+3, CLEAR+5!
LRDAT	EN1+2*, EN1+3, EN1+4, EN1+10, EN1+18, EN1+36, CLEAR+5!
LRDTE	EN1+2, CLEAR+8!
LRDTS	EN1+2, CLEAR+5!
LREND	EN+1, END+1*, CLEAR+8!
LRFILE	EN1+19*, EN1+21, EN1+24, CLEAR+8!
LRIN	EN1+1, EN1+2, EN1+6, EN1+7, EN1+8, EN1+10, EN1+15, EN1+17, EN1+18, EN1+26 , EN1+28, EN1+29, EN1+30, EN1+31, EN1+34, EN1+36, EN1+38, NEWIN+2, NEWIN+3, CLEAR+5!
LRLMIP	EN1+11*, EN1+17, CLEAR+6!
LRMULT	EN1+23*, EN1+25, EN1+28, EN1+35, CLEAR+8!
LRPRI	EN+5, EN1+1, EN1+6, EN1+7, EN1+8, EN1+15, EN1+17, EN1+18, EN1+26, EN1+28 , EN1+29, EN1+30, EN1+31, EN1+34, EN1+38, NEWIN+1, NEWIN+2, NEWIN+3, CLEAR+5!
LRPRIN	CLEAR+5!
LRRDT	EN1+4*, EN1+6, CLEAR+6!
LRSO	EN1+27*, CLEAR+8!
LRSOCNT	EN1+27, EN1+28!, CLEAR+8!
LRTM	EN1+11, EN1+18, CLEAR+6!
LRTN	CLEAR+6!
LRTREATN	EN1+32, EN1+33, EN1+34!
LRURG	EN1+25*, CLEAR+6!
LTYPE	EN1+20, EN1+24, CLEAR+6!
NODE	EN1+18*, EN1+19, EN1+20, EN1+23, EN1+25, CLEAR+6!
NODE0	EN1+18, EN1+25, EN1+26, EN1+27, EN1+28, EN1+37, EN1+38, CLEAR+6!
NODE2	EN1+30*, CLEAR+6!
NODE3	EN1+35*, CLEAR+6!
NODES	EN1+36*, EN1+37, CLEAR+6!
NODESX	EN1+37*, CLEAR+6!
NODEX	CLEAR+6!
NX	EN1+6*, EN1+7, EN1+8, EN1+15, EN1+17, EN1+18, EN1+26, EN1+28, EN1+29, EN1+30 , EN1+31, EN1+34, EN1+38, CLEAR+6!
NX2	EN1+15*, EN1+17, EN1+18, EN1+26, EN1+28, EN1+29, EN1+30, EN1+31, EN1+34, EN1+38 , CLEAR+6!
NX3	EN1+30*, EN1+31, EN1+34, CLEAR+7!
OTHP	EN1+20*, CLEAR+7!
OUTP	EN1+20*, CLEAR+7!
P	EN1+37*, CLEAR+7!
PN	EN1+24, EN1+25, EN1+27, CLEAR+7!
PSN	EN1+37*, CLEAR+7!
PTYPE	EN1+20*, CLEAR+7!
TREAT	EN1+20, EN1+21, EN1+22*, EN1+30, EN1+31, EN1+32, EN1+33, EN1+34, CLEAR+7!
U	EN1+2, EN1+7, EN1+11, EN1+12, EN1+17, EN1+18, EN1+19, EN1+20, EN1+23, EN1+25 , EN1+27, EN1+28, EN1+30, EN1+32, EN1+35, EN1+37
X	EN+5, EN1+6, EN1+14, NEWIN+2, CLEAR+8!
>> XRTN	EN+2, CLEAR+2
Y	EN1+6, EN1+15, EN1+16, EN1+17, CLEAR+7!
ZTSK	CLEAR+7!

Customize PDF page

Package: Lab Service

Routine: LRCAPAM1

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: