Routine: BQIPTIMM

Entry Points

Name	Comments	DBIA/ICR reference
IMM(DATA,DFN,DRANGE)	; EP -- BQI PATIENT IMMUNIZATIONS
GLS(DATA,FAKE)	;EP - BQI GET IMMUNIZATIONS GLOSSARY
REF	; Check for refusals
DONE
ERR	;

Name	Field # of Occurrence
^%ZTER	ERR+1
$$DATE^BQIUL1	IMM+15
$$FMTE^BQIUL1	IMM+31, REF+15
$$GET1^DIQ	IMM+19, IMM+20, IMM+21, IMM+23, IMM+24, IMM+25, IMM+26, IMM+27, IMM+28, IMM+29 , IMM+30, REF+11, REF+12, REF+13
$$NOW^XLFDT	ERR+3

RPC Name	Call Tags
BQI PATIENT IMMUNIZATIONS	IMM
BQI GET IMMUNIZATIONS GLOSSARY	GLS

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPREF("AA"	REF+3, REF+5, REF+10
^AUPNVIMM("AC"	IMM+18
^BQI(90508.2 - [#90508.2]	GLS+11, GLS+12, GLS+13
^DD("DD"	ERR+3
^TMP("BQIIMGLS"	GLS+4
^TMP("BQIPTIMM"	IMM+9

Name	Line Occurrences
DONE	GLS+11
REF	IMM+34

Name	Field # of Occurrence
>> BMXSEC	ERR+4, GLS+11
CAT	GLS+1~
CT	GLS+1~
DATA	IMM~, IMM+9, IMM+10, IMM+16, IMM+31, IMM+35, ERR+5, REF+15, GLS~, GLS+4 , GLS+5, GLS+10, GLS+13, GLS+18, DONE
DFN	IMM~, IMM+18, REF+3, REF+5, REF+10
DRANGE	IMM~, IMM+15*, IMM+22, REF+8
ENPHY	IMM+7~, IMM+30, IMM+31, REF+1~, REF+14, REF+15
ERRDTM	ERR+2~, ERR+3*, ERR+4
FAKE	GLS~
GLIEN	GLS+1~, GLS+11*, GLS+12, GLS+13
IEN	IMM+7~, IMM+17, IMM+18, IMM+19, IMM+20, IMM+23, IMM+24, IMM+25, IMM+26, IMM+27 , IMM+28, IMM+29, IMM+30, IMM+31, GLS+1~, GLS+12*, GLS+13
II	IMM+7~, IMM+12, IMM+16, IMM+31, IMM+35, ERR+5, REF+15, GLS+1~, GLS+7, GLS+10 , GLS+13, GLS+18, DONE
IIEN	GLS+1~
IMM	REF+1~, REF+2, REF+3, REF+5, REF+10, REF+11
IMMN	IMM+7~, IMM+19*, IMM+31
IMMUN	REF+1~, REF+11*, REF+15
LOT	IMM+7~, IMM+24*
NXT	GLS+1~
ORPHY	IMM+7~, IMM+29, IMM+31, REF+1~, REF+13, REF+15
REAC	IMM+7~, IMM+25, IMM+31, REF+1~, REF+12, REF+15
REMARK	GLS+1~
REVDT	REF+1~, REF+7*, REF+8, REF+15
RFIEN	REF+1~, REF+9, REF+10, REF+12, REF+13
RMK	GLS+1~
RVDT	REF+1~, REF+4, REF+5, REF+7, REF+10
SERIES	IMM+7~, IMM+23, IMM+31, REF+1~, REF+14, REF+15
SITE	IMM+7~, IMM+26*
SORT	GLS+1~
TIT	GLS+1~
TRIEN	GLS+1~
U	IMM+31, REF+15
UID	IMM+7~, IMM+8, IMM+9, GLS+1~, GLS+3, GLS+4
VCDTM	IMM+7~, IMM+28*
VISIT	IMM+7~, IMM+20*, IMM+21, IMM+31
VOL	IMM+7~, IMM+27*
VSDTM	IMM+7~, IMM+21*, IMM+22, IMM+31
Y	ERR+2~, ERR+3*
>> ZTSK	IMM+8, GLS+3