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

Package: Lab Service

Routine: LRACSUM


Information

LRACSUM ;SLC/DCM - INDIVIDUAL PATIENT SUMMARY. ;4/17/91 14:30 ;

Source Information

Source file <LRACSUM.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Lab Service 7 END^LRACM  (LRCALE,LRIDT,MICRO)^LRACSUM1  ^LRACSUM3  ^LRDPA  ^LRLTR  ^LRWU3  ($$Y2K,DASH,DT,PT)^LRX  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 1 ^%DT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRTASK DISCHARGE  

Entry Points

Name Comments DBIA/ICR reference
A
SET
END
LIST
WORK
MANUAL
OUT
LRLLOC
DFN
QUE
DQ
FN
DIS

External References

Name Field # of Occurrence
^%DT DQ
^%ZIS QUE
^%ZISC END
^%ZTLOAD QUE+1
END^LRACM END
LRCALE^LRACSUM1 SET+2
LRIDT^LRACSUM1 LRLLOC+4
MICRO^LRACSUM1 LRLLOC+5
^LRACSUM3 LRLLOC+5
^LRDPA DFN, MANUAL+1
^LRLTR DIS
^LRWU3 MANUAL+1, MANUAL+2
$$Y2K^LRX A, A+1
DASH^LRX LIST+1
DT^LRX SET+1
PT^LRX SET+2, WORK+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: LRX
  • Line Location: MANUAL+0
Function Call: WRITE
  • Prompt: !!,"No In-patient stays for this patient"
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !!?10,"ADMISSION DATE",?35,"DISCHARGE DATE"
  • Line Location: LIST+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: LIST+4
Function Call: WRITE
  • Prompt: !?4,LRI,". ",?10,Y
  • Line Location: A+0
Function Call: WRITE
  • Prompt: ?35,Y
  • Line Location: A+1
Routine Call
  • %ZIS
  • Line Location:
    • QUE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] WORK, A, A+1
^DGPM("AMV3" DIS, FN
^DGPM("ATID1" LIST+3, A
^DGPM("C" LIST
^DPT - [#2] WORK+1
^LAB(64.5 - [#64.5] SET
^LR - [#63] LRLLOC+1, SET+2
^TMP($J LRLLOC+3*, LRLLOC+4*, SET+1!

Label References

Name Line Occurrences
A LIST+3
DIS DQ+1, OUT+1
END DFN, DFN+1, MANUAL+2, MANUAL+3, MANUAL+4, DQ+1, OUT+1
FN DIS
LIST MANUAL+1, LIST+4
LRLLOC DFN+1, WORK+1, MANUAL+4
MANUAL MANUAL
OUT MANUAL+2
QUE DFN, MANUAL+2, MANUAL+3
SET LRLLOC+1
WORK FN

Naked Globals

Name Field # of Occurrence
^( LRLLOC+1
^("LR" WORK+1
^(0 WORK, A, A+1
^(1 SET

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT DQ*
>> %ZIS QUE*
>> AGE LRLLOC+3
>> DFN LRLLOC+3, WORK+1*, LIST, LIST+3, A
DIC DFN!, SET+1!, MANUAL!
DTIME MANUAL, LIST+4
>> I QUE*
>> II DIS*
IO DFN+1, DIS, MANUAL+4
IO("Q" QUE!
IOM LIST+1*
>> JJ FN*
>> K FN*
>> L LIST+2*, LIST+3*, A
LRBOT QUE+1!, SET*
LRCDT QUE+1!, SET+1*
LRDFN QUE+1!, LRLLOC+1, LRLLOC+3, LRLLOC+4, SET+2, WORK+1*, MANUAL+1
LRDIS DFN*, QUE+1!, MANUAL*, DQ*
>> LRDPF LRLLOC+3, SET+2*
>> LRDT0 SET+1
LREDT MANUAL+1, MANUAL+2!, MANUAL+3!, LIST+4!*
>> LREND DFN*, MANUAL*, MANUAL+1, MANUAL+2
>> LRF DIS, MANUAL+2*, DQ*
>> LRFD DIS*, FN
>> LRFN DIS*, FN*, WORK+1
>> LRI LIST+2*, A*, A+1
>> LRI( LIST+4, A*, A+1*
LRIDT DFN*, QUE+1!, WORK*, MANUAL+1*
>> LRIN DFN*, WORK*, MANUAL+1*
>> LRINN FN*, WORK
>> LRL DIS, MANUAL+2*, DQ*
>> LRLLOC LRLLOC+1*
>> LRLTR DIS*
LRNM QUE+1!, SET*
LROUT DFN*, QUE+1!, WORK*, MANUAL+1*
LRSDT MANUAL+1, MANUAL+2!, MANUAL+3!, LIST+4*
>> LRTD SET*
LRTNN QUE+1!, SET+2*
>> LRWRD LRLLOC+1
>> LRX MANUAL*, MANUAL+1, MANUAL+2
>> M LIST+3*
>> PNM LRLLOC+3
>> POP DFN, QUE, QUE+1*, MANUAL+2, MANUAL+3
>> SSN LRLLOC+2*, LRLLOC+3
U LRLLOC+3, SET, SET+2, LIST+4, A+1
>> X WORK*, MANUAL+1, DQ*, LIST+4*, A*
X2 DFN!
>> Y DFN, DQ, A*, A+1*
>> Z A*, A+1
ZTDESC QUE*, QUE+1!
ZTIO QUE+1!
>> ZTQUEUED LRLLOC
>> ZTREQ LRLLOC*
ZTRTN DFN!, QUE*, QUE+1!, MANUAL+2*!
ZTSAVE QUE+1!
ZTSAVE( QUE*
ZTSK DFN!, QUE+1, MANUAL+3!, OUT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All