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 |  Local Variables |  All
Print Page as PDF
Routine: BDMS9D1

Package: Diabetes Registry

Routine: BDMS9D1


Information

BDMS9D1 ; IHS/CMI/LAB - DIABETIC CARE SUMMARY SUPPLEMENT ; 01 Feb 2011 8:49 AM

Source Information

Source file <BDMS9D1.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Diabetes Registry 6 (EDUC,EDUCREF)^BDMS9B2  ($$DIETV,TOBACCO)^BDMS9B3  ($$ACE,$$ASPREF)^BDMS9B4  MORE^BDMS9D2  ($$LASTITEM,$$PLTAX)^BDMSMU  $$ICD^BDMUTL  
IHS VA Utilities 2 $$VAL^XBDIQ1  EN^XBNEW  
Patient Care Component Reports 2 $$START1^APCLDF  $$CLINIC^APCLV  
IHS Patient 1 ($$AGE,$$DOB,$$HRN,$$SEX)^AUPNPAT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component 1 APCHS9D1  

Entry Points

Name Comments DBIA/ICR reference
MS(P) ;
EOJ ;
S1 ;
SETARRAY ;set up array containing dm care summary
IGT(P) ;
BPX ;
EP2(BDMSDFN) ;PEP - PASS DFN get back array of patient care summary
LASTWC ;
LASTHT ;
BMI ;
CMSMAN(P,F) ;EP - return date/dx of dm in register
EP21 ;
LASTWT ;
GETHWB(P,EDATE)
S(Y,F,C,T) ;set up array
HEADER ;
W ;write out array
EP ;EP - called from component
HTNX ;
HEAD1 ;
BP(P) ;last 3 BPs - NON ER
IFG(P) ;
M12 ;
HTN(P) ;
ASPIRIN(P,D) ;

External References

Name Field # of Occurrence
$$START1^APCLDF MS+6, IGT+6, IFG+6, HTN+7, LASTHT+4, LASTWT+1, LASTWC+1
$$CLINIC^APCLV BP+9
$$AGE^AUPNPAT SETARRAY+8, BMI+4, BMI+7
$$DOB^AUPNPAT SETARRAY+8, M12+2
$$HRN^AUPNPAT HEAD1+4, SETARRAY+7, M12+2
$$SEX^AUPNPAT SETARRAY+8
EDUC^BDMS9B2 SETARRAY+38
EDUCREF^BDMS9B2 SETARRAY+41
$$DIETV^BDMS9B3 SETARRAY+36
TOBACCO^BDMS9B3 SETARRAY+33
$$ACE^BDMS9B4 SETARRAY+46
$$ASPREF^BDMS9B4 SETARRAY+49
MORE^BDMS9D2 M12+1
$$LASTITEM^BDMSMU EP+3
$$PLTAX^BDMSMU EP+2, MS+2, IGT+2, IFG+2
$$ICD^BDMUTL HTN+3
^DIR EP+5, HEADER+1
$$VAL^XBDIQ1 SETARRAY+18, ASPIRIN+13, ASPIRIN+14
EN^XBNEW EP2+5
$$FMADD^XLFDT EP+4, SETARRAY+37, SETARRAY+45, SETARRAY+48
$$FMTE^XLFDT SETARRAY+6, SETARRAY+8, SETARRAY+10, SETARRAY+12, SETARRAY+14, SETARRAY+27, SETARRAY+29, SETARRAY+31, LASTHT+5, LASTHT+7
, LASTHT+9, LASTWT+2, LASTWT+3, LASTWT+4, LASTWC+2, LASTWC+3, LASTWC+4, ASPIRIN+13, ASPIRIN+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: !,BDMSHDR,!
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !,"PreDiabetes Patient Care Summary - continued"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,"Patient: ",$P(^DPT(BDMSPAT,0),U)," HRN: ",$$HRN^AUPNPAT(BDMSPAT,DUZ(2)),!
  • Line Location: HEAD1+4
Routine Call
  • DIR
  • Line Location:
    • EP+5
    • HEADER+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" SETARRAY+5
^ACM(41 - [#9002241] CMSMAN+4, CMSMAN+5
^ACM(41.1 - [#9002241.1] CMSMAN+3
^ATXAX - [#9002226] ASPIRIN+10, ASPIRIN+11
^ATXAX("B" HTN+1, ASPIRIN+5, ASPIRIN+6
^AUPNPROB - [#9000011] MS+3, MS+4, IGT+3, IGT+4, IFG+3, IFG+4, HTN+3
^AUPNPROB("AC" HTN+3
^AUPNVMED - [#9000010.14] ASPIRIN+9, ASPIRIN+13, ASPIRIN+14
^AUPNVMED("AA" ASPIRIN+8, ASPIRIN+9
^AUPNVMSR - [#9000010.01] BP+7, BP+10
^AUPNVMSR("AA" BP+5, BP+6
^AUPNVMSR("AC" LASTHT+2
^AUPNVSIT - [#9000010] BP+8, ASPIRIN+13, ASPIRIN+14
^AUPNVSIT("AC" LASTHT+1
^AUTTMSR("B" BP+4
^DPT - [#2] HEAD1+4, SETARRAY+7, M12+2
^TMP("APCHS" W+3, W+5, EP2+2!, EP2+3*, S1+1*, S1+2*
^VA(200 - [#200] CMSMAN+5
^XTMP("BDMTAX" EP21+3!

Label References

Name Line Occurrences
$$ASPIRIN SETARRAY+48
$$BP SETARRAY+26
$$CMSMAN SETARRAY+17
$$HTN SETARRAY+44
$$IFG SETARRAY+10
$$IGT SETARRAY+12
$$MS SETARRAY+14
EOJ W+8
EP2 EP+6
GETHWB SETARRAY+20
HEADER W+4
HTNX HTN+7
S SETARRAY+6, SETARRAY+7, SETARRAY+8, SETARRAY+9, SETARRAY+11, SETARRAY+13, SETARRAY+15, SETARRAY+16, SETARRAY+17, SETARRAY+18
, SETARRAY+19, SETARRAY+21, SETARRAY+22, SETARRAY+23, SETARRAY+24, SETARRAY+25, SETARRAY+28, SETARRAY+30, SETARRAY+32, SETARRAY+34
, SETARRAY+35, SETARRAY+36, SETARRAY+39, SETARRAY+41, SETARRAY+42, SETARRAY+44, SETARRAY+47, SETARRAY+48, SETARRAY+49, M12+2
S1 S+4, S+6, S+9
SETARRAY EP21+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EOJ+2!, SETARRAY+39*, SETARRAY+40!, SETARRAY+42*, SETARRAY+43!, SETARRAY+46*, SETARRAY+47, S+3~, S+7*, S+8*
, S1+1*, S1+2, MS+1~, MS+6*, IGT+1~, IGT+6*, IFG+1~, IFG+6*, LASTHT+4*, LASTWT+1*
, LASTWC+1*, BMI+10*, BMI+11*, BMI+12, ASPIRIN+3~, ASPIRIN+4*, ASPIRIN+8, ASPIRIN+9, ASPIRIN+10*, ASPIRIN+11*
, ASPIRIN+12, ASPIRIN+13*, ASPIRIN+14*
B EOJ+2!, SETARRAY+26*
>> BDMBTH EP21+3, SETARRAY+2*
BDMC BP+1~, BP+3*, BP+5, BP+6, BP+10*, BPX+1!
BDMD BP+1~, BP+3*, BP+5*, BP+6, BP+10, BPX+1!
>> BDMHT BMI+3*, BMI+4, BMI+6*, BMI+7, BMI+8*, BMI+9*, BMI+11
>> BDMJOB EP21+3, SETARRAY+2*
BDMQUIT W+2!, W+3, W+4, W+7, EOJ+1!, HEADER+1*
BDMSBEG EOJ+1!, SETARRAY+37*, SETARRAY+45*, SETARRAY+46, SETARRAY+48*
>> BDMSCVD SETARRAY+4*
BDMSDFN EOJ+1!, EP2~, EP21+1, SETARRAY+7, SETARRAY+8, SETARRAY+10, SETARRAY+12, SETARRAY+14, SETARRAY+17, SETARRAY+18
, SETARRAY+20, SETARRAY+26, SETARRAY+36, SETARRAY+44, SETARRAY+46, SETARRAY+48, SETARRAY+49, M12+2
BDMSED EOJ+1!
>> BDMSHDR HEAD1+2
>> BDMSPAT EP+1, EP+2, EP+3, EP+6, HEAD1+4, EP21+1*
>> BDMSQIT EP+5*, W+7*
BDMSTEX EOJ+1!
BDMSTOB EOJ+1!
BDMSUPI EOJ+1!
BDMSX SETARRAY+48!
BDMTOB EOJ+1!, SETARRAY+34
BDMTOBN EOJ+1!
BDMX W+3*, W+5, EOJ+1!, SETARRAY+38!, SETARRAY+40!, SETARRAY+41, SETARRAY+43!, HTN+5~, HTN+6*, HTN+7*
, HTN+8*, HTNX+1, BP+2!, BP+3*, BPX+2, GETHWB+1!
BDMX( SETARRAY+39, SETARRAY+42, BP+10*, GETHWB+2*, BMI+2, BMI+6, BMI+8, BMI+11, BMI+12*
BDMX(1 SETARRAY+21, SETARRAY+22, SETARRAY+25, SETARRAY+27, BP+13*, LASTHT+5*, LASTHT+6*, LASTWT+2*, LASTWC+2*, BMI+9
BDMX(2 SETARRAY+23, SETARRAY+29, LASTHT+7*, LASTHT+8*, LASTWT+3*, LASTWC+3*
BDMX(3 SETARRAY+24, SETARRAY+31, HTN+7, LASTHT+9*, LASTHT+10*, LASTWT+4*, LASTWC+4*
BDMY EOJ+1!, SETARRAY+40!, SETARRAY+43!, MS+1~, MS+6!, IGT+1~, IGT+6!, IFG+1~, IFG+6!, LASTHT+3~
, LASTWT+1!, LASTWC+1!, BMI+1*, BMI+2, BMI+6, BMI+8, BMI+11, BMI+12
BDMY(1 MS+7, IGT+7, IFG+7, LASTHT+5, LASTWT+2, LASTWC+2
BDMY(2 LASTHT+7, LASTWT+3, LASTWC+3
BDMY(3 LASTHT+9, LASTWT+4, LASTWC+4
C EOJ+2!, S~, S+6
D CMSMAN+3~*, CMSMAN+4*, CMSMAN+5*, CMSMAN+6, MS+3*, MS+4*, MS+5, IGT+3*, IGT+4*, IGT+5
, IFG+3*, IFG+4*, IFG+5, ASPIRIN~, ASPIRIN+2*, ASPIRIN+8
D1 CMSMAN+3~
DIR HEADER+1!
DIR("A" EP+5*
DIR(0 EP+5*, HEADER+1*
>> DIRUT EP+5
DT EP+4, SETARRAY+6, SETARRAY+20, SETARRAY+37, SETARRAY+45, SETARRAY+48
>> DTOUT HEADER+1
DUZ(2 HEAD1+4, SETARRAY+7, M12+2
E EOJ+2!, MS+6*, IGT+6*, IFG+6*, HTN+7*, LASTHT+4*, LASTWT+1*, LASTWC+1*
EDATE GETHWB~
F EOJ+2!, S~, S+1*, S+4*, CMSMAN~, CMSMAN+1*
G CMSMAN+3~, CMSMAN+4*, ASPIRIN+9*, ASPIRIN+10, ASPIRIN+11
H EOJ+2!, BMI+11*
I MS+1~, IGT+1~, IFG+1~, HTN+3~*, HTN+4, ASPIRIN+3~, ASPIRIN+8*, ASPIRIN+9
IO EP+5, HEADER+1
IO(0 EP+5, HEADER+1
IOF W+1, HEAD1+1
IOSL W+4
IOST EP+5, HEADER+1
L EOJ+2!, S+6*
>> M BP+6*, BP+7, BP+10
N EOJ+2!, CMSMAN+3~*
P EOJ+2!, CMSMAN~, CMSMAN+2, CMSMAN+4, MS~, MS+2, MS+6, IGT~, IGT+2, IGT+6
, IFG~, IFG+2, IFG+6, HTN~, HTN+3, HTN+7, BP~, BP+5, BP+6, GETHWB~
, LASTHT+1, LASTHT+2, LASTHT+4, LASTWT+1, LASTWC+1, BMI+4, BMI+7, ASPIRIN~, ASPIRIN+1, ASPIRIN+8
, ASPIRIN+9
R CMSMAN+3~*, CMSMAN+4
T EOJ+2!, S~, S+2*, S+6*, S+7, S+8, HTN+1~*, HTN+2, BP+4*, BP+5
, BP+6, ASPIRIN+5~*, ASPIRIN+7, ASPIRIN+10
T1 ASPIRIN+5~, ASPIRIN+6*, ASPIRIN+11
U HEAD1+4, SETARRAY+7, SETARRAY+10, SETARRAY+12, SETARRAY+14, SETARRAY+27, SETARRAY+29, SETARRAY+31, M12+2, S1+1
, CMSMAN+4, CMSMAN+5, MS+3, MS+4, MS+5, MS+7, IGT+3, IGT+4, IGT+5, IGT+7
, IFG+3, IFG+4, IFG+5, IFG+7, HTN+3, BP+7, BP+10, LASTHT+5, LASTHT+7, LASTHT+9
, LASTWT+2, LASTWT+3, LASTWT+4, LASTWC+2, LASTWC+3, LASTWC+4, ASPIRIN+9, ASPIRIN+13, ASPIRIN+14
V BP+7*, BP+8, BP+9, ASPIRIN+3~, ASPIRIN+9*, ASPIRIN+10, ASPIRIN+11
W EOJ+2!, BMI+11*
X EP+3*, EP+4, EOJ+2!, SETARRAY+5*, SETARRAY+6*, SETARRAY+7*, SETARRAY+8*, SETARRAY+9*, SETARRAY+10*, SETARRAY+11
, SETARRAY+12*, SETARRAY+13, SETARRAY+14*, SETARRAY+15, SETARRAY+16*, SETARRAY+17*, SETARRAY+18*, SETARRAY+19*, SETARRAY+21*, SETARRAY+22*
, SETARRAY+23*, SETARRAY+24*, SETARRAY+25*, SETARRAY+27*, SETARRAY+28, SETARRAY+29*, SETARRAY+30, SETARRAY+31*, SETARRAY+32, SETARRAY+34*
, SETARRAY+35*, SETARRAY+36*, SETARRAY+39*, SETARRAY+41*, SETARRAY+42*, SETARRAY+44*, SETARRAY+47*, SETARRAY+48*, SETARRAY+49*, M12+2*
, S+3~, S+4*, S+5*, S+7*, S+8*, S1+2, CMSMAN+3~, CMSMAN+4*, CMSMAN+5, MS+1~
, MS+2*, MS+3, MS+4, IGT+1~, IGT+2*, IGT+3, IGT+4, IFG+1~, IFG+2*, IFG+3
, IFG+4, HTN+3~*, HTN+7*, GETHWB+2*, LASTHT+4~, LASTWT+1~, LASTWC+1~
Y EOJ+2!, HEADER+1, SETARRAY+10*, SETARRAY+12*, SETARRAY+14*, S~, S+5, S+6, S+8, CMSMAN+3~
, CMSMAN+4*, MS+1~, MS+2, MS+3*, MS+4*, MS+5*, IGT+1~, IGT+2, IGT+3*, IGT+4*
, IGT+5*, IFG+1~, IFG+2, IFG+3*, IFG+4*, IFG+5*, HTN+3~*, BMI+6*, BMI+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All