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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BLRRLFX1

Package: IHS Changes To Lab

Routine: BLRRLFX1


Information

BLRRLFX1 ;IHS/CMI/THL/MAW - Refile Utility; [ 10/29/2017 7:08 AM ]

Source Information

Source file <BLRRLFX1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 C^%DTC  ^DIC  ^DIR  
Health Level Seven 1 REPROC^HLUTIL  
IHS VA Utilities 1 EN^XBNEW  
Kernel 1 DUZ^XUP  

Entry Points

Name Comments DBIA/ICR reference
CALLHL ;CALL HL REFILER
IENHEAD(NAM,IEN) ;LIST IEN SEGMENTS
PAT ;FIND INDIVIDUAL PATIENT
HL7 ;SEARCH FOR RELATED MESSAGES IN HL(772
ACC(DFN,IEN,SEG,SEGX) ;FIND RECENT ACCESSION NUMBERS
MDISP ;DISPLAY MATCH LOG
CHANGE(NAM,IEN,SEQ) ;ENTER AN AND CHANGE SEGMENT
INTHU ;SEARCH FOR RELATED MESSAGES IN INTHU
P1 ;SELECT PATIENT
SID ;ENTER SPECIMEN ID TO SEARCH FOR
LINE ;
FM ;USE FM PATIENT LOOKUP
DIR ;READER
IEN(NAM,IEN) ;SELECT SEGS TO ADD ACCESSION NUMBER TO
LALL ;LIST ALL MESSAGES WITHOUT ACCESSION NUMBER
M1(PAT,IEN,SEQ,XX) ;PROCESS EACH SEGMENT
ONO ;ENTER ORDER NUMBER TO SEARCH FOR
REFILE(NAM,IEN) ;REFILE THE MESSAGE
A1 ;
CH1
AHL7 ;SEARCH FOR RELATED MESSAGES IN HL(772
MATCH ;PROCESS MESSAGES AND MATCH WITH FILE 68
C2
C1
PN ;CREATE NUMBERED PATIENT ARRAY
DFN(NAM) ;FIND PATIENT DFN
MSEL ;SELECT MATCHES TO PROCESS
EN ;EP;TO REFILE LAB MESSAGE
LIST(PAT) ;LIST MESSAGES
AHEAD ;HEADER
ASEL(NUM) ;SELECT PATIENT TO EDIT
MHEAD ;HEADER TO DISPLAY MATCH LOG
ACCNUM ;ACCESSION NUMBER
L1 ;LIST ALL MESSAGES FOR THE PATIENT
LHEAD(NAM) ;LIST HEAD
PAUSE ;
P1S(X) ;
ALL ;FIND ALL RECENT MESSAGES WITH NO ACCESSION NUMBER
SPECID ;SPECIMEN ID
ACCS ;DISPLAY MESSAGE OR ENTER AN
MTYPE ;IDENTIFY WHETHER THE MESSAGE IS HL(772 OR INTHU
DM1 ;HL(772
DM2 ;INTHU
MON ;MONITOR AUTO ACC MATCHES
PATN(X) ;PATIENT NAME
PNAM ;ENTER PATIENT NAME DIRECTLY
FIND(PAT,SID,ONO) ;FIND MATCHING MESSAGES
DMESS(IEN) ;DISPLAY HL7 MESSAGE
AINTHU ;SEARCH FOR RELATED MESSAGES IN INTHU

External References

Name Field # of Occurrence
C^%DTC ALL+4
^DIC FM+6, DFN+11
^DIR DIR+2
REPROC^HLUTIL CALLHL+3
EN^XBNEW REFILE+3
DUZ^XUP CALLHL+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !?10,"Select patients and HL7 messages for ACCESSION NUMBER correction"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: P1+4
Function Call: WRITE
  • Prompt: !?10,"Select patients to search for in the '",$S(MTYPE=1:"HL(772,",1:"INTHU("),"' global"
  • Line Location: P1+5
Function Call: WRITE
  • Prompt: !!,"We'll search for messages in"
  • Line Location: P1+23
Function Call: WRITE
  • Prompt: !!?15,"global: ",$S(MTYPE=1:"HL(772,",1:"INTHU(")
  • Line Location: P1+24
Function Call: WRITE
  • Prompt: !?10,"for patient: ",$S(PAT]"":PAT,1:"(not entered)")
  • Line Location: P1+25
Function Call: WRITE
  • Prompt: !?10,"Specimen ID: ",$S(SID]"":SID,1:"(not entered)")
  • Line Location: P1+26
Function Call: WRITE
  • Prompt: !?10," Order No.: ",$S(ONO]"":ONO,1:"(not entered)")
  • Line Location: P1+27
Function Call: WRITE
  • Prompt: !!?1,"that are missing the",!?5,"Accession number:"
  • Line Location: P1+28
Function Call: WRITE
  • Prompt: !
  • Line Location: FM+5
Function Call: WRITE
  • Prompt: !!,"Accession number must be 10 numeric characters."
  • Line Location: ACCNUM+7
Function Call: WRITE
  • Prompt: !,"IEN must be a numeric value"
  • Line Location: L1+11
Function Call: WRITE
  • Prompt: !!,"IEN: ",X," not found."
  • Line Location: L1+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CH1+0
Function Call: WRITE
  • Prompt: !!," Patient: ",NAM
  • Line Location: CH1+6
Function Call: WRITE
  • Prompt: !,"Message IEN: ",IEN
  • Line Location: CH1+7
Function Call: WRITE
  • Prompt: !,"Sequence No: ",SEQ
  • Line Location: CH1+8
Function Call: WRITE
  • Prompt: !," Segment No: ",SEG
  • Line Location: CH1+9
Function Call: WRITE
  • Prompt: !!?5,SEGX
  • Line Location: CH1+10
Function Call: WRITE
  • Prompt: !?5,J,?10,ACC(J)
  • Line Location: CH1+17
Function Call: WRITE
  • Prompt: !!," HL7 Message IEN: ",IEN," has been refiled with"
  • Line Location: REFILE+6
Function Call: WRITE
  • Prompt: !,"Accession Number: ",ACC
  • Line Location: REFILE+7
Function Call: WRITE
  • Prompt: !,"Enter a number from 1 to ",JJ
  • Line Location: ASEL+7
Function Call: WRITE
  • Prompt: !!,"Press <ENTER> to continue,"
  • Line Location: LINE+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LHEAD+1
Function Call: WRITE
  • Prompt: !?10,"HL7 Messages for ",PAT
  • Line Location: LHEAD+2
Function Call: WRITE
  • Prompt: !?10,"with missing ACCESSION NUMBER"
  • Line Location: LHEAD+3
Function Call: WRITE
  • Prompt: !!,"Message",?10,"Sequence",?20,"Segment"
  • Line Location: LHEAD+4
Function Call: WRITE
  • Prompt: !,"IEN",?10,"NO.",?20,"NO."
  • Line Location: LHEAD+5
Function Call: WRITE
  • Prompt: !,"--------",?10,"--------",?20,"-------"
  • Line Location: LHEAD+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: IENHEAD+1
Function Call: WRITE
  • Prompt: !?10,"OBR segments with missing Accession"
  • Line Location: IENHEAD+2
Function Call: WRITE
  • Prompt: !?10,"Number for message: ",IEN
  • Line Location: IENHEAD+3
Function Call: WRITE
  • Prompt: !!,"Message",?10,"Sequence",?20,"Segment"
  • Line Location: IENHEAD+4
Function Call: WRITE
  • Prompt: !,"IEN",?10,"NO.",?20,"NO."
  • Line Location: IENHEAD+5
Function Call: WRITE
  • Prompt: !,"--------",?10,"--------",?20,"-------"
  • Line Location: IENHEAD+6
Function Call: WRITE
  • Prompt: !,IEN
  • Line Location: IENHEAD+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: AHEAD+1
Function Call: WRITE
  • Prompt: !,"No.",?10,"Patient"
  • Line Location: AHEAD+2
Function Call: WRITE
  • Prompt: !,"-----",?10,"----------------------------------------"
  • Line Location: AHEAD+3
Function Call: WRITE
  • Prompt: !,"Enter a number or list of number from 1 to ",JJ
  • Line Location: MSEL+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: MHEAD+2
Function Call: WRITE
  • Prompt: !?5,"Accession Number Matches for HL7 Messages"
  • Line Location: MHEAD+3
Function Call: WRITE
  • Prompt: !!,"Seq",?35,"Message"
  • Line Location: MHEAD+4
Function Call: WRITE
  • Prompt: !,"No.",?5,"Patient",?35,"IEN",?45,"Seg"
  • Line Location: MHEAD+5
Function Call: WRITE
  • Prompt: !,"----",?5,"-----------------------------",?35,"---------",?45,"---"
  • Line Location: MHEAD+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: DIR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DMESS+1
Function Call: WRITE
  • Prompt: !?10,"HL7 Message Text"
  • Line Location: DMESS+2
Function Call: WRITE
  • Prompt: !,$E($G(^HLMA(X,"MSH",1,0)),1,80)
  • Line Location: DM1+4
Function Call: WRITE
  • Prompt: !!,"Select either 'E' to Enter missing Accession Number or 'D' to Display the HL7 message."
  • Line Location: ACCS+6
Routine Call
  • DIC
  • Line Location:
    • FM+6
    • DFN+11
Routine Call
  • DIR
  • Line Location:
    • DIR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRSITE - [#9009029] MTYPE+1
^DPT - [#2] A1+8, PATN+1
^HL(772 - [#772] HL7+5, HL7+6, HL7+7, HL7+10, AHL7+5, AHL7+8, C2*, DM1+6
^HLMA - [#773] HL7+5, AHL7+5, DM1+4
^HLMA("B" REFILE+2, DM1+3
^INLHSCH(0 REFILE+4*
^INTHU - [#4001] INTHU+2, INTHU+3, INTHU+4, INTHU+7, AINTHU+3, AINTHU+6, C2+1*, DM2+4
^LRO(68 - [#68] ACC+8, A1+2, A1+5
^LRO(69 - [#69] ONO+10, ONO+11, ONO+12
^TMP("BLRR MATCH" A1+11*, MON+1, MDISP+5, MDISP+7, MDISP+9
^TMP("BLRR PROC" MSEL+9, MDISP+13*
^TMP("BLRRLPAT" ALL+1!, ALL+17, P1+1!, P1+31, P1+33, P1+35!, L1+2, L1+3, HL7+14*, INTHU+11*
, AHL7+12*, PN+3, AINTHU+10*, IEN+1, IEN+2, CH1+2, C1*, C1+1*, LHEAD+10, LHEAD+13
, LHEAD+21, IENHEAD+10, MATCH+3, MATCH+5, MATCH+7
^TMP("BLRRLPN" PN+3*, LALL+4, LALL+14, ASEL+7, ASEL+8

Label References

Name Line Occurrences
$$ASEL LALL+15
$$DFN CH1+11, M1+3
A1 ACC+8
ACC CH1+12, M1+5
ACCNUM ACCNUM+7, ACCS+7
ACCS CH1+19, ACCS+6
AHEAD LALL+2, LALL+12
AHL7 ALL+14
AINTHU ALL+15
ALL P1+16
C2 P1S+4
CH1 CH1+23
CHANGE IEN+3, IEN+15
DIR ALL+10, P1+9, PNAM+5, MTYPE+7, ACCNUM+5, SPECID+5, L1+9, IEN+11, CH1+29, ASEL+5
, MSEL+4, SID+4, ONO+4, ACCS+4
DM1 DMESS+4
DM2 DMESS+5
DMESS ACCS+8
FIND P1+30
FM P1+12
HL7 FIND+1
IEN L1+3, L1+15
IENHEAD IEN+7
INTHU FIND+2
L1 LIST+2, L1+11
LALL ALL+20
LHEAD L1+4
LINE LALL+10, LHEAD+16, LHEAD+23, DM1+8, DM2+6
LIST P1+34, LALL+17
M1 MATCH+7
MDISP MON+2
MHEAD MDISP+1
MSEL MON+4, MSEL+6
MTYPE EN+6
ONO P1+15, ONO+6
P1 EN+8, PAT+2
P1S MSEL+9
PATN ONO+13
PAUSE P1+29, REFILE+8, DMESS+6
PN HL7+17, INTHU+14, AHL7+13, AINTHU+11
PNAM P1+13, PNAM+7
REFILE IEN+5, IEN+17, P1S+5
SID P1+14, SID+6

Naked Globals

Name Field # of Occurrence
^( HL7+5, HL7+10, INTHU+2, INTHU+7, AHL7+5, AHL7+8, AINTHU+3, AINTHU+6, LALL+4, LHEAD+21
, IENHEAD+10, ACC+8, A1+5, MATCH+7, MDISP+9, DM1+6, DM2+4
^("BLRRLPN" ALL+1!, P1+1!, P1+35!
^(0 HL7+7, HL7+10, INTHU+4, INTHU+7, AHL7+5, AHL7+8, AHL7+9, AINTHU+3, AINTHU+6, AINTHU+7
^(3 A1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACC EN+1~, ACCNUM+1!, ACCNUM+8*, CH1+18*, CH1+23, CH1+26, C1, C1+1, C2, C2+1
, REFILE+7, ACC+2!, A1+5*, A1+7, A1+10, A1+11, P1S+3*
ACC( CH1+17, A1+7*
ACC(0 M1+6
ACC(1 CH1+13
ALL EN+1~, IEN+13*, IEN+15, CH1+30, MSEL+7*, MSEL+9
BLRRLMA REFILE+1, REFILE+2*, CALLHL+3, CALLHL+5!
>> DA ONO+11*, ONO+12
>> DA(1 ONO+10*, ONO+11, ONO+12
DAT ACC+1~, ACC+3*, ACC+4, ACC+5, A1+1, A1+2
DATX ACC+1~, ACC+4*
DFN EN+1~, FM+1!, CH1+11*, CH1+12, ACC~, A1+5, A1+8, M1+3*, M1+4, M1+5
DIC FM+1!, FM+2*, DFN+8*
DIC("A" FM+4*
DIC("S" DFN+10*
DIC(0 FM+3*, DFN+9*
DIR ALL+7!, P1+6!, PNAM+1!, MTYPE+4!, ACCNUM+1!, SPECID+2!, L1+5!, IEN+8!, CH1+24!, ASEL+2!
, MSEL+1!, SID+1!, ONO+1!, DIR+3!, ACCS+1!
DIR("A" ALL+9*, P1+8*, PNAM+3*, PNAM+4*, MTYPE+6*, ACCNUM+3*, ACCNUM+4*, SPECID+4*, L1+7*, L1+8*
, IEN+10*, CH1+26*, CH1+27*, ASEL+4*, MSEL+3*, SID+3*, ONO+3*, ACCS+3*
DIR("B" CH1+28*
DIR(0 ALL+8*, P1+7*, PNAM+2*, MTYPE+5*, ACCNUM+2*, SPECID+3*, L1+6*, IEN+9*, CH1+25*, ASEL+3*
, MSEL+2*, SID+2*, ONO+2*, ACCS+2*
DOB EN+2~, DFN+2*
DT ALL+2
DTIME LINE+3, PAUSE+2
DUZ CALLHL+2
DUZ(2 MTYPE+1
>> DX A1+1*, A1+2*, A1+5
END EN+2~, ALL+5*, ALL+12*, ALL+13*, AHL7+5, AINTHU+3
FI EN+1~
FN EN+1~, EN+2~, DFN+5*, DFN+7
IEN EN+2~, L1+14*, L1+15, HL7+5*, HL7+6, HL7+7, HL7+10, HL7+14, AHL7+5*, AHL7+8
, AHL7+12, IEN~, IEN+1, IEN+2, IEN+3, IEN+5, IEN+7, IEN+15, IEN+17, CHANGE~
, CH1+2, CH1+7, CH1+12, C1, C1+1, C2, C2+1, REFILE~, REFILE+2, REFILE+4
, REFILE+6, IENHEAD~, IENHEAD+3, IENHEAD+7, IENHEAD+10, ACC~, A1+11, M1~, M1+5, P1S+1*
, P1S+5, DMESS~, DM1+3, DM1+6, DM2+4, ACCS+8
IOF EN+4, P1+4, CH1, LHEAD+1, IENHEAD+1, AHEAD+1, MHEAD+2, DMESS+1
J EN+1~, HL7+8*, HL7+13*, HL7+14, INTHU+5*, INTHU+10*, INTHU+11, AHL7+6*, AHL7+11*, AHL7+12
, AINTHU+4*, AINTHU+9*, AINTHU+10, IEN+9, IEN+15*, CH1+16*, CH1+17*, IENHEAD+8*, IENHEAD+11*, IENHEAD+12
, A1+3*, A1+6*, A1+7, MSEL+9*, MDISP+3*, MDISP+10*, MDISP+11, MDISP+14
JJ EN+1~, HL7+2*, AHL7+3*, PN+1*, PN+3*, AINTHU+1*, LALL+3*, LALL+4*, LALL+5, LALL+8
, LALL+14*, LALL+15, ASEL+7, LHEAD+8*, MSEL+2, MSEL+6, MDISP+13, MDISP+14*
K EN+1~, IEN+14*, CH1+30*, LHEAD+19*, LHEAD+22*, LHEAD+24, MSEL+8*
LINE EN+2~, LHEAD+7*, LHEAD+15*, LHEAD+16, LHEAD+23*, DM1+2*, DM1+7*, DM1+8, DM2+2*, DM2+5*
, DM2+6
LN EN+2~, DFN+4*, DFN+7
LOOK EN+1~, P1+11*, P1+12, P1+13, P1+14, P1+15, P1+16, P1+18, P1+19, P1+20
LRDFN EN+2~, ONO+12*, ONO+13
LRO ACC+1~, ACC+7*, ACC+8*, A1+2, A1+5
LROX EN+2~, ACC+8*, A1+7
MN EN+2~, DFN+6*, DFN+7
MTYPE EN+1~, ALL+14, ALL+15, P1+5, P1+24, MTYPE+1*, MTYPE+2, MTYPE+3*, MTYPE+9*, FIND+1
, FIND+2, C1, C1+1, C2, C2+1, REFILE+1, REFILE+3, REFILE+4, DMESS+4, DMESS+5
NAM EN+2~, L1+13*, L1+15, IEN~, IEN+1, IEN+2, IEN+3, IEN+5, IEN+7, IEN+15
, IEN+17, CHANGE~, CH1+2, CH1+6, CH1+11, C1, C1+1, REFILE~, LALL+15*, LALL+17
, ASEL+1*, ASEL+8*, ASEL+9, LHEAD~, LHEAD+9, LHEAD+10, IENHEAD~, IENHEAD+10, DFN~, DFN+1
, DFN+2, DFN+3, P1S+5
NUM ASEL~, ASEL+3
ONO EN+1~, P1+2~, P1+3*, P1+27, P1+30, FIND~, HL7+12, HL7+16, INTHU+9, INTHU+13
, ONO+9*
ORIGDUZ CALLHL+1~, CALLHL+2*, CALLHL+4
PAT EN+1~, P1+2~, P1+3*, P1+25, P1+30, P1+32*, P1+33*, P1+34, FM+8*, PNAM+12*
, FIND~, LIST~, L1+2, L1+3, L1+4, HL7+6, HL7+15, HL7+16, INTHU+3, INTHU+12
, INTHU+13, LHEAD+2, ACC+1~, A1+8*, A1+9, A1+11, M1~, M1+3, ONO+14, PATN+2*
PATX EN+1~, P1+32, HL7+15*, HL7+16*, INTHU+12*, INTHU+13*
PID EN+1~, HL7+7*, HL7+14, HL7+15, HL7+16, INTHU+4*, INTHU+11, INTHU+12, INTHU+13, AHL7+9*
, AHL7+12, AINTHU+7*, AINTHU+10
QUIT EN+1~, EN+3*, EN+7, EN+8, PAT+1*, PAT+2, PAT+3*, ALL+6, ALL+11*, ALL+19*
, ALL+20, ALL+21*, P1+10, P1+17, P1+22*, FM+7*, PNAM+6, MTYPE+8, ACCNUM+6, SPECID+6*
, LIST+1*, LIST+2, LIST+3*, L1+3*, L1+10, L1+16*, HL7+1~, HL7+3*, AHL7+1~, AHL7+2*
, AHL7+5, IEN+4, IEN+5, IEN+6*, IEN+12*, IEN+16*, CH1+1*, CH1+20, CH1+30*, LALL+1*
, LALL+4, LALL+8, LALL+11, LALL+13*, LALL+16, ASEL+6, LINE+4*, LHEAD+18, LHEAD+23, MON+3*
, MON+4, MON+5*, MSEL+5, SID+5, ONO+5, ONO+14*, DIR+4*, ACCS+5
SEG EN+2~, CH1+4*, CH1+9, CH1+12, CH1+27, C2, C2+1, ACC~, A1+11, M1+1*
, M1+5, P1S+2*
SEGX EN+2~, CH1+5*, CH1+10, CH1+12, ACC~, ACC+3, ACC+4, A1+10*, A1+11, M1+2*
, M1+5
SEQ EN+2~, IEN+15*, CHANGE~, CH1+2, CH1+8, C1, C1+1, M1~, MSEL+9*
SEX EN+2~, DFN+3*
SID EN+1~, P1+2~, P1+3*, P1+26, P1+30, SPECID+1*, SPECID+7*, FIND~, HL7+11, HL7+15
, INTHU+8, INTHU+12, SID+10*
SSN EN+2~
U FM+8, MTYPE+1, LINE+4, DFN+4, DFN+5, DFN+6, ACC+8, A1+5, A1+7, A1+8
, A1+11, P1S+1, P1S+2, P1S+3, MDISP+12, MDISP+13, DIR+4, PATN+1, PATN+2
X EN+1~, ALL+5, P1+11, PNAM+7, PNAM+12, MTYPE+9, ACCNUM+7, ACCNUM+8, SPECID+7, L1+1~
, L1+11, L1+12, L1+13, L1+14, HL7+1~, HL7+4*, HL7+5*, INTHU+1*, INTHU+2*, INTHU+3
, INTHU+4, INTHU+7, INTHU+11, AHL7+1~, AHL7+4*, AHL7+5*, PN+2*, PN+3*, AINTHU+2*, AINTHU+3*
, AINTHU+6, AINTHU+10, IEN+1*, IEN+2, IEN+3, CH1+2*, CH1+3, CH1+4, CH1+5, ASEL+7
, ASEL+8, LHEAD+9*, LHEAD+10*, LHEAD+11, LHEAD+13, LHEAD+14, LHEAD+21, IENHEAD+9*, IENHEAD+10*, IENHEAD+11
, IENHEAD+13, DFN+1*, DFN+4, DFN+5, DFN+6, DFN+7*, ACC+1~, A1+4*, A1+5*, MATCH+1~
, MATCH+2*, MATCH+3*, MATCH+5, MATCH+7, MSEL+6, MSEL+9*, P1S~, P1S+1, P1S+2, P1S+3
, MDISP+2~, MDISP+4*, MDISP+5*, MDISP+7, MDISP+9*, MDISP+11, SID+6, SID+10, ONO+6, ONO+9
, ONO+10, ONO+11, DIR+4, PATN~, PATN+1, DM1+1~, DM1+3*, DM1+4, DM1+5*, DM1+6*
, DM2+1~, DM2+3*, DM2+4*, ACCS+6, ACCS+7, ACCS+8
>> X1 ALL+2*
>> X2 ALL+3*
XX L1+1~, HL7+10*, HL7+11, HL7+12, HL7+14, INTHU+7*, INTHU+8, INTHU+9, INTHU+11, AHL7+8*
, AHL7+9, AHL7+10, AHL7+12, AINTHU+6*, AINTHU+7, AINTHU+8, AINTHU+10, LALL+4*, LALL+5, LALL+6
, LALL+7, LHEAD+21*, LHEAD+25, IENHEAD+10*, IENHEAD+13, MATCH+7*, M1~, M1+1, M1+2, MDISP+9*
, MDISP+12, MDISP+13
XX( L1+12, L1+13, LHEAD+14*
>> XXX LINE+3*, LINE+4, PAUSE+2*
Y EN+1~, ALL+12, FM+7, FM+8, L1+1~, L1+2*, L1+3, HL7+1~, HL7+9*, HL7+10*
, HL7+14, INTHU+6*, INTHU+7*, INTHU+11, AHL7+1~, AHL7+7*, AHL7+8*, AHL7+12, AINTHU+5*, AINTHU+6*
, AINTHU+10, IEN+13, CH1+30, LHEAD+12*, LHEAD+13*, LHEAD+14, LHEAD+17, LHEAD+21, DFN+12, DFN+13
, ACC+1~, A1+5*, MATCH+1~, MATCH+4*, MATCH+5*, MATCH+7, MSEL+7, MDISP+2~, MDISP+6*, MDISP+7*
, MDISP+9, MDISP+11, MDISP+13, PATN+1*, PATN+2, DM1+1~, DM1+6*, DM1+9, DM2+1~, DM2+4*
, DM2+7
Z EN+1~, L1+1~, HL7+1~, AHL7+1~, LHEAD+20*, LHEAD+21*, LHEAD+25, ACC+1~, MATCH+1~, MATCH+6*
, MATCH+7*, MDISP+2~, MDISP+8*, MDISP+9, MDISP+11, MDISP+13, DM1+1~, DM2+1~
>> ZTQUEUED ALL+6, ALL+16, REFILE+5, LINE+1, PAUSE+1, MHEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All