LA7VHLU4 ;DALOI/JMC - HL7 segment builder utility ;03/15/11 12:28
Source file <LA7VHLU4.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Lab Instruments | 3 | ($$FINDSITE,$$NVAF,$$RETFACID)^LA7VHLU2 ($$CHKDATA,$$UNESC)^LA7VHLU3 $$XCNTFM^LA7VHLU9 |
| Kernel | 2 | ($$ID,$$NAME,$$NS,$$PADD,$$WHAT)^XUAF4 $$KSP^XUPARAM |
| VA FileMan | 2 | $$FIND1^DIC $$GET1^DIQ |
| Health Level Seven | 1 | $$HLADDR^HLFNC |
| Registration | 1 | ADD^VADPT |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Lab Instruments | 3 | LA7VIN2 LA7VOBX LA7VORC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INST(LA74,LA7FS,LA7ECH) | ; Build institution field
; Call with LA74 = ien of institution in file #4 ; if null/undefined then use Kernel Site file. ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
| XAD(LA7FN,LA7DA,LA7DT,LA7FS,LA7ECH) | ; Build extended address
; Call with LA7FN = Source File number ; Presently file #2 (PATIENT), #4 (INSTITUTION) or #200 (NEW PERSON) ; LA7DA = Entry in source file ; LA7DT = As of date in FileMan format ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
| XON(LA7FN,LA7DA,LA7TYP,LA7FS,LA7ECH) | ; Build extended composite name/id for organization
; Call with LA7FN = Source File number - presently #4 (INSTITUTION) ; LA7DA = Entry in source file ; LA7TYP = type of identifier (0/null=station #, 1=CLIA) ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
| XCNTFM(LA7X,LA7ECH) | ; Resolve XCN data type to FileMan (last name, first name, mi [id])
; Call with LA7X = HL7 field containing name ; LA7ECH = HL7 encoding characters |
|
| PLTFM(LA7PL,LA7FS,LA7ECH) | ; Resolve location from PL (person location) data type.
; Call with LA7PL = HL7 field containing person location ; LA7FS = HL field separator ; LA7ECH = HL7 encoding characters |
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | PLTFM+16 |
| $$GET1^DIQ | XAD+37, PLTFM+9 |
| $$HLADDR^HLFNC | XAD+39 |
| $$FINDSITE^LA7VHLU2 | PLTFM+26 |
| $$NVAF^LA7VHLU2 | INST+23 |
| $$RETFACID^LA7VHLU2 | XON+21 |
| $$CHKDATA^LA7VHLU3 | INST+20, INST+28, XAD+22, XAD+23, XAD+24, XAD+25, XAD+26, XAD+29, XAD+36, XAD+38 , XON+19, XON+29 |
| $$UNESC^LA7VHLU3 | PLTFM+12, PLTFM+19, PLTFM+24 |
| $$XCNTFM^LA7VHLU9 | XCNTFM+7 |
| ADD^VADPT | XAD+20 |
| $$ID^XUAF4 | INST+25, XON+32 |
| $$NAME^XUAF4 | INST+27 |
| $$NS^XUAF4 | XON+18 |
| $$PADD^XUAF4 | XAD+34 |
| $$WHAT^XUAF4 | XAD+35, XON+18 |
| $$KSP^XUPARAM | INST+13 |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SC - [#44] | FIND1^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | INST+16, INST+33*, XAD+13, XAD+45*, XON+13, XON+39* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | XAD+17~, XAD+18* |
| I | XAD+10~, XAD+36* |
| LA74 | INST~, INST+10*, INST+13*, INST+16, INST+19, INST+20, INST+22, INST+23, INST+25, INST+27 , INST+33 |
| LA7DA | XAD~, XAD+13, XAD+16, XAD+18, XAD+33, XAD+34, XAD+35, XAD+37, XAD+41, XAD+45 , XON~, XON+13, XON+17, XON+18, XON+21, XON+32, XON+39 |
| LA7DT | XAD~, XAD+19 |
| LA7ECH | INST~, INST+10*, INST+16, INST+20, INST+28, INST+30, INST+33, XAD~, XAD+13, XAD+22 , XAD+23, XAD+24, XAD+25, XAD+26, XAD+27, XAD+28, XAD+29, XAD+36, XAD+38, XAD+39 , XAD+45, XON~, XON+13, XON+19, XON+20, XON+23, XON+24, XON+25, XON+26, XON+27 , XON+29, XON+30, XON+33, XON+34, XON+35, XON+36, XON+39, XCNTFM~, XCNTFM+7, PLTFM~ , PLTFM+8, PLTFM+12, PLTFM+19, PLTFM+22, PLTFM+23, PLTFM+24 |
| LA7FN | XAD~, XAD+13, XAD+16, XAD+33, XAD+41, XAD+45, XON~, XON+13, XON+17, XON+39 |
| LA7FS | INST~, INST+16, INST+20, INST+28, INST+33, XAD~, XAD+13, XAD+22, XAD+23, XAD+24 , XAD+25, XAD+26, XAD+29, XAD+36, XAD+38, XAD+45, XON~, XON+13, XON+19, XON+29 , XON+39, PLTFM~, PLTFM+12, PLTFM+19, PLTFM+24 |
| LA7NVAF | INST+8~, INST+23*, INST+25 |
| LA7PL | PLTFM~, PLTFM+8, PLTFM+19, PLTFM+22 |
| LA7TYP | XON~, XON+10*, XON+13, XON+31, XON+39 |
| LA7X | INST+8~, XAD+10~, XAD+35*, XAD+36*, XAD+39, XON+8~, XON+21*, XON+22, XON+23, XON+24 , XON+32*, XON+36, XCNTFM~, XCNTFM+7, PLTFM+7~, PLTFM+8*, PLTFM+9, PLTFM+12*, PLTFM+16, PLTFM+17* , PLTFM+18, PLTFM+22*, PLTFM+23*, PLTFM+24*, PLTFM+26 |
| LA7Y | INST+8~, INST+10*, INST+16*, INST+19, INST+20*, INST+22, INST+25*, INST+28*, INST+30*, INST+33 , INST+35, XAD+10~, XAD+11*, XAD+13*, XAD+16, XAD+22*, XAD+23*, XAD+24*, XAD+25*, XAD+26* , XAD+27*, XAD+28*, XAD+29*, XAD+33, XAD+39*, XAD+41, XAD+45, XAD+47, XON+8~, XON+10* , XON+13*, XON+17, XON+19*, XON+20*, XON+23*, XON+24*, XON+25*, XON+26*, XON+27*, XON+29* , XON+30*, XON+33*, XON+34*, XON+35*, XON+36*, XON+39, XON+41, PLTFM+7~, PLTFM+8*, PLTFM+18* , PLTFM+19*, PLTFM+27*, PLTFM+29 |
| LA7Z | INST+8~, INST+27*, INST+28, XAD+10~, XAD+34*, XAD+35, XAD+37*, XAD+38*, XAD+39, XON+8~ |
| LA7Z(1 | XON+18*, XON+19 |
| LA7Z(2 | XON+18*, XON+28, XON+29 |
| VAERR | XAD+17~, XAD+21 |
| VAHOW | XAD+17~ |
| VAPA | XAD+17~ |
| VAPA(1 | XAD+22 |
| VAPA(11 | XAD+26 |
| VAPA(2 | XAD+23 |
| VAPA(4 | XAD+24 |
| VAPA(5 | XAD+25 |
| VAPA(7 | XAD+29 |
| VAPA(9 | XAD+27 |
| VAROOT | XAD+17~ |
| VATEST | XAD+17~ |
| VATEST("ADD" | XAD+19* |
| X | PLTFM+7~, PLTFM+16*, PLTFM+17 |
| Y | PLTFM+7~, PLTFM+8*, PLTFM+9*, PLTFM+15, PLTFM+17*, PLTFM+18, PLTFM+25*, PLTFM+26*, PLTFM+27 |
