Routine: LRACDIAG

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	1	YN^DICN

Package

Total

Call Graph

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

VA Fileman

YN^DICN

Package	Total	Caller Graph
Lab Service	6	LRAC A LRAC A AC AR LRAC AC LRAC AR LRAC DIAG LRCKF

Package

Total

Caller Graph

Lab Service

LRAC A LRAC A AC AR LRAC AC LRAC AR LRAC DIAG LRCKF

Name	Field # of Occurrence
^%ZIS	QUE
^%ZISC	QUE+1, DQ
^%ZTLOAD	QUE
YN^DICN	EN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: QUE+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)="P-" Line Location: QUE+1
Function Call: WRITE	Prompt: !!,?10,"Diagnostic Report for LAB REPORTS FILE (64.5)" Line Location: ENT+1
Function Call: WRITE	Prompt: !!,"SUPERVISOR'S SUMMARY REPORT field not defined",?68,">>WARNING<<" Line Location: ENT+1
Function Call: WRITE	Prompt: !!,"The ""AC"" x-ref indicates that the Lab Reports file may contain tests",!?3,"that do not have data names (cosmic). Remove test and re-cross-",!?3,"reference the ""AC"" index.",?70,">>FATAL<<" Line Location: ENT+2
Function Call: WRITE	Prompt: !!,"REPORT NAME field not defined",?70,">>FATAL<<" Line Location: ENT+3
Function Call: WRITE	Prompt: !!,LRMAJ Line Location: MAJ+0
Function Call: WRITE	Prompt: !! Line Location: END+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)="P-" Line Location: END+1
Function Call: WRITE	Prompt: !?3,LRMIN Line Location: MIN+0
Function Call: WRITE	Prompt: !?5,"""AR"" x-ref does not exist for ",LRTST,?70,">>FATAL<<" Line Location: XREF+0
Function Call: WRITE	Prompt: !?5,"""A"" x-ref does not exist for ",LRTST,?70,">>FATAL<<" Line Location: XREF+1
Function Call: WRITE	Prompt: !?5,"""A"" x-ref for ",LRTST," is 'out-of-date' with file 60.",?70,">>FATAL<<" Line Location: XREF+2
Function Call: WRITE	Prompt: !?5,"""AC"" x-ref does not exist for ",LRTST,?70,">>FATAL<<" Line Location: XREF+3
Function Call: WRITE	Prompt: "." Line Location: XREF1+0
Function Call: WRITE	Prompt: "." Line Location: XREF1+1
Function Call: WRITE	Prompt: "." Line Location: XREF1+2
Function Call: WRITE	Prompt: !!,"ARE YOU SURE" Line Location: EN+3
Routine Call	%ZIS Line Location: QUE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(64.53	XREF1, XREF1+1, XREF1+2
^LAB(60 - [#60]	XREF+2
^LAB(61 - [#61]	CHK+1
^LAB(64.5 - [#64.5]	ENT+1, ENT+2, ENT+3, ENT+4, MAJ, DEV, MIN, TST+1, XREF, XREF+1 , XREF+2, XREF+3, EN+4!
^TMP($J	ENT+1!, END!, CHK+1, CHK+2*

Name	Line Occurrences
CHK	TST+1
DEV	ENT+5
END	QUE, EN+3, EN+6
ENT	QUE+1, DQ
MAJ	EN+5
MIN	MAJ
TST	MIN
XREF	TST+1
XREF1	XREF

Name	Field # of Occurrence
^(	ENT+4, MAJ, MIN, TST+1
^(0	ENT+4, MIN, TST+1, CHK+1
^(1	XREF

Local Variables

Name	Field # of Occurrence
>> %	EN+3*
>> %ZIS	QUE*
>> A	ENT+1, ENT+4, ENT+5, DEV
DA	END!, TST+1*, XREF, XREF+1, XREF+2, XREF+3
DA(1	MIN*, XREF, XREF+1, XREF+2, XREF+3
DA(2	MAJ*, MIN, TST+1, XREF, XREF+1, XREF+2, XREF+3
DA(3	MAJ*, XREF, XREF+1, XREF+2, XREF+3
DTIME	EN*
I	ENT+4*, END!
IO	ENT+1, DQ
IO("Q"	QUE!
IOF	QUE+1, END+1
IOST	QUE+1, END+1
J	END!, MIN*, TST+1
K	END!, TST+1*
LR	ENT+1!, END!, TST, CHK, CHK+1, CHK+2, XREF
LR(1	XREF1, EN+1, EN+4
LR(2	XREF1+1, EN+2, EN+4
LR(3	XREF1+2, EN+2, EN+4
LRCKW	LRACDIAG+5*, ENT+1, END!
LREN	END!
LREN(	ENT+4*, ENT+5
LRFMT	END!, MIN*, TST
LRMAJ	MAJ*, END!, CHK
LRMIN	END!, MIN*, CHK
LROFMT	MAJ, END!, MIN, TST
LRSB	END!, TST+1*, CHK
LRSITE	END!, MIN*, CHK+1, CHK+2, XREF+2
LRST	END!
LRST(	ENT+4*, ENT+5
LRTS	END!, TST+1*, CHK+1, CHK+2, XREF+2
LRTST	END!, TST+1*, CHK, CHK+1, XREF, XREF+1, XREF+2, XREF+3
>> POP	QUE
U	LRACDIAG+5, ENT+4, MAJ, DEV, MIN, TST+1, CHK+1, EN
>> X	MIN, TST+1
>> ZTDESC	QUE*
>> ZTQUEUED	DQ
>> ZTREQ	DQ*
>> ZTRTN	QUE*
>> ZTSAVE("DT"	QUE*
>> ZTSAVE("LRCKW"	QUE*
>> ZTSAVE("U"	QUE*
ZTSK	QUE!

Customize PDF page

Package: Lab Service

Routine: LRACDIAG

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed