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

Package: Automated Lab Instruments

Routine: LAMIVTL1


Information

LAMIVTL1 ;DAL/HOAK 2nd Vitek literal verify rtn

Source Information

Source file <LAMIVTL1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Lab Service 3 $$DTF^LRAFUNC1  RANGE^LRWU2  (INF,PT)^LRX  
VA FileMan 2 YN^DICN  ^DIR  
Automated Lab Instruments 1 ^LAMIVTL2  

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

Package Total Caller Graph
Automated Lab Instruments 1 LAMIVTL0  

Entry Points

Name Comments DBIA/ICR reference
INIT ;
CONTROL ;
SETUP ;
; Set up variables for PROCESSING
EN ; From LAMIAUT0 BY FHS
PAT ;
EXP ; From LAMIAUT4 BY FHS
V9 ;

External References

Name Field # of Occurrence
YN^DICN PAT+18
^DIR V9+7
^LAMIVTL2 CONTROL+4
$$DTF^LRAFUNC1 PAT+3
RANGE^LRWU2 V9+10
INF^LRX EXP+4
PT^LRX PAT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CONTROL+1
Function Call: WRITE
  • Prompt: !,"ACC # (",LRAN,") "
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: $$DTF^LRAFUNC1(LRCDT),!!?10,PNM," SSN: ",SSN," LOC: ",LRLLOC
  • Line Location: PAT+3
Function Call: WRITE
  • Prompt: !?5,"Specimen: "
  • Line Location: PAT+4
Function Call: WRITE
  • Prompt: $S($D(^LAB(61,+LRSPEC,0)):$P(^(0),U),1:"Unknown")
  • Line Location: PAT+5
Function Call: WRITE
  • Prompt: " Sample: ",$S($D(^LAB(62,+LRSAMP,0)):$P(^(0),U),1:"Unknown"),!
  • Line Location: PAT+6
Function Call: WRITE
  • Prompt: !," Comment on Specimem "
  • Line Location: PAT+8
Function Call: WRITE
  • Prompt: ?30,^(I,0),!
  • Line Location: PAT+10
Function Call: WRITE
  • Prompt: !,"GRAM STAIN "
  • Line Location: PAT+12
Function Call: WRITE
  • Prompt: ?15,^(I,0),!
  • Line Location: PAT+14
Function Call: WRITE
  • Prompt: !,"Comment on Specimen : ",^(99)
  • Line Location: PAT+15
Function Call: WRITE
  • Prompt: !!?10,"Is this the correct patient/specimen? "
  • Line Location: PAT+17
Function Call: WRITE
  • Prompt: !!,PNM," ",SSN,!,LRACCN
  • Line Location: EXP+3
Function Call: WRITE
  • Prompt: !!?5,$P(^LAB(61,LRSPEC,0),U)," ",$P(^LAB(62,LRSAMP,0),U),!
  • Line Location: EXP+5
Function Call: WRITE
  • Prompt: !,I," ",LRNAME(I)
  • Line Location: EXP+21
Function Call: WRITE
  • Prompt: ?25," verified"
  • Line Location: EXP+22
Function Call: WRITE
  • Prompt: !
  • Line Location: V9+1
Function Call: WRITE
  • Prompt: !!?7,"Incorrect test number ",$C(7)
  • Line Location: V9+10
Routine Call
  • DIR
  • Line Location:
    • V9+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] EXP+12
^LAB(61 - [#61] PAT+5, EXP+5
^LAB(62 - [#62] PAT+6, EXP+5
^LR - [#63] EN+3, PAT+11, PAT+14, PAT+15
^LRO(68 - [#68] SETUP+4, SETUP+13, SETUP+17, EN+1, EN+2, EXP+8, EXP+22
^LRO(69 - [#69] PAT+7, PAT+10
^TMP("LR" EXP+6!
^VA(200 - [#200] EN+4

Label References

Name Line Occurrences
CONTROL INIT+3
EXP CONTROL+3, V9+10
SETUP CONTROL+2

Naked Globals

Name Field # of Occurrence
^( SETUP+4, EN+1, PAT+10, PAT+14, EXP+9
^(0 EN+2, EN+4, PAT+5, PAT+6, EXP+12, EXP+22
^(3 SETUP+13
^(99 PAT+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PAT+16*, PAT+19
>> A PAT+10*, PAT+14*
>> DFN EN+3*
>> DIR("?" V9+6*
>> DIR("A" V9+4*
>> DIR("B" V9+5*
>> DIR(0 V9+3*
>> DTOUT V9+8
>> DUOUT V9+8
>> I PAT+9*, PAT+10*, PAT+13*, PAT+14*, EXP+8*, EXP+9, EXP+11*, EXP+12, EXP+13, EXP+14
, EXP+15, EXP+16, EXP+18*, EXP+19, EXP+20, EXP+21, EXP+22
IOF CONTROL+1
>> LRAA SETUP+4, SETUP+13, SETUP+17, EN+1, EN+2, EXP+8, EXP+22
>> LRACCN SETUP+4*, EXP+3
>> LRAD SETUP+4, SETUP+13, EN+1, EN+2, EXP+8, EXP+22
>> LRALL EXP+17*, EXP+20*, V9+2*, V9+9
>> LRAN SETUP+2*, SETUP+4, SETUP+13, EN+1, EN+2, PAT+2, EXP+8, EXP+22
>> LRANX SETUP+2
>> LRCDT SETUP+14*, PAT+3
>> LRDFN SETUP+5*, EN+3, PAT+11, PAT+14, PAT+15
>> LRDPF SETUP+6*
>> LRDTR SETUP+15*
>> LREAL SETUP+16*
>> LREND INIT+2*, V9+8*
>> LRI EN+1*, EN+2
>> LRIDT SETUP+13*, PAT+11, PAT+14, PAT+15
>> LRLLOC SETUP+7*, PAT+3
LRNAME EXP+6!
LRNAME( EXP+13*, EXP+14*, EXP+15, EXP+18, EXP+19, EXP+21, EXP+22
>> LRNODE SETUP+4*, SETUP+5, SETUP+6, SETUP+7, SETUP+8, SETUP+9, SETUP+10, SETUP+13*, SETUP+14, SETUP+15
, SETUP+16
>> LRNOTO EXP+22*
>> LRNTN EXP+10*, EXP+18
>> LRODT SETUP+9*, PAT+7, PAT+10
>> LRPHY SETUP+8*, EN+4
>> LRPHYN EN+4*
>> LRSAMP EN+2*, PAT+6, EXP+5
>> LRSN SETUP+10*, PAT+7, PAT+10
>> LRSPEC EN+2*, PAT+5, EXP+5
>> LRSUB SETUP+17*
LRTEST EXP+6!
LRTEST( EXP+9*, EXP+12*, EXP+13, EXP+14, EXP+16
LRTS EXP+6!, EXP+19*
LRTS( EXP+15*, EXP+16*
>> N EXP+7*, EXP+9*, EXP+10, EXP+11
>> OK INIT+1*, CONTROL+2, CONTROL+3, PAT+19*, V9+8*
>> PNM PAT+3, EXP+3
>> SSN PAT+3, EXP+3
U SETUP+6, SETUP+7, SETUP+8, SETUP+9, SETUP+10, SETUP+13, SETUP+14, SETUP+15, SETUP+16, SETUP+17
, EN+2, EN+3, EN+4, PAT+5, PAT+6, EXP+5, EXP+12, EXP+13, EXP+22
>> X V9+10
>> X9 V9+10
>> Y V9+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All