Routine: BDMFUTIL

Package	Total	Call Graph
Diabetes Registry	3	(DIE,DIR,FILE)^BDMFDIC (MM,PAUSE)^BDMFMENU HOST^BDMFZIS
Case Management System	1	DECEASED^ACMGTP
Kernel	1	^%ZISC

Package	Total	Caller Graph
Diabetes Registry	10	BDMPOST BDMTRANS BDMVRL BDMVRL1 BDMVRL2 BDMVRL3 BDMVRL4 BDMVRL5 BDMVRL6 BDMVRL8

Entry Points

Name	Comments	DBIA/ICR reference
SORT	;EP;FOR AUTO ADD OF NEW CMS SORT CRITERIA
FS
TAXEXIT
IDDM	;EP;TO SYNCHRONIZE DIABETES DIAGNOSES
REG	;EP;TO SET REGISTER DATA
TAXHEAD	;PRINT HEADER FOR TAXONOMY MANAGEMENT
REGVARS	;SET REGISTER VARIABLES
TAX	;EP;TAXONOMY MANAGEMENT
NEWREG	;CREATE IHS DIABETES REGISTER
NEWCOMP	;ESTABLISH IHS DIABETES REGISTER COMPLICATIONS
SWITCH	;EP;TO SWITCH REGISTERS
C1	;
TAXRX	;PROCESS DX/TX TAXONOMIES
TAXLAB	;PROCESS LAB TAXONOMIES
DMLAB	;EP;SET DM LABS
NEWHS	;ESTABLISH NEW HEALTH SUMMARIES FOR DMS
REGLIST	;EP;LIST DIABETES REGISTERS
NEWDIAG	;ESTABLISH IHS DIABETES REGISTER DIAGNOSES
CHARTS	;EP;TO EXPORT CHART NUMBERS
LAB
TAX1
D1

External References

Name	Field # of Occurrence
^%ZISC	CHARTS+24
DECEASED^ACMGTP	REG+7
DIE^BDMFDIC	IDDM+12
DIR^BDMFDIC	TAX1+3, TAXRX+3, REGLIST+38
FILE^BDMFDIC	SORT+6, SORT+20, IDDM+23, NEWREG+5, NEWDIAG+7, NEWDIAG+14, NEWCOMP+10, NEWCOMP+17, NEWHS+9, LAB+13 , FS+13, FS+28, D1+11
MM^BDMFMENU	REG+9
PAUSE^BDMFMENU	CHARTS+9, CHARTS+26
HOST^BDMFZIS	CHARTS+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: TAXHEAD+1
Function Call: WRITE	Prompt: @IOF Line Location: REGLIST+28
Function Call: WRITE	Prompt: !!?5,"Select DIABETES Register" Line Location: REGLIST+29
Function Call: WRITE	Prompt: !!?5,"---",?10,"------------------------------" Line Location: REGLIST+30
Function Call: WRITE	Prompt: ! Line Location: REGLIST+37
Function Call: WRITE	Prompt: @IOF Line Location: CHARTS+2
Function Call: WRITE	Prompt: !!,"The file 'dmschart.dat' has been filed in the /usr/spool/uucppublic/ directory." Line Location: CHARTS+25
Function Call: WRITE	Prompt: XX,! Line Location: C1+8
Function Call: WRITE	Prompt: XX,! Line Location: C1+19
Function Call: WRITE	Prompt: "." Line Location: C1+20
Function Call: WRITE	Prompt: Z,! Line Location: C1+23
Function Call: WRITE	Prompt: "." Line Location: C1+24

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCHSCTL - [#9001015]	Classic Fileman Calls
^ACM(41.1 - [#9002241.1]	Classic Fileman Calls
^ACM(42.1 - [#9002242.1]	Classic Fileman Calls
^ACM(44.1 - [#9002244.1]	Classic Fileman Calls
^ACM(48.5 - [#9002248.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("UPPERCASE"	REGLIST+7
^ACM(41 - [#9002241]	CHARTS+15, CHARTS+16, CHARTS+17
^ACM(41.1 - [#9002241.1]	REGVARS+1, NEWREG+2, NEWCOMP+1, REGLIST+6, REGLIST+11, REGLIST+13, REGLIST+26, CHARTS+13
^ACM(42.1 - [#9002242.1]	NEWCOMP+4, NEWCOMP+5, NEWCOMP+14*
^ACM(44.1 - [#9002244.1]	IDDM+3, IDDM+5, IDDM+7, IDDM+8, IDDM+16, IDDM+17, IDDM+22, NEWDIAG+2, NEWDIAG+3, NEWDIAG+11
^ACM(48.5 - [#9002248.5]	SORT+2, SORT+9, SORT+10, SORT+11*
^AMQQ(5 - [#9009075]	TAXRX+12, TAXRX+18
^APCHSCMP("B"	LAB, FS
^APCHSCTL - [#9001015]	LAB+4, LAB+5, LAB+7, FS+4, FS+5, FS+7, FS+19, FS+20, FS+23, D1+2 , D1+5, D1+6
^APCHSCTL("B"	NEWHS+4
^APCHSFLC("B"	FS+15
^AUPNPAT - [#9000001]	CHARTS+19
^AUTTLOC - [#9999999.06]	CHARTS+10
^DD("DD"	C1+6
^DIPT("B"	SORT+15
^LAB(60 - [#60]	D1
^TMP("BDMCHART"	CHARTS+1!, CHARTS+21, CHARTS+22, CHARTS+27!, C1+10, C1+12, C1+14, C1+22

Label References

Name	Line Occurrences
C1	CHARTS+23
D1	DMLAB+2, DMLAB+3
DMLAB	LAB+15
FS	NEWHS+13
IDDM	REGVARS+3
LAB	NEWHS+12
NEWCOMP	REGVARS+5
NEWDIAG	REGVARS+4
NEWHS	REGVARS+2
NEWREG	REG+5
REG	SWITCH+2, REG+5
REGLIST	REG+3
REGVARS	REG+8
TAX1	TAX+1
TAXHEAD	TAX1
TAXLAB	TAX1+6
TAXRX	TAX1+5

Naked Globals

Name	Field # of Occurrence
^(	NEWREG+2
^(0	CHARTS+10, CHARTS+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %FN	CHARTS+3*, CHARTS+7
>> AMQQATN	TAXRX+17*
>> AMQQATNM	TAXRX+16*
>> AMQQLINK	TAXRX+18*
>> ASUFAC	CHARTS+10*, CHARTS+21
BDM	IDDM+1~, IDDM+4, IDDM+5, IDDM+7, IDDM+8, IDDM+10, REGLIST+2~
BDM(	REGLIST+16*, REGLIST+32, REGLIST+33, REGLIST+40
BDM("REGISTER"	SWITCH+1!
BDM(0	REGLIST+17
BDM(1	REGLIST+24, REGLIST+25
BDMDA	SORT+8, SORT+9, SORT+10, SORT+11, SORT+17, IDDM+15, IDDM+16, IDDM+17, IDDM+19, IDDM+20 , IDDM+22, NEWHS+1~, NEWHS+3, NEWHS+4, NEWHS+5, NEWHS+10, NEWHS+11, LAB+4, LAB+5, LAB+7 , LAB+8, FS+4, FS+5, FS+7, FS+8, FS+19, FS+20, FS+22, D1+2, D1+5 , D1+6, D1+7
>> BDMDUZ2	CHARTS+10
>> BDMJ	DMLAB+1, D1+3, REGLIST+34*, REGLIST+35
>> BDMLAB	D1+4*, D1+10
BDMNOACC	REGLIST+12*, REGLIST+14!, REGLIST+18, REGLIST+22!
BDMNOREG	REG+5!, REGLIST+3*, REGLIST+9!
BDMONE	SWITCH+3, SWITCH+7!, REGLIST+27*
>> BDMOP	CHARTS+4*
BDMOUT	TAX+1, TAXEXIT!
BDMQUIT	TAX+1, TAXEXIT!, TAX1+4, TAXRX+4!, REG+1!, REG+4, REG+6, LAB+2!, LAB+5, LAB+6! , FS+2!, FS+5, FS+6!, FS+17!, FS+20, FS+21!, REGLIST+1!, REGLIST+21, REGLIST+23!, REGLIST+39 , CHARTS+6
BDMRDA	IDDM+13, IDDM+17, IDDM+18, SWITCH+1!, REG+2, REG+7, REGVARS+1, NEWREG+2, NEWREG+6, NEWDIAG+3 , NEWDIAG+8, NEWCOMP+1, NEWCOMP+2, NEWCOMP+5, NEWCOMP+12, REGLIST+25, REGLIST+26, REGLIST+40, CHARTS+12, CHARTS+13* , CHARTS+15
>> BDMREGNM	REG+2, REGVARS+1*, NEWCOMP+1
BDMX	TAXRX+5, TAXRX+6, TAXRX+7, TAXRX+8, TAXRX+9, TAXRX+10, TAXRX+11, TAXRX+12, TAXRX+15, SORT+12 , SORT+13, IDDM+2, IDDM+3, IDDM+5, IDDM+14, IDDM+16, NEWDIAG+1, NEWDIAG+2, NEWDIAG+4, NEWCOMP+3* , NEWCOMP+4, NEWCOMP+7, NEWHS+1~, NEWHS+2, NEWHS+4, NEWHS+6, NEWHS+12, NEWHS+13, LAB+15, DMLAB+2 , DMLAB+3, D1, CHARTS+11, CHARTS+13, CHARTS+21
>> BDMY	NEWDIAG+2, NEWDIAG+3, NEWDIAG+11, NEWCOMP+4, NEWCOMP+5, NEWCOMP+6, NEWCOMP+11*, NEWCOMP+13, NEWCOMP+14, NEWCOMP+15
>> CHART	CHARTS+19, CHARTS+20, CHARTS+21, CHARTS+22
>> DA	SORT+17, SORT+18, IDDM+10, IDDM+19, NEWDIAG+9, NEWDIAG+12, LAB+8, LAB+9, FS+8, FS+9 , FS+22, FS+23, FS+24, D1+7, D1+8
>> DA(1	SORT+17, IDDM+19, NEWDIAG+10, NEWCOMP+13, LAB+8, FS+8, FS+22, D1+7
>> DFN	CHARTS+17*, CHARTS+19
>> DIC	SORT+3, SORT+18, IDDM+20, NEWREG+3, NEWDIAG+5, NEWDIAG+12, NEWCOMP+8, NEWCOMP+15, NEWHS+7, LAB+9 , FS+9, FS+24, D1+8*
>> DIC("DR"	SORT+5, SORT+14, LAB+11, FS+11, FS+26, D1+10
>> DIC(0	SORT+4, SORT+19, IDDM+21, NEWREG+4, NEWDIAG+6, NEWDIAG+13, NEWCOMP+9, NEWCOMP+16, NEWHS+8, LAB+10 , FS+10, FS+25, D1+9*
>> DIE	IDDM+11*
>> DIR("A"	TAX1+2, TAXRX+2, REGLIST+36*
>> DIR(0	TAX1+1, TAXRX+1, REGLIST+35*
DR	IDDM+1~, IDDM+6!, IDDM+7, IDDM+8, IDDM+9
DT	C1+5
DUZ	REGLIST+13
DUZ(2	CHARTS+10
>> FAC	CHARTS+18*, CHARTS+19
IO	C1+8, C1+19, C1+23
IOF	TAXHEAD+1, REGLIST+28, CHARTS+2
J	REGLIST+2~, REGLIST+4, REGLIST+15, REGLIST+16, REGLIST+31, REGLIST+32, REGLIST+33, REGLIST+34
U	TAXRX+18, SORT+11, IDDM+7, IDDM+8, IDDM+22, REGVARS+1, NEWDIAG+11, NEWCOMP+14, LAB+5, LAB+7 , FS+5, FS+7, FS+20, FS+23, D1+6, REGLIST+16, REGLIST+26, REGLIST+33, CHARTS+10, CHARTS+17 , CHARTS+19
X	TAXRX+12, TAXRX+13, TAXRX+17, TAXRX+18, TAXHEAD+2~, TAXHEAD+3, TAXHEAD+4, SORT+1, SORT+2, SORT+13 , SORT+14, SORT+15, SORT+16, IDDM+18, NEWREG+1, NEWREG+2, NEWDIAG+4, NEWDIAG+8, NEWCOMP+7, NEWCOMP+12* , NEWHS+6, LAB, LAB+1, LAB+5, LAB+11, LAB+12, FS, FS+1, FS+5, FS+11 , FS+12, FS+15, FS+16, FS+20, FS+26, FS+27, D1, D1+1, D1+2, D1+4 , D1+5, REGLIST+2~, REGLIST+5, REGLIST+6, REGLIST+11, REGLIST+16, CHARTS+14, CHARTS+15, CHARTS+16, CHARTS+17 , C1+9, C1+10*, C1+12, C1+14, C1+15
>> XX	C1+1, C1+2, C1+3, C1+4, C1+7, C1+8, C1+15, C1+16, C1+17, C1+18* , C1+19
Y	TAX1+4, TAX1+5, TAX1+6, TAXRX+4, TAXRX+5, TAXRX+6, TAXRX+7, TAXRX+8, TAXRX+9, TAXRX+10 , TAXRX+11, SORT+7, SORT+8, NEWREG+6, NEWDIAG+9, NEWDIAG+10, NEWCOMP+11, NEWHS+10, LAB+3, LAB+4 , LAB+5, LAB+14, FS+3, FS+4, FS+5, FS+14, FS+18, FS+19, FS+20, REGLIST+2~ , REGLIST+8, REGLIST+10, REGLIST+11, REGLIST+13, REGLIST+16, REGLIST+39, REGLIST+40, C1+5, C1+7, C1+11 , C1+12*, C1+14, C1+16
Y(0	TAXRX+16
Z	REGLIST+2~, C1+13, C1+14, C1+17, C1+18, C1+21, C1+22, C1+23

Customize PDF page

Package: Diabetes Registry

Routine: BDMFUTIL

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: