VAFHLZPD ;ALB/KCL/PHH,TDM - Create generic HL7 ZPD segment ; 8/15/08 11:42am
Source file <VAFHLZPD.m>
Package | Total | Call Graph |
---|---|---|
Registration | 3 | $$PCTEAM^DGSDUTL (KVA,OPD)^VADPT ($$INS,$$YN)^VAFHLFNC |
Health Level Seven | 1 | $$HLDATE^HLFNC |
Integrated Billing | 1 | $$RXST^IBARXEU |
Uncategorized | 1 | ($$HOMELESS,HOMELESS)^SOWKHIRM |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1(DFN,VAFSTR) | ; This generic extrinsic function was designed to return the
; HL7 ZPD segment. This segment contains VA-specific patient ; information that is not contained in the HL7 PID segment. This ; call superceeds EN^VAFHLZPD because it accomodates a segment ; length greater than 245. ; |
|
GETDATA(DFN,VAFSTR,ARRAY) | ;Get info needed to build segment
|
|
COMMANUM(FROM,TO) | ;Build comma seperated list of numbers
|
|
EN(DFN,VAFSTR) | ; This generic extrinsic function was designed to return
; sequences 1 throught 21 of the HL7 ZPD segment. This segment ; contains VA-specific patient information that is not contained in ; the HL7 PID segment. This call does not accomodate a segment ; length greater than 245 and has been superceeded by EN1^VAFHLZPD. ; This line tag has been left for backwards compatability. |
|
Name | Field # of Occurrence |
---|---|
$$PCTEAM^DGSDUTL | GETDATA+91 |
$$HLDATE^HLFNC | GETDATA+46, GETDATA+60, GETDATA+109, GETDATA+111, GETDATA+117, GETDATA+118, GETDATA+124 |
$$RXST^IBARXEU | GETDATA+87 |
$$HOMELESS^SOWKHIRM | GETDATA+66 |
HOMELESS^SOWKHIRM | GETDATA+66 |
KVA^VADPT | GETDATA+134 |
OPD^VADPT | GETDATA+30 |
$$INS^VAFHLFNC | GETDATA+53 |
$$YN^VAFHLFNC | GETDATA+44, GETDATA+53, GETDATA+58 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(408.32 - [#408.32] | GETDATA+38 |
^DIC(10 - [#10] | GETDATA+62 |
^DIC(13 - [#13] | GETDATA+64 |
^DIC(35 - [#35] | GETDATA+130 |
^DIC(4 - [#4] | GETDATA+110, GETDATA+112 |
^DIC(5 - [#5] | GETDATA+36 |
^DPT - [#2] | GETDATA+28, GETDATA+44, GETDATA+46, GETDATA+49, GETDATA+50, GETDATA+56, GETDATA+71, GETDATA+102, GETDATA+108, GETDATA+116 , GETDATA+120, GETDATA+122, GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
^TMP($J | GETDATA+16 |
Name | Line Occurrences |
---|---|
$$COMMANUM | GETDATA+23 |
$$EN1 | EN+18 |
GETDATA | EN1+26 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | GETDATA~, GETDATA+15*, GETDATA+16*, GETDATA+17, GETDATA+20, GETDATA+32, GETDATA+34, GETDATA+36, GETDATA+38, GETDATA+40 , GETDATA+42, GETDATA+44, GETDATA+46, GETDATA+51, GETDATA+53, GETDATA+58, GETDATA+60, GETDATA+62, GETDATA+64, GETDATA+66 , GETDATA+81, GETDATA+83, GETDATA+87, GETDATA+95, GETDATA+103, GETDATA+104, GETDATA+109, GETDATA+110, GETDATA+111, GETDATA+112 , GETDATA+117, GETDATA+118, GETDATA+120, GETDATA+122, GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
DFN | EN~, EN+18, EN1~, EN1+26, GETDATA~, GETDATA+21*, GETDATA+28, GETDATA+44, GETDATA+46, GETDATA+49 , GETDATA+53, GETDATA+56, GETDATA+66, GETDATA+71, GETDATA+87, GETDATA+91, GETDATA+102, GETDATA+108, GETDATA+116, GETDATA+120 , GETDATA+122, GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
FROM | COMMANUM~, COMMANUM+7*, COMMANUM+8, COMMANUM+10, COMMANUM+11 |
>> HLFS | EN+22, EN+26, EN+27, EN+29, EN+31, EN1+42 |
>> HLQ | GETDATA+32, GETDATA+34, GETDATA+36, GETDATA+38, GETDATA+40, GETDATA+42, GETDATA+44, GETDATA+46, GETDATA+51, GETDATA+53 , GETDATA+58, GETDATA+60, GETDATA+62, GETDATA+64, GETDATA+66, GETDATA+74, GETDATA+77, GETDATA+78, GETDATA+87, GETDATA+93 , GETDATA+103, GETDATA+104, GETDATA+109, GETDATA+110, GETDATA+111, GETDATA+112, GETDATA+117, GETDATA+118, GETDATA+120, GETDATA+122 , GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
LASTSEQ | EN1+22~, EN1+32*, EN1+33 |
LOC | GETDATA+70~, GETDATA+76*, GETDATA+77*, GETDATA+78*, GETDATA+83 |
MAXLEN | EN1+22~, EN1+24*, EN1+35 |
OUTPUT | COMMANUM+9~, COMMANUM+10*, COMMANUM+11*, COMMANUM+12 |
POW | GETDATA+70~, GETDATA+73*, GETDATA+74*, GETDATA+81 |
REMARKS | EN+17~, EN+26*, EN+31 |
SEQ | EN1+22~, EN1+33*, EN1+35, EN1+38, EN1+41, EN1+42 |
SPILL | EN1+22~, EN1+29*, EN1+37*, EN1+39 |
SPILLON | EN1+22~, EN1+30*, EN1+38*, EN1+41 |
SPOT | EN1+22~, EN1+41*, EN1+42 |
TO | COMMANUM~, COMMANUM+8*, COMMANUM+11 |
U | GETDATA+103, GETDATA+104, GETDATA+109, GETDATA+110, GETDATA+111, GETDATA+112, GETDATA+117, GETDATA+118, GETDATA+120, GETDATA+122 , GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
VAF52 | GETDATA+70~, GETDATA+71*, GETDATA+73, GETDATA+76 |
VAFHLZPD | EN1+22~, EN1+44 |
VAFHLZPD( | EN1+35, EN1+42 |
VAFHLZPD("" | EN1+32 |
VAFNODE | GETDATA+26~, GETDATA+28*, GETDATA+32, GETDATA+38, GETDATA+62, GETDATA+64 |
VAFSTR | EN~, EN+18, EN1~, EN1+26, GETDATA~, GETDATA+22*, GETDATA+23*, GETDATA+24*, GETDATA+32, GETDATA+34 , GETDATA+36, GETDATA+38, GETDATA+40, GETDATA+42, GETDATA+44, GETDATA+46, GETDATA+48, GETDATA+53, GETDATA+55, GETDATA+58 , GETDATA+60, GETDATA+62, GETDATA+64, GETDATA+66, GETDATA+68, GETDATA+81, GETDATA+83, GETDATA+87, GETDATA+89, GETDATA+100 , GETDATA+103, GETDATA+104, GETDATA+106, GETDATA+109, GETDATA+110, GETDATA+111, GETDATA+112, GETDATA+114, GETDATA+117, GETDATA+118 , GETDATA+120, GETDATA+122, GETDATA+124, GETDATA+126, GETDATA+128, GETDATA+130, GETDATA+132 |
VAFY | EN+17~, EN+18*, EN+22*, EN+26, EN+27*, EN+29*, EN+31*, EN+33, EN1+22~, EN1+28* , EN1+31, EN1+35, EN1+39*, EN1+42* |
VAFZPD | EN+17~, EN1+23! |
VAFZPD( | EN1+39 |
VAFZPD(1 | EN+20, EN+24, EN+29 |
VAPD | GETDATA+26~ |
VAPD(1 | GETDATA+34 |
VAPD(2 | GETDATA+36 |
VAPD(3 | GETDATA+40 |
VAPD(4 | GETDATA+42 |
X | GETDATA+26~, GETDATA+32*, GETDATA+38*, GETDATA+46*, GETDATA+49*, GETDATA+50, GETDATA+53*, GETDATA+56*, GETDATA+58, GETDATA+60 , GETDATA+62*, GETDATA+64*, GETDATA+66*, GETDATA+87*, GETDATA+91*, GETDATA+92*, GETDATA+93*, GETDATA+95, GETDATA+102*, GETDATA+103 , GETDATA+104, GETDATA+108*, GETDATA+109, GETDATA+110, GETDATA+111, GETDATA+112, GETDATA+116*, GETDATA+117, GETDATA+118, GETDATA+120* , GETDATA+122*, GETDATA+124*, GETDATA+126*, GETDATA+128*, GETDATA+130*, GETDATA+132*, COMMANUM+9~, COMMANUM+11* |
X1 | GETDATA+26~, GETDATA+36*, GETDATA+38*, GETDATA+44*, GETDATA+46*, GETDATA+50*, GETDATA+51, GETDATA+53*, GETDATA+58*, GETDATA+60* , GETDATA+62*, GETDATA+64*, GETDATA+103*, GETDATA+104*, GETDATA+109*, GETDATA+110*, GETDATA+111*, GETDATA+112*, GETDATA+117*, GETDATA+118* , GETDATA+124*, GETDATA+130* |
Name | Field # of Occurrence |
---|---|
$T(HOMELESS^SOWKHIRM | GETDATA+66 |