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

Package: Automated Lab Instruments

Routine: LA7UTIL


Information

LA7UTIL ;DALISC/JRR - Utilities for Messenger

Source Information

Source file <LA7UTIL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 DD^%DT  DT^DICRW  ^DIR  
Kernel 1 $$DT^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Automated Lab Instruments 7 LA7UIIN2  LA7VIN1A  LA7VIN5  LAMIAUT0  LAMIVT5  LAMIVT6  LAMIVTL0  

Entry Points

Name Comments DBIA/ICR reference
CPT(X)
BU2
TREE
UNWIND(LA760) ;unwind one panel, calls itself recursively to unwind all
PRETTY(LA76249) ;Store an HL7 message text in pretty print format, stored in
PRETIN
PRETOUT ;
LOG ;Print the error log which is stored in ^XTMP. Errors are logged
CADT(LA7AA) ; Calculate current accession date based on accession area transform
; Call with LA7AA = ien of accession area

External References

Name Field # of Occurrence
DD^%DT PRETIN+10
DT^DICRW LOG+3
^DIR CPT+12, LOG+11, LOG+20
$$DT^XLFDT CADT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ???"
  • Line Location: CPT+5
Function Call: WRITE
  • Prompt: !,?5,$J("("_LA7_") ",6),$P(LA7(0),"^"),?22,$TR($P(LA7(0),"^",2,99),"^"," ")
  • Line Location: CPT+9
Function Call: WRITE
  • Prompt: !!,?5,"Nothing logged for Today!"
  • Line Location: LOG+5
Function Call: WRITE
  • Prompt: !!,?5,"Nothing logged for "
  • Line Location: LOG+15
Function Call: WRITE
  • Prompt: Y
  • Line Location: LOG+15
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LOG+19
Function Call: WRITE
  • Prompt: !!
  • Condition for execution: $X
  • Line Location: LOG+22
Function Call: WRITE
  • Prompt: $E(LA7,4,5),"/",$E(LA7,6,7)
  • Line Location: LOG+22
Function Call: WRITE
  • Prompt: "@",$E(LA7TM,1,4)_$E("0000",$L($E(LA7TM,1,4)),3)," "
  • Line Location: LOG+23
Function Call: WRITE
  • Prompt: $P(^XTMP(LA7XTMP,LA7TM),"^",2)," "
  • Line Location: LOG+24
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($L(Y)+$X+1)>IOM
  • Line Location: LOG+25
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: LOG+25
Routine Call
  • DIR
  • Line Location:
    • CPT+12
    • LOG+11
    • LOG+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" LOG+15
^DPT - [#2] PRETIN+20
^DPT("SSN" PRETIN+19
^LAB(60 - [#60] TREE, TREE+1, TREE+3, TREE+5, UNWIND+5, UNWIND+8, UNWIND+10, UNWIND+11
^LAB(62.4 - [#62.4] PRETIN+13
^LAB(64.4 CPT+2, CPT+3, CPT+8, CPT+14
^LAHM(62.49 - [#62.49] PRETTY+5, PRETTY+6, PRETTY+8, PRETTY+9, PRETIN+1, PRETIN+3, PRETIN+4, PRETIN+7*, PRETIN+9, PRETIN+11*
, PRETIN+14, PRETIN+15
^LRO(68 - [#68] CADT+4
^TMP("LA" CPT+1!, CPT+3*, CPT+5!, CPT+7, CPT+8, CPT+10, CPT+14, CPT+16!
^TMP("LA7PRETTY" PRETTY+4!, PRETTY+10*, PRETIN*, PRETIN+7, PRETIN+11, PRETIN+20*
^TMP("LA7TREE" TREE+1*, UNWIND+6*
^XTMP( LOG+5, LOG+14, LOG+17, LOG+24

Label References

Name Line Occurrences
LOG LOG+14
PRETIN PRETTY+13
PRETOUT PRETTY+12
TREE BU2+2, TREE+5
UNWIND UNWIND+11

Naked Globals

Name Field # of Occurrence
^( TREE+5, LOG+24
^(0 TREE+3, UNWIND+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRETTY+7~
DIR CPT+11!, CPT+16!, LOG+6!, LOG+20!
DIR("?" LOG+9*
DIR("A" CPT+11*, LOG+7*
DIR("B" LOG+8*
DIR(0 CPT+11*, LOG+10*, LOG+20*
>> DIRUT LOG+12
DT LOG+4, CADT+3*, CADT+5
DTOUT CPT+13, CPT+16!
DUOUT CPT+13, CPT+16!
I UNWIND+9~, UNWIND+10*, UNWIND+11
II UNWIND+9~, UNWIND+11*
IOF LOG+19
IOM LOG+25
IOSL LOG+19
IOST LOG+20
J BU2~, BU2+1*, TREE+4, TREE+5*, TREE+6*
>> J1( TREE+4*, TREE+6
LA7 CPT~, CPT+2*, CPT+3, CPT+5!, CPT+7*, CPT+8, CPT+9, CPT+10, CPT+11, CPT+13*
, BU2+1, PRETTY+7~, PRETTY+8*, PRETTY+12, PRETTY+13, PRETIN+3*, PRETIN+4, PRETIN+14*, PRETIN+15, LOG+2~
, LOG+21*, LOG+22, LOG+25*
LA7(0 CPT+8*, CPT+9
LA760 UNWIND~, UNWIND+5, UNWIND+6, UNWIND+8, UNWIND+10, UNWIND+11
LA7624 PRETTY+7~, PRETIN+13*
>> LA76240 PRETIN+3, PRETIN+7
LA76249 PRETTY~, PRETTY+5, PRETTY+6, PRETTY+8, PRETTY+9, PRETIN+1, PRETIN+4, PRETIN+9, PRETIN+11, PRETIN+14
, PRETIN+15, LOG+2~
LA7AA CADT~, CADT+4
LA7AD CADT+2~, CADT+5*, CADT+6
LA7CNT CPT~, CPT+1*, CPT+3*
LA7DT LOG+2~
LA7FS PRETTY+7~, PRETTY+9*, PRETTY+10, PRETTY+11, PRETIN+6, PRETIN+17
LA7INST PRETTY+7~, PRETIN+1*, PRETIN+2, PRETIN+6*, PRETIN+7, PRETIN+13
>> LA7QUIT LOG+17, LOG+18*, LOG+19, LOG+20*
LA7TM LOG+2~, LOG+16*, LOG+17*, LOG+23, LOG+24
>> LA7TREEN UNWIND+4, UNWIND+7*
LA7TXT LOG+2~
LA7XTMP LOG+2~, LOG+4*, LOG+5, LOG+13*, LOG+14, LOG+17, LOG+21, LOG+24
S1 BU2~, BU2+1*, TREE+4*, TREE+5, TREE+6*
S1( TREE+4*, TREE+5, TREE+6
T BU2~, BU2+1*, TREE+1
U TREE+1
X CPT~, CPT+3, CPT+5!, CPT+6*, CPT+7, CPT+13, CPT+14*, CPT+15!, BU2~, BU2+1*
, TREE, TREE+1, TREE+3, TREE+4, TREE+5*, TREE+6*, PRETTY+7~, PRETIN+15*, PRETIN+16, PRETIN+17
, LOG+24*, LOG+25, CADT+2~, CADT+4*, CADT+5
Y CPT~, PRETTY+7~, PRETIN+9*, PRETIN+11, PRETIN+17*, PRETIN+18, PRETIN+19*, PRETIN+20, LOG+13, LOG+15
, LOG+20, LOG+25*
Z PRETTY+7~, PRETIN+4*, PRETIN+5, PRETIN+6, PRETIN+18*, PRETIN+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All