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

Package: Automated Lab Instruments

Routine: LAMIAUT6


Information

LAMIAUT6 ;SLC/FHS - DISPLAY MICRO DRUGS IN ORDER ;7/20/90 09:34

Source Information

Source file <LAMIAUT6.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Automated Lab Instruments 1 ^LAMIAUT3  
VA FileMan 1 YN^DICN  

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 LAMIAUT2  

Entry Points

Name Comments DBIA/ICR reference
EN ;
HDR
AC ;
LOOK ;
BLIND ;
COM ;
DUP ;
DUPCK ;
SWITCH ;

External References

Name Field # of Occurrence
YN^DICN DUP+3
^LAMIAUT3 DUP+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "RETURN TO CONT. ('^' TO SKIP ) "
  • Variable: XX
  • Timeout: DTIME
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: @IOF,!?5,"Isolate ("_IR_")",!?7,$P(^LAB(61.2,LRORGN,0),U)," *** ",$P(^LAB(62.4,LRINST,7,LRCARD,0),U,2)," Card ***"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,LRDRNAME," "
  • Line Location: LOOK+1
Function Call: WRITE
  • Prompt: @(@("TAB"_AA)),$P(LRDRDX,U,AA)
  • Line Location: LOOK+1
Function Call: WRITE
  • Prompt: @IOF,!!?5,"Isolate ( "_IR_" )",!?7,$P(^LAB(61.2,LRORGN,0),U),!!
  • Line Location: BLIND+1
Function Call: WRITE
  • Prompt: !!,"Organism Comment:"
  • Line Location: BLIND+3
Function Call: WRITE
  • Prompt: !?10,^(LRORGCOM,0)
  • Line Location: BLIND+3
Function Call: READ
  • Formatting: !!?7
  • Prompt: "RETURN TO CONT. ('^' TO SKIP) "
  • Variable: XX
  • Timeout: DTIME
  • Line Location: BLIND+4
Function Call: WRITE
  • Prompt: !
  • Line Location: BLIND+4
Function Call: WRITE
  • Prompt: !!?5,"BACT RPT REMARK",$C(7)
  • Line Location: COM+1
Function Call: WRITE
  • Prompt: !?10,^(0)
  • Line Location: COM+1
Function Call: READ
  • Formatting: !!?10
  • Prompt: "PRESS RETURN TO CONTINUE"
  • Variable: X
  • Timeout: DTIME
  • Line Location: COM+2
Function Call: WRITE
  • Prompt: !
  • Line Location: COM+2
Function Call: WRITE
  • Prompt: !?5,"( No ) will add another organism",!?5,"( Yes ) will overlay existing data",!!
  • Line Location: DUP+1
Function Call: WRITE
  • Prompt: !?10,"You already have "_LRBDUP(+X)_" "_$S($D(^LAB(61.2,+X,0)):$P(^(0),U),1:"Unknown")_" in the patient's file, ",!,"Do you want to add data to one of Them ? "
  • Line Location: DUP+2
Function Call: WRITE
  • Prompt: !?7,"Add to which ISOLATE # CHOOSE FROM ( "
  • Line Location: DUPCK+2
Function Call: WRITE
  • Prompt: K_" "
  • Line Location: DUPCK+2
Function Call: READ
  • Variable: LRORG
  • Timeout: DTIME
  • Line Location: DUPCK+3
Function Call: WRITE
  • Prompt: !!?7,$C(7),"Please select a number or '^' ",!
  • Line Location: DUPCK+5
Function Call: WRITE
  • Prompt: !!?10,$C(7)," NO SUCH ISOLATE # FOR THIS ORGANISM ",!!
  • Line Location: DUPCK+6
Function Call: WRITE
  • Prompt: !!?10,"I am sorry, I cannot transfer to this Isolate, ",!," You must MANAULLY EDIT "
  • Line Location: SWITCH+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61.2 - [#61.2] HDR, BLIND+1, DUP+2
^LAB(62.06 - [#62.06] LOOK+1
^LAB(62.4 - [#62.4] EN+2, HDR, AC+1
^LAH( EN+1, LOOK+1, BLIND+2, BLIND+3, COM+1, DUP+4, SWITCH+1
^LR - [#63] DUP+4, DUP+5*

Label References

Name Line Occurrences
AC EN+5
BLIND EN+3
DUP DUP+3, DUPCK+4
DUPCK DUP+3, DUPCK+5, DUPCK+6
HDR EN+5
LOOK AC+1, BLIND+2
SWITCH DUPCK+1

Naked Globals

Name Field # of Occurrence
^( LOOK+1, BLIND+3, COM+1
^(0 EN+1*, AC+1, LOOK+1, COM+1, DUP+2, DUP+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DUP+3*
>> A EN+2*, EN+5*
>> AA LOOK+1*
DTIME EN+5, BLIND+4, COM+2, DUPCK+3
>> II DUP+4*, DUP+5
IOF HDR, BLIND+1
>> IR EN+1, HDR, LOOK+1, BLIND+1, BLIND+2, BLIND+3, SWITCH+1
>> IX AC+1*
>> IXI AC+1*
>> K DUPCK+2*
>> LRBDUP( DUP+2, DUPCK+1, DUPCK+2, DUPCK+6
>> LRCARD EN+4*, EN+5*, HDR, AC+1
LRCNODE EN+1!*, EN+2, EN+3
LRCNODE( EN+2*, EN+5
LRCNODE(0 EN+3
>> LRDFN DUP+4, DUP+5
LRDRD AC+1*, LOOK+1, BLIND+2*, BLIND+4!, BLIND+5!
>> LRDRDX LOOK+1*
>> LRDRNAME LOOK+1*
>> LREND EN+1, EN+4*, EN+5*, BLIND+4*, DUP+1*, DUP+3*, DUPCK+3*, SWITCH+1*
>> LRIDT DUP+4, DUP+5
>> LRIFN EN+1, LOOK+1, BLIND+2, BLIND+3, COM+1, DUP+4, SWITCH+1
>> LRINST EN+2, HDR, AC+1
>> LRLL EN+1, LOOK+1, BLIND+2, BLIND+3, COM+1, DUP+4, SWITCH+1
>> LRMOVE( DUP+5*, SWITCH+1, SWITCH+2*
>> LRORG DUP+5*, DUPCK+1*, DUPCK+3*, DUPCK+4, DUPCK+5, DUPCK+6, SWITCH+1, SWITCH+2
>> LRORGCOM BLIND+3*
>> LRORGN HDR, BLIND+1, SWITCH+1
>> LRSCOM COM+1*
SX DUP+1*!
U EN+1, EN+2, HDR, AC+1, LOOK+1, BLIND+1, DUP+2, DUP+5
>> X COM+2*, DUP+1*, DUP+2, DUPCK+1, DUPCK+2, DUPCK+6
>> XX EN+5*, BLIND+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All