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 |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: XUMFH

Package: Kernel

Routine: XUMFH


Information

XUMFH ;CIOFO-SF/RAM - Master File HL7 Msg Handler ;11/16/05

Source Information

Source file <XUMFH.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 5 ($$IEN,CDSYS,NPI)^XUMF  (EM,EM1)^XUMFHM  MAIN^XUMFI  ($$DTYP,$$MFI,MAIN)^XUMFP  (SEGPRSE,SEQPRSE)^XUMFXHL7  
VA FileMan 3 $$FIND1^DIC  (FILE,UPDATE)^DIE  $$ROOT^DILFD  

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

Package Total Caller Graph
Kernel 13 XUMF  XUMF MFK  XUMF MFN  XUMF MFQ  XUMF MFR  XUMF218  XUMF390  XUMF4  
XUMF416  XUMF4L0  XUMFH4  XUMFX  ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; -- entry point
INIT ; -- initialize
PROCESS ; -- pull message text
MSH ; -- MSH segment
MSA ; -- MSA segment
QRD ; -- QRD segment
MFI ; -- MFI segment
MFE ; -- MFE segment
ZL7 ; -- Generic Master File
ZIN ; -- VHA Institution segment
ZFT ; -- VHA Facility Type segment
LOC ; -- Location Identification segment
ZZZ ; -- get [Z...] segment(s)
SUBFILE ; -- process subfile record
VALUE() ; -- parse segment
VAL2() ; -- parse component
SUBCOMP ; -- subcomponents
ARRAY ; -- query data stored in array (not filed)
REPLY ; -- master file response
EXIT ; -- cleanup, and quit
EM(ERROR,ERR) ; -- error message
EM1 ;

External References

Name Field # of Occurrence
$$FIND1^DIC MFE+13
FILE^DIE ZZZ+54
UPDATE^DIE ZZZ+36, SUBFILE+17, SUBFILE+25
$$ROOT^DILFD QRD+26, REPLY+12
$$IEN^XUMF MFE+13
CDSYS^XUMF ZZZ+43
NPI^XUMF ZZZ+23
EM^XUMFHM EM+2
EM1^XUMFHM EM1+2
MAIN^XUMFI REPLY+19
$$DTYP^XUMFP ZZZ+34, ZZZ+49, SUBFILE+10, SUBCOMP+10
$$MFI^XUMFP MFI+8
MAIN^XUMFP MFE+18, REPLY+18
SEGPRSE^XUMFXHL7 ZZZ+9
SEQPRSE^XUMFXHL7 VAL2+4

Used in HL7 Interface

HL7 Protocol Name Call Tags
XUMF MFN MAIN
XUMF MFQ MAIN
XUMF MFK MAIN
XUMF MFR MAIN

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] ZZZ+11
^TMP("DIERR" INIT+2!, EXIT+4!
^TMP("DILIST" INIT+2!, EXIT+4!
^TMP("HLA" INIT+3!, EXIT+4!
^TMP("HLS" INIT+3!, EXIT+4!
^TMP("XUMF ARRAY" QRD+31!, ARRAY+8*, ARRAY+10*
^TMP("XUMF ERROR" INIT+3!, EXIT+2!
^TMP("XUMF MFS" ZZZ+14, ZZZ+22, ZZZ+25, ZZZ+27, ZZZ+30, ZZZ+45, ZZZ+59, SUBFILE+4, SUBFILE+5, SUBFILE+6
, SUBFILE+12, SUBFILE+13, SUBCOMP+3, SUBCOMP+4, SUBCOMP+5

Label References

Name Line Occurrences
$$VAL2 ZZZ+33, ZZZ+48, SUBFILE+9, SUBCOMP+8
@( PROCESS+4, ZZZ+15, ZZZ+60
ARRAY ZZZ+5
EM MSA+8, QRD+11, QRD+15, MFI+7, MFI+11, MFE+8, MFE+16, ZZZ+12, ZZZ+38, ZZZ+56
, SUBFILE+19, SUBFILE+27, ARRAY+3, REPLY+11
EM1 EXIT+2
EXIT MAIN+6
INIT MAIN+6
PROCESS MAIN+6
REPLY MAIN+6
SUBCOMP ZZZ+26
SUBFILE ZZZ+44

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALL MAIN+3~, QRD+18*, QRD+19
ARRAY MAIN+2~, INIT+5*, QRD+17*, QRD+21, QRD+22, QRD+31, MFE+5, ZZZ+5
CDSYS MAIN+4~, MFE+11*, MFE+13, ZZZ+11, ZZZ+43
CNT MAIN+2~, INIT+5*
CODE MSA+2~, MSA+4*, MSA+6
ERR MAIN+2~, MSA+7, MSA+8, QRD+11, QRD+15, MFI+7, MFI+11, MFE+8, MFE+14, MFE+16
, MFE+17!, ZZZ+7~, ZZZ+12, ZZZ+37, ZZZ+38, ZZZ+39!, ZZZ+55, ZZZ+56, ZZZ+57!, SUBFILE+2~
, SUBFILE+18, SUBFILE+19, SUBFILE+20!, SUBFILE+26, SUBFILE+27, SUBFILE+28!, ARRAY+3, ARRAY+4, REPLY+11, EM~
, EM+2
ERRCNT MAIN+4~, INIT+5*
ERROR MAIN+2~, INIT+5*, MSA+7*, MSA+8, QRD+2, QRD+10*, QRD+11, QRD+14*, QRD+15, MFI+2
, MFI+6*, MFI+7, MFI+10*, MFI+11, MFE+2, MFE+18, ZZZ+2, ARRAY+4*, REPLY+10*, REPLY+11
, REPLY+18, REPLY+19, EM~, EM+2
FDA ZZZ+7~, ZZZ+29~, ZZZ+52*, SUBFILE+15~, SUBFILE+23~
FDA( ZZZ+35*, ZZZ+50*, SUBFILE+16*, SUBFILE+24*, SUBCOMP+11*
FDA1 ZZZ+7~, ZZZ+52
FDA1( SUBFILE+30*, SUBFILE+32*
FIELD ZZZ+7~, ZZZ+27*, ZZZ+28, ZZZ+30, ZZZ+35, ZZZ+44, ZZZ+45, ZZZ+50, SUBFILE+2~, SUBFILE+5*
, SUBFILE+32, SUBCOMP+4*, SUBCOMP+5, SUBCOMP+11
GROUP MAIN+3~, QRD+19*, QRD+21, QRD+22
HDT MAIN+3~
>> HL("ECH" INIT+6
>> HL("FS" INIT+6
>> HL("MTN" QRD+23, REPLY+2, REPLY+3, REPLY+4, REPLY+8
HLCS MAIN+2~, INIT+6*, QRD+26, QRD+27, QRD+28, MFE+7, MFE+10, MFE+13, ZZZ+34, ZZZ+43
, ZZZ+49, SUBFILE+10, ARRAY+2, ARRAY+10, REPLY+12, REPLY+13, REPLY+14
HLFS MAIN+2~, INIT+6*, PROCESS+3, PROCESS+4, MSA+4, MSA+7, QRD+6, QRD+7, QRD+8, QRD+12
, MFI+5, MFI+8, MFE+5, ZZZ+19
>> HLNEXT PROCESS+2
>> HLNODE PROCESS+3, PROCESS+4, MSA+4, MSA+7, QRD+6, QRD+7, QRD+8, QRD+12, MFI+5, MFI+8
, MFE+5, MFE+8, ZZZ+19, ARRAY+3, ARRAY+8, ARRAY+10
>> HLQUIT PROCESS+2
HLRESLTA MAIN+2~
HLSCS MAIN+4~, INIT+6*, SUBCOMP+9, SUBCOMP+10
I MAIN+2~, QRD+6*
IDX98 MAIN+4~, ARRAY+7*, ARRAY+8
IEN MAIN+2~, QRD+27*, QRD+28*, MFE+13*, MFE+14*, MFE+15, MFE+18, ZZZ+3, ZZZ+11, ZZZ+20
, ZZZ+62!, SUBFILE+15~, SUBFILE+23~, REPLY+13*, REPLY+14*, REPLY+16*, REPLY+18, REPLY+19
IEN(1 SUBFILE+21, SUBFILE+29
IEN1 ZZZ+29~, ZZZ+41
IEN1(1 ZZZ+42, ZZZ+43
IENS ZZZ+7~, ZZZ+20*, ZZZ+35, ZZZ+42*, ZZZ+50, SUBFILE+16, SUBFILE+21, SUBFILE+24, SUBFILE+29, SUBCOMP+11
IENS1 SUBFILE+2~, SUBFILE+21*, SUBFILE+29*, SUBFILE+30, SUBFILE+31*, SUBFILE+32
IFN MAIN+2~, QRD+25*, QRD+26, MFI+3, MFI+8*, MFI+9, MFE+13, MFE+18, ZZZ+11, ZZZ+23
, ZZZ+35, ZZZ+50, SUBFILE+2~, SUBFILE+4*, SUBFILE+16, SUBFILE+24, SUBFILE+30, SUBFILE+32, SUBCOMP+11, ARRAY+6
, REPLY+9*, REPLY+12, REPLY+16*, REPLY+18, REPLY+19
KEY MAIN+3~, MFE+5*, MFE+7, MFE+10, MFE+13, MFE+14, ZZZ+12, ZZZ+43, ARRAY+2, ARRAY+10
KEY1 SUBFILE+2~
MID MAIN+3~
MKEY SUBFILE+2~, SUBFILE+13*, SUBFILE+24, SUBFILE+30
MTPE MAIN+2~
MULT ZZZ+7~, SUBFILE+12*, SUBFILE+14, SUBFILE+22, SUBFILE+31
MULT( SUBFILE+21*, SUBFILE+29*, SUBFILE+31
PARAM MAIN+3~, MFE+18, REPLY+18, REPLY+19
PARAM( QRD+6*
PARAM("CDSYS" QRD+29*
POST ZZZ+7~, ZZZ+59*, ZZZ+60
PRE ZZZ+7~, ZZZ+14*, ZZZ+15
QID MAIN+4~, QRD+7*, QRD+17
QRD MAIN+3~, QRD+4*, QRD+6
REASON MAIN+3~
ROOT MAIN+3~, QRD+26*, QRD+27, REPLY+12*, REPLY+13
SEG MAIN+3~, ZZZ+19*, ZZZ+22, ZZZ+25, ZZZ+27, ZZZ+30, ZZZ+45, SUBFILE+4, SUBFILE+5, SUBFILE+6
, SUBFILE+12, SUBFILE+13, SUBCOMP+3, SUBCOMP+4, SUBCOMP+5
SEQ ZZZ+7~, ZZZ+21*, ZZZ+22*, ZZZ+23, ZZZ+24, ZZZ+25, ZZZ+27, ZZZ+30, ZZZ+32, ZZZ+45
, ZZZ+47, SUBFILE+4, SUBFILE+5, SUBFILE+6, SUBFILE+8, SUBFILE+12, SUBFILE+13, SUBFILE+14, SUBFILE+21, SUBFILE+29
, SUBFILE+31, SUBCOMP+3, SUBCOMP+4, SUBCOMP+5, SUBCOMP+7
SEQ1 ZZZ+7~, ZZZ+24*
SEQ2 ZZZ+7~, ZZZ+24*, ZZZ+32, ZZZ+33, ZZZ+47, ZZZ+48, SUBFILE+8, SUBFILE+9, VAL2+6, SUBCOMP+7
SEQ3 ZZZ+7~, ZZZ+25*, ZZZ+26, SUBCOMP+2*, SUBCOMP+3*, SUBCOMP+4, SUBCOMP+5, SUBCOMP+9
TYP ZZZ+30*, ZZZ+34, ZZZ+45*, ZZZ+49, SUBFILE+2~, SUBFILE+6*, SUBFILE+10, SUBCOMP+5*, SUBCOMP+10
TYPE MAIN+2~, INIT+5*, QRD+21*, QRD+22*, QRD+23*, MFE+18, REPLY+6*, REPLY+18, REPLY+19
U MSA+7, ARRAY+4
VALUE MAIN+3~, ZZZ+32*, ZZZ+33*, ZZZ+34*, ZZZ+35, ZZZ+47*, ZZZ+48*, ZZZ+49*, ZZZ+50, SUBFILE+8*
, SUBFILE+9*, SUBFILE+10*, SUBFILE+14, SUBFILE+16, SUBFILE+32, SUBCOMP+7*, SUBCOMP+8*, SUBCOMP+9*, SUBCOMP+10*, SUBCOMP+11
WHAT MAIN+4~, QRD+12*, QRD+13, QRD+25, REPLY+9
WHO MAIN+4~, QRD+8*, QRD+9, QRD+18, QRD+19, QRD+26, QRD+27, QRD+28, REPLY+12, REPLY+13
, REPLY+14
X MAIN+2~
XREF MAIN+3~, QRD+26*, QRD+27, QRD+29, MFE+10*, MFE+11, MFE+13, REPLY+12*, REPLY+13
XUMF ZZZ+7~, ZZZ+17*
XUMFSEQ ZZZ+7~
XUMFSEQ( ZZZ+32, ZZZ+47, SUBFILE+8, SUBCOMP+7
XUMFSEQ(2 ZZZ+11
XXX VAL2+2~
XXX(1 VAL2+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Local Variables  | All