Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRACDIAG

Package: Lab Service

Routine: LRACDIAG


Information

LRACDIAG ; IHS/DIR/FJE - DIAGNOSTIC REPORT FOR LAB REPORTS FILE (64.5) 2/19/91 10:09 ;

Source Information

Source file <LRACDIAG.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 6

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

Entry Points

Name Comments DBIA/ICR reference
XREF1
XREF
END
MIN
CHK
DEV
EN
ENT ;from LRCKF
QUE
TST
MAJ
DQ

External References

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*

Label References

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

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All