Routine: APCLPDBL

Information

APCLPDBL ; IHS/CMI/LAB - Routine to send bulletin if patient has certain PRE-DM test results ;

Source file <APCLPDBL.m>

Package	Total	Call Graph
IHS Patient	1	($$COMMRES,$$DOB)^AUPNPAT
Kernel	1	$$FMTE^XLFDT
MailMan	1	^XMB
Patient Care Component Reports	1	$$START1^APCLDF
Taxonomy	1	$$ICD^ATXAPI

Name	Comments	DBIA/ICR reference
DMX	;
DMDX(P)	;
EN(T,P,V,RES)	;EP - Called by PD mumps x-ref on Results Field (.04)of V Lab File

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	DMDX+2
^ATXLAB - [#9002228]	EN+7, EN+8
^ATXLAB("B"	EN+3, EN+4
^AUPNPAT - [#9000001]	EN+17
^AUPNPROB - [#9000011]	DMDX+4
^AUPNPROB("AC"	DMDX+4
^AUPNVSIT - [#9000010]	EN+13, EN+14, EN+15
^DIC(4 - [#4]	EN+15
^DPT - [#2]	EN+12
^LAB(60 - [#60]	EN+2

Name	Line Occurrences
$$DMDX	EN+11
DMX	DMDX+8

Name	Field # of Occurrence
APCLIFGT	EN+1~, EN+3*, EN+5, EN+7
APCLIGTT	EN+1~, EN+4*, EN+6, EN+8
APCLTNAM	EN+1~, EN+2*, EN+19
APCLX	DMDX+6~, DMDX+7, DMDX+8, DMDX+9*, DMX+1
APCLX(3	DMDX+8
>> BLRVADFN	EN+10
>> D	EN+14*
DT	EN+22
DUZ(2	EN+17
E	DMDX+6~, DMDX+8*
I	DMDX+4~*, DMDX+5
P	EN~, EN+10*, EN+11, EN+12, EN+16, EN+17, EN+18, DMDX~, DMDX+4, DMDX+8
RES	EN~, EN+8, EN+20
T	EN~, EN+2, EN+7, EN+8
U	EN+2, EN+12, EN+14, EN+15, EN+17, DMDX+4
V	EN~, EN+13, EN+14, EN+15
X	DMDX+4~, DMDX+8
XMB	EN+1~, EN+7, EN+8, EN+9
XMB(1	EN+12*
XMB(2	EN+14*
XMB(3	EN+15*
XMB(4	EN+16*
XMB(5	EN+17*
XMB(6	EN+18*
XMB(7	EN+19*
XMB(8	EN+20*
>> XMDT	EN+22*
>> XMDUZ	EN+21*
Y	DMDX+4~*
Z	DMDX+2~*, DMDX+3, DMDX+4