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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BGPMUAP3

Package: IHS GPRA Information System

Routine: BGPMUAP3


Information

BGPMUAP3 ; IHS/MSC/MGH - MU EP measures NQF0055 and NQF0056 ;05-Jul-2011 11:28;DU

Source Information

Source file <BGPMUAP3.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS GPRA Information System 5 $$ROUND^BGPMUA01  $$DATE^BGPMUAP3  (HDRBLK,HEADER,HEADERL)^BGPMUPH  W^BGPMUPP  PTLSORT^BGPMUUTL  
IHS Patient 1 ($$AGE,$$HRN)^AUPNPAT  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
IHS GPRA Information System 11 BGPMUAD3  BGPMUAD5  BGPMUAD6  BGPMUAD7  BGPMUAD8  BGPMUAP3  BGPMUAP7  BGPMUAP8  
BGPMUBD1  BGPMUBD2  BGPMUBP1  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Do the Details
FT1 ;Write individual measure
P1 ;Write individual measure
EYE ;EP
FT56(TF) ;Get the numbers for this measure
DATA2(NODE) ;GET DATA
DATA(NODE) ;GET DATA
FT2 ;Do the Details
DATE(D) ;EP
FOOT ;EP
NUM55(TF) ;Get the numbers for this measure
SUMMARY2(STRING1,STRING2,STRING3) ;Summary setup
SUMMARY1(STRING1,STRING2,STRING3,CT) ;Summmary setup

External References

Name Field # of Occurrence
$$AGE^AUPNPAT DATA+5, DATA2+5
$$HRN^AUPNPAT DATA+4, DATA2+4
$$ROUND^BGPMUA01 NUM55+10, NUM55+12, NUM55+13, NUM55+14, NUM55+15, FT56+10, FT56+12, FT56+13, FT56+14, FT56+15
$$DATE^BGPMUAP3 DATA+9, DATA2+11
HDRBLK^BGPMUPH P1+19, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, FT1+15, FT1+16, FT1+18
, FT1+20, FT1+22, FT1+24, FT1+26
HEADER^BGPMUPH P1+18, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, FT1+14, FT1+16, FT1+18
, FT1+20, FT1+22, FT1+24, FT1+26
HEADERL^BGPMUPH P2+3, P2+19, DATA+13, DATA2+13, FT2+2, FT2+18
W^BGPMUPP P2+4, P2+5, P2+6, P2+7, P2+8, P2+9, P2+10, P2+11, P2+12, P2+13
, P2+14, P2+15, P2+16, P2+17, P2+18, FT2+3, FT2+4, FT2+5, FT2+6, FT2+7
, FT2+8, FT2+9, FT2+10, FT2+11, FT2+12, FT2+13, FT2+14, FT2+15, FT2+16
PTLSORT^BGPMUUTL P2+24, P2+31, P2+38, FT2+23, FT2+30, FT2+37
$$GET1^DIQ DATA+3, DATA+10, DATA2+3, DATA2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Pts 18-75 w/diabetes",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?64,$P(STRING3,U,1)
  • Line Location: P1+21
Function Call: WRITE
  • Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?64,$P(STRING3,U,4)
  • Line Location: P1+23
Function Call: WRITE
  • Prompt: !,"Pts 18-75 w/diabetes less Exc",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?64,$P(STRING3,U,3)
  • Line Location: P1+25
Function Call: WRITE
  • Prompt: !!,"# w/eye exam",?33,$P(STRING1,U,2),?38,$J($P(STRING1,U,5),5,1),?44,$P(STRING2,U,2),?49,$J($P(STRING2,U,5),5,1),?56,$J($FN(PRD1,",+",1),6),?64,$P(STRING3,U,2),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRN1,",+",1),6)
  • Line Location: P1+27
Function Call: WRITE
  • Prompt: !,"# w/o eye exam",?33,$P(STRING1,U,8),?38,$J($P(STRING1,U,9),5,1),?44,$P(STRING2,U,8),?49,$J($P(STRING2,U,9),5,1),?56,$J($FN(PRD7,",+",1),6),?64,$P(STRING3,U,8),?68,$J($P(STRING3,U,9),5,1),?74,$J($FN(PRN7,",+",1),6)
  • Line Location: P1+29
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?65,"NUMERATOR"
  • Line Location: P2+20
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2+21
Function Call: WRITE
  • Prompt: !!,"Total # of patients on list: "_PTCT
  • Line Location: P2+43
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: DATA+15
Function Call: WRITE
  • Prompt: !,NAME,?23,HRN,?30,COMM,?43,SEX,?46,AGE,?50,DEN1,?65,NUM1
  • Line Location: DATA+16
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: DATA2+15
Function Call: WRITE
  • Prompt: !,NAME,?23,HRN,?30,COMM,?43,SEX,?46,AGE,?50,DEN1,?65,NUM1
  • Line Location: DATA2+16
Function Call: WRITE
  • Prompt: !,"Pts 18-75 w/diabetes",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?64,$P(STRING3,U,1)
  • Line Location: FT1+17
Function Call: WRITE
  • Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?64,$P(STRING3,U,4)
  • Line Location: FT1+19
Function Call: WRITE
  • Prompt: !,"Pts 18-75 w/diabetes less Exc",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?64,$P(STRING3,U,3)
  • Line Location: FT1+21
Function Call: WRITE
  • Prompt: !!,"# w/foot exam",?33,$P(STRING1,U,2),?38,$J($P(STRING1,U,5),5,1),?44,$P(STRING2,U,2),?49,$J($P(STRING2,U,5),5,1),?56,$J($FN(PRD,",+",1),6),?64,$P(STRING3,U,2),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRN,",+",1),6)
  • Line Location: FT1+23
Function Call: WRITE
  • Prompt: !,"# w/o foot exam",?33,$P(STRING1,U,8),?38,$J($P(STRING1,U,9),5,1),?44,$P(STRING2,U,8),?49,$J($P(STRING2,U,9),5,1),?56,$J($FN(PRD3,",+",1),6),?64,$P(STRING3,U,8),?68,$J($P(STRING3,U,9),5,1),?74,$J($FN(PRN3,",+",1),6)
  • Line Location: FT1+25
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?70,"NUMERATOR"
  • Line Location: FT2+19
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: FT2+20
Function Call: WRITE
  • Prompt: !!,"Total # of patients on list: "_PTCT
  • Line Location: FT2+42

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^AUPNPAT - [#9000001] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DATA+11, DATA2+6
^TMP("BGPMU SUMMARY" SUMMARY1+2!, SUMMARY1+3*, SUMMARY1+8*, SUMMARY2+2!, SUMMARY2+3*, SUMMARY2+7*
^TMP("BGPMU0055" EYE+2!, NUM55+2, NUM55+3, NUM55+4, NUM55+5
^TMP("BGPMU0056" FOOT+2!, FT56+2, FT56+3, FT56+4, FT56+5

Label References

Name Line Occurrences
$$FT56 FT1+2, FT1+3, FT1+4
$$NUM55 P1+5, P1+6, P1+7
DATA P2+28, P2+35, P2+42
DATA2 FT2+27, FT2+34, FT2+41
FT1 FOOT+1
FT2 FT1+27
P1 EYE+1
P2 P1+31
SUMMARY1 P1+8
SUMMARY2 FT1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE DATA+1~, DATA+5*, DATA+16, DATA2+5*, DATA2+16
ARRAY NUM55+1~, NUM55+16*, NUM55+17, FT56+1~, FT56+16*, FT56+17
BGPARR P2+1~, P2+23!, P2+24, P2+30!, P2+31, P2+37!, P2+38, FT2+1~, FT2+22!, FT2+23
, FT2+29!, FT2+30, FT2+36!, FT2+37
BGPARR( P2+25, P2+27, P2+32, P2+34, P2+39, P2+41, FT2+24, FT2+26, FT2+31, FT2+33
, FT2+38, FT2+40
>> BGPED DATA+5, DATA2+5
>> BGPIC P1+31, FT1+27, SUMMARY1+2, SUMMARY1+3, SUMMARY1+8, SUMMARY2+2, SUMMARY2+3, SUMMARY2+7
>> BGPIOSL P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P2+19, DATA+12, DATA2+12, FT1+16
, FT1+18, FT1+20, FT1+22, FT1+24, FT1+26, FT2+18
>> BGPLIST P2+22, P2+29, P2+36, FT2+21, FT2+28, FT2+35
>> BGPLIST( P1+31, FT1+27
>> BGPPTYPE P2+4, P2+5, P2+6, P2+7, P2+8, P2+9, P2+10, P2+11, P2+12, P2+13
, P2+14, P2+15, P2+16, P2+17, P2+18, FT2+3, FT2+4, FT2+5, FT2+6, FT2+7
, FT2+8, FT2+9, FT2+10, FT2+11, FT2+12, FT2+13, FT2+14, FT2+15, FT2+16
>> BGPQUIT P1+18, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P2+19, DATA+13, DATA2+13
, FT1+14, FT1+16, FT1+18, FT1+20, FT1+22, FT1+24, FT1+26, FT2+18
BMI P2+1~
BP FT2+1~
COMM DATA+1~, DATA+10*, DATA+16, DATA2+1~, DATA2+7*, DATA2+16
CT SUMMARY1~
D DATE~, DATE+1, DATE+2
DEN NUM55+1~, NUM55+2*, NUM55+6, NUM55+7, NUM55+8, NUM55+10, NUM55+11, NUM55+13, NUM55+14, NUM55+16
, DATA+1~, DATA+6*, DATA+7, DATA2+1~, DATA2+8*, DATA2+9, FT1+1~, FT56+1~, FT56+2*, FT56+6
, FT56+7, FT56+8, FT56+10, FT56+11, FT56+12, FT56+13, FT56+14, FT56+16
DEN1 P1+2~, DATA+1~, DATA+7*, DATA+16, DATA2+1~, DATA2+9*, DATA2+16
DEN2 P1+2~, DATA+1~, DATA+7*, DATA+17, DATA+18, DATA2+1~, DATA2+9*, DATA2+17, DATA2+18
DEN3 DATA+1~, DATA+7*, DATA+19, DATA+20, DATA2+1~, DATA2+9*, DATA2+19, DATA2+20
DESC SUMMARY1+1~, SUMMARY1+4*, SUMMARY1+6, SUMMARY2+1~, SUMMARY2+4*, SUMMARY2+5
DESC2 SUMMARY1+1~
DFN DATA+1~, DATA+2*, DATA+4, DATA+5, DATA+10, DATA+11, DATA2+2*, DATA2+4, DATA2+5, DATA2+6
, DATA2+7
DUZ(2 DATA+4, DATA2+4
EXC NUM55+1~, NUM55+5*, NUM55+6, NUM55+10, NUM55+14, NUM55+16, FT56+1~, FT56+5*, FT56+6, FT56+10
, FT56+14, FT56+16
EXC1 P1+2~
EXC2 P1+2~
FOL P2+1~
HRN DATA+1~, DATA+4*, DATA+16, DATA2+1~, DATA2+4*, DATA2+16
LINE P2+1~, P2+21*, DATA+1~, DATA+15*, DATA2+1~, DATA2+15*, FT2+1~, FT2+20*, SUMMARY1+1~, SUMMARY1+5*
, SUMMARY1+6*, SUMMARY1+7*, SUMMARY1+8, SUMMARY2+5*, SUMMARY2+6*, SUMMARY2+7
LIST1 P1+1~
LIST2 P1+1~
LIST3 P1+1~
NAME P2+1~, DATA+1~, DATA+3*, DATA+16, DATA2+1~, DATA2+3*, DATA2+16, FT2+1~
NNUM NUM55+1~, NUM55+6*, NUM55+8, NUM55+11, NUM55+12, NUM55+13, NUM55+15, NUM55+16, FT56+1~, FT56+6*
, FT56+8, FT56+11, FT56+13, FT56+15, FT56+16
NODE P2+1~, P2+27*, P2+28, P2+34*, P2+35, P2+41*, P2+42, DATA~, DATA+2, DATA+3
, DATA+6, DATA+8, DATA2~, DATA2+2, DATA2+3, DATA2+8, DATA2+10, FT2+1~, FT2+26*, FT2+27
, FT2+33*, FT2+34, FT2+40*, FT2+41
NOT NUM55+1~, NUM55+4*, NUM55+15, NUM55+16, FT56+1~, FT56+4*, FT56+15, FT56+16
NUM NUM55+1~, NUM55+3*, NUM55+12, NUM55+16, DATA+1~, DATA+8*, DATA+9, DATA2+10*, DATA2+11, FT1+1~
, FT56+1~, FT56+3*, FT56+12, FT56+16
NUM1 P1+2~, DATA+1~, DATA+9*, DATA+16, DATA2+1~, DATA2+11*, DATA2+16
NUM2 P1+2~, DATA+1~, DATA+9*, DATA+18, DATA2+1~, DATA2+11*, DATA2+18
PC FT1+1~
PC1 P1+2~, NUM55+1~, NUM55+7*, NUM55+9*, NUM55+12*, NUM55+16, FT56+1~, FT56+7*, FT56+9*, FT56+12*
, FT56+16
PC11 NUM55+1~, NUM55+7*, NUM55+9*, NUM55+13*, NUM55+16, FT56+9*
PC13 NUM55+1~, NUM55+7*, NUM55+10*, NUM55+14*, NUM55+16, FT56+10*
PC14 NUM55+1~, NUM55+7*, NUM55+9*, NUM55+15*, NUM55+16, FT56+9*
PC2 P1+2~, NUM55+1~, FT56+1~, FT56+7*, FT56+13*, FT56+16
PC3 FT56+1~, FT56+7*, FT56+14*, FT56+16
PC4 FT56+1~, FT56+7*, FT56+15*, FT56+16
PRD FT1+1~, FT1+6*, FT1+23
PRD1 P1+3~, P1+10*, P1+27, FT1+1~, FT1+7*
PRD2 P1+3~, P1+11*, FT1+1~, FT1+8*
PRD3 P1+3~, P1+12*, FT1+1~, FT1+9*, FT1+25
PRD4 P1+3~
PRD5 P1+3~
PRD6 P1+3~
PRD7 P1+3~, P1+13*, P1+29
PRD8 P1+3~
PRN FT1+1~, FT1+10*, FT1+23
PRN1 P1+3~, P1+14*, P1+27, FT1+1~, FT1+11*
PRN2 P1+3~, P1+15*, FT1+1~, FT1+12*
PRN3 P1+3~, P1+16*, FT1+1~, FT1+13*, FT1+25
PRN4 P1+3~
PRN5 P1+3~
PRN6 P1+3~
PRN7 P1+3~, P1+17*, P1+29
PRN8 P1+3~
PT P2+1~, P2+25*, P2+27, P2+32*, P2+34, P2+39*, P2+41, FT2+1~, FT2+24*, FT2+26
, FT2+31*, FT2+33, FT2+38*, FT2+40
PTCT P2+1~, P2+2*, P2+26*, P2+33*, P2+40*, P2+43, FT2+1~, FT2+17*, FT2+25*, FT2+32*
, FT2+39*, FT2+42
SEX DATA+1~, DATA+11*, DATA+16, DATA2+1~, DATA2+6*, DATA2+16
STRING1 P1+2~, P1+5*, P1+8, P1+10, P1+11, P1+12, P1+13, P1+14, P1+15, P1+16
, P1+17, P1+21, P1+23, P1+25, P1+27, P1+29, FT1+1~, FT1+2*, FT1+5, FT1+6
, FT1+7, FT1+8, FT1+9, FT1+10, FT1+11, FT1+12, FT1+13, FT1+17, FT1+19, FT1+21
, FT1+23, FT1+25, SUMMARY1~, SUMMARY1+6, SUMMARY2~, SUMMARY2+5
STRING2 P1+2~, P1+6*, P1+8, P1+10, P1+11, P1+12, P1+13, P1+21, P1+23, P1+25
, P1+27, P1+29, FT1+1~, FT1+3*, FT1+5, FT1+6, FT1+7, FT1+8, FT1+9, FT1+17
, FT1+19, FT1+21, FT1+23, FT1+25, SUMMARY1~, SUMMARY1+7, SUMMARY2~, SUMMARY2+6
STRING3 P1+2~, P1+7*, P1+8, P1+14, P1+15, P1+16, P1+17, P1+21, P1+23, P1+25
, P1+27, P1+29, FT1+4*, FT1+5, FT1+10, FT1+11, FT1+12, FT1+13, FT1+17, FT1+19
, FT1+21, FT1+23, FT1+25, SUMMARY1~, SUMMARY1+7, SUMMARY2~, SUMMARY2+6
SUMCT P1+2~, P1+4*
TF NUM55~, NUM55+2, NUM55+3, NUM55+4, NUM55+5, FT56~, FT56+2, FT56+3, FT56+4, FT56+5
U P1+10, P1+11, P1+12, P1+13, P1+14, P1+15, P1+16, P1+17, P1+21, P1+23
, P1+25, P1+27, P1+29, NUM55+16, DATA+2, DATA+3, DATA+6, DATA+8, DATA+11, DATA2+2
, DATA2+3, DATA2+6, DATA2+8, DATA2+10, FT1+6, FT1+7, FT1+8, FT1+9, FT1+10, FT1+11
, FT1+12, FT1+13, FT1+17, FT1+19, FT1+21, FT1+23, FT1+25, FT56+16, SUMMARY1+6, SUMMARY1+7
, SUMMARY2+5, SUMMARY2+6
VST P2+1~
X P1+1~, P2+1~, P2+4*, P2+5*, P2+6*, P2+7*, P2+8*, P2+9*, P2+10*, P2+11*
, P2+12*, P2+13*, P2+14*, P2+15*, P2+16*, P2+17*, P2+18*, FT1+1~, FT2+3*, FT2+4*
, FT2+5*, FT2+6*, FT2+7*, FT2+8*, FT2+9*, FT2+10*, FT2+11*, FT2+12*, FT2+13*, FT2+14*
, FT2+15*, FT2+16*
Y P1+1~, FT1+1~
Z P1+1~, FT1+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All