Routine: MHV7B0

Package	Total	Call Graph
My HealtheVet	2	($$BLDSEG,$$ESCAPE)^MHV7U LOG^MHVUL2

Entry Points

Name	Comments	DBIA/ICR reference
MFNZ01(MSGROOT,ADM,ERR,DATAROOT,LEN,HL)	;Build MFN^Z01
MFI(HL)	;build MFI segment
MFE(ADM,HL)	;build MFE segment
ZHV(ADM,HL)	;build ZHV segment

Name	Field # of Occurrence
ADM	MFNZ01~, MFNZ01+18, MFNZ01+19, MFE~, ZHV~
ADM("DOMAIN"	ZHV+5
ADM("HL7 LIST	ENER PORT" , ZHV+7
ADM("IP ADDRE	SS" , ZHV+6
ADM("PATCH NU	MBER" , ZHV+10
ADM("RPC BROK	ER PORT" , ZHV+8
ADM("SITE NAM	E" , ZHV+4
ADM("SITE NUM	BER" , MFE+4, ZHV+3
ADM("SYSTEM T	YPE" , ZHV+11
ADM("VERSION"	ZHV+9
CNT	MFNZ01+14~, MFNZ01+17, MFNZ01+18, MFNZ01+19*
DATAROOT	MFNZ01~
ERR	MFNZ01~
HL	MFNZ01~, MFNZ01+17, MFNZ01+18, MFNZ01+19, MFI~, MFI+6, MFE~, MFE+6, ZHV~, ZHV+4 , ZHV+10, ZHV+12
LEN	MFNZ01~, MFNZ01+17, MFNZ01+18, MFNZ01+19*
MFE	MFE+1~, MFE+6
MFE(0	MFE+2*
MFE(1	MFE+3*
MFE(4	MFE+4*
MFE(5	MFE+5*
MFI	MFI+1~, MFI+6
MFI(0	MFI+2*
MFI(1	MFI+3*
MFI(3	MFI+4*
MFI(6	MFI+5*
MSGROOT	MFNZ01~, MFNZ01+16, MFNZ01+17, MFNZ01+18, MFNZ01+19
ZHV	ZHV+1~, ZHV+12
ZHV(0	ZHV+2*
ZHV(1	ZHV+3, ZHV+4
ZHV(2	ZHV+5*
ZHV(3	ZHV+6*
ZHV(4	ZHV+7*
ZHV(5	ZHV+8*
ZHV(6	ZHV+9*
ZHV(7	ZHV+10*
ZHV(8	ZHV+11*