VAFHLZEL ;ALB/ESD,KCL,SCK,JRP - Creation of ZEL segment ; 11/23/99
Source file <VAFHLZEL.m>
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 8 | DGMSTHL7 DGRUGA01 DGRUGA08 VAFCA04 VAFCADT2 VAFCMSG3 VAFCQRY VAFEOHL1 |
| Scheduling | 2 | SCDXMSG1 SDRPA07 |
| Clinical Information Resource Network | 1 | RGADTP |
| Income Verification Match | 1 | IVMPTRN8 |
| Master Patient Index VistA | 1 | MPIFA31B |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,VAFSTR,VAFNUM) | ; This function call has been left for backwards
; compatability and is superceeded by EN1^VAFHLZEL. This function ; call is designed to build the HL7 ZEL segment. This segment contains ; VA-specific patient eligibility data. Because a patient can have ; more than eligibility, the ZEL segment for the patient's primary ; eligibility will be the output of the function call and all other ; eligibilities will be returned in the array VAFZEL. Because this ; call was not designed to accomodate a segment length greater than ; 245, sequence numbers 1 to 24 are the only fields supported. |
|
| EN1(DFN,VAFSTR,VAFNUM,VAFZEL) | ; This procedure call is designed to build the
; HL7 ZEL segment. This segment contains VA-specific patient ; eligibility data. Because a patient can have more than eligibility, ; the ZEL segment(s) will be returned in the array VAFZEL. This call ; superceeds $$EN^VAFHLZEL because it accomodates a segment length ; greater than 245. |
|
| MAKESEG | ;Make segment using obtained data
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | EN1+35, EN1+36, EN1+42, EN1+43 |
| Name | Line Occurrences |
|---|---|
| EN1 | EN+33 |
| MAKESEG | EN1+37, EN1+44 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | EN~, EN+33, EN1~, EN1+31, EN1+35, EN1+36, EN1+42, EN1+43 |
| >> HLFS | EN+36, EN+40, EN1+31, MAKESEG+31 |
| LASTSEQ | MAKESEG+15~, MAKESEG+21*, MAKESEG+22 |
| MAXSEQ | EN+31~, EN+35*, EN+36, EN+40 |
| SEQ | MAKESEG+15~, MAKESEG+22*, MAKESEG+24, MAKESEG+27, MAKESEG+30, MAKESEG+31 |
| SPILL | MAKESEG+15~, MAKESEG+20*, MAKESEG+26*, MAKESEG+28 |
| SPILLON | MAKESEG+15~, MAKESEG+20*, MAKESEG+27*, MAKESEG+30 |
| SPOT | MAKESEG+15~, MAKESEG+30*, MAKESEG+31 |
| VAFELPTR | EN1+28~, EN1+41*, EN1+42*, EN1+43 |
| VAFHLZEL | EN1+28~ |
| VAFHLZEL( | MAKESEG+24, MAKESEG+31 |
| VAFHLZEL("" | MAKESEG+21 |
| VAFMAXL | EN1+28~, EN1+30*, MAKESEG+18*, MAKESEG+24 |
| VAFNODE | EN1+28~, EN1+36*, EN1+43* |
| VAFNUM | EN~, EN+33, EN1~, EN1+32*, EN1+39 |
| VAFPELIG | EN1+28~, EN1+35*, EN1+36, EN1+42 |
| VAFPRIM | EN+31~, EN+36*, EN+42, EN1+28~ |
| VAFSETID | EN1+28~, EN1+37*, EN1+44*, MAKESEG+16, MAKESEG+17, MAKESEG+19, MAKESEG+28 |
| VAFSTR | EN~, EN+33, EN1~, EN1+31, EN1+33* |
| VAFY | MAKESEG+15~, MAKESEG+19*, MAKESEG+24, MAKESEG+28*, MAKESEG+31* |
| VAFZEL | EN+33, EN1~, EN1+29! |
| VAFZEL( | EN+39, EN+40*, EN+41!, MAKESEG+16!, MAKESEG+17*, MAKESEG+19, MAKESEG+28 |
| VAFZEL(1 | EN+36, EN+37!, EN1+31* |
| X | EN+31~, EN+38*, EN+39*, EN+40, EN+41, EN1+28~ |
