Routine: BQITD031

Name	Comments	DBIA/ICR reference
PRB	; EP - Check Problem File for instance of taxonomy ; Called by BQITD03
DEL(VSDT,CT,VCT,PVST,VST)	; EP - Delete diagnoses from temporary file ; If more than three diagnoses on same day, remove extras ; preferentially keeping visit diagnoses over problem diagnoses ; and retaining a maximum of one problem diagnosis
PPRB	;EP - Check Problem File for instance of a patient ; Called by BQITD03 ; Input Parameters ; DFN - Patient record ; TPGLOB - Temporary global
IHD(DFN,GLOB,TMREF,DXOK)	; EP - Process IHD/Multiple Known CVD date logic
TYP(DFN,DX,TMREF)	; EP - Return 'V' or 'P' to identify type of visit ; Input ; DFN - Patient ; DX - Diagnosis internal entry number ; TMREF - Temporary array of diagnoses ; Variables ; LTYP - Either 'V' for visit or 'P' for problem
IHDSM(DFN,GLOB,TMREF,DXOK)	; EP - Process IHD same day date logic
AMI(DFN,GLOB,TMREF,DXOK)	; EP - Process AMI date logic

Name	Field # of Occurrence
$$PROB^BQIUL1	PRB+17, PPRB+14
$$GET1^DIQ	PRB+11, PRB+15, PRB+22, PPRB+9, PPRB+12, PPRB+13
$$FMDIFF^XLFDT	AMI+30, AMI+31, IHD+34, IHD+35

Name	Line Occurrences
$$TYP	AMI+29, IHD+29, IHD+30, IHD+33
DEL	IHDSM+40

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CT	IHDSM+23~, IHDSM+27, IHDSM+29, IHDSM+32*, IHDSM+37, IHDSM+39, IHDSM+40, DEL~, DEL+13
DFN	AMI~, AMI+23, AMI+25, AMI+26, AMI+28, AMI+29, AMI+34, AMI+37, AMI+40, AMI+41 , AMI+42, AMI+43, AMI+44, AMI+45, IHD~, IHD+23, IHD+25, IHD+26, IHD+27, IHD+29 , IHD+30, IHD+32, IHD+33, IHD+38, IHD+40, IHD+43, IHD+44, IHD+45, IHD+46, IHD+47 , IHD+48, IHD+49, IHDSM~, IHDSM+24, IHDSM+26, IHDSM+28, IHDSM+29, IHDSM+31, IHDSM+36, IHDSM+45 , IHDSM+48, IHDSM+49, IHDSM+50, IHDSM+51, IHDSM+52, TYP~, TYP+10, TYP+11, DEL+16, DEL+17 , DEL+20, DEL+21, PRB+6~, PRB+11*, PRB+24, PRB+25, PRB+26, PPRB+8, PPRB+16, PPRB+17 , PPRB+18
DX	AMI+22~, AMI+33, AMI+34, IHD+22~, IHD+37, IHD+38, TYP~, TYP+10, TYP+11
DXOK	AMI~, AMI+24, AMI+25, AMI+28, AMI+31, AMI+36, IHD~, IHD+24, IHD+25, IHD+32 , IHD+35, IHD+39, IHDSM~, IHDSM+25, IHDSM+26, IHDSM+39, IHDSM+40, IHDSM+44
>> ENDT	PRB+20, PPRB+15
EXDT	AMI+38~, AMI+39, AMI+44, AMI+45, IHD+41~, IHD+42, IHD+48, IHD+49, IHDSM+46~, IHDSM+47* , IHDSM+51, IHDSM+52
FDX	AMI+22~, AMI+27, AMI+28, AMI+29, AMI+30, AMI+31, AMI+34, IHD+22~, IHD+31, IHD+32 , IHD+33, IHD+34, IHD+35, IHD+38
FREF	AMI+38~, AMI+43, AMI+44, IHD+41~, IHD+46, IHD+48, IHDSM+46~, IHDSM+50*, IHDSM+51
GLOB	AMI~, AMI+37, AMI+44, AMI+45, IHD~, IHD+40, IHD+48, IHD+49, IHDSM~, IHDSM+45 , IHDSM+51, IHDSM+52
IEN	AMI+38~, AMI+43, AMI+44, IHD+41~, IHD+46, IHD+48, IHDSM+46~, IHDSM+50, IHDSM+51, PRB+6~ , PRB+8, PRB+9*, PRB+11, PRB+15, PRB+17, PRB+22, PRB+24
LDX	AMI+22~, AMI+25, AMI+26, AMI+27, AMI+29, AMI+30, AMI+31, AMI+34, IHD+22~, IHD+25 , IHD+26, IHD+27, IHD+29, IHD+33, IHD+34, IHD+35, IHD+38
LDX1	IHD+22~, IHD+27, IHD+29, IHD+30, IHD+31, IHD+33, IHD+38
LIEN	TYP+7~, TYP+9, TYP+10, TYP+11
LTYP	TYP+7~, TYP+8, TYP+10, TYP+11, TYP+12
NOK	AMI+22~, AMI+24, AMI+25, AMI+26, IHD+22~, IHD+24, IHD+25, IHD+26, IHD+27, IHD+29
PFREF	PRB+6~, PRB+8, PRB+11, PRB+15, PRB+22, PPRB+5~, PPRB+6, PPRB+9, PPRB+12, PPRB+13
PGREF	PRB+6~, PRB+8, PRB+9, PPRB+5~, PPRB+6, PPRB+8
PRM	IHDSM+23~, IHDSM+36*
>> PROB	PRB+8, PPRB+6
PVIEN	PRB+9, PRB+24, PRB+25, PPRB+5~, PPRB+7, PPRB+8, PPRB+9, PPRB+12, PPRB+13, PPRB+14 , PPRB+16
PVST	IHDSM+23~, IHDSM+27, IHDSM+38, IHDSM+40, DEL~, DEL+21
STOP	AMI+22~, AMI+27, AMI+28, AMI+30, IHD+22~, IHD+31, IHD+32, IHD+34, IHDSM+27*
>> TAX	AMI+44, AMI+45, IHD+47*, IHD+48, IHD+49, PRB+25, PPRB+17
TIEN	AMI+41, AMI+42, AMI+43, IHD+44, IHD+45, IHD+46, IHD+47, IHDSM+23~, IHDSM+27, IHDSM+28 , IHDSM+29, IHDSM+30, IHDSM+31, IHDSM+36, IHDSM+37, IHDSM+38, IHDSM+47, IHDSM+48, IHDSM+49, IHDSM+50 , DEL+15, DEL+16, DEL+17, DEL+19, DEL+20, DEL+21, PPRB+9*, PPRB+10, PPRB+16, PPRB+17
>> TMFRAME	PRB+20, PPRB+15
TMREF	AMI~, AMI+23, AMI+25, AMI+26, AMI+28, AMI+29, AMI+34, AMI+37, AMI+40, AMI+41 , AMI+42, AMI+43, IHD~, IHD+23, IHD+25, IHD+26, IHD+27, IHD+29, IHD+30, IHD+32 , IHD+33, IHD+38, IHD+40, IHD+43, IHD+44, IHD+45, IHD+46, IHD+47, IHDSM~, IHDSM+24 , IHDSM+26, IHDSM+28, IHDSM+29, IHDSM+31, IHDSM+36, IHDSM+45, IHDSM+48, IHDSM+49, IHDSM+50, TYP~ , TYP+10, TYP+11, DEL+16, DEL+17, DEL+20, DEL+21
>> TPGLOB	PRB+24, PRB+25, PRB+26, PPRB+16, PPRB+17, PPRB+18
>> TREF	PPRB+10
U	AMI+42, AMI+43, AMI+44, AMI+45, IHD+45, IHD+46, IHD+47, IHD+48, IHD+49, IHDSM+29 , IHDSM+36, IHDSM+49, IHDSM+50, IHDSM+51, IHDSM+52, TYP+11, PRB+24, PRB+25, PPRB+16, PPRB+17
VCT	IHDSM+23~, IHDSM+27, IHDSM+29, IHDSM+37*, IHDSM+39, IHDSM+40, DEL~, DEL+14
VISIT	AMI+42, AMI+44, AMI+45, IHD+45, IHD+48, IHD+49, IHDSM+23~, IHDSM+49*, IHDSM+51, IHDSM+52
VPRM	IHDSM+23~, IHDSM+25, IHDSM+28, IHDSM+29, IHDSM+30
VSDT	AMI+39, AMI+40, AMI+41, AMI+42, AMI+43, AMI+44, AMI+45, IHD+42, IHD+43, IHD+44 , IHD+45, IHD+46, IHD+47, IHD+48, IHD+49, IHDSM+23~, IHDSM+25, IHDSM+26, IHDSM+28, IHDSM+29 , IHDSM+31, IHDSM+36, IHDSM+40, IHDSM+45, IHDSM+48, IHDSM+49, IHDSM+50, IHDSM+51, IHDSM+52, DEL~ , DEL+16, DEL+17, DEL+20, DEL+21
VSDTM	PRB+6~, PRB+17, PRB+20, PRB+24, PRB+25, PPRB+5~, PPRB+14, PPRB+15, PPRB+16, PPRB+17
VST	IHDSM+23~, IHDSM+27!, IHDSM+40, DEL~
VST(	IHDSM+29, IHDSM+31, IHDSM+37, DEL+17, DEL+21
VTYP	AMI+42, AMI+44, AMI+45, IHD+45, IHD+48, IHD+49, IHDSM+23~, IHDSM+36, IHDSM+37, IHDSM+38 , IHDSM+49, IHDSM+51, IHDSM+52

Customize PDF page

Package: iCare

Routine: BQITD031

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Label References

Local Variables

Legend: