Routine: VAFHLZEL

Information

VAFHLZEL ;ALB/ESD,KCL,SCK,JRP - Creation of ZEL segment ; 11/23/99

Source file <VAFHLZEL.m>

Package	Total	Call Graph
Registration	1	GETDATA^VAFHLZE1

Package	Total	Caller Graph
Registration	8	DGMSTHL7 DGQEHL73 DGRUGA01 DGRUGA08 VAFCA04 VAFCADT2 VAFCMSG3 VAFEOHL1
Scheduling	2	SCDXMSG1 SDRPA07

Name	Comments	DBIA/ICR reference
MAKESEG	;Make segment using obtained data
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.	ICR #752 Status: Active Usage: Controlled Subscription
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.	ICR #752 Status: Active Usage: Controlled Subscription

Name	Field # of Occurrence
GETDATA^VAFHLZE1	EN1+37, EN1+44

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

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~