Routine: LRRP6

Package	Total	Call Graph
VA Fileman	4	^%DT ^DIC YN^DICN ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Lab Service	2	WKLDCLN^LRCAPU $$Y2K^LRX

Package	Total	Caller Graph
Lab Service	3	LRRP6 LRRP6A1 LRRP6B1

Entry Points

Name	Comments	DBIA/ICR reference
SETACCN	;
DATES	;
EN	;
REPTYP	;
SITE	;
PAUSE	;
QUE	;
WRAPUP	;
ACCAREA	;
DEVICE	;
DIV	;
METHOD	;
SELECT	;

External References

Name	Field # of Occurrence
^%DT	DATES+2, DATES+6
^%ZIS	DEVICE+1
^%ZISC	WRAPUP+3
^%ZTLOAD	QUE+3
^DIC	DIV+6, ACCAREA+3
YN^DICN	DIV+2
^DIR	METHOD+4, SETACCN+5, SETACCN+13, REPTYP+2, PAUSE+1
WKLDCLN^LRCAPU	WRAPUP+12
$$Y2K^LRX	DATES+4, DATES+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO SITE DEFINED -- CAN'T REPORT" Line Location: SITE+2
Function Call: WRITE	Prompt: !,"Do you want to print a specific DIVISION (YES or NO)" Line Location: DIV+1
Routine Call	DIC Line Location: DIV+6 ACCAREA+3
Routine Call	DIR Line Location: METHOD+4 SETACCN+5 SETACCN+13 REPTYP+2 PAUSE+1
Routine Call	%ZIS Line Location: DEVICE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	SITE+3, DIV+8
^LRO(68 - [#68]	ACCAREA+6
^TMP("LR"	WRAPUP+5!
^XMB(1 - [#4.3]	SITE+1

Label References

Name	Line Occurrences
@(	EN+4
ACCAREA	SELECT+5
DATES	SELECT+3
DEVICE	EN+3
DIV	SELECT+2
METHOD	SELECT+4
PAUSE	WRAPUP+2
QUE	DEVICE+3
REPTYP	SELECT+7
SELECT	EN+2
SETACCN	SELECT+6
SITE	SELECT+1
WRAPUP	EN+5

Naked Globals

Name	Field # of Occurrence
^(0	DIV+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DIV+1*, DIV+3, DIV+4, WRAPUP+6!
%DT	DATES+1, DATES+5, WRAPUP+6!
%DT("A"	DATES+1, DATES+5
%Y	WRAPUP+6!
%ZIS	DEVICE+1*, WRAPUP+6!
>> ACCTRNS	ACCAREA+6*, SETACCN+7, SETACCN+8
DIC	DIV+5, ACCAREA+1!, WRAPUP+6!
DIC("A"	DIV+5, ACCAREA+2
DIC(0	DIV+5, ACCAREA+1
DIR	METHOD+1!, METHOD+6!, SETACCN+2!, SETACCN+10!, REPTYP+1!, REPTYP+4!, WRAPUP+6!, PAUSE+1!
DIR("A"	METHOD+1, METHOD+2, METHOD+3, SETACCN+4, SETACCN+12, REPTYP+1
DIR("B"	SETACCN+4, SETACCN+12
DIR(0	METHOD+3, SETACCN+3, SETACCN+11, REPTYP+1, PAUSE+1*
DIROUT	WRAPUP+6!
DIRUT	WRAPUP+6!
DTOUT	DIV+9, METHOD+4, SETACCN+5, SETACCN+13, REPTYP+2, WRAPUP+6!, PAUSE+2
DUOUT	DIV+9, METHOD+4, SETACCN+5, SETACCN+13, REPTYP+2, WRAPUP+6!, PAUSE+2
I	WRAPUP+6!
IO("Q"	DEVICE+1!, DEVICE+3, QUE+1!
IOF	WRAPUP+3
ION	QUE+1
IOP	DEVICE+1!
IOST	WRAPUP+2, WRAPUP+3
LRAA	ACCAREA+5*, ACCAREA+6, WRAPUP+7!
LRAN	WRAPUP+11!
LRANF	SETACCN+6*, WRAPUP+9!
LRANL	SETACCN+14*, WRAPUP+9!
LRANN	WRAPUP+7!
LRCC	WRAPUP+11!
LRCPN	WRAPUP+11!
LRDASH	WRAPUP+11!
LRDAT	WRAPUP+8!
LRDATRNG	DATES+11*, WRAPUP+8!
LRDIV	WRAPUP+10!
LRDIVNAM	WRAPUP+10!
LRDIVSEL	DIV+7*, DIV+9, WRAPUP+10!
LRDIVSEL(	DIV+8*
LRDT	SETACCN+7, SETACCN+8, WRAPUP+8!
LREDAT	DATES+8*, DATES+11, WRAPUP+8!
LREDT	DATES+7, DATES+9, WRAPUP+8!
LREND	EN+1, EN+3, EN+4, SELECT+1, SELECT+2, SELECT+3, SELECT+4, SELECT+5, SELECT+6, SELECT+7 , SITE+2, DIV+3, DIV+9, DATES+2, DATES+6, METHOD+4, ACCAREA+4, SETACCN+5, SETACCN+13, REPTYP+2* , DEVICE+2, DEVICE+3, WRAPUP+1, WRAPUP+2, WRAPUP+8!, PAUSE+2*
LRFIRST	WRAPUP+10!
LRNODE	WRAPUP+8!
LRPAG	WRAPUP+8!
LRREPTYP	REPTYP+3*, WRAPUP+10!
LRSDAT	DATES+4*, DATES+11, WRAPUP+8!
LRSDT	DATES+3, DATES+9, DATES+10*, SETACCN+7, SETACCN+8, WRAPUP+8!
LRSITE	SITE+3*, WRAPUP+11!
LRSITNUM	SITE+1*, SITE+2, SITE+3, WRAPUP+11!
LRSTAR	WRAPUP+11!
LRSUBH	WRAPUP+11!
LRSUM	WRAPUP+7!
LRTIC	WRAPUP+9!
LRTMULT	WRAPUP+7!
LRTN	WRAPUP+10!
LRTNAM	WRAPUP+10!
LRTST	WRAPUP+10!
LRTSTREC	WRAPUP+10!
LRV657	WRAPUP+11!
LRV658	WRAPUP+11!
LRX	ACCAREA+5*, WRAPUP+8!
POP	DEVICE+1*, DEVICE+2, WRAPUP+6!
U	SITE+1, SITE+3, DIV+8, DATES+2, DATES+6, ACCAREA+5, ACCAREA+6
X	DATES+2, DATES+6, DATES+9*, SETACCN+6, SETACCN+14, WRAPUP+6!
Y	DIV+6, DIV+7, DIV+8, DATES+3, DATES+4, DATES+7, DATES+8, METHOD+5, ACCAREA+4, ACCAREA+5 , REPTYP+3, WRAPUP+6!
ZTDESC	WRAPUP+7!, QUE+2*
ZTIO	WRAPUP+7!, QUE+1*
>> ZTQUEUED	WRAPUP+3, WRAPUP+4
>> ZTREQ	WRAPUP+4*
ZTRTN	EN+4, SELECT+6, METHOD+5*, WRAPUP+7!
ZTSAVE	WRAPUP+7!
ZTSAVE("LR*"	QUE+3*
ZTSK	WRAPUP+7!

Customize PDF page

Package: Lab Service

Routine: LRRP6

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: