Routine: BDMUTL

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

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!

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*

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

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