VAFHLZPD ;ALB/KCL/PHH,TDM,KUM - Create generic HL7 ZPD segment ; 8/15/08 11:42am
Source file <VAFHLZPD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 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. |
|
| 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
|
| FileNo | Call Tags |
|---|---|
| ^DI(.85 - [#.85] | FIND1^DIC, GET1^DIQ |
| 2.07 | GET1^DIQ |
