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 |