Routine: BDMUTL

Information

BDMUTL ; IHS/CMI/LAB - Area Database Utility Routine ; 14 Sep 2015 12:41 PM

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
DRG Grouper	2	($$CODEN,$$ICDD,$$ICDDX,$$ICDOP,$$VSTD,$$VSTP)^ICDCODE ($$CODEN,$$ICDD,$$ICDDX,$$ICDOP,$$VSTD,$$VSTP,CODEN,ICDD,ICDDX,ICDOP,VSTD,VSTP)^ICDEX
VA Fileman	2	IXALL^DIK ^DIR
Diabetes Registry	1	BLDTAX^BDMTAPI
IHS GPRA Information System	1	$$ICD^BGP8UTL2
IHS Patient	1	$$DOB^AUPNPAT
IHS Standard Terminology	1	($$SUBLST,SUBLST)^BSTSAPI
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	$$VD^APCLV
Taxonomy	1	$$ICD^ATXCHK

Package	Total	Caller Graph
Diabetes Registry	197	BDM20P10 BDM20P11 BDM20P12 BDMAPIU BDMCOD0 BDMCODE BDMD01 BDMD010 BDMD11 BDMD110 BDMD11E BDMD20 BDMD200 BDMD31 BDMD310 BDMD41 BDMD410 BDMD413 BDMD41E BDMD51 BDMD510 BDMD61 BDMD610 BDMD71 BDMD710 BDMD81 BDMD810 BDMD91 BDMD910 BDMD99 BDMD990 BDMDA1 BDMDA10 BDMDA13 BDMDA1E BDMDB1 BDMDB10 BDMDB11 BDMDB12 BDMDB13 BDMDB16 BDMDB17 BDMDB18 BDMDB1E BDMDB1G BDMDB1T BDMDBDU BDMDC1 BDMDC10 BDMDC11 BDMDC12 BDMDC13 BDMDC16 BDMDC17 BDMDC18 BDMDC1B BDMDC1E BDMDC1G BDMDC1T BDMDCDU BDMDD1 BDMDD10 BDMDD11 BDMDD12 BDMDD13 BDMDD16 BDMDD17 BDMDD18 BDMDD1B BDMDD1E BDMDD1G BDMDD1T BDMDDDU BDMDE1 BDMDE10 BDMDE12 BDMDE13 BDMDE16 BDMDE17 BDMDE18 BDMDE1B BDMDE1E BDMDE1G BDMDE1T BDMDEDU BDMDF1 BDMDF10 BDMDF12 BDMDF13 BDMDF16 BDMDF17 BDMDF18 BDMDF1B BDMDF1D BDMDF1E BDMDF1G BDMDF1T BDMDFDU BDMDG1 BDMDG10 BDMDG12 BDMDG13 BDMDG16 BDMDG17 BDMDG18 BDMDG1B BDMDG1D BDMDG1E BDMDG1G BDMDG1T BDMDG1Y BDMDGDU BDMDM6 BDMDMAP BDMDMAS BDMDMNC BDMDMSM BDMDR1 BDMDR2 BDMDR3 BDMDR4 BDMDR5 BDMDR6 BDMFLOW BDMLPM BDMP01 BDMP010 BDMP11 BDMP110 BDMP41 BDMP410 BDMP51 BDMP510 BDMP61 BDMP610 BDMP71 BDMP710 BDMP81 BDMP810 BDMP91 BDMP910 BDMPA1 BDMPA10 BDMPA12 BDMPA13 BDMPA16 BDMPA18 BDMPB1 BDMPB10 BDMPB12 BDMPB13 BDMPB16 BDMPB17 BDMPB18 BDMPC1 BDMPC10 BDMPC12 BDMPC13 BDMPC16 BDMPC17 BDMPC18 BDMPD1 BDMPD10 BDMPD12 BDMPD13 BDMPD17 BDMPD18 BDMPE1 BDMPE10 BDMPE12 BDMPE13 BDMPE17 BDMPE18 BDMPF1 BDMPF10 BDMPF12 BDMPF13 BDMPF17 BDMPF18 BDMPG1 BDMPG10 BDMPG12 BDMPG13 BDMPG17 BDMPG18 BDMRML BDMS9B1 BDMS9B2 BDMS9B3 BDMS9B4 BDMS9D1 BDMSELFM BDMSMU BDMSMU1 BDMSMU2 BDMVRL4 BDMVRL8

Entry Points

Name	Comments	DBIA/ICR reference
ICDOP(C,D,S,I)	;PEP - CHECK FOR ICD10
ICD(VAL,TAXNM,TYP)	;EP -- check to see if value is in taxonomy in ^TMP("BDMTMP",$J,Taxonomy Name
VSTP(C,D)	;EP - CHECK FOR ICD10
ICDDX(C,D,S,I)	;PEP - CHECK FOR ICD10
CODEN(C,F)	;EP CHECK/GET CODE
IMMREF(P,IMM,BD,ED)	;EP
PLTAXND(P,A,E)
BUILDSML(Y)	;EP - BUILD SNOMED LISTS FROM SUBSETS
DEMOCHK(R)	;EP - check demo pat
DEMO(P,T)	;EP - called to exclude demo patients
LBLK(V,L)	;EP -left blank fill
UNFOLDTX(YEAR)	;EP -- unfold all taxes for dm audit into ^TMP("BDMTMP",$J,Taxonomy Name
CHK
LZERO(V,L)	;EP - left zero fill
PLCL(P,BDMY,A,ED,S,BD)	;EP - is DX on problem list 1 or 0
ANCONT(P,C,ED)	;EP - ANALPHYLAXIS CONTRAINDICATION
RBLK(V,L)	;EP right blank fill
PLTAXID(P,A,B,E)
VSTD(C,D)	;EP - CHECK FOR ICD10
ICDD(C,A,D)	;EP - CHECK FOR ICD10
GETIMMS(P,EDATE,C,BDMX)	;EP
SNOMED(YR,LIST,SMC)	;EP - is snomed code smc on the list for the year
RZERO(V,L)	;ep right zero fill

External References

Name	Field # of Occurrence
$$VD^APCLV	PLCL+13, PLCL+16
$$ICD^ATXCHK	ICD+5, ICD+6
$$DOB^AUPNPAT	PLCL+5
BLDTAX^BDMTAPI	UNFOLDTX+17
$$ICD^BGP8UTL2	PLTAXND+16, CHK+1
$$SUBLST^BSTSAPI	BUILDSML+9
SUBLST^BSTSAPI	BUILDSML+2
IXALL^DIK	BUILDSML+17
^DIR	DEMOCHK+4
$$CODEN^ICDCODE	CODEN+2
$$ICDD^ICDCODE	ICDD+2
$$ICDDX^ICDCODE	ICDDX+2
$$ICDOP^ICDCODE	ICDOP+2
$$VSTD^ICDCODE	VSTD+2
$$VSTP^ICDCODE	VSTP+2
$$CODEN^ICDEX	CODEN+1
$$ICDD^ICDEX	ICDD+1
$$ICDDX^ICDEX	ICDDX+1
$$ICDOP^ICDEX	ICDOP+1
$$VSTD^ICDEX	VSTD+1
$$VSTP^ICDEX	VSTP+1
CODEN^ICDEX	CODEN+1
ICDD^ICDEX	ICDD+1
ICDDX^ICDEX	ICDDX+1
ICDOP^ICDEX	ICDOP+1
VSTD^ICDEX	VSTD+1
VSTP^ICDEX	VSTP+1
$$VAL^XBDIQ1	PLCL+19, PLTAXND+19, CHK+2

FileNo	Call Tags
^BDMSNME - [#9003202.6]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	ICD+5, ICD+6, UNFOLDTX+12, PLTAXND+6, PLTAXID+7
^ATXLAB("B"	UNFOLDTX+14
^AUPNPROB - [#9000011]	PLCL+9, PLCL+10, PLCL+11, PLCL+12, PLCL+13, PLCL+15, PLCL+16, PLCL+18, PLCL+19, PLTAXND+11 , PLTAXND+12, PLTAXND+13, PLTAXND+14, PLTAXND+15, PLTAXND+17, PLTAXND+18, PLTAXID+12, PLTAXID+13, PLTAXID+14, PLTAXID+15 , PLTAXID+16, PLTAXID+17, PLTAXID+18
^AUPNPROB("AC"	PLCL+9, PLTAXND+10, PLTAXID+11
^AUPNVIMM - [#9000010.11]	GETIMMS+4, GETIMMS+5, GETIMMS+8
^AUPNVIMM("AC"	GETIMMS+3
^AUPNVSIT - [#9000010]	GETIMMS+8
^AUTTIMM - [#9999999.14]	GETIMMS+7
^AUTTIMM("C"	IMMREF+3, ANCONT+2
^BDMSNME - [#9003202.6]	SNOMED+6, SNOMED+7, BUILDSML+4, BUILDSML+5, BUILDSML+6, BUILDSML+13!, BUILDSML+14, BUILDSML+15, PLCL+7, PLCL+19
^BDMSNME("B"	SNOMED+5, BUILDSML+3, PLCL+6
^BDMTAXS - [#9003202.3]	UNFOLDTX+8, UNFOLDTX+9, UNFOLDTX+10
^BDMTAXS("B"	UNFOLDTX+6
^BICONT - [#9002084.81]	IMMREF+8, IMMREF+9, ANCONT+5, ANCONT+10
^BIPC - [#9002084.11]	IMMREF+6, IMMREF+10, IMMREF+12, IMMREF+13, ANCONT+3, ANCONT+6, ANCONT+9
^BIPC("AC"	IMMREF+5, ANCONT+2
^DIBT(	DEMO+11, DEMO+17
^DIBT("B"	DEMO+9, DEMO+15
^DPT - [#2]	DEMO+7, DEMO+13
^ICDS(0	UNFOLDTX+4
^TMP($J	BUILDSML+7!, BUILDSML+8, BUILDSML+10, BUILDSML+14, BUILDSML+16!
^XTMP("BDMTAX"	ICD+6, ICD+7, UNFOLDTX+3!

Label References

Name	Line Occurrences
CHK	PLTAXID+19, PLTAXID+20, PLTAXID+21

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DEMO+8~, DEMO+9, DEMO+10, DEMO+11, DEMO+14~, DEMO+15, DEMO+16, DEMO+17, RZERO+1~, RZERO+2* , LZERO+1~, LZERO+2, LBLK+1~, LBLK+2, RBLK+1~, RBLK+2*
A	ICDD~, ICDD+1, ICDD+2, PLCL~, PLCL+2, PLCL+7, PLCL+9~, PLCL+12, PLCL+13, PLCL+15 , PLCL+16, PLTAXND~, PLTAXND+4, PLTAXND+6, PLTAXID~, PLTAXID+4, PLTAXID+7
B	PLTAXID~, PLTAXID+6*, PLTAXID+19, PLTAXID+20, PLTAXID+21
BD	IMMREF~, IMMREF+12, PLCL~, PLCL+5*, PLCL+14, PLCL+17, PLCL+18
>> BDMBTH	ICD+5, ICD+6, ICD+7, UNFOLDTX+3, UNFOLDTX+15
BDMDA	UNFOLDTX+5~, UNFOLDTX+8, UNFOLDTX+9, UNFOLDTX+10, BUILDSML+1~, BUILDSML+4, BUILDSML+5, BUILDSML+6, BUILDSML+13, BUILDSML+14 , BUILDSML+15
BDMFL	UNFOLDTX+5~, UNFOLDTX+10*, UNFOLDTX+11
>> BDMJOB	ICD+5, ICD+6, ICD+7, UNFOLDTX+3, UNFOLDTX+15
BDMTAX	UNFOLDTX+5~, UNFOLDTX+9*, UNFOLDTX+12, UNFOLDTX+14, UNFOLDTX+15, UNFOLDTX+17
BDMTAXI	UNFOLDTX+5~, UNFOLDTX+12, UNFOLDTX+14, UNFOLDTX+17
BDMTGT	UNFOLDTX+5~, UNFOLDTX+15*, UNFOLDTX+17
BDMTYP	UNFOLDTX+5~, UNFOLDTX+11*, UNFOLDTX+13, UNFOLDTX+17
BDMVAL	UNFOLDTX+5~
BDMX	GETIMMS~, GETIMMS+1!
BDMX(	GETIMMS+8*
BDMY	BUILDSML+1~, BUILDSML+3, BUILDSML+4, BUILDSML+5, BUILDSML+6, BUILDSML+13, BUILDSML+14, BUILDSML+15, PLCL~, PLCL+6 , PLCL+7, PLCL+19
BDMYR	UNFOLDTX+5~, UNFOLDTX+6*, UNFOLDTX+7, UNFOLDTX+8, UNFOLDTX+9, UNFOLDTX+10
C	GETIMMS~, GETIMMS+8, ANCONT~, ANCONT+2, BUILDSML+1~, BUILDSML+14*, ICDDX~, ICDDX+1, ICDDX+2, ICDOP~ , ICDOP+1, ICDOP+2, VSTD~, VSTD+1, VSTD+2, VSTP~, VSTP+1, VSTP+2, ICDD~, ICDD+1 , ICDD+2, CODEN~, CODEN+1, CODEN+2
D	GETIMMS+8, IMMREF+1~, IMMREF+10, IMMREF+11, ANCONT+6, ANCONT+7, ICDDX~, ICDDX+1, ICDDX+2, ICDOP~ , ICDOP+1, ICDOP+2, VSTD~, VSTD+1, VSTD+2, VSTP~, VSTP+1, VSTP+2, ICDD~, ICDD+1 , ICDD+2, PLCL+9~, PLCL+12, PLCL+13, PLCL+14, PLCL+15, PLCL+16, PLCL+17, PLTAXND+8~, PLTAXND+17 , PLTAXND+18, PLTAXND+19, PLTAXID+9~, PLTAXID+18, PLTAXID+19
DA	DEMOCHK+1~, DEMOCHK+4!
>> DIK	BUILDSML+17*
DIR	DEMOCHK+1~, DEMOCHK+4!
DIR("A"	DEMOCHK+3*
DIR("B"	DEMOCHK+3*
DIR(0	DEMOCHK+3*
>> DIRUT	DEMOCHK+5
DT	PLCL+4
E	PLTAXND~, PLTAXND+5, PLTAXND+14, PLTAXND+15, PLTAXID~, PLTAXID+5, PLTAXID+19, PLTAXID+20, PLTAXID+21
ED	IMMREF~, IMMREF+13, ANCONT~, ANCONT+9, PLCL~, PLCL+4*, PLCL+14, PLCL+17, PLCL+18
EDATE	GETIMMS~, GETIMMS+8
F	CODEN~, CODEN+1, CODEN+2
G	IMMREF+1~, IMMREF+3, IMMREF+14, IMMREF+15, ANCONT+2, ANCONT+10, ANCONT+11, PLCL+9~, PLCL+12, PLCL+14 , PLCL+15, PLCL+17*, PLCL+18
I	GETIMMS+2~, GETIMMS+7, GETIMMS+8, RZERO+1~, RZERO+2, LZERO+1~, LZERO+2, LBLK+1~, LBLK+2, RBLK+1~ , RBLK+2, BUILDSML+14, ICDDX~, ICDDX+1, ICDDX+2, ICDOP~, ICDOP+1, ICDOP+2, PLCL+9~, PLCL+19 , PLCL+20, PLTAXND+8~, PLTAXND+9, PLTAXND+10, PLTAXND+19, PLTAXND+21, PLTAXID+9~, PLTAXID+10, PLTAXID+11, CHK+2 , CHK+4
IMM	IMMREF~, IMMREF+2, IMMREF+3
L	RZERO~, RZERO+2, LZERO~, LZERO+2, LBLK~, LBLK+2, RBLK~, RBLK+2
LIST	SNOMED~, SNOMED+2, SNOMED+6
LISTI	SNOMED+4~, SNOMED+6*, SNOMED+7
M	PLTAXID+9~, PLTAXID+17*, PLTAXID+21, CHK+2
N	BUILDSML+1~, BUILDSML+6, BUILDSML+9, PLCL+7~, PLCL+19
O	PLTAXID+9~, PLTAXID+16*, PLTAXID+20, CHK+2
OUT	BUILDSML+1~, BUILDSML+8*, BUILDSML+9
P	GETIMMS~, GETIMMS+3, IMMREF~, IMMREF+5, ANCONT~, ANCONT+2, DEMO~, DEMO+1, DEMO+7, DEMO+11 , DEMO+13, DEMO+17, PLCL~, PLCL+1, PLCL+5, PLCL+9, PLTAXND~, PLTAXND+3, PLTAXND+10, PLTAXID~ , PLTAXID+3, PLTAXID+11
R	IMMREF+1~, IMMREF+6, IMMREF+7, IMMREF+8, IMMREF+9, ANCONT+3, ANCONT+4, ANCONT+5, ANCONT+10, DEMO+4~ , DEMO+5, DEMO+6, DEMO+7, DEMO+10, DEMO+11, DEMO+12, DEMO+13, DEMO+16, DEMO+17, DEMO+18 , DEMOCHK~, DEMOCHK+2, DEMOCHK+5, DEMOCHK+6*
S	BUILDSML+1~, BUILDSML+12, BUILDSML+14, BUILDSML+15, ICDDX~, ICDOP~, PLCL~, PLCL+3*, PLCL+11
SMC	SNOMED~, SNOMED+3, SNOMED+7
T	DEMO~, DEMO+2, DEMO+3, DEMO+6, DEMO+12, PLCL+7~, PLCL+8, PLCL+19, PLTAXND+6~, PLTAXND+7 , PLTAXND+16, PLTAXID+7~, PLTAXID+8, CHK+1
TAXNM	ICD~, ICD+3, ICD+5, ICD+6, ICD+7
TYP	ICD~, ICD+4, ICD+5, ICD+6
U	GETIMMS+5, GETIMMS+7, GETIMMS+8, IMMREF+6, IMMREF+9, IMMREF+10, IMMREF+12, IMMREF+13, ANCONT+3, ANCONT+6 , ANCONT+9, ANCONT+10, DEMO+7, DEMO+13, UNFOLDTX+9, UNFOLDTX+10, BUILDSML+5, BUILDSML+6, BUILDSML+14, BUILDSML+15 , PLCL+10, PLCL+11, PLCL+13, PLCL+16, PLCL+18, PLCL+19, PLTAXND+12, PLTAXND+13, PLTAXND+14, PLTAXND+15 , PLTAXND+17, PLTAXND+18, PLTAXND+19, PLTAXID+13, PLTAXID+14, PLTAXID+15, PLTAXID+16, PLTAXID+17, PLTAXID+18, CHK+2
V	GETIMMS+2~, GETIMMS+8, RZERO~, RZERO+2, RZERO+3, LZERO~, LZERO+2, LZERO+3, LBLK~, LBLK+2 , LBLK+3, RBLK~, RBLK+2*, RBLK+3
VAL	ICD~, ICD+2, ICD+5, ICD+6, ICD+7
X	GETIMMS+2~, GETIMMS+3, GETIMMS+4, GETIMMS+5, GETIMMS+8, IMMREF+1~, IMMREF+3, IMMREF+5, IMMREF+6, IMMREF+10 , IMMREF+12, IMMREF+13, ANCONT+1~, ANCONT+2, ANCONT+3, ANCONT+6, ANCONT+9, BUILDSML+1~, BUILDSML+9, PLCL+9~ , PLCL+10, PLCL+11, PLCL+12, PLCL+13, PLCL+15, PLCL+16, PLCL+18, PLCL+19, PLTAXND+8~, PLTAXND+9* , PLTAXND+10, PLTAXND+11, PLTAXND+12, PLTAXND+13, PLTAXND+14, PLTAXND+15, PLTAXND+17, PLTAXND+18, PLTAXND+19, PLTAXID+9~ , PLTAXID+10, PLTAXID+11*, PLTAXID+12, PLTAXID+13, PLTAXID+14, PLTAXID+15, PLTAXID+16, PLTAXID+17, PLTAXID+18, CHK+2
Y	GETIMMS+2~, GETIMMS+5, GETIMMS+6, GETIMMS+7, GETIMMS+8, IMMREF+1~, IMMREF+3, IMMREF+4, IMMREF+5, ANCONT+2* , DEMOCHK+6, BUILDSML~, BUILDSML+3, PLCL+9~, PLTAXND+8~, PLTAXND+9, PLTAXND+13, PLTAXND+16, PLTAXID+9~, PLTAXID+10 , PLTAXID+15*, CHK+1
YEAR	UNFOLDTX~, UNFOLDTX+6
YR	SNOMED~, SNOMED+1*, SNOMED+5
YRI	SNOMED+4~, SNOMED+5*, SNOMED+6, SNOMED+7
Z	GETIMMS+2~, GETIMMS+8, RZERO+2, LZERO+2, LBLK+2, RBLK+2*

Marked Items

Name	Field # of Occurrence
$T(CODEN^ICDEX	CODEN+1
$T(ICDDX^ICDEX	ICDDX+1
$T(ICDD^ICDEX	ICDD+1
$T(ICDOP^ICDEX	ICDOP+1
$T(SUBLST^BSTSAPI	BUILDSML+2
$T(VSTD^ICDEX	VSTD+1
$T(VSTP^ICDEX	VSTP+1

Customize PDF page

Package: Diabetes Registry

Routine: BDMUTL

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 197

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items