Routine: VAFHLZEN

Information

VAFHLZEN ;ALB/KCL - Create generic HL7 Enrollment (ZEN) segment ; 12-SEPTEMBER-1997

Source file <VAFHLZEN.m>

Package	Total	Call Graph
Registration	3	($$FINDCUR,$$GET)^DGENA $$PREF^DGENPTA $$STATION^VAFHLFNC
Health Level Seven	1	$$HLDATE^HLFNC

Package	Total	Caller Graph
Registration	5	DGRUGA01 DGRUGA08 VAFCA04 VAFCADT2 VAFCMSG3
Scheduling	1	SCDXMSG1

Name	Comments	DBIA/ICR reference
ENQ
EN(DFN,VAFSTR,VAFNUM,VAFHLQ,VAFHLFS)	; -- ; Entry point for creating HL7 Enrollment (ZEN) segment. ; ; Input(s): ; DFN - internal entry number of Patient (#2) file ; VAFSTR - (optional) string of fields requested, separated by ; commas. If not passed, return all data fields. ; VAFNUM - (optional) sequential number for SET ID (default=1) ; VAFHLQ - (optional) HL7 null variable. ; VAFHLFS - (optional) HL7 field separator.	ICR #5537 Status: Pending Usage: Private

Name	Line Occurrences
ENQ	EN+23, EN+31, EN+35

Name	Field # of Occurrence
DFN	EN~, EN+23, EN+30, EN+53
>> HLFS	EN+17
>> HLQ	EN+17
SEQ	EN+14~, EN+26*
VAFENR	EN+14~, EN+35
VAFENR("APP"	EN+46, EN+56
VAFENR("EFFDATE"	EN+55
VAFENR("END"	EN+57
VAFENR("FACREC"	EN+52
VAFENR("PRIORITY"	EN+54
VAFENR("REASON"	EN+50
VAFENR("REMARKS"	EN+51
VAFENR("SOURCE"	EN+48
VAFENR("STATUS"	EN+49
VAFENR("SUBGRP"	EN+58
VAFHLFS	EN~, EN+17*, EN+38, EN+41, EN+46, EN+48, EN+49, EN+50, EN+51, EN+52 , EN+53, EN+54, EN+55, EN+56, EN+57, EN+58, ENQ
VAFHLQ	EN~, EN+17*, EN+46, EN+48, EN+49, EN+50, EN+51, EN+52, EN+53, EN+54 , EN+55, EN+56, EN+57, EN+58
VAFIEN	EN+14~, EN+30*, EN+31, EN+35
VAFNUM	EN~, EN+20*, EN+41
VAFPREF	EN+14~
VAFSTR	EN~, EN+26, EN+38, EN+46, EN+48, EN+49, EN+50, EN+51, EN+52, EN+53 , EN+54, EN+55, EN+56, EN+57, EN+58
VAFY	EN+14~, EN+23, EN+31, EN+35, EN+38, EN+41, EN+46, EN+48, EN+49, EN+50* , EN+51, EN+52, EN+53, EN+54, EN+55, EN+56, EN+57, EN+58, ENQ
>> X	EN+52, EN+53