Routine: BDMDR3

Package	Total	Call Graph
VA Fileman	6	(COMMA,NOW)^%DTC ^DIC FILE^DICN ^DIE IX1^DIK ^DIR
IHS VA Utilities	5	^XBDBQUE ($$VAL,$$VALI)^XBDIQ1 ^XBFMK GUIR^XBLM EN^XBVK
Diabetes Registry	3	HEAD^BDMDR31 XTMP^BDMOSUT ($$DEMO,DEMOCHK)^BDMUTL
Kernel	3	^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT $$ADD^XPDMENU
IHS Patient	1	($$COMMRES,$$DOD,KILL)^AUPNPAT

Package	Total	Caller Graph
Diabetes Registry	2	BDMDR31 BDMGRB

Name	Comments	DBIA/ICR reference
PER(N,D)	;n=numerator, d=denominator
REGPROC	;
DEMO	;
PCP	;
DATE(B)	;
FINTOT1	;
GUIEP	;EP
FINH	;
USR()	;EP - Return name of current user from ^VA(200.
EOP	;EP - End of page.
EDATE	;get visit date range for functional assessment
FINTC	;
SUBTOT	;EP
LOC()	;EP - Return location name from file 4 based on DUZ(2).
BROWSE	;
CTR(X,Y)	;EP - Center X in a field Y wide.
FINLDL	;
INFORM	;
FINHDL	;
CHKSET	;
ZIS	;
FINBP	;
ENDLOG	;-- write the end of the log
START	;
R	;
C(X,X2,X3)	;
W	;
BDMG(BDMREG,BDMSTAT,BDMPCP,BDMED,BDMSTAR)	;EP - GUI DMS Entry Point
POST	;EP
GETINFO	;
FINTOT	;EP
EXIT	;clean up and exit
FINTRIG	;
TEST	;
PROC	;EP - called from XBDBQUE

Name	Field # of Occurrence
COMMA^%DTC	C+1
NOW^%DTC	BDMG+9, ENDLOG+1
^%ZTLOAD	BDMG+23
$$COMMRES^AUPNPAT	CHKSET+6
$$DOD^AUPNPAT	CHKSET+1
KILL^AUPNPAT	EXIT+4
HEAD^BDMDR31	SUBTOT+3, FINTOT1+3, FINTOT1+9, FINTOT1+11, FINTOT1+13, FINTOT1+15, FINTOT1+17, FINTOT1+19, FINTOT1+21, FINTOT1+23 , FINBP+1, FINBP+3, FINBP+5, FINBP+7, FINBP+9, FINBP+11, FINBP+13, FINTC+1, FINTC+3, FINTC+5 , FINTC+7, FINTC+11, FINTC+13, FINLDL+1, FINLDL+3, FINLDL+5, FINLDL+7, FINLDL+9, FINLDL+11, FINLDL+13 , FINHDL+1, FINHDL+3, FINHDL+5, FINHDL+7, FINHDL+9, FINHDL+11, FINHDL+13, FINTRIG+1, FINTRIG+3, FINTRIG+5 , FINTRIG+7, FINTRIG+9, FINTRIG+11, FINTRIG+13
XTMP^BDMOSUT	PROC+3
$$DEMO^BDMUTL	CHKSET+2
DEMOCHK^BDMUTL	DEMO+1
^DIC	R+3, PCP+5
FILE^DICN	BDMG+15
^DIE	ENDLOG+4
IX1^DIK	GUIEP+10
^DIR	R+8, R+12, PCP+2, EDATE+3, ZIS+2, EOP+5
^XBDBQUE	DEMO+5, BROWSE+2
$$VAL^XBDIQ1	CHKSET+4
$$VALI^XBDIQ1	CHKSET+5
^XBFMK	EXIT+3, BDMG+20
GUIR^XBLM	GUIEP+4
EN^XBVK	EXIT+2
$$FMADD^XLFDT	EDATE+4, EDATE+5, BDMG+4, BDMG+5
$$FMTE^XLFDT	EDATE+3, BDMG+2
$$NOW^XLFDT	BDMG+23
$$ADD^XPDMENU	POST+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$CTR($$LOC) Line Location: INFORM+2
Function Call: WRITE	Prompt: !,$$CTR($$USR) Line Location: INFORM+3
Function Call: WRITE	Prompt: !!,"This report will list patients who are on the diabetes register",!,"that you select.",!,"The following data items will be printed for each patient: Name, HRN, DOB",!,"Community of Residence.",! Line Location: INFORM+4
Function Call: WRITE	Prompt: !,"For each of the following tests the last value in the 4 months prior to the",!,"as of date you enter and the next most recent prior to that one will be",!,"displayed:" Line Location: INFORM+5
Function Call: WRITE	Prompt: !?5,"Hgb A1C, BP, Total Cholesterol, HDL, LDL, Triglyceride, Last visit date",!! Line Location: INFORM+6
Function Call: WRITE	Prompt: !!,"Patients must be a member of the Diabetes Register in order to be included in",!,"this report.",! Line Location: R+1
Function Call: WRITE	Prompt: !,"No register selected." Line Location: R+4
Function Call: WRITE	Prompt: ! Line Location: EDATE+2
Function Call: WRITE	Prompt: "Attempt to add Patients w/selected values in 4 months option failed.." Line Location: POST+2
Function Call: WRITE	Prompt: !,"Subtotals for "_$E(BDMP,1,16)_": ",?37,"# Patients",?50," # w/item done",?70,"%" Line Location: SUBTOT+4
Function Call: WRITE	Prompt: !?2,"Last Clinic Visit",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(1)),0,8),9) Line Location: SUBTOT+5
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+7
Function Call: WRITE	Prompt: !?2,"Blood Pressure",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(2)),0,8),9) Line Location: SUBTOT+8
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+10
Function Call: WRITE	Prompt: !?2,"HGB A1C",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(3)),0,8),9) Line Location: SUBTOT+11
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+13
Function Call: WRITE	Prompt: !?2,"Total Cholesterol",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(4)),0,8),9) Line Location: SUBTOT+14
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+16
Function Call: WRITE	Prompt: !?2,"LDL Cholesterol",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(5)),0,8),9) Line Location: SUBTOT+17
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+19
Function Call: WRITE	Prompt: !?2,"HDL Cholesterol",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(6)),0,8),9) Line Location: SUBTOT+20
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+22
Function Call: WRITE	Prompt: !?2,"Triglycerides",?38,$J($$C(BDMSTOT(0),0,8),9),?52,$J($$C($G(BDMSTOT(7)),0,8),9) Line Location: SUBTOT+23
Function Call: WRITE	Prompt: ?67,$J(X,6,2) Line Location: SUBTOT+25
Function Call: WRITE	Prompt: !,$$CTR("Value Totals/Comparisons for: "_BDMP,80),! Line Location: FINH+1
Function Call: WRITE	Prompt: !?35,"PROVIDER SPECIFIC",?56,"TOTAL REGISTER",! Line Location: FINH+2
Function Call: WRITE	Prompt: ?35,"# pats",?48,"%",?56,"# pats",?68,"%",! Line Location: FINH+3
Function Call: WRITE	Prompt: !,"Total Number of Patients",?33,$J($$C(BDMTOPP,0,8),9),?53,$J($$C(BDMTOTP,0,8),9),! Line Location: FINTOT1+7
Function Call: WRITE	Prompt: !,"Blood Glucose Control" Line Location: FINTOT1+8
Function Call: WRITE	Prompt: !?2,"HbA1c <7.0" Line Location: FINTOT1+10
Function Call: WRITE	Prompt: !?8,"7.0-7.9" Line Location: FINTOT1+12
Function Call: WRITE	Prompt: !?8,"8.0-8.9" Line Location: FINTOT1+14
Function Call: WRITE	Prompt: !?8,"9.0-9.9" Line Location: FINTOT1+16
Function Call: WRITE	Prompt: !?8,"10.0-10.9" Line Location: FINTOT1+18
Function Call: WRITE	Prompt: !?8,"11.0 or higher" Line Location: FINTOT1+20
Function Call: WRITE	Prompt: !?8,"Tested but no value" Line Location: FINTOT1+22
Function Call: WRITE	Prompt: !?8,"Not tested in 4 months" Line Location: FINTOT1+24
Function Call: WRITE	Prompt: !!,"Blood Pressure Control" Line Location: FINBP+2
Function Call: WRITE	Prompt: !?8,"<120/80" Line Location: FINBP+4
Function Call: WRITE	Prompt: !?8,"120/80-<130/85" Line Location: FINBP+6
Function Call: WRITE	Prompt: !?8,"130/85-<140/90" Line Location: FINBP+8
Function Call: WRITE	Prompt: !?8,"140/90-<160/95" Line Location: FINBP+10
Function Call: WRITE	Prompt: !?8,"160/95 or higher" Line Location: FINBP+12
Function Call: WRITE	Prompt: !?8,"Not tested in 4 months" Line Location: FINBP+14
Function Call: WRITE	Prompt: !!,"Total Cholesterol" Line Location: FINTC+2
Function Call: WRITE	Prompt: !?8,"<200 mg/dl" Line Location: FINTC+4
Function Call: WRITE	Prompt: !?8,"200-239 mg/dl" Line Location: FINTC+6
Function Call: WRITE	Prompt: !?8,">240 mg/dl" Line Location: FINTC+8
Function Call: WRITE	Prompt: !?8,">160 mg/dl" Line Location: FINTC+10
Function Call: WRITE	Prompt: !?8,"Tested but no value" Line Location: FINTC+12
Function Call: WRITE	Prompt: !?8,"Not tested in 15 months" Line Location: FINTC+14
Function Call: WRITE	Prompt: !!,"LDL Cholesterol" Line Location: FINLDL+2
Function Call: WRITE	Prompt: !?8,"<100 mg/dl" Line Location: FINLDL+4
Function Call: WRITE	Prompt: !?8,"100-129 mg/dl" Line Location: FINLDL+6
Function Call: WRITE	Prompt: !?8,"130-160 mg/dl" Line Location: FINLDL+8
Function Call: WRITE	Prompt: !?8,">160 mg/dl" Line Location: FINLDL+10
Function Call: WRITE	Prompt: !?8,"Tested but no value" Line Location: FINLDL+12
Function Call: WRITE	Prompt: !?8,"Not tested in 15 months" Line Location: FINLDL+14
Function Call: WRITE	Prompt: !!,"HDL Cholesterol" Line Location: FINHDL+2
Function Call: WRITE	Prompt: !?8,"<35 mg/dl" Line Location: FINHDL+4
Function Call: WRITE	Prompt: !?8,"35-45 mg/dl" Line Location: FINHDL+6
Function Call: WRITE	Prompt: !?8,"46-55 mg/dl" Line Location: FINHDL+8
Function Call: WRITE	Prompt: !?8,">55 mg/dl" Line Location: FINHDL+10
Function Call: WRITE	Prompt: !?8,"Tested but no value" Line Location: FINHDL+12
Function Call: WRITE	Prompt: !?8,"Not tested in 15 months" Line Location: FINHDL+14
Function Call: WRITE	Prompt: !!,"Triglycerides" Line Location: FINTRIG+2
Function Call: WRITE	Prompt: !?8,"<100 mg/dl" Line Location: FINTRIG+4
Function Call: WRITE	Prompt: !?8,"100-129 mg/dl" Line Location: FINTRIG+6
Function Call: WRITE	Prompt: !?8,"130-160 mg/dl" Line Location: FINTRIG+8
Function Call: WRITE	Prompt: !?8,">160 mg/dl" Line Location: FINTRIG+10
Function Call: WRITE	Prompt: !?8,"Tested but no value" Line Location: FINTRIG+12
Function Call: WRITE	Prompt: !?8,"Not tested in 15 months" Line Location: FINTRIG+14
Function Call: WRITE	Prompt: ?33,$J($$C(BDMPN,0,8),9),?45,$$PER(BDMPN,BDMTOPP),?53,$J($$C(BDMTN,0,8),9),?65,$$PER(BDMTN,BDMTOTP) Line Location: W+1
Routine Call	DIE Line Location: ENDLOG+4
Routine Call	DIC Line Location: R+3 PCP+5
Routine Call	DIR Line Location: R+8 R+12 PCP+2 EDATE+3 ZIS+2 EOP+5

FileNo	Call Tags
^ACM(41.1 - [#9002241.1]	Classic Fileman Calls
^BDMGUI - [#9003201.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ACM(41 - [#9002241]	REGPROC+1, REGPROC+2, REGPROC+3
^BDMGUI - [#9003201.4]	GUIEP+8, GUIEP+9
^DD(9000001	PCP+5
^DIC(4 - [#4]	LOC+1
^DPT - [#2]	CHKSET+7
^TMP($J	GUIEP+2!, GUIEP+5, GUIEP+6, GUIEP+12!
^VA(200 - [#200]	USR+1
^XTMP("BDMDR3"	PROC+2!, CHKSET+7*

Name	Line Occurrences
$$C	SUBTOT+5, SUBTOT+8, SUBTOT+11, SUBTOT+14, SUBTOT+17, SUBTOT+20, SUBTOT+23, FINTOT1+7, W+1
$$CTR	INFORM+2, INFORM+3, FINH+1
$$LOC	INFORM+2
$$PER	W+1
$$USR	INFORM+3
BDMG	TEST+1
BROWSE	DEMO+3
CHKSET	REGPROC+2, REGPROC+3
EDATE	PCP+4
ENDLOG	GUIEP+11
EXIT	START+2, START+4, ZIS+3, DEMO+2, DEMO+3, DEMO+6, BDMG+24, GUIEP+13
FINH	FINTOT1+5, FINTOT1+9, FINTOT1+11, FINTOT1+13, FINTOT1+15, FINTOT1+17, FINTOT1+19, FINTOT1+21, FINTOT1+23, FINBP+1 , FINBP+3, FINBP+5, FINBP+7, FINBP+9, FINBP+11, FINBP+13, FINTC+1, FINTC+3, FINTC+5, FINTC+7 , FINTC+11, FINTC+13, FINLDL+1, FINLDL+3, FINLDL+5, FINLDL+7, FINLDL+9, FINLDL+11, FINLDL+13, FINHDL+1 , FINHDL+3, FINHDL+5, FINHDL+7, FINHDL+9, FINHDL+11, FINHDL+13, FINTRIG+1, FINTRIG+3, FINTRIG+5, FINTRIG+7 , FINTRIG+9, FINTRIG+11, FINTRIG+13
FINTOT1	FINTOT+4
GETINFO	START+3
INFORM	START+1
PCP	R+10, PCP+6, EDATE+3
PROC	GUIEP+1
R	R+9, R+13, PCP+3
REGPROC	PROC+4
W	FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22, FINTOT1+24, FINBP+4, FINBP+6 , FINBP+8, FINBP+10, FINBP+12, FINBP+14, FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14, FINLDL+4 , FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14, FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12 , FINHDL+14, FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14
ZIS	START+5

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	BDMG+10, ENDLOG+2
A	EXIT+1!
B	EXIT+1!, DATE~, DATE+1, DATE+2
>> BDMBD	EDATE+4, EDATE+5, BDMG+4, BDMG+5
>> BDMBTH	PROC+1*, PROC+2, CHKSET+7
>> BDMDATA	GUIEP+6*, GUIEP+8
>> BDMDEMO	DEMO+1, DEMO+2, CHKSET+2
BDMED	EDATE+1, EDATE+3, EDATE+4, BDMG~, BDMG+2, BDMG+4
>> BDMEDD	EDATE+3, BDMG+2
>> BDMFINL	FINTOT+1*
>> BDMGIEN	BDMG+19*
>> BDMGUI	EXIT+2, BDMG+3*
BDMIEN	BDMG+7~, BDMG+17, BDMG+18, BDMG+19, GUIEP+8, GUIEP+9, GUIEP+10, ENDLOG+3
>> BDMIOSL	SUBTOT+3, FINTOT1+9, FINTOT1+11, FINTOT1+13, FINTOT1+15, FINTOT1+17, FINTOT1+19, FINTOT1+21, FINTOT1+23, FINBP+1 , FINBP+3, FINBP+5, FINBP+7, FINBP+9, FINBP+11, FINBP+13, FINTC+1, FINTC+3, FINTC+5, FINTC+7 , FINTC+11, FINTC+13, FINLDL+1, FINLDL+3, FINLDL+5, FINLDL+7, FINLDL+9, FINLDL+11, FINLDL+13, FINHDL+1 , FINHDL+3, FINHDL+5, FINHDL+7, FINHDL+9, FINHDL+11, FINHDL+13, FINTRIG+1, FINTRIG+3, FINTRIG+5, FINTRIG+7 , FINTRIG+9, FINTRIG+11, FINTRIG+13
>> BDMJOB	PROC+1*, PROC+2, CHKSET+7
BDMNOW	BDMG+7~, BDMG+10, BDMG+12, BDMG+13, ENDLOG+2, ENDLOG+3
BDMOPT	BDMG+7~, BDMG+8*, BDMG+13
>> BDMP	SUBTOT+4, FINH+1, FINTOT+3*, FINTOT+4, FINTOT1+6, FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18 , FINTOT1+20, FINTOT1+22, FINTOT1+24, FINBP+4, FINBP+6, FINBP+8, FINBP+10, FINBP+12, FINBP+14, FINTC+4 , FINTC+6, FINTC+8, FINTC+12, FINTC+14, FINLDL+4, FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14 , FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12, FINHDL+14, FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10 , FINTRIG+12, FINTRIG+14
>> BDMP1	FINTOT+4*, FINTOT1+1, FINTOT1+6, FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22 , FINTOT1+24, FINBP+4, FINBP+6, FINBP+8, FINBP+10, FINBP+12, FINBP+14, FINTC+4, FINTC+6, FINTC+8 , FINTC+12, FINTC+14, FINLDL+4, FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14, FINHDL+4, FINHDL+6 , FINHDL+8, FINHDL+10, FINHDL+12, FINHDL+14, FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14
BDMPCP	PCP+1, PCP+7, FINTOT1+1, BDMG~, BDMG+6*
>> BDMPN	FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22, FINTOT1+24, FINBP+4, FINBP+6 , FINBP+8, FINBP+10, FINBP+12, FINBP+14, FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14, FINLDL+4 , FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14, FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12 , FINHDL+14, FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14*, W+1
>> BDMQ	SUBTOT+3, FINTOT+3, FINTOT1+4, FINTOT1+9, FINTOT1+11, FINTOT1+13, FINTOT1+15, FINTOT1+17, FINTOT1+19, FINTOT1+21 , FINTOT1+23, FINBP+1, FINBP+3, FINBP+5, FINBP+7, FINBP+9, FINBP+11, FINBP+13, FINTC+1, FINTC+3 , FINTC+5, FINTC+7, FINTC+11, FINTC+13, FINLDL+1, FINLDL+3, FINLDL+5, FINLDL+7, FINLDL+9, FINLDL+11 , FINLDL+13, FINHDL+1, FINHDL+3, FINHDL+5, FINHDL+7, FINHDL+9, FINHDL+11, FINHDL+13, FINTRIG+1, FINTRIG+3 , FINTRIG+5, FINTRIG+7, FINTRIG+9, FINTRIG+11, FINTRIG+13
>> BDMQUIT	START+4, R+4*
BDMREG	R+2, R+5, REGPROC+1, BDMG~
>> BDMSD	EDATE+5, BDMG+5
BDMSTAR	R+14*, BDMG~
BDMSTAT	R+7, R+10, R+14*, REGPROC+2, REGPROC+3, BDMG~
>> BDMSTOT(0	SUBTOT+5, SUBTOT+6, SUBTOT+8, SUBTOT+9, SUBTOT+11, SUBTOT+12, SUBTOT+14, SUBTOT+15, SUBTOT+17, SUBTOT+18 , SUBTOT+20, SUBTOT+21, SUBTOT+23, SUBTOT+24
>> BDMSTOT(1	SUBTOT+5, SUBTOT+6
>> BDMSTOT(2	SUBTOT+8, SUBTOT+9
>> BDMSTOT(3	SUBTOT+11, SUBTOT+12
>> BDMSTOT(4	SUBTOT+14, SUBTOT+15
>> BDMSTOT(5	SUBTOT+17, SUBTOT+18
>> BDMSTOT(6	SUBTOT+20, SUBTOT+21, SUBTOT+24
>> BDMSTOT(7	SUBTOT+23
BDMSUB	SUBTOT+2*, SUBTOT+26!
>> BDMTBP	FINBP+4, FINBP+6, FINBP+8, FINBP+10, FINBP+12, FINBP+14
>> BDMTBP(	FINBP+4, FINBP+6, FINBP+8, FINBP+10, FINBP+12, FINBP+14
>> BDMTEMP	ZIS+1, ZIS+4, DEMO+3
>> BDMTHDL	FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12, FINHDL+14
>> BDMTHDL(	FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12, FINHDL+14
>> BDMTHGB	FINTOT1+6, FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22, FINTOT1+24
>> BDMTHGB(	FINTOT+3, FINTOT+4, FINTOT1+6, FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22 , FINTOT1+24
>> BDMTLDL	FINLDL+4, FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14
>> BDMTLDL(	FINLDL+4, FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14
>> BDMTN	FINTOT1+10, FINTOT1+12, FINTOT1+14, FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22, FINTOT1+24, FINBP+4, FINBP+6 , FINBP+8, FINBP+10, FINBP+12, FINBP+14, FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14, FINLDL+4 , FINLDL+6, FINLDL+8, FINLDL+10, FINLDL+12, FINLDL+14, FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12 , FINHDL+14, FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14*, W+1
>> BDMTOPP	FINTOT1+6*, FINTOT1+7, W+1
>> BDMTOTP	FINTOT1+6*, FINTOT1+7, W+1
>> BDMTTC	FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14
>> BDMTTC(	FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14
>> BDMTTRIG	FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14
>> BDMTTRIG(	FINTRIG+4, FINTRIG+6, FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14
>> BDMWR	SUBTOT+1
C	EXIT+1!, CHKSET+6, CHKSET+7, GUIEP+5, GUIEP+8*, GUIEP+9
D	PER~, PER+1, PER+2, PER+4
DA	R+8!, R+12!, PCP+2!, ZIS+2!, BDMG+16!, GUIEP+10, ENDLOG+3, ENDLOG+5!
DD	BDMG+11!
>> DFN	REGPROC+2, REGPROC+3, CHKSET+1, CHKSET+2, CHKSET+4, CHKSET+5, CHKSET+6, CHKSET+7
DFOUT	EOP+4!
DIADD	BDMG+14*, BDMG+16!
DIC	R+3, PCP+5!, BDMG+11!, BDMG+14*, BDMG+16!
DIC("A"	R+3*
DIC("DR"	BDMG+13*
DIC(0	R+3, PCP+5, BDMG+14*
DIE	ENDLOG+3*, ENDLOG+5!
>> DIK	GUIEP+10*
DIR	R+8!, R+12!, PCP+2!, EDATE+2!, EDATE+3!, ZIS+2!, EOP+3~
DIR("A"	R+8, R+12, PCP+2, EDATE+2, ZIS+2*
DIR("B"	R+8, R+12, PCP+2, ZIS+2
DIR(0	R+8, R+12, PCP+2, EDATE+2, ZIS+2, EOP+5
DIRUT	R+9, R+13, PCP+3, ZIS+3, EOP+4!
DLAYGO	BDMG+14*, BDMG+16!
DLOUT	EOP+4!
DO	BDMG+11!
DR	ENDLOG+3*, ENDLOG+5!
DT	TEST+1, GUIEP+9
DTOUT	EOP+4!
DUOUT	EOP+4!
DUZ	USR+1, BDMG+12, BDMG+13
DUZ(2	LOC+1
IO("S"	EOP+2
IOF	INFORM+1
IOM	CTR+1, GUIEP+3*
IOST	EOP+1
>> IOT	EOP+2
N	PER~, PER+4
P	EXIT+1!, CHKSET+4*, CHKSET+7
>> P1	CHKSET+5*, CHKSET+7
U	PCP+5, REGPROC+2, REGPROC+3, CHKSET+7, USR+1, LOC+1, FINTOT1+6, FINTOT1+10, FINTOT1+12, FINTOT1+14 , FINTOT1+16, FINTOT1+18, FINTOT1+20, FINTOT1+22, FINTOT1+24, FINBP+4, FINBP+6, FINBP+8, FINBP+10, FINBP+12 , FINBP+14, FINTC+4, FINTC+6, FINTC+8, FINTC+12, FINTC+14, FINLDL+4, FINLDL+6, FINLDL+8, FINLDL+10 , FINLDL+12, FINLDL+14, FINHDL+4, FINHDL+6, FINHDL+8, FINHDL+10, FINHDL+12, FINHDL+14, FINTRIG+4, FINTRIG+6 , FINTRIG+8, FINTRIG+10, FINTRIG+12, FINTRIG+14
X	EXIT+1!, REGPROC+1, REGPROC+2, REGPROC+3, C~, C+2, CTR~, CTR+1, POST+1, POST+2 , SUBTOT+6, SUBTOT+7, SUBTOT+9, SUBTOT+10, SUBTOT+12, SUBTOT+13, SUBTOT+15, SUBTOT+16, SUBTOT+18, SUBTOT+19 , SUBTOT+21, SUBTOT+22, SUBTOT+24, SUBTOT+25, PER+3~, PER+4, PER+5, BDMG+12, GUIEP+5, GUIEP+6 , GUIEP+8
X2	C~
X3	C~
>> XBIOP	BROWSE+2*
>> XBNS	DEMO+4*
>> XBRC	DEMO+4, BROWSE+2
>> XBRP	DEMO+4, BROWSE+1
>> XBRX	DEMO+4, BROWSE+2
Y	R+4, R+5, R+10, R+14, PCP+4, PCP+6, PCP+7, EDATE+3, ZIS+4, EXIT+1! , CTR~, CTR+1, PER+3~, BDMG+17, BDMG+18
Y(0	R+14
Z	PER+3~
>> ZTDESC	BDMG+23*
>> ZTDTH	BDMG+23*
>> ZTIO	BDMG+23*
>> ZTQUEUED	EOP+2
>> ZTREQ	GUIEP+14*
>> ZTRTN	BDMG+23*
ZTSAVE	BDMG+21!
ZTSAVE("*"	BDMG+21*

Customize PDF page

Package: Diabetes Registry

Routine: BDMDR3

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: