Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BDMDR31

Package: Diabetes Registry

Routine: BDMDR31


Information

BDMDR31 ; IHS/CMI/LAB - patients dm list - chinle ;

Source Information

Source file <BDMDR31.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 2 COMMA^%DTC  ^DIR  
Diabetes Registry 1 (FINTOT,SUBTOT)^BDMDR3  
IHS Patient 1 ($$DOB,$$HRN)^AUPNPAT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
Patient Care Component Reports 1 $$START1^APCLDF  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Diabetes Registry 1 BDMDR3  

Entry Points

Name Comments DBIA/ICR reference
HGBS ;subtotal hbg values
LASTLDL ;
DATE(B) ;
BPS ;
EOP ;EP - End of page.
DONE ;
PRINT ;EP - called from xbdbque
HDL ;
HDLS ;
PRINT1 ;
HDLS1 ;
LOC() ;EP - Return location name from file 4 based on DUZ(2).
TRIGS1 ;
TCS ;
LDL ;
LASTBP
TRIGS ;
TC ;
TCS1 ;
PIH
HEAD ;EP
TRIG ;
LDLS ;
C(X,X2,X3) ;
LASTTC ;
HGB ;
LASTTRIG ;
HEAD1 ;
USR() ;EP - Return name of current user from ^VA(200.
LASTHBG ;
LDLS1 ;
LASTDMV
CTR(X,Y) ;EP - Center X in a field Y wide.
LASTHDL ;

External References

Name Field # of Occurrence
COMMA^%DTC C+1
$$START1^APCLDF LASTBP+3, LASTHBG+3, LASTTC+3, LASTLDL+3, LASTHDL+3, LASTTRIG+3
$$DOB^AUPNPAT PRINT1+13
$$HRN^AUPNPAT PRINT1+13
FINTOT^BDMDR3 PRINT+18
SUBTOT^BDMDR3 PRINT+16
^DIR DONE+1, HEAD+2, EOP+5
$$FMADD^XLFDT LDLS+1, TCS+1, HDLS+1, TRIGS+1
$$FMTE^XLFDT PRINT1+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO PATIENTS TO REPORT"
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"ZZZZZZZ"
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !?13,"********** CONFIDENTIAL PATIENT INFORMATION **********"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?72,"Page ",BDMPG,!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: ?(80-$L($P(^DIC(4,$S($G(BDMDUZ2):BDMDUZ2,1:DUZ(2)),0),U))/2),$P(^DIC(4,$S($G(BDMDUZ2):BDMDUZ2,1:DUZ(2)),0),U),!
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: $$CTR("As of Date: "_BDMEDD_$S($D(BDMFINL):"",1:" Designated Provider: "_$G(BDMP)),80),!
  • Line Location: HEAD1+7
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?27,"HRN",?34,"DOB",?47,"COMMUNITY",?62,!,BDM80D
  • Line Location: PIH+0
Function Call: WRITE
  • Prompt: !,BDM80D
  • Line Location: PIH+1
Routine Call
  • DIR
  • Line Location:
    • DONE+1
    • HEAD+2
    • EOP+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41.1 - [#9002241.1] HEAD1+6
^AUPNVPOV("AD" LASTDMV+6
^AUPNVPRV("AD" LASTDMV+7
^AUPNVSIT - [#9000010] LASTDMV+4, LASTDMV+5, LASTDMV+8
^AUPNVSIT("AA" LASTDMV+2, LASTDMV+3
^DIC(4 - [#4] HEAD1+5, LOC+1
^DPT - [#2] PRINT1+12
^VA(200 - [#200] HEAD1+4, USR+1
^XTMP("BDMDR3" PRINT+7, PRINT+9, PRINT+12, PRINT+13, PRINT+14, PRINT1+1, DONE+3!

Label References

Name Line Occurrences
$$CTR HEAD1+6, HEAD1+7
$$DATE PRINT1+18, PRINT1+19, PRINT1+22, PRINT1+23, HGB+3, HGB+4, TC+3, TC+4, LDL+3, LDL+4
, HDL+3, HDL+4, TRIG+3, TRIG+4
BPS PRINT1+24
DONE PRINT+7, PRINT+17, PRINT+19
HDLS HDL+6
HDLS1 HDLS+4, HDLS+5
HEAD PRINT+7, PRINT1+9, PRINT1+10
HEAD1 HEAD+1
HGBS HGB+5
LASTBP PRINT1+21
LASTDMV PRINT1+16
LASTHBG HGB+2
LASTHDL HDL+2
LASTLDL LDL+2
LASTTC TC+2
LASTTRIG TRIG+2
LDLS LDL+5
LDLS1 LDLS+4, LDLS+5
PRINT1 PRINT+14
TCS TC+5
TCS1 TCS+4, TCS+5
TRIGS TRIG+6
TRIGS1 TRIGS+4, TRIGS+5

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LASTBP+1~, LASTBP+3*, LASTHBG+1~, LASTHBG+3*, LASTTC+1~, LASTTC+3*, LASTLDL+1~, LASTLDL+3*, LASTHDL+1~, LASTHDL+3*
, LASTTRIG+1~, LASTTRIG+3*
A LASTBP+1~, LASTBP+2!, LASTHBG+1~, LASTHBG+2!, LASTTC+1~, LASTTC+2!, LASTLDL+1~, LASTLDL+2!, LASTHDL+1~, LASTHDL+2!
, LASTTRIG+1~, LASTTRIG+2!
A(1 LASTBP+4, LASTHBG+4, LASTTC+4, LASTLDL+4, LASTHDL+4, LASTTRIG+4
A(2 LASTBP+5, LASTHBG+5, LASTTC+5, LASTLDL+5, LASTHDL+5, LASTTRIG+5
B DATE~, DATE+1, DATE+2
>> BDM15M LDLS+1*, LDLS+4, LDLS+5, TCS+1*, TCS+4, TCS+5, HDLS+1*, HDLS+4, HDLS+5, TRIGS+1*
, TRIGS+4, TRIGS+5
>> BDM80D PRINT+5*, PIH, PIH+1
>> BDMBD BPS+3, HGBS+3
BDMBTH PRINT+7, PRINT+9, PRINT+12, PRINT+13, PRINT+14, PRINT1+1, DONE+3!
>> BDMC PRINT+8*, PRINT+12*, PRINT+13, PRINT+14, PRINT1+1, PRINT1+13
>> BDMCNT PRINT+11*, PRINT+14*, PRINT1+9
>> BDMDMV1 PRINT1+16*, PRINT1+18, PRINT1+19, PRINT1+21*, PRINT1+22, PRINT1+23, HGB+2*, HGB+3, HGB+4, TC+2*
, TC+3, TC+4, LDL+2*, LDL+3, LDL+4, HDL+2*, HDL+3, HDL+4, TRIG+2*, TRIG+3
, TRIG+4, LASTDMV+9*, LASTBP+4*, BPS+3, BPS+7, LDLS+4, TCS+4, HDLS+4, HGBS+3, HGBS+7
, TRIGS+4, LASTHBG+4*, LASTTC+4*, LASTLDL+4*, LASTHDL+4*, LASTTRIG+4*
>> BDMDMV2 PRINT1+16*, PRINT1+18, PRINT1+21*, PRINT1+22, HGB+2*, HGB+3, TC+2*, TC+3, LDL+2*, LDL+3
, HDL+2*, HDL+3, TRIG+2*, TRIG+3, LASTDMV+9*, LASTBP+5*, LDLS+5, TCS+5, HDLS+5, TRIGS+5
, LASTHBG+5*, LASTTC+5*, LASTLDL+5*, LASTHDL+5*, LASTTRIG+5*
>> BDMDOB PRINT1+12*, LASTBP+3, LASTHBG+3, LASTTC+3, LASTLDL+3, LASTHDL+3, LASTTRIG+3
>> BDMDUZ2 PRINT1+13, HEAD1+5
>> BDMED LDLS+1, TCS+1, HDLS+1, TRIGS+1
>> BDMEDD HEAD1+7, LASTBP+3, LASTHBG+3, LASTTC+3, LASTLDL+3, LASTHDL+3, LASTTRIG+3
BDMFINL PRINT+1!, HEAD1+7, HEAD1+8
>> BDMGUI PRINT+2, HEAD1+2
>> BDMIOSL PRINT+2*, PRINT1+10
BDMJOB PRINT+7, PRINT+9, PRINT+12, PRINT+13, PRINT+14, PRINT1+1, DONE+3!
>> BDMNAME PRINT+8*, PRINT+13*, PRINT+14, PRINT1+1, PRINT1+13
>> BDMP PRINT+4*, PRINT+8*, PRINT+9*, PRINT+12, PRINT+13, PRINT+14, PRINT1+1, PRINT1+3, PRINT1+4, PRINT1+5
, PRINT1+6, PRINT1+7, PRINT1+8, HEAD1+7, BPS+2, BPS+5, BPS+8, BPS+9, BPS+10, BPS+11
, BPS+12, BPS+13, LDLS+3, LDLS+6, LDLS1+1, LDLS1+2, LDLS1+3, LDLS1+4, LDLS1+5, LDLS1+6
, TCS+3, TCS+6, TCS1+1, TCS1+2, TCS1+3, TCS1+4, TCS1+5, HDLS+3, HDLS+6, HDLS1+1
, HDLS1+2, HDLS1+3, HDLS1+4, HDLS1+5, HDLS1+6, HGBS+2, HGBS+5, HGBS+10, TRIGS+3, TRIGS+6
, TRIGS1+1, TRIGS1+2, TRIGS1+3, TRIGS1+4, TRIGS1+5, TRIGS1+6
>> BDMP1 PRINT1+1*, PRINT1+2, PRINT1+3, PRINT1+4, PRINT1+5, PRINT1+6, PRINT1+7, PRINT1+8, BPS+2, BPS+5
, BPS+8, BPS+9, BPS+10, BPS+11, BPS+12, BPS+13, LDLS+3, LDLS+6, LDLS1+1, LDLS1+2
, LDLS1+3, LDLS1+4, LDLS1+5, LDLS1+6, TCS+3, TCS+6, TCS1+1, TCS1+2, TCS1+3, TCS1+4
, TCS1+5, HDLS+3, HDLS+6, HDLS1+1, HDLS1+2, HDLS1+3, HDLS1+4, HDLS1+5, HDLS1+6, HGBS+2
, HGBS+5, HGBS+10, TRIGS+3, TRIGS+6, TRIGS1+1, TRIGS1+2, TRIGS1+3, TRIGS1+4, TRIGS1+5, TRIGS1+6
>> BDMPCP PRINT1+2
>> BDMPG PRINT+6*, HEAD+1, HEAD1+1*, HEAD1+2, HEAD1+4
BDMQ PRINT+8!, PRINT+9, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+17, PRINT1+9, PRINT1+10, HEAD+2*
>> BDMREG HEAD1+6
>> BDMSD PRINT1+18, PRINT1+22, HGB+3, TC+3, LDL+3, HDL+3, TRIG+3
>> BDMSTAR HEAD1+6
BDMSTOT PRINT+12!
BDMSTOT(0 PRINT1+11*
BDMSTOT(1 PRINT1+18*
BDMSTOT(2 PRINT1+22*
BDMSTOT(3 HGB+3*
BDMSTOT(4 TC+3*
BDMSTOT(5 LDL+3*
BDMSTOT(6 HDL+3*
BDMSTOT(7 TRIG+3*
>> BDMSUB PIH, PIH+1
BDMTBP PRINT+1!, PRINT+3*, BPS+1*, BPS+4*, BPS+8*, BPS+9*, BPS+10*, BPS+11*, BPS+12*, BPS+13*
BDMTBP( PRINT1+4*, BPS+2*, BPS+5*, BPS+8*, BPS+9*, BPS+10*, BPS+11*, BPS+12*, BPS+13*
BDMTHDL PRINT+1!, PRINT+3*, HDLS+2*, HDLS+6*, HDLS1+1*, HDLS1+2*, HDLS1+3*, HDLS1+4*, HDLS1+5*, HDLS1+6*
BDMTHDL( PRINT1+6*, HDLS+3*, HDLS+6*, HDLS1+1*, HDLS1+2*, HDLS1+3*, HDLS1+4*, HDLS1+5*, HDLS1+6*
BDMTHGB PRINT+1!, PRINT+3*, HGBS+1*, HGBS+4*, HGBS+9*
BDMTHGB( PRINT1+3*, HGBS+2*, HGBS+5*, HGBS+10*
BDMTLDL PRINT+1!, PRINT+3*, LDLS+2*, LDLS+6*, LDLS1+1*, LDLS1+2*, LDLS1+3*, LDLS1+4*, LDLS1+5*, LDLS1+6*
BDMTLDL( PRINT1+5*, LDLS+3*, LDLS+6*, LDLS1+1*, LDLS1+2*, LDLS1+3*, LDLS1+4*, LDLS1+5*, LDLS1+6*
BDMTTC PRINT+1!, PRINT+3*, TCS+2*, TCS+6*, TCS1+1*, TCS1+2*, TCS1+3*, TCS1+4*, TCS1+5*
BDMTTC( PRINT1+8*, TCS+3*, TCS+6*, TCS1+1*, TCS1+2*, TCS1+3*, TCS1+4*, TCS1+5*
BDMTTRIG PRINT+1!, PRINT+3*, TRIGS+2*, TRIGS+6*, TRIGS1+1*, TRIGS1+2*, TRIGS1+3*, TRIGS1+4*, TRIGS1+5*, TRIGS1+6*
BDMTTRIG( PRINT1+7*, TRIGS+3*, TRIGS+6*, TRIGS1+1*, TRIGS1+2*, TRIGS1+3*, TRIGS1+4*, TRIGS1+5*, TRIGS1+6*
>> BDMWR PRINT1+2*, PRINT1+9, PRINT1+10, PRINT1+13, PRINT1+14, PRINT1+15, PRINT1+17, PRINT1+18, PRINT1+19, PRINT1+20
, PRINT1+22, PRINT1+23, HGB+1, HGB+3, HGB+4, TC+1, TC+3, TC+4, LDL+1, LDL+3
, LDL+4, HDL+1, HDL+3, HDL+4, TRIG+1, TRIG+3, TRIG+4, TRIG+5
C LASTDMV+1~, LASTDMV+2*, LASTDMV+3, LASTDMV+9*
D LASTDMV+1~, LASTDMV+2*, LASTDMV+3, LASTDMV+9, BPS+7*, BPS+8, BPS+9, BPS+10, BPS+11, BPS+12
>> DFN PRINT+14*, PRINT1+1, PRINT1+12, PRINT1+13, LASTDMV+2, LASTDMV+3, LASTBP+3, LASTHBG+3, LASTTC+3, LASTLDL+3
, LASTHDL+3, LASTTRIG+3
DFOUT EOP+4!
DIR DONE+1!, HEAD+2!, EOP+3~
DIR("A" DONE+1*
DIR(0 DONE+1*, HEAD+2*, EOP+5*
DIRUT DONE+1*, EOP+4!
DLOUT EOP+4!
DTOUT HEAD+2, EOP+4!
DUOUT DONE+1, EOP+4!
DUZ HEAD1+4, USR+1
DUZ(2 PRINT1+13, HEAD1+5, LOC+1
E LASTBP+1~, LASTBP+3*, LASTHBG+1~, LASTHBG+3*, LASTTC+1~, LASTTC+3*, LASTLDL+1~, LASTLDL+3*, LASTHDL+1~, LASTHDL+3*
, LASTTRIG+1~, LASTTRIG+3*
IO DONE+1, HEAD+2
IO("S" EOP+2
IO(0 DONE+1, HEAD+2
IOF DONE+2, HEAD1+1
IOM CTR+1
IOSL PRINT+2
IOST DONE+1, HEAD+2, EOP+1
>> IOT EOP+2
>> P HGBS+8*, HGBS+9, HGBS+10
>> S BPS+7*, BPS+8, BPS+9, BPS+10, BPS+11, BPS+12
U PRINT1+12, PRINT1+22, PRINT1+23, HGB+3, HGB+4, TC+3, TC+4, LDL+3, LDL+4, HDL+3
, HDL+4, TRIG+3, TRIG+4, HEAD1+4, HEAD1+5, HEAD1+6, LASTDMV+4, LASTDMV+5, LASTDMV+8, LASTBP+4
, LASTBP+5, BPS+1, BPS+2, BPS+3, BPS+4, BPS+5, BPS+7, BPS+8, BPS+9, BPS+10
, BPS+11, BPS+12, BPS+13, LDLS+2, LDLS+3, LDLS+4, LDLS+5, LDLS+6, LDLS1+1, LDLS1+2
, LDLS1+3, LDLS1+4, LDLS1+5, LDLS1+6, TCS+2, TCS+3, TCS+4, TCS+5, TCS+6, TCS1+1
, TCS1+2, TCS1+3, TCS1+4, TCS1+5, HDLS+2, HDLS+3, HDLS+4, HDLS+5, HDLS+6, HDLS1+1
, HDLS1+2, HDLS1+3, HDLS1+4, HDLS1+5, HDLS1+6, HGBS+1, HGBS+2, HGBS+3, HGBS+4, HGBS+5
, HGBS+7, HGBS+9, HGBS+10, TRIGS+2, TRIGS+3, TRIGS+4, TRIGS+5, TRIGS+6, TRIGS1+1, TRIGS1+2
, TRIGS1+3, TRIGS1+4, TRIGS1+5, TRIGS1+6, LASTHBG+4, LASTHBG+5, LASTTC+4, LASTTC+5, LASTLDL+4, LASTLDL+5
, LASTHDL+4, LASTHDL+5, LASTTRIG+4, LASTTRIG+5, USR+1, LOC+1
V LASTDMV+1~, LASTDMV+2*, LASTDMV+3*, LASTDMV+4, LASTDMV+5, LASTDMV+6, LASTDMV+7, LASTDMV+8, BPS+7*, LDLS+4*
, LDLS+5*, LDLS1+1, LDLS1+2, LDLS1+3, LDLS1+4, LDLS1+5, LDLS1+6, TCS+4*, TCS+5*, TCS1+1
, TCS1+2, TCS1+3, TCS1+4, TCS1+5, HDLS+4*, HDLS+5*, HDLS1+1, HDLS1+2, HDLS1+3, HDLS1+4
, HDLS1+5, HDLS1+6, HGBS+7*, HGBS+8, TRIGS+4*, TRIGS+5*, TRIGS1+1, TRIGS1+2, TRIGS1+3, TRIGS1+4
, TRIGS1+5, TRIGS1+6
W LASTBP+1~, LASTHBG+1~, LASTTC+1~, LASTLDL+1~, LASTHDL+1~, LASTTRIG+1~
X HEAD1+6*, LASTBP+3~, LASTHBG+3~, LASTTC+3~, LASTLDL+3~, LASTHDL+3~, LASTTRIG+3~, C~, C+2, CTR~
, CTR+1
X2 C~
X3 C~
Y HEAD+2, CTR~, CTR+1
>> ZTQUEUED EOP+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All