Routine: BDWBHL1

Package	Total	Call Graph
Data Warehouse Export System	2	(CPT,EXAM,LAB,MEAS,PED)^BDWUTIL (IFC,IMM,MC,ST)^BDWUTIL1
IHS Generic Interface System	2	^INHF $$DATE^INHUT
IHS Support HL7 Interfaces	1	($$MSG,EOJ)^BHLEVENT
Kernel	1	$$SENDTO1^ZISHMSMU
MailMan	1	^XMD

Package	Total	Caller Graph
Data Warehouse Export System	2	BDWBHL BDWRDR2

Name	Comments	DBIA/ICR reference
WRITEMSG	;
SKT	;EP
HF	;EP
SET	;
SENDER
CPT	;EP
IFC	;EP p5 ALPMR
MSR	;EP
LAB	;EP
AUTOSEND	;EP
XAM	;EP
BULL	;EP - called from BDWBHL to send bulletin
PED	;EP
ZIM	;EP - populate the dw1 ZIM segment
RESETFLG(BDW1DEST,BDW1LOG,BDW1PIEN)	;EP
DW1ALPMR(BHLPAT)	;-- generate an A08 for dw1 alpmr patient centric
SUBJECT

Name	Field # of Occurrence
CPT^BDWUTIL	CPT+3
EXAM^BDWUTIL	XAM+3
LAB^BDWUTIL	LAB+3
MEAS^BDWUTIL	MSR+3
PED^BDWUTIL	PED+3
IFC^BDWUTIL1	IFC+3
IMM^BDWUTIL1	ZIM+3
MC^BDWUTIL1	HF+3
ST^BDWUTIL1	SKT+3
$$MSG^BHLEVENT	DW1ALPMR+1, DW1ALPMR+6
EOJ^BHLEVENT	DW1ALPMR+5
^INHF	DW1ALPMR+4
$$DATE^INHUT	RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15
^XMD	SENDER+2
$$SENDTO1^ZISHMSMU	AUTOSEND+1

Name	Line Occurrences (* Changed, ! Killed)
^BDWXLOG - [#90213]	RESETFLG+4, RESETFLG+5, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15
^INTHU - [#4001]	RESETFLG+9, RESETFLG+10, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15*
^INTHU("AT"	RESETFLG+7

Name	Line Occurrences
SET	WRITEMSG+2, WRITEMSG+3, WRITEMSG+4, WRITEMSG+5, WRITEMSG+6, WRITEMSG+8, WRITEMSG+9, WRITEMSG+10
WRITEMSG	BULL+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AUPNCPT	CPT+1!
BDW1DEST	RESETFLG~
BDW1LOG	RESETFLG~
BDW1PIEN	RESETFLG~
BDWBUL	BULL+1~, BULL+2!, SENDER+3!
BDWBUL(	SET+2*
BDWC	BULL+1~, WRITEMSG+1, SET+1, SET+2
BDWCNT	SKT+6, SKT+7, SKT+8, SKT+9, SKT+10, SKT+11, IFC+6, IFC+7, IFC+8, IFC+9 , IFC+11, PED+6, PED+7, PED+8, PED+9, PED+10, PED+11, PED+12, LAB+6, LAB+7 , LAB+8, LAB+9, LAB+10, LAB+11, LAB+12, LAB+13, CPT+6, CPT+7, CPT+8, CPT+9 , CPT+10, CPT+11, CPT+12, XAM+6, XAM+7, XAM+8, XAM+9, XAM+10, MSR+6, MSR+7 , MSR+8, MSR+9, MSR+10, MSR+11, HF+2, HF+6, HF+7, HF+8, HF+9, HF+10 , HF+11, ZIM+2, ZIM+6*, ZIM+7, ZIM+8, ZIM+9, ZIM+10, ZIM+12, ZIM+13, ZIM+14!
BDWDA	SKT+4, SKT+5, SKT+12!, IFC+4, IFC+5, IFC+12!, PED+4, PED+5, PED+13!, LAB+4 , LAB+5, LAB+14!, CPT+4, CPT+5, CPT+13!, XAM+4, XAM+5, XAM+11!, MSR+4, MSR+5 , MSR+12!, HF+4, HF+5, HF+12!, ZIM+4*, ZIM+5, ZIM+14!
BDWDATA	SKT+5, SKT+10, SKT+11, SKT+12!, IFC+5, IFC+11, IFC+12!, PED+5, PED+10, PED+11 , PED+12, PED+13!, LAB+5, LAB+10, LAB+11, LAB+12, LAB+13, LAB+14!, CPT+5, CPT+10 , CPT+11, CPT+12, CPT+13!, XAM+5, XAM+10, XAM+11!, MSR+5, MSR+10, MSR+11, MSR+12! , HF+5, HF+10, HF+11, HF+12!, ZIM+5*, ZIM+9, ZIM+10, ZIM+12, ZIM+13, ZIM+14!
>> BDWDESC	WRITEMSG+5
BDWM	RESETFLG+3~, RESETFLG+5, RESETFLG+6, RESETFLG+7, RESETFLG+8, RESETFLG+9, RESETFLG+10, RESETFLG+11, RESETFLG+12, RESETFLG+13 , RESETFLG+14, RESETFLG+15
>> BDWPAFN	WRITEMSG+9, AUTOSEND+1
>> BDWPIEN	RESETFLG+4, RESETFLG+5, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15
>> BDWSFLG	WRITEMSG+7, AUTOSEND+1, AUTOSEND+2, AUTOSEND+3, AUTOSEND+5
>> BDWSFLG(1	AUTOSEND+2*, AUTOSEND+7
>> BDWUSER	BULL+3
BDWX	RESETFLG+3~, RESETFLG+4*, RESETFLG+5, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15
BDWY	RESETFLG+3~, RESETFLG+10*, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15
BDWZ	RESETFLG+3~
BHLPAT	DW1ALPMR~, DW1ALPMR+1, DW1ALPMR+2
>> BHLVIEN	SKT+3, IFC+3, PED+3, LAB+3, CPT+3, XAM+3, MSR+3, HF+3, ZIM+3
CPT	CPT+1!, CPT+3, CPT+13!
CPT(	CPT+4, CPT+5
HEF	HF+1!, HF+3, HF+12!
HEF(	HF+4, HF+5
IFC	IFC+1!, IFC+3
IFC(	IFC+4, IFC+5
IMM	ZIM+1!, ZIM+3, ZIM+14!
IMM(	ZIM+4, ZIM+5
>> INA	DW1ALPMR+3, DW1ALPMR+4
>> INA("BACKLOAD"	DW1ALPMR+3*
>> INA("BDW1CPT1"	CPT+8*
>> INA("BDW1CPT13"	CPT+12*
>> INA("BDW1CPT2"	CPT+9*
>> INA("BDW1CPT3"	CPT+10*
>> INA("BDW1CPT5"	CPT+11*
>> INA("BDW1HEF1"	HF+8*
>> INA("BDW1HEF2"	HF+9*
>> INA("BDW1HEF3"	HF+10*
>> INA("BDW1HEF4"	HF+11*
>> INA("BDW1IFC1"	IFC+8*
>> INA("BDW1IFC2"	IFC+9*
>> INA("BDW1IFC5"	IFC+11*
>> INA("BDW1LAB1"	LAB+8*
>> INA("BDW1LAB2"	LAB+9*
>> INA("BDW1LAB3"	LAB+10*
>> INA("BDW1LAB5"	LAB+11*
>> INA("BDW1LAB6"	LAB+12*
>> INA("BDW1LAB7"	LAB+13*
>> INA("BDW1MSR1"	MSR+8*
>> INA("BDW1MSR2"	MSR+9*
>> INA("BDW1MSR3"	MSR+10*
>> INA("BDW1MSR5"	MSR+11*
>> INA("BDW1PED1"	PED+8*
>> INA("BDW1PED13"	PED+12*
>> INA("BDW1PED2"	PED+9*
>> INA("BDW1PED3"	PED+10*
>> INA("BDW1PED5"	PED+11*
>> INA("BDW1SKT1"	SKT+8*
>> INA("BDW1SKT2"	SKT+9*
>> INA("BDW1SKT3"	SKT+10*
>> INA("BDW1SKT5"	SKT+11*
>> INA("BDW1XAM1"	XAM+8*
>> INA("BDW1XAM2"	XAM+9*
>> INA("BDW1XAM3"	XAM+10*
>> INA("BDW1ZIM1"	ZIM+8*
>> INA("BDW1ZIM2"	ZIM+9*
>> INA("BDW1ZIM3"	ZIM+10*
>> INA("BDW1ZIM5"	ZIM+12*
>> INA("BDW1ZIM6"	ZIM+13*
>> INDA	DW1ALPMR+2*, DW1ALPMR+4
>> INDA("CPT"	CPT+7*
>> INDA("HEF"	HF+7*
>> INDA("IFC"	IFC+7*
>> INDA("LAB"	LAB+7*
>> INDA("MSR"	MSR+7*
>> INDA("PED"	PED+7*
>> INDA("SKT"	SKT+7*
>> INDA("XAM"	XAM+7*
>> INDA("ZIM"	ZIM+7*
>> INHF	DW1ALPMR+6
LAB	LAB+1!, LAB+3, LAB+14!
LAB(	LAB+4, LAB+5
MSR	MSR+1!, MSR+3, MSR+12!
MSR(	MSR+4, MSR+5
PED	SKT+12!, IFC+12!, PED+1!, PED+3, PED+13!
PED(	PED+4, PED+5
SKT	SKT+1!, SKT+3
SKT(	SKT+4, SKT+5
U	RESETFLG+5, RESETFLG+11, RESETFLG+12, RESETFLG+13, RESETFLG+14, RESETFLG+15, SKT+10, SKT+11, IFC+11, PED+10 , PED+11, PED+12, LAB+10, LAB+11, LAB+12, LAB+13, CPT+10, CPT+11, CPT+12, XAM+10 , MSR+10, MSR+11, HF+10, HF+11, ZIM+9, ZIM+10, ZIM+12, ZIM+13, DW1ALPMR+6
>> X	WRITEMSG+2, WRITEMSG+3, WRITEMSG+4, WRITEMSG+5, WRITEMSG+6, WRITEMSG+8, WRITEMSG+9, WRITEMSG+10, SET+2
XAM	XAM+1!, XAM+3, XAM+11!
XAM(	XAM+4, XAM+5
XMDUZ	BULL+1~, SENDER*
XMSUB	BULL+1~, SUBJECT*
XMTEXT	BULL+1~, SENDER+1*
XMY	BULL+1~
XMY(	BULL+3*
>> ZTQUEUED	AUTOSEND+4, AUTOSEND+6, AUTOSEND+7

Customize PDF page

Package: Data Warehouse Export System

Routine: BDWBHL1

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: