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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: LA7VLCM1

Package: Automated Lab Instruments

Routine: LA7VLCM1


Information

LA7VLCM1 ;DALOI/JDB - LAB CODE MAPPING FILE UTILITIES ;03/07/12 10:09

Source Information

Source file <LA7VLCM1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  ($$REPEAT,$$RJ)^XLFSTR  
VA FileMan 3 $$FIND1^DIC  ($$GET1,GETS)^DIQ  ^DIR  
Automated Lab Instruments 1 $$ISLOINC^LA7VLCM3  

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

Package Total Caller Graph
Automated Lab Instruments 6 LA7SRPT2  LA7VLCM  LA7VLCM2  LA7VLCM4  LA7VLCM6  LA7VLCM7  

Entry Points

Name Comments DBIA/ICR reference
QUE(ZTRTN,ZTDESC,ZTSAVE) ;
; QUEUE a routine
; Returns -1 if POP=1, 0 if not queued, or the QUEUED task #
INIT ;
; General INIT for all reports
DFL(R6247,DFL) ;
; Data Field Length
; Inputs
; R6247 File #62.47 IEN
; DFL <byref> See Outputs
; Outputs
; DFL DFL array holds the max field sizes for each field
HDRCAP(HDRCAP) ;
; Header Captions
; Inputs
; HDRCAP <byref> See Outputs
; Outputs
; HDRCAP Holds the column titles
SUB(DFL,R6247,SCR,R624701) ;
; Driver for displaying one #62.4701 subfile entry or
; an entire #62.47 entry.
; Inputs
; DFL
; R6247
; SCR
; R624701
DF(R6247,R624701,DF) ;
; Setup and populate the Data Fields array
; Inputs
; R6247
; R624701
; DF <byref>
; Outputs
; DF
SHOW(DF,DFL,SCR) ;
; Generic driver to display the data of a record
; Inputs
; DF <byref> Data Fields array
; DFL <byref> Data Fields Length array
; SCR <opt> Screen
CLEAN ;
; Clean up and quit
BIG(A,B) ;
; Returns the bigger of two values
HDR(DFL,TITLE) ;
; Generic driver to display the header of the report
; Inputs
; DFL <byref> Data Field Length array
; TITLE <opt> The title to use for this report
MORE(NULL) ;
; Prompts user to hit ENTER to continue
; Returns 1 if user enters "^" else returns 0
TASK(ZTRTN,ZTDESC,ZTSAVE) ;
; Tasks the specified routine
; Returns the task # or 0
RVID(I) ;
; Reverse Video On/Off
; Inputs
; I I=1 turns on reverse video I=0 turns off reverse video
PROGRESS(LAST) ;
; Prints a "." when NOW > LAST + INT
; Input
; LAST : <byref> The last $H when "." was shown
LOINCFSN(LOINC) ;
; Returns the FSN for this LOINC code
; Needs to be FM safe for use within FM calls

External References

Name Field # of Occurrence
^%ZIS QUE+5
HOME^%ZIS QUE+6
^%ZISC CLEAN+7, TASK+5
^%ZTLOAD TASK+4
$$FIND1^DIC SHOW+31
$$GET1^DIQ SHOW+33, LOINCFSN+11
GETS^DIQ DF+11
^DIR MORE+7
$$ISLOINC^LA7VLCM3 SHOW+30, LOINCFSN+5
$$FMTE^XLFDT HDR+13
$$NOW^XLFDT INIT+2
$$REPEAT^XLFSTR HDR+28
$$RJ^XLFSTR SHOW+15, SHOW+18, HDR+16, HDR+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?POS,$$RJ^XLFSTR(DF(1),POS2," ")
  • Line Location: SHOW+15
Function Call: WRITE
  • Prompt: ?POS,$$RJ^XLFSTR(DF(2),POS2," ")
  • Line Location: SHOW+18
Function Call: WRITE
  • Prompt: ?POS,DF(3)
  • Line Location: SHOW+21
Function Call: WRITE
  • Prompt: ?POS,DF(4)
  • Line Location: SHOW+23
Function Call: WRITE
  • Prompt: ?POS,DF(6)
  • Line Location: SHOW+26
Function Call: WRITE
  • Prompt: !," LOINC: "
  • Line Location: SHOW+35
Function Call: WRITE
  • Prompt: X
  • Line Location: SHOW+37
Function Call: WRITE
  • Prompt: !,"Override Concept: ",DF(5)
  • Line Location: SHOW+38
Function Call: WRITE
  • Prompt: !," Related Entry: ",FN," "
  • Line Location: SHOW+42
Function Call: WRITE
  • Prompt: X
  • Line Location: SHOW+46
Function Call: WRITE
  • Prompt: !," Msg Config: ",DF(8)
  • Line Location: SHOW+47
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW+48
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLEAN+2
Function Call: WRITE
  • Prompt: $C(13)_$J("",$G(IOM,80))_$C(13)
  • Line Location: CLEAN+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: ?0,$E(TITLE,1,IOM-34),?IOM-32,$$FMTE^XLFDT(NOW),?IOM-10," Page: ",PAGE
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !?POS,$$RJ^XLFSTR(HDRCAP(1),POS2," ")
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: ?POS,$$RJ^XLFSTR(HDRCAP(2),DFL(2)," ")
  • Line Location: HDR+18
Function Call: WRITE
  • Prompt: ?POS,HDRCAP(3)
  • Line Location: HDR+21
Function Call: WRITE
  • Prompt: ?POS,HDRCAP(4)
  • Line Location: HDR+24
Function Call: WRITE
  • Prompt: ?POS,HDRCAP(5)
  • Line Location: HDR+27
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: HDR+28
Function Call: WRITE
  • Prompt: $C(13)_$J("",$G(IOM,80))_$C(13)
  • Line Location: MORE+8
Function Call: WRITE
  • Prompt: !,"Request "_$S($G(ZTSK):"queued - Task #"_ZTSK,1:"NOT queued")
  • Line Location: TASK+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: PROGRESS+6
Routine Call
  • %ZIS
  • Line Location:
    • QUE+5
Routine Call
  • %ZIS
  • Line Location:
    • QUE+6
Routine Call
  • DIC
  • Line Location:
    • SHOW+31
Routine Call
  • DIR
  • Line Location:
    • MORE+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
62.4701 GETS^DIQ
^LAB(95.3 - [#95.3] FIND1^DIC,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(62.47 - [#62.47] DFL+10, DFL+15, DFL+20
^LAB(95.3 - [#95.3] LOINCFSN+9

Label References

Name Line Occurrences
$$BIG DFL+12, DFL+17, DFL+22, SHOW+14, SHOW+17, SHOW+20, SHOW+24, HDR+15, HDR+19, HDR+22
, HDR+25
$$MORE HDR+10
$$TASK QUE+9
DF SUB+15, SUB+24
HDR SUB+13, SUB+22, SHOW+12
HDRCAP SHOW+11, HDR+9
MORE CLEAN+4
SHOW SUB+16, SUB+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUE+3~, QUE+5*
A BIG~, BIG+2
B BIG~, BIG+2
DA LOINCFSN+4~
DATA DF+9~
DATA( DF+12, DF+14, DF+15, DF+16, DF+17, DF+18, DF+19, DF+20, DF+21
DF SUB+9~, SUB+15, SUB+16, SUB+24, SUB+25, DF~, SHOW~
DF( DF+20*, SHOW+43
DF(1 DF+12*, DF+13*, SHOW+15
DF(2 DF+14*, SHOW+18, SHOW+28, SHOW+30, SHOW+31
DF(3 DF+15*, SHOW+21, SHOW+28
DF(4 DF+16*, SHOW+23
DF(5 DF+17*, SHOW+38
DF(6 DF+18*, SHOW+26
DF(7 DF+19*, SHOW+40
DF(8 DF+21*, SHOW+47
DFL DFL~, SUB~, SUB+13, SUB+16, SUB+22, SUB+25, SHOW~, SHOW+12, HDR~
DFL(1 DFL+12*, SHOW+14, HDR+15
DFL(2 DFL+17*, SHOW+17, HDR+18, HDR+19
DFL(3 DFL+22*, SHOW+20, HDR+22
DFL(4 DFL+23*, SHOW+24, HDR+25
DIC LOINCFSN+4~
DIE LOINCFSN+4~
DIERR DF+9~, LOINCFSN+4~
DIR MORE+3~
DIR(0 MORE+6*
DIRUT MORE+3~, MORE+9
DTOUT MORE+3~
DUOUT MORE+3~
>> EOP SUB+13, SUB+22, SHOW+12
>> EXIT INIT+3*, SUB+14, SUB+17, SUB+20, SUB+23, SUB+26, SHOW+12, CLEAN+3, HDR+10*
EXTRA SHOW+7~, SHOW+10*, SHOW+35*, SHOW+38*, SHOW+42*, SHOW+47*, SHOW+48
FDA LOINCFSN+4~
FN SHOW+7~, SHOW+40*, SHOW+41*, SHOW+42, SHOW+45
HDRCAP HDRCAP~, SHOW+7~, SHOW+11, HDR+6~, HDR+9
HDRCAP(1 HDRCAP+7*, SHOW+14, HDR+15, HDR+16
HDRCAP(2 HDRCAP+8*, SHOW+17, HDR+18, HDR+19
HDRCAP(3 HDRCAP+9*, SHOW+20, HDR+21, HDR+22
HDRCAP(4 HDRCAP+10*, SHOW+24, HDR+24, HDR+25
HDRCAP(5 HDRCAP+11*, HDR+27
I DFL+8~, DFL+15*, DFL+16, DFL+20*, DFL+21, SUB+9~, RVID~, RVID+7, RVID+8
IENS SUB+9~, DF+9~, DF+10*, DF+11, DF+12, DF+14, DF+15, DF+16, DF+17, DF+18
, DF+19, DF+20, DF+21, LOINCFSN+4~
INT PROGRESS+4~, PROGRESS+5*, PROGRESS+6
IO("Q" QUE+7
IOF CLEAN+2, HDR+11
IOM SHOW+36, SHOW+45, CLEAN+5, HDR+13, HDR+28, MORE+8
>> IORVOFF RVID+6, RVID+7
>> IORVON RVID+6, RVID+8
IOSL SUB+13, SUB+22, SHOW+12
IOST CLEAN+2, CLEAN+3, HDR+10, MORE+4, RVID+5
LAMSG LOINCFSN+3~
LAST PROGRESS~, PROGRESS+6*
LAX LOINCFSN+3~, LOINCFSN+7*, LOINCFSN+9
LOINC LOINCFSN~, LOINCFSN+5, LOINCFSN+7
MSG SHOW+29~
NODE SUB+9~, SUB+19*, SUB+20*, SUB+21
>> NOW INIT+2*, HDR+13
NULL MORE~
>> PAGE INIT+3*, HDR+10, HDR+12*, HDR+13
POP QUE+3~, QUE+6
POS SHOW+7~, SHOW+13*, SHOW+15, SHOW+16*, SHOW+18, SHOW+19*, SHOW+21, SHOW+22*, SHOW+23, SHOW+25*
, SHOW+26, HDR+6~, HDR+14*, HDR+16, HDR+17*, HDR+18, HDR+20*, HDR+21, HDR+23*, HDR+24
, HDR+26*, HDR+27
POS2 SHOW+7~, SHOW+14*, SHOW+15, SHOW+16, SHOW+17*, SHOW+18, SHOW+19, SHOW+20*, SHOW+22, SHOW+24*
, SHOW+25, HDR+6~, HDR+15*, HDR+16, HDR+17, HDR+19*, HDR+20, HDR+22*, HDR+23, HDR+25*
, HDR+26
QUEUED QUE+3~, QUE+4*, QUE+9*, QUE+10
R6247 DFL~, DFL+10, DFL+15, DFL+20, SUB~, SUB+15, SUB+20, SUB+24, DF~, DF+10
R624701 SUB~, SUB+11*, SUB+12, SUB+15, SUB+20, SUB+21*, SUB+24, DF~, DF+10, DF+13
R953 SHOW+29~, SHOW+31*, SHOW+32, SHOW+33, LOINCFSN+3~, LOINCFSN+8*, LOINCFSN+9*, LOINCFSN+10, LOINCFSN+11
SCR SUB~, SUB+10*, SUB+16, SUB+25, SHOW~, SHOW+8*, SHOW+9
TITLE SUB+13, SUB+22, SHOW+12, HDR~, HDR+7*, HDR+8*, HDR+13
X DFL+8~, DFL+10*, DFL+11*, DFL+12, DFL+14*, DFL+16*, DFL+17, DFL+19*, DFL+21*, DFL+22
, SUB+9~, SHOW+7~, SHOW+29~, SHOW+33*, SHOW+34, SHOW+36*, SHOW+37, SHOW+43*, SHOW+45*, SHOW+46
, MORE+3~, LOINCFSN+4~
X1 LOINCFSN+4~
X2 SHOW+7~, LOINCFSN+4~
Y QUE+3~, SUB+9~, MORE+3~, LOINCFSN+4~
ZTDESC QUE~, QUE+9, TASK~
ZTDTH TASK+3~
ZTIO TASK+3~
>> ZTQUEUED CLEAN+6, CLEAN+7, HDR+10, MORE+5
>> ZTREQ CLEAN+6*
ZTRTN QUE~, QUE+9, TASK~
ZTSAVE QUE~, QUE+9, TASK~
ZTSK TASK+3~, TASK+6, TASK+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All