DBIA4141-D ICR (4495)

Name

Value

NUMBER

4495

IA #

4495

DATE CREATED

2004/08/04

CUSTODIAL PACKAGE

REGISTRATION

CUSTODIAL ISC

Dallas

USAGE

Private

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

VAFHLZMH

NAME

DBIA4141-D

GENERAL DESCRIPTION

Supported call for building of HL7 ZMH segment (VA
Specific Military History Segment).

STATUS

Active

KEYWORDS

ZMH
VAFHLZMH

DURATION

Till Otherwise Agreed

VAFHLZMH

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

ENTER(DFN,VAFARRAY,VAFTYPE,VAFSTR,VAFHLS,VAFHLC,VAFHLQ)

This call is designed to build HL7 ZMH segment. This segment
contains VA- specific Military History types VAFTYPE and for each
of them different indentifiers can be generated. "ZMH" segments
(up to 13) are returned in VAFARRAY array, default is
^TMP("VAFHLZMH",$J)

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	DFN - pointer to PATIENT file (#2) - is the only required parameter. Defaults are used if no values are passed for the other parameters
VAFTYPE	Input	; VAFTYPE = Military History type desired (separated by commas) where ; 1=Last Service branch (SL) ; 2=Next to last Service branch (SNL) ; 3=Next to next to last Service branch (SNNL) ; 4=Prisoner of War Status indicated? (POW) ; 5=Combat Service indicated? (COMB) ; 6=Vietnam Service indicated? (VIET) ; 7=Lebanon Service indicated? (LEBA) ; 8=Grenada Service indicated? (GREN) ; 9=Panama Service indicated? (PANA) ; 10=Persian Gulf Service indicated? (GULF) ; 11=Somalia Service indicated? (SOMA) ; 12=Yugoslavia Service indicated? (YUGO) ; 13=Purple Heart Receipient? (PH) ; A range of numbers separated by colons can be sent ; (e.g. 1:4,8,10:12) ; Default is all 12 (1,2,3...)
VAFSTR	Input	; VAFSTR = Fields (sequence numbers) desired (separated by comma) where ; 3=qualifier #1 (Service branch if VAFTYPE is 1,2 or 3 ; or Yes/No response if VAFTYPE is 4 thru 13) ; qualifier #2 (Service number if VAFTYPE is 1,2 or 3 ; or Location if VAFTYPE is 4 or 5) ; or ; qualifier #3 (Service discharge type if VAFTYPE is 1,2 ; or 3) ; 4=From/To Date range for each VAFTYPE ; Default is 3,4
VAFHLS	Input	; VAFHLS = HL7 field separator (1 character) ; Default is ^ (carrot)
VAFHLC	Input	; VAFHLC = HL7 encoding characters (4 characters must be supplied) ; Default is ~\|\& (tilde bar backslash ampersand)
VAFHLQ	Input	; VAFHLQ = HL7 null designation ; Default is "" (quote quote)
VAFARRAY	Output	rray name to hold the "ZMH" segments (up to 13). Default is ^TMP("VAFHLZMH",$J)

SUBSCRIBING PACKAGE

ISC

SUBSCRIBING DETAILS

SCHEDULING

Albany

We would like to build ZMH segment for the following
Types:
SL
COMB
GULF

The following sequences would be transmitted: SL: Service Separation Date
[Last] (.327)

COMB: Combat Service Indicated (.5291)
Combat Service Location (.5292) GULF:  Persian Gulf Service (.32201)