LA7VHLU9 ;VA/DALOI/JMC - HL7 segment builder utility ; 13-Aug-2013 09:09 ; MKK
Source file <LA7VHLU9.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 6 | $$HLNAME^XLFNAME $$TRIM^XLFSTR $$KSP^XUPARAM ($$IEN,$$VPID)^XUPS ($$ACTIVE,$$DIV4)^XUSER ($$NPI,$$QI)^XUSNPI |
Automated Lab Instruments | 2 | ($$FINDSITE,$$RETFACID)^LA7VHLU2 $$CHKDATA^LA7VHLU3 |
Health Level Seven | 1 | $$FMNAME^HLFNC |
VA Fileman | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
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 |
|
XCN(LA7DUZ,LA7DIV,LA7FS,LA7ECH,LA7DMT,LA7IDTYP) | ; Build composite ID and name for person
; Call with LA7DUZ = DUZ of person ; If not pointer to #200, then use as literal ; LA7DIV = Institution of user ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; LA7DMT = flag to indicate delimiters should be demoted ; LA7IDTYP = id type to return (0:DUZ 1:VPID 2:NPI) |
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | XCN+32 |
$$FMNAME^HLFNC | XCNTFM+35 |
$$FINDSITE^LA7VHLU2 | XCNTFM+26 |
$$RETFACID^LA7VHLU2 | XCN+30 |
$$CHKDATA^LA7VHLU3 | XCN+44 |
$$HLNAME^XLFNAME | XCN+21, XCN+45 |
$$TRIM^XLFSTR | XCNTFM+37 |
$$KSP^XUPARAM | XCN+29 |
$$IEN^XUPS | XCNTFM+14 |
$$VPID^XUPS | XCN+26 |
$$ACTIVE^XUSER | XCNTFM+32 |
$$DIV4^XUSER | XCNTFM+27 |
$$NPI^XUSNPI | XCN+23 |
$$QI^XUSNPI | XCNTFM+19 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP($J | XCN+16, XCN+50* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | XCN+23 |
I | XCN+9~, XCN+47* |
LA7CS | XCN+9~, XCN+13*, XCN+21, XCN+24, XCN+27, XCN+34, XCN+35, XCN+42, XCN+43, XCN+45 , XCN+47 |
LA7DIV | XCN~, XCN+29*, XCN+30, XCN+32 |
LA7DMT | XCN~, XCN+11*, XCN+13, XCN+16, XCN+50 |
LA7DUZ | XCN~, XCN+16, XCN+19, XCN+20, XCN+23, XCN+26, XCN+34*, XCN+35, XCN+38, XCN+39 , XCN+40, XCN+41, XCN+50, XCNTFM+6~, XCNTFM+9*, XCNTFM+15*, XCNTFM+20*, XCNTFM+23, XCNTFM+28*, XCNTFM+31 , XCNTFM+33*, XCNTFM+47 |
LA7ECH | XCN~, XCN+13, XCN+16, XCN+44, XCN+50, XCNTFM~, XCNTFM+12, XCNTFM+13, XCNTFM+18, XCNTFM+35 , XCNTFM+40, XCNTFM+42, XCNTFM+43, XCNTFM+44, XCNTFM+45 |
LA7FS | XCN~, XCN+16, XCN+44, XCN+50 |
LA7IDC | XCNTFM+6~, XCNTFM+12*, XCNTFM+14, XCNTFM+19, XCNTFM+47 |
LA7IDTYP | XCN~, XCN+11*, XCN+16, XCN+22, XCN+25, XCN+50 |
LA7J | XCNTFM+24~, XCNTFM+27* |
LA7J( | XCNTFM+28 |
LA7K | XCNTFM+24~, XCNTFM+26*, XCNTFM+28 |
LA7NPI | XCN+9~, XCN+22, XCN+23*, XCN+24 |
LA7SITE | XCN+9~, XCN+30*, XCN+31, XCN+33*, XCN+34 |
LA7VAF | XCN+9~, XCN+32*, XCN+33 |
LA7VPID | XCN+9~, XCN+25, XCN+26*, XCN+27 |
LA7X | XCN+9~, XCNTFM~, XCNTFM+12, XCNTFM+13, XCNTFM+18, XCNTFM+35, XCNTFM+40, XCNTFM+42, XCNTFM+43, XCNTFM+44 , XCNTFM+45 |
LA7Y | XCN+9~, XCN+11*, XCN+16*, XCN+19, XCN+24*, XCN+27*, XCN+34*, XCN+35*, XCN+38, XCN+42* , XCN+43*, XCN+47*, XCN+50, XCN+52, XCNTFM+6~, XCNTFM+35*, XCNTFM+37*, XCNTFM+40, XCNTFM+45*, XCNTFM+47 |
LA7Z | XCN+9~, XCN+11*, XCN+21*, XCN+45*, XCN+47, XCNTFM+6~, XCNTFM+12*, XCNTFM+23, XCNTFM+25, XCNTFM+31 , XCNTFM+32, XCNTFM+33 |
LA7Z(1 | XCNTFM+25*, XCNTFM+27, XCNTFM+28 |
LA7Z(2 | XCNTFM+25*, XCNTFM+26 |
NAME | XCN+9~, XCN+21, XCN+39*, XCN+41*, XCN+44*, XCN+45 |
NAME("FIELD" | XCN+20* |
NAME("FILE" | XCN+20* |
NAME("IENS" | XCN+20* |
NAME(1 | XCN+41*, XCN+42, XCN+43 |
X | XCNTFM+6~, XCNTFM+14*, XCNTFM+15, XCNTFM+19*, XCNTFM+20, XCNTFM+32*, XCNTFM+33, XCNTFM+41*, XCNTFM+42*, XCNTFM+43* , XCNTFM+44*, XCNTFM+45 |