Routine: BHLEVENT

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Package	Total	Call Graph
IHS Generic Interface System	2	^INHF $$DATE^INHUT
IHS Support HL7 Interfaces	2	CHK^BHLBCK HFS^BHLU
IHS VA Utilities	1	$$VALI^XBDIQ1

Package

Total

Call Graph

IHS Generic Interface System

^INHF $$DATE^INHUT

IHS Support HL7 Interfaces

CHK^BHLBCK HFS^BHLU

IHS VA Utilities

$$VALI^XBDIQ1

Package	Total	Caller Graph
Data Warehouse Export System	9	BDW1BLR BDW1VBL BDW1VBL2 BDW1VBLR BDWBHL1 BDWDDR BDWRDR BDWRDR2 BDWREDO
Comprehensive Diabetes Management	1	BCDMSNDR
Contract Health Management Information System	1	ACHS278O
IHS Accounts Receivable	1	BAR276
IHS Lab LOINC Surveillance	1	BLSLX
IHS Patient Registration	1	AGEVC

Package

Total

Caller Graph

Data Warehouse Export System

BDW1BLR BDW1VBL BDW1VBL2 BDW1VBLR BDWBHL1 BDWDDR BDWRDR BDWRDR2
BDWREDO

Comprehensive Diabetes Management

BCDMSNDR

Contract Health Management Information System

ACHS278O

IHS Accounts Receivable

BAR276

IHS Lab LOINC Surveillance

BLSLX

IHS Patient Registration

AGEVC

Entry Points

External References

Name	Field # of Occurrence
CHK^BHLBCK	ELG+11, ELGS+11
HFS^BHLU	ELG+16, ELGS+16
^INHF	A01+8, A02+8, A03+8, A04+7, A08+7, A28+3, A31+3, O01+94, O01J+4, O13+6 , R01+8, R01SS+10, V04+5, MFN+5, ELG+6, ELGS+6, THREEM+6, 837+4, 276+3, 278+4 , DW1HDR+3, DW1TRLR+3, DW1REG+4, DW1A08+6, DW1MRG+5, BCDM+2, BCDMMED+6
$$DATE^INHUT	O01+11, O01+32, O01+33
$$VALI^XBDIQ1	A01+2, A02+2, A03+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSF - [#9002080]	278+1, 278+2
^AUPNVLAB - [#9000010.09]	R01+1, R01+3, R01SS+3, R01SS+5
^AUPNVSIT - [#9000010]	A04+3, A08+3, O13+3, V04+2, THREEM+2, THREEM+3, DW1A08+2, BCDMMED+3
^BARECLST - [#90056.08]	276+1
^INTHPC("B"	ELG+11, ELGS+11
^INTHU - [#4001]	ELG+15, ELGS+15
^INTHU("AT"	ELG+8, ELG+13, ELGS+9, ELGS+13

Label References

Name	Line Occurrences
$$MSG	A01+10, A02+10, A03+10, A04+2, A04+4, A04+9, A08+2, A08+4, A08+9, A28+5 , A31+5, O01+2, O01+95, O01J+1, O01J+6, O13+2, O13+8, R01+2, R01+4, R01+10 , R01SS+2, R01SS+4, R01SS+6, R01SS+12, V04+1, V04+7, MFN+2, MFN+6, ELG+3, ELG+7 , ELG+9, ELG+14, ELG+18, ELGS+3, ELGS+7, ELGS+8, ELGS+14, ELGS+18, THREEM+2, THREEM+8 , 837+2, 837+6, 276+1, 276+5, 278+1, 278+2, 278+6, DW1HDR+4, DW1TRLR+4, DW1REG+1 , DW1REG+6, DW1A08+1, DW1A08+3, DW1A08+8, DW1MRG+2, DW1MRG+7, BCDM+4, BCDMMED+2, BCDMMED+8
EOJ	A01+9, A02+9, A03+9, A04+8, A08+8, A28+4, A31+4, O13+7, R01+9, R01SS+11 , V04+6, ELG+17, ELGS+17, THREEM+7, 837+5, 276+4, 278+5, DW1REG+5, DW1A08+7, DW1MRG+6 , BCDM+3, BCDMMED+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BHL	O01~
BHL(	O01+12, O01+14, O01+15, O01+16, O01+17, O01+18, O01+20, O01+21, O01+24, O01+26 , O01+27, O01+28, O01+29, O01+30, O01+31, O01+32, O01+33, O01+34, O01+35, O01+36 , O01+37, O01+38, O01+39, O01+40, O01+41, O01+42, O01+45, O01+46, O01+47, O01+51 , O01+53, O01+54, O01+55, O01+56, O01+60, O01+62, O01+63, O01+64
BHL("ALTDUZ2"	O01+4
BHL("BILL TYP	E" , O01+7, O01+8
BHL("CDT"	O01+11, O01+69, O01+73, O01+77, O01+90
BHL("CLIENT"	O01+6, O01+7, O01+8
BHL("COMMENT"	O01+82, O01+84, O01+85, O01+86
BHL("INSTYP"	O01+7
BHL("ORDP"	O01+10, O01+74
BHL("PAT"	O01+2, O01+3
BHL("RLE"	O01+6, O01+8, O01+26, O01+71, O01+93
BHL("TCNM"	O01+75, O01+76
BHL("UID"	O01+9, O01+13, O01+72
BHLADT	A01~, A02~, A03~, EOJ+1!
>> BHLCDA	O01+60, O01+61, O01+62, O01+63, O01+64, O01+65, O01+66, O01+67, O01+68, O01+69 , O01+70, O01+71, O01+82, O01+83, O01+84, O01+85, O01+86, O01+87, O01+88, O01+89 , O01+90, O01+91, O01+92, O01+93
BHLCLM	837~, 837+2, 837+3
>> BHLCOM1	O01+62, O01+65, O01+67, O01+84, O01+88, O01+91
>> BHLCOM2	O01+63, O01+65, O01+68, O01+85, O01+89, O01+91
>> BHLCOM3	O01+64, O01+70, O01+86, O01+92
>> BHLDA	O01+12*, O01+13, O01+14, O01+15, O01+16, O01+17, O01+18, O01+19, O01+20, O01+21 , O01+22, O01+24, O01+26, O01+27, O01+28, O01+29, O01+30, O01+31, O01+32, O01+33 , O01+34, O01+35, O01+36, O01+37, O01+38, O01+39, O01+40, O01+41, O01+42, O01+45 , O01+46, O01+47, O01+51, O01+53, O01+54, O01+55, O01+56, O01+58, O01+59, O01+60 , O01+62, O01+63, O01+64, O01+65, O01+66, O01+67, O01+68, O01+69, O01+70, O01+71
BHLDGPMC	A01~, A01+2, A01+4, A01+5, A02~, A02+2, A02+4, A02+5, A03~, A03+2 , A03+4, A03+5, EOJ+1!
BHLDUZ2	278~, 278+1, 278+2
>> BHLFLNM	ELG+15, ELG+16, ELGS+15, ELGS+16
BHLIEN	MFN~, MFN+3, MFN+4
BHLINA	837+4, 276~, 276+3, 278~, 278+4
BHLINA("DEST"	276+3, 278+4
BHLINDA	276~, 276+1, 276+2, 278~, 278+2, 278+3
BHLIP	THREEM~, THREEM+6
BHLMFL	MFN~, MFN+4
>> BHLMSTD	ELG+2, ELGS+2
BHLMVAR	MSG~, MSG+1, MSG+2, MSG+3, MSG+4, MSG+5, MSG+6
BHLPAT	A01~, A01+3, A02~, A02+3, A03~, A03+3, A04+3, A04+4, A04+5, A08+3 , A08+4, A08+5, A28~, A28+2, A31~, A31+2, O13+3, O13+4, R01+3, R01+4 , R01+5, R01SS+5, R01SS+6, R01SS+7, V04+2, V04+3, ELG~, ELG+3, ELG+4, ELGS~ , ELGS+3, ELGS+4, THREEM+3, THREEM+4, DW1REG~, DW1REG+1, DW1REG+2, DW1A08+2, DW1A08+3, DW1A08+4 , DW1MRG~, DW1MRG+2, DW1MRG+3, BCDMMED+3*, BCDMMED+4, EOJ+1!
>> BHLRMSG	MSG+1, MSG+2, MSG+3, MSG+4, MSG+5, MSG+6, MSG+7
BHLSTOR	837~, 837+1
>> BHLUIF	ELG+8, ELG+10, ELG+13, ELG+14, ELG+15, ELG+16, ELGS+9, ELGS+10, ELGS+13, ELGS+14 , ELGS+15, ELGS+16
BHLVAIN	A01~, A02~, A03~, EOJ+1!
BHLVAIN(2	A01+6, A02+6, A03+6
BHLVAIN(3	A01+7, A02+7, A03+7
BHLVLAB	R01+1, R01+3, R01+7, R01SS~, R01SS+2, R01SS+3, R01SS+5, R01SS+9
BHLVST	A01+2, A01+4, A02+2, A02+4, A03+2, A03+4, A04~, A04+2, A04+3, A04+6 , A08~, A08+2, A08+3, A08+6, O13~, O13+2, O13+3, O13+5, R01~, R01+1 , R01+2, R01+6, R01SS+3*, R01SS+4, R01SS+8, V04~, V04+1, V04+2, V04+4, ELG~ , ELG+5, ELGS~, ELGS+5, THREEM~, THREEM+2, THREEM+3, THREEM+5, DW1A08~, DW1A08+1, DW1A08+2 , DW1A08+5, BCDM~, BCDM+1, BCDMMED~, BCDMMED+2, BCDMMED+3, BCDMMED+5, EOJ+1!
DGDA	O01+50~, O01+51*, O01+52, O01+53, O01+54, O01+55, O01+56
DUZ(2	O01+4, O01J+3
FIEN	DW1HDR~, DW1HDR+1, DW1TRLR~, DW1TRLR+1
FILENUM	DW1HDR~, DW1HDR+2, DW1TRLR~, DW1TRLR+2
IDA	O01+23~, O01+24*, O01+25, O01+26, O01+27, O01+28, O01+29, O01+30, O01+31, O01+32 , O01+33, O01+34, O01+35, O01+36, O01+37, O01+38, O01+39
INA	A01+8, A02+8, A03+8, O01+1!, O01+94, O01J+4, ELG~, ELG+6, ELGS~, ELGS+6 , 837+4, DW1HDR+3, DW1TRLR+3, DW1REG~, DW1REG+3, DW1REG+4, DW1MRG~, DW1MRG+4, DW1MRG+5, BCDM~ , BCDM+2, BCDMMED~, BCDMMED+6
INA("ADMPHY"	A01+6, A02+6, A03+6*
INA("BACKLOAD"	DW1REG+3, DW1MRG+4
INA("DG13LABO"	O01+53, O01+55
INA("DG14LABO"	O01+54, O01+56
INA("DGPMCA"	A01+5, A02+5, A03+5*
INA("DUZ2"	O01+4*
INA("FILE"	DW1HDR+2, DW1TRLR+2
INA("FTS"	A01+7, A02+7, A03+7*
INA("GT13LABO"	O01+40, O01+45
INA("GT15LABO"	O01+41, O01+46
INA("GT16LABO"	O01+42, O01+47
INA("IN111LABO"	O01+31*
INA("IN112LABO"	O01+32*
INA("IN113LABO"	O01+33*
INA("IN115LABO"	O01+34*
INA("IN116LABO"	O01+35*
INA("IN117LABO"	O01+36*
INA("IN119LABO"	O01+37*
INA("IN136LABO"	O01+38*
INA("IN13LABO"	O01+26*
INA("IN147LABO"	O01+39*
INA("IN14LABO"	O01+27*
INA("IN15LABO"	O01+28*
INA("IN17LABO"	O01+29*
INA("IN18LABO"	O01+30*
INA("OBR13LABO"	O01+19, O01+78
INA("OBR15LABO"	O01+20*
INA("OBR18LC"	O01+21*
INA("OBR27LABO"	O01+22, O01+79
INA("OBR4LABO"	O01+16, O01+75
INA("OBR4LABOL"	O01+17, O01+76
INA("OBR7LABO"	O01+18, O01+77
INA("OBX14LABO"	O01+69, O01+90
INA("OBX2LABOL"	O01+66, O01+87
INA("OBX3LABLC3"	O01+71, O01+93
INA("OBX3LABO"	O01+65, O01+91
INA("OBX3LABOL1"	O01+67, O01+88
INA("OBX3LABOL2"	O01+68, O01+89
INA("OBX5LABO"	O01+70, O01+92
INA("ORC11LABO"	O01+11, O01+14, O01+73*
INA("ORC12LABO"	O01+10, O01+15, O01+74*
INA("ORC2LABO"	O01+9, O01+13, O01+72*
INA("PID20LABO"	O01+7, O01+8
INA("SENDING	FACILITY" , O01J+3*
INA("SF"	O01+6*
INA("STORAGE"	837+1*
INDA	A01+3, A01+8, A02+3, A02+8, A03+3, A03+8, A04+5, A04+7, A08+5, A08+7 , A28+2, A28+3, A31+2, A31+3, O01+1!, O01+3, O01+94, O01J~, O01J+1, O01J+4 , O13+4, O13+6, R01+5, R01+8, R01SS+7, R01SS+10, V04+3, V04+5, MFN+3, MFN+5 , ELG+4, ELG+6, ELGS+4, ELGS+6, THREEM+4, THREEM+6, 837+3, 837+4, 276+2, 276+3 , 278+3, 278+4, DW1HDR+1, DW1HDR+3, DW1TRLR+1, DW1TRLR+3, DW1REG+2, DW1REG+4, DW1A08+4, DW1A08+6 , DW1MRG+3, DW1MRG+5, BCDM+1, BCDM+2, BCDMMED+4, BCDMMED+6, EOJ+1!
INDA(	R01+7, R01SS+9, MFN+4*
INDA("DG1"	O01+52*
INDA("IN1"	O01+25*
INDA("OBR"	O01+59, O01+81
INDA("OBX"	O01+61, O01+83
INDA("ORC"	O01+58, O01+80
INDA(405	A01+4, A02+4, A03+4*
INDA(9000010	A01+4, A02+4, A03+4, A04+6, A08+6, O13+5, R01+6, R01SS+8, V04+4, ELG+5 , ELGS+5, THREEM+5, DW1A08+5, BCDMMED+5
>> INHF	A01+10, A02+10, A03+10, A04+9, A08+9, A28+5, A31+5, O01+95, O01J+6, R01+10 , R01SS+12, MFN+6, ELG+7, ELG+8, ELG+9, ELG+13, ELG+18, ELGS+7, ELGS+8, ELGS+9 , ELGS+13, ELGS+18, THREEM+8, 837+6, 276+5, 278+6, DW1HDR+4, DW1TRLR+4, DW1REG+6, DW1A08+8 , DW1MRG+7, BCDM+4
U	A01+6, A01+7, A02+6, A02+7, A03+6, A03+7, A04+3, A08+3, O01+16, O01+26 , O01+62, O01+63, O01+64, O01+65, O01+75, O01+84, O01+85, O01+86, O01+91, O13+3 , R01+1, R01+3, R01SS+3, R01SS+5, V04+2, ELG+15, ELGS+15, THREEM+3, DW1HDR+4, DW1TRLR+4 , DW1REG+6, DW1A08+2, DW1A08+8, DW1MRG+7, BCDM+4, BCDMMED+3, MSG+6
>> XPMFL	MFN+2

Name	Comments	DBIA/ICR reference
ELGS(BHLPAT,BHLVST,INA)
837(BHLCLM,BHLSTOR)
BCDMMED(BHLVST,INA)
276(BHLINDA,BHLINA)
R01SS(BHLVLAB)
278(BHLDUZ2,BHLINDA,BHLINA)
DW1MRG(BHLPAT,INA)	;-- generate a reg update for dw1
DW1TRLR(FILENUM,FIEN)
MSG(BHLMVAR)
THREEM(BHLVST,BHLIP)
MFN(BHLMFL,BHLIEN)
A31(BHLPAT)
DW1A08(BHLVST)
EOJ	;-- kills variables
A04(BHLVST)
A03(BHLPAT,BHLDGPMC,BHLVAIN,BHLADT)	;PEP - this is a discharge event
BCDM(BHLVST,INA)	;-- generate a visit record for BCDM
A28(BHLPAT)
A01(BHLPAT,BHLDGPMC,BHLVAIN,BHLADT)	;PEP - this is an admit event
GIS	;-- the following are GIS calls by HL7 events
A08(BHLVST)
DW1HDR(FILENUM,FIEN)
O13(BHLVST)
DW1REG(BHLPAT,INA)	;-- generate a reg update for dw1
V04(BHLVST)
O01J(INDA)	;PEP - joslin event
O01(BHL)	;PEP - Order Message
A02(BHLPAT,BHLDGPMC,BHLVAIN,BHLADT)	;PEP - this is a transfer event
ELG(BHLPAT,BHLVST,INA)
R01(BHLVST)

Customize PDF page

Package: IHS Support HL7 Interfaces

Routine: BHLEVENT

Information

Source Information