VAFHLZCE ;ALB/KUM - Create generic HL7 Community Care Program (ZCE) segments ;06/16/20 3:34PM
Source file <VAFHLZCE.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | $$HLDATE^HLFNC |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,VAFSTR,VAFNUM,VAFHLQ,VAFHLFS,VAFZCE) | ; build HL7 ZCE segments.
; ZCE segments will be returned in the array VAFZCE. |
|
| GETDATA(DGFIDX) | ; Get information needed to build ZCE segment
; Input: ; DGFIDX = IEN of Subfile #2.191 Community Care Program |
|
| MAKESEG | ; Create segment using obtained data
; Input: Existence of the following variables is assumed ; VAFNUM = Number denoting Xth repetition of the ZCE segment ; VAFMAXL = Maximum length of each node (defaults to 245) ; VAFHLZCE(SeqNum) = Value ; HL7 encoding characters (HLFS, HLECH) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | EN+29 |
| Name | Line Occurrences |
|---|---|
| GETDATA | EN+39 |
| MAKESEG | EN+39 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | EN~, EN+29, EN+31, GETDATA+16 |
| DGFIDX | EN+16~, EN+30*, EN+31*, EN+34, EN+38*, EN+39, GETDATA~, GETDATA+16 |
| DGREC | EN+16~, EN+31*, EN+32, EN+33, EN+34 |
| DGTMP | EN+28! |
| DGTMP( | EN+29*, EN+31 |
| DGTMP("UPDT" | EN+34*, EN+37, EN+38 |
| DGUPDT | EN+16~, EN+33*, EN+34, EN+36*, EN+37*, EN+38 |
| >> HLFS | EN+20 |
| >> HLQ | EN+20 |
| U | EN+32, EN+33 |
| VAFCCD | GETDATA+14~, GETDATA+20*, GETDATA+27 |
| VAFEFD | GETDATA+14~, GETDATA+18*, GETDATA+25 |
| VAFEND | GETDATA+14~, GETDATA+19*, GETDATA+26 |
| VAFHLFS | EN~, EN+20*, MAKESEG+28 |
| VAFHLQ | EN~, EN+20*, GETDATA+24, GETDATA+25, GETDATA+26, GETDATA+27 |
| VAFHLZCE | EN+16~, GETDATA+15! |
| VAFHLZCE( | MAKESEG+21, MAKESEG+28 |
| VAFHLZCE("" | MAKESEG+18 |
| VAFHLZCE(1 | GETDATA+23* |
| VAFHLZCE(2 | GETDATA+24* |
| VAFHLZCE(3 | GETDATA+25* |
| VAFHLZCE(4 | GETDATA+26* |
| VAFHLZCE(5 | GETDATA+27* |
| VAFIE1 | EN+16~ |
| VAFIEN | GETDATA+14~, GETDATA+16*, GETDATA+17, GETDATA+18, GETDATA+19, GETDATA+20 |
| VAFLSEQ | MAKESEG+12~, MAKESEG+18*, MAKESEG+19 |
| VAFMAXL | EN+16~, EN+25*, MAKESEG+15*, MAKESEG+21 |
| VAFNUM | EN~, EN+16~, EN+23*, EN+39*, GETDATA+23, MAKESEG+13, MAKESEG+14, MAKESEG+16, MAKESEG+25 |
| VAFPGM | GETDATA+14~, GETDATA+17*, GETDATA+24 |
| VAFSEQ | MAKESEG+12~, MAKESEG+19*, MAKESEG+21, MAKESEG+24, MAKESEG+27, MAKESEG+28 |
| VAFSPIL | MAKESEG+12~, MAKESEG+17*, MAKESEG+23*, MAKESEG+25 |
| VAFSPON | MAKESEG+12~, MAKESEG+17*, MAKESEG+24*, MAKESEG+27 |
| VAFSPOT | MAKESEG+12~, MAKESEG+27*, MAKESEG+28 |
| VAFSTR | EN~, EN+26*, GETDATA+23, GETDATA+24, GETDATA+25, GETDATA+26, GETDATA+27 |
| VAFY | MAKESEG+12~, MAKESEG+16*, MAKESEG+21, MAKESEG+25*, MAKESEG+28* |
| VAFZCE | EN~, EN+17! |
| VAFZCE( | MAKESEG+13!, MAKESEG+14*, MAKESEG+16, MAKESEG+25 |