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