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: LRACM

Package: Lab Service

Routine: LRACM


Information

LRACM ; IHS/DIR/FJE - MENU FOR CUMULATIVE REPORTS 2/19/91 10:11 ;

Source Information

Source file <LRACM.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Lab Service 6 LRLTR^LRAC1  STA^LRACK  (A,ASK)^LRACM1  LPG^LRACM2  DEL^LRACM4  LOCA^LRWU  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Lab Service 7 LR7OSUM  LRAC INITIALIZE  LRACM1  LRACM2  LRACM2F  LRACM3  LRACSUM  

Entry Points

Name Comments DBIA/ICR reference
LOAD ;from LRACM3
LOC
EN ;
LRKILL
L
LRAC
DIC
LOC1
KILL
MSG ;from LRACM1, LRACM3
END ;from LRACM1, LRACM2, LRACM3, LRACSUM

External References

Name Field # of Occurrence
^%ZIS L+3
^%ZISC L+3, LOC1+2
^%ZTLOAD L+3
^DIC DIC
LRLTR^LRAC1 LOC1+1
STA^LRACK MSG+1
A^LRACM1 LOC
ASK^LRACM1 L
LPG^LRACM2 KILL+2
DEL^LRACM4 LRAC
LOCA^LRWU L

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?25,"Kill now taking place!!!",$C(7)
  • Line Location: LRAC+0
Function Call: WRITE
  • Prompt: !?25,"Kill under way!!!",$C(7)
  • Line Location: LRKILL+0
Function Call: WRITE
  • Prompt: !?7,"SORRY, NO DATA FOR LOCATION ",LRLLOC
  • Line Location: L+1
Function Call: WRITE
  • Prompt: !!,$C(7),"NO PREVIOUS RUN DEFINED",!
  • Line Location: L+2
Function Call: READ
  • Prompt: "Select HOSPITAL LOCATION NAME: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: DIC+0
Function Call: WRITE
  • Prompt: !,"I will initialize various portions of the Lab cumulative package.",!,"Continue only if you want to start over with the cumulative.",!
  • Line Location: KILL+0
Function Call: READ
  • Prompt: "Do you want to continue? N// "
  • Formatting: !!
  • Timeout: 120
  • Variable: X
  • Line Location: KILL+1
Function Call: WRITE
  • Prompt: !!,"O.K.",!!
  • Line Location: KILL+1
Function Call: READ
  • Prompt: "Initialize all page numbers? Y// "
  • Formatting: !!
  • Timeout: 120
  • Variable: X
  • Line Location: KILL+2
Function Call: WRITE
  • Prompt: !!,$C(7),"THE CUMULATIVE APPARENTLY HAS NOT FINISHED.",!,"Do NOT try to reprint reports that have not finished printing!",!,"TO MANUALLY RUN/RESTART CUMULATIVE USE THE OPTION LRAC MANUAL."
  • Line Location: MSG+2
Function Call: READ
  • Prompt: "Press any key to continue: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: MSG+3
Routine Call
  • DIC
  • Line Location:
    • DIC
Routine Call
  • %ZIS
  • Line Location:
    • L+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAC("LGOT" LRAC!
^LAC("LRAC" - [#64.7] LRAC!*
^LAC("LRKILL" LRKILL!
^LRO(69 - [#69] L+1
^SC - [#44] DIC
^TMP($J END+1!, END+3!

Label References

Name Line Occurrences
END LOC, LOC1+2
L LOC, L+1
LOAD LOC1
LRAC KILL+2
LRKILL KILL+2
MSG LOC

Naked Globals

Name Field # of Occurrence
^(0 DIC

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT KILL+2!
>> %ZIS L+3*
DIC DIC*!, KILL+2!
DIC(0 DIC*!
DT DIC
DTIME DIC, MSG+3
HRCN END+4!
IO L+4
IO("Q" L+3!
IOP MSG+1*, MSG+3!
LRACT END+1!
LRADD END+1!
LRAG END+1!
LRAMT END+1!
LRAN END+1!
LRBDT END+1!
LRBOT END+4!
LRCALE END+1!
LRCDT END+4!
LRCL END+1!
LRCTR END+1!
LRCTRR END+1!
LRCW END+1!
LRD END+1!
LRDFN LOC1*, END+1!
LRDIS END+1!
LRDOC END+1!
LRDP END+4!
LRDPF END+1!
LRDT L+1, L+2, END+1!
LRDT1 END+1!
LREDT END+1!
LRF END+1!
LRFALT END+1!
LRFD END+2!
LRFD1 END+1!
LRFDE END+1!
LRFDT END+2!
LRFED END+1!
LRFFDT END+2!
LRFFLG END+1!
LRFMT END+2!
LRFN END+2!
LRFULL END+2!
LRG END+4!
LRGRM END+1!
LRHI END+2!
LRI END+1!
LRIDT LOC1*, END+2!
LRIF END+1!
LRII END+2!
LRIIDT END+2!
LRIL END+2!
LRIN END+1!
LRINN END+2!
LRIOZERO END+1!
LRIV END+2!
LRJS END+2!
LRKL END+1!
LRL END+1!
LRLFDT END+2!
LRLLOC L+1, DIC*, END+2!
LRLNS END+2!
LRLO END+2!
LRLOHI END+2!
LRLTR END+1!
LRMH END+2!
LRMHN END+3!
LRMU END+3!
LRMULT END+3!
LRMYC END+2!
LRNM L*, END+3!
LRNOFL END+3!
LRNON END+3!
LRNOT LOC, END+2!
LRNP END+3!, END+4!
LRNUM END+2!
LRNX END+2!
LRNXSW END+2!
LROFDT END+3!
LROFMT END+3!
LROUT END+1!
LRPAR END+2!
LRPERM END+4!
LRPG END+3!
LRPG2 END+2!
LRPL END+3!
LRPPT END+2!
>> LRRE L*, LOC1+2*
LRRPTN END+2!
LRSDT END+1!
LRSET END+2!
LRSH END+3!
LRSHD END+3!
LRSHN END+3!
LRSIC END+2!
LRSPM END+3!
LRSPM1 END+3!
LRSS END+2!
LRSUB END+3!
LRTAB END+3!
LRTBC END+2!
LRTD END+3!
LRTF END+3!
LRTIM END+3!
LRTLOC END+3!
LRTM END+3!
LRTNN END+3!
LRTOPP END+3!
LRTOT END+3!
>> LRTRUE LOC1*
LRTS END+3!
LRTST END+3!
LRTSTS END+3!
LRTSTVAL END+3!
LRTT END+3!
LRUDT END+3!
LRVAR END+4!
LRVDT END+3!
LRVIDT END+3!
LRWRD END+3!
LRWRDVEW END+2!
LRX END+1!
LRXDT END+2!
LRXLR END+2!
LRYDT DIC*, END+2!
LRYESCOM END+4!
PNM END+4!
>> POP L+3
SEX END+4!
SSN END+4!
U L, DIC
>> X L, DIC*, KILL+1*, KILL+2*, MSG+3*
>> Y DIC
Z END+4!
ZTDESC L+3!
ZTIO L+3!
>> ZTQUEUED LOAD+1
>> ZTREQ LOAD+1*
ZTRTN L+3*!
ZTSAVE L+3!
ZTSAVE("DT" L+3*
ZTSAVE("DUZ" L+3*
ZTSAVE("LR*" L+3*
ZTSAVE("U" L+3*
ZTSK L+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All