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

Package: Automated Lab Instruments

Routine: LA7SRPT2


Information

LA7SRPT2 ;DALOI/JDB - CODE USAGE REPORT ;03/07/12 09:04

Source Information

Source file <LA7SRPT2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Automated Lab Instruments 4 ($$F61,$$F612,$$F62,$$F6206,$$F6247,$$F6248,$$F629)^LA7SRPT3  ($$HL2LAH,$$HL2VA)^LA7VHLU6  ($$LOINCFSN,$$MORE)^LA7VLCM1  $$VARPTR01^LA7XREF  
Kernel 2 HOME^%ZIS  ^%ZISC  
Lab Service 2 $$CODE^LRSCT  ($$QUE,MORE)^LRUTIL  
VA FileMan 2 ($$GET1,GETS)^DIQ  ^DIR  

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 LA7SRPT  

Entry Points

Name Comments DBIA/ICR reference
ASK ;
; Prompts for Identifier and Coding System then performs search
MAIN(CODE,SYS,MSGCFG,SHPCFG) ;
FIND(CODE,SYS,MSGCFG,SHPCFG,STOP) ;
; Searches and displays search results for the code/code system
; in files #61,61.2,62,62.06,62.47,62.48,62.9
; Inputs
; CODE : Code (or Identifier)
; SYS : Coding System (ie "SCT")
; MSGCFG : <opt> Message Config (#62.48)
; SHPCFG : <opt> Shipping Config (#62.9)
; STOP : <byref> See Outputs
NP(ABORT,PGNUM,HDR,FTR,BM) ;
; ABORT : <byref> Set if uses enters "^" at "MORE" prompt
; PGNUM : <byref> Page Number Counter
; HDR : Executable code to write the header
; FTR : Executable code to write the footer
; BM : Bottom Margin

External References

Name Field # of Occurrence
HOME^%ZIS ASK+24
^%ZISC MAIN+11
$$GET1^DIQ FIND+213
GETS^DIQ FIND+126
^DIR ASK+6, ASK+14
$$F61^LA7SRPT3 FIND+35
$$F612^LA7SRPT3 FIND+52
$$F62^LA7SRPT3 FIND+70
$$F6206^LA7SRPT3 FIND+88
$$F6247^LA7SRPT3 FIND+106
$$F6248^LA7SRPT3 FIND+152
$$F629^LA7SRPT3 FIND+192
$$HL2LAH^LA7VHLU6 FIND+135
$$HL2VA^LA7VHLU6 FIND+138
$$LOINCFSN^LA7VLCM1 FIND+27
$$MORE^LA7VLCM1 NP+15
$$VARPTR01^LA7XREF FIND+174
$$CODE^LRSCT FIND+22
$$QUE^LRUTIL ASK+19
MORE^LRUTIL ASK+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Invalid SCT code"
  • Line Location: FIND+23
Function Call: WRITE
  • Prompt: !,"SCT FSN: ",DATA("F")
  • Line Location: FIND+24
Function Call: WRITE
  • Prompt: !,"Invalid LOINC code"
  • Line Location: FIND+28
Function Call: WRITE
  • Prompt: !,"LOINC FSN: ",X
  • Line Location: FIND+29
Function Call: WRITE
  • Prompt: !!,"Checking TOPOGRAPHY file (#61)"
  • Line Location: FIND+33
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+37
Function Call: WRITE
  • Prompt: !,?2,"#",R61,": ",X
  • Line Location: FIND+44
Function Call: WRITE
  • Prompt: !!,"Checking ETIOLOGY FIELD (#61.2) file"
  • Line Location: FIND+50
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+54
Function Call: WRITE
  • Prompt: !,?2,"#",R612,": ",X
  • Line Location: FIND+61
Function Call: WRITE
  • Prompt: !!,"Checking COLLECTION SAMPLE (#62) file"
  • Line Location: FIND+68
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+72
Function Call: WRITE
  • Prompt: !,?2,"#",R62,": ",X
  • Line Location: FIND+79
Function Call: WRITE
  • Prompt: !!,"Checking ANTIMICROBIAL SUSCEPTIBILITY (#62.06) file"
  • Line Location: FIND+86
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+90
Function Call: WRITE
  • Prompt: !,?2,"#",R6206,": ",X
  • Line Location: FIND+97
Function Call: WRITE
  • Prompt: !!,"Checking LAB CODE MAPPING (#62.47) file"
  • Line Location: FIND+104
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+108
Function Call: WRITE
  • Prompt: !,?2,X," (#62.47:",R6247,")"
  • Line Location: FIND+120
Function Call: WRITE
  • Prompt: !,?4,"#",R624701,": ",F01," (",F22,")"
  • Line Location: FIND+130
Function Call: WRITE
  • Prompt: !,?6,"$$HL2LAH:",X
  • Line Location: FIND+136
Function Call: WRITE
  • Prompt: "$$HL2VA:",Y
  • Line Location: FIND+139
Function Call: WRITE
  • Prompt: !
  • Line Location: FIND+142
Function Call: WRITE
  • Prompt: !!,"Checking LA7 MESSAGE PARAMETER (#62.48) file"
  • Line Location: FIND+150
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+154
Function Call: WRITE
  • Prompt: !,?2,X," (#62.48:",R6248,")"
  • Line Location: FIND+163
Function Call: WRITE
  • Prompt: !,?2,"NON-VA ORDER SNOMED CODES sub-file"
  • Line Location: FIND+163
Function Call: WRITE
  • Prompt: !,?4,"#",R624802,": ",$$VARPTR01^LA7XREF(VAENTRY)," (#",X,")"
  • Line Location: FIND+174
Function Call: WRITE
  • Prompt: !,?6," .01 is mapped"
  • Line Location: FIND+178
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: NL
  • Line Location: FIND+181
Function Call: WRITE
  • Prompt: "Used as override"
  • Line Location: FIND+181
Function Call: WRITE
  • Prompt: !
  • Line Location: FIND+182
Function Call: WRITE
  • Prompt: !!,"Checking LAB SHIPPING CONFIGURATION (#62.9) file"
  • Line Location: FIND+190
Function Call: WRITE
  • Prompt: !,?5,"No matches"
  • Line Location: FIND+194
Function Call: WRITE
  • Prompt: !,?2,X," (#62.9:",R629,")"
  • Line Location: FIND+204
Function Call: WRITE
  • Prompt: !,?4,"Test Profile"
  • Line Location: FIND+214
Function Call: WRITE
  • Prompt: !,?4,"#",R629001,": ",X
  • Line Location: FIND+214
Function Call: WRITE
  • Prompt: !,?6
  • Line Location: FIND+223
Function Call: WRITE
  • Prompt: "Specimen"
  • Line Location: FIND+226
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: F09+F53+F57>0
  • Line Location: FIND+226
Function Call: WRITE
  • Prompt: "Sample"
  • Line Location: FIND+227
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: F53+F57>0
  • Line Location: FIND+227
Function Call: WRITE
  • Prompt: "Non-HL7 Specimen"
  • Line Location: FIND+228
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: F57
  • Line Location: FIND+228
Function Call: WRITE
  • Prompt: "Non-HL7 Sample"
  • Line Location: FIND+229
Function Call: WRITE
  • Prompt: !
  • Line Location: FIND+230
Function Call: WRITE
  • Prompt: !!," N O M A T C H E S"
  • Line Location: FIND+236
Routine Call
  • %ZIS
  • Line Location:
    • ASK+24
Routine Call
  • DIR
  • Line Location:
    • ASK+6
    • ASK+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(60 - [#60] GET1^DIQ
62.4701 GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61 - [#61] FIND+42
^LAB(61.2 - [#61.2] FIND+59
^LAB(62 - [#62] FIND+77
^LAB(62.06 - [#62.06] FIND+95
^LAB(62.47 - [#62.47] FIND+118, FIND+123
^LAHM(62.48 - [#62.48] FIND+161, FIND+168
^LAHM(62.9 - [#62.9] FIND+202, FIND+210

Label References

Name Line Occurrences
FIND MAIN+8
MAIN ASK+22
NP FIND+31, FIND+45, FIND+47, FIND+62, FIND+65, FIND+80, FIND+83, FIND+98, FIND+101, FIND+121
, FIND+131, FIND+140, FIND+147, FIND+164, FIND+175, FIND+183, FIND+187, FIND+205, FIND+215, FIND+233

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ASK+2~
ABORT NP~, NP+14, NP+16*
BM NP~, NP+10*, NP+12
CODE MAIN~, MAIN+2*, MAIN+8, FIND~, FIND+15*, FIND+22, FIND+27, FIND+35, FIND+52, FIND+70
, FIND+88, FIND+106, FIND+135, FIND+138, FIND+152, FIND+192
COMMA FIND+196~, FIND+224*, FIND+225*
CONCEPT FIND+110~, FIND+112*, FIND+120*
CONFIG FIND+156~, FIND+157*, FIND+163*, FIND+196~, FIND+197*, FIND+204*
DATA FIND+13~, FIND+42*, FIND+43, FIND+59*, FIND+60, FIND+77*, FIND+78, FIND+95*, FIND+96, FIND+118*
, FIND+119, FIND+123*, FIND+124, FIND+161*, FIND+162, FIND+168*, FIND+169, FIND+202*, FIND+203, FIND+210*
, FIND+211
DATA("F" FIND+24
DIERR FIND+13~, FIND+110~, FIND+125!, FIND+196~, FIND+212!
DIR ASK+2~, ASK+10!
DIR("?" ASK+5*, ASK+13*
DIR("A" ASK+4*, ASK+12*
DIR(0 ASK+3*, ASK+11*
DIROUT ASK+2~
DIRUT ASK+2~
DTOUT ASK+2~
DUOUT ASK+2~
F01 FIND+111~, FIND+124*, FIND+130
F03 FIND+196~, FIND+198*, FIND+217*, FIND+218*, FIND+222, FIND+225, FIND+226
F09 FIND+196~, FIND+198*, FIND+217*, FIND+219*, FIND+222, FIND+225, FIND+226, FIND+227
F22 FIND+111~, FIND+128*, FIND+129*, FIND+130
F53 FIND+196~, FIND+198*, FIND+217*, FIND+220*, FIND+222, FIND+225, FIND+226, FIND+227, FIND+228
F57 FIND+196~, FIND+198*, FIND+217*, FIND+221*, FIND+222, FIND+225, FIND+226, FIND+227, FIND+228, FIND+229
FOUND FIND+13~, FIND+34!, FIND+35, FIND+51!, FIND+52, FIND+69!, FIND+70, FIND+87!, FIND+88, FIND+105!
, FIND+106, FIND+151!, FIND+152, FIND+191!, FIND+192
FOUND(1 FIND+41, FIND+58, FIND+76, FIND+94, FIND+115, FIND+117, FIND+120, FIND+142, FIND+160, FIND+167
, FIND+182, FIND+201, FIND+209, FIND+230
FOUND(2 FIND+177, FIND+218
FOUND(3 FIND+180, FIND+219
FOUND(4 FIND+220
FOUND(5 FIND+221
FTR NP~, NP+9*, NP+13
HDR NP~, NP+8*, NP+19
ID ASK+2~, ASK+9*, ASK+18, ASK+22
IO MAIN+6
IOSL NP+12
IOST ASK+23, NP+14
LAMSG FIND+110~, FIND+125!, FIND+196~, FIND+212!
LATARG FIND+110~, FIND+125!
LATARG( FIND+127, FIND+128
MSGCFG MAIN~, MAIN+4*, MAIN+8, FIND~, FIND+17*, FIND+106, FIND+152
NL FIND+156~, FIND+173*, FIND+178*, FIND+181
PGNUM NP~, NP+7*, NP+11*, NP+18*
POP ASK+2~
QUE ASK+2~, ASK+19*, ASK+20
R61 FIND+14~, FIND+40*, FIND+41*, FIND+42, FIND+44
R612 FIND+14~, FIND+57*, FIND+58*, FIND+59, FIND+61
R62 FIND+14~, FIND+75*, FIND+76*, FIND+77, FIND+79
R6206 FIND+14~, FIND+93*, FIND+94*, FIND+95, FIND+97
R6247 FIND+14~, FIND+114*, FIND+115*, FIND+117, FIND+118, FIND+120, FIND+123, FIND+126, FIND+127, FIND+128
, FIND+138, FIND+142
R624701 FIND+14~, FIND+116*, FIND+117*, FIND+123, FIND+126, FIND+127, FIND+128, FIND+130, FIND+142
R6248 FIND+14~, FIND+127*, FIND+135, FIND+138, FIND+159*, FIND+160*, FIND+161, FIND+163, FIND+167, FIND+168
, FIND+177, FIND+180, FIND+182
R624802 FIND+14~, FIND+166*, FIND+167*, FIND+168, FIND+174, FIND+177, FIND+180, FIND+182
R629 FIND+14~, FIND+200*, FIND+201*, FIND+202, FIND+204, FIND+209, FIND+210, FIND+218, FIND+219, FIND+220
, FIND+221, FIND+230
R629001 FIND+14~, FIND+207*, FIND+209*, FIND+210, FIND+214, FIND+218, FIND+219, FIND+220, FIND+221
RTN ASK+2~, ASK+18*, ASK+19
SHPCFG MAIN~, MAIN+5*, MAIN+8, FIND~, FIND+18*, FIND+192
STATUS FIND+13~, FIND+20*, FIND+39*, FIND+56*, FIND+74*, FIND+92*, FIND+113*, FIND+158*, FIND+199*, FIND+236
STOP MAIN+1~, MAIN+7*, MAIN+8, FIND~, FIND+19*, FIND+31, FIND+32, FIND+41, FIND+45, FIND+46
, FIND+47, FIND+48, FIND+58, FIND+62, FIND+64, FIND+65, FIND+66, FIND+76, FIND+80, FIND+82
, FIND+83, FIND+84, FIND+94, FIND+98, FIND+100, FIND+101, FIND+102, FIND+115, FIND+117, FIND+121
, FIND+122, FIND+131, FIND+132, FIND+140, FIND+141, FIND+146, FIND+147, FIND+148, FIND+160, FIND+164
, FIND+165, FIND+167, FIND+175, FIND+176, FIND+183, FIND+186, FIND+187, FIND+188, FIND+201, FIND+205
, FIND+206, FIND+209, FIND+215, FIND+216, FIND+232, FIND+233, FIND+234
SYS ASK+2~, ASK+17*, ASK+18, ASK+22, MAIN~, MAIN+3*, MAIN+8, FIND~, FIND+16*, FIND+21
, FIND+26, FIND+35, FIND+52, FIND+70, FIND+88, FIND+106, FIND+134, FIND+135, FIND+137, FIND+138
, FIND+152, FIND+192
TEST FIND+196~, FIND+197*, FIND+208*, FIND+214*
U FIND+43, FIND+60, FIND+78, FIND+96, FIND+119, FIND+124, FIND+162, FIND+169, FIND+203, FIND+211
VAENTRY FIND+156~, FIND+169*, FIND+170, FIND+174
X ASK+2~, FIND+13~, FIND+22*, FIND+23, FIND+24, FIND+27*, FIND+28, FIND+29, FIND+35*, FIND+36
, FIND+38, FIND+43*, FIND+44, FIND+52*, FIND+53, FIND+55, FIND+60*, FIND+61, FIND+70*, FIND+71
, FIND+73, FIND+78*, FIND+79, FIND+88*, FIND+89, FIND+91, FIND+96*, FIND+97, FIND+106*, FIND+107
, FIND+109, FIND+119*, FIND+120, FIND+135*, FIND+136, FIND+139, FIND+152*, FIND+153, FIND+155, FIND+162*
, FIND+163, FIND+170*, FIND+171*, FIND+172*, FIND+174, FIND+192*, FIND+193, FIND+195, FIND+203*, FIND+204
, FIND+211*, FIND+213*, FIND+214, NP+6~, NP+15*, NP+16
Y ASK+2~, ASK+7, ASK+8, ASK+9, ASK+15, ASK+16, ASK+17, FIND+13~, FIND+138*, FIND+139
>> ZTQUEUED MAIN+9
>> ZTREQ MAIN+10*
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