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: BGPMUAP7

Package: IHS GPRA Information System

Routine: BGPMUAP7


Information

BGPMUAP7 ; IHS/MSC/MGH - MU EP measures NQF0067 and NQF0070 ;21-Jul-2011 15:08;DU

Source Information

Source file <BGPMUAP7.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: 1

Package Total Caller Graph
IHS GPRA Information System 1 BGPMUAD7  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Do the Details
CAD1 ;EP
P1 ;Write individual measure
CADBB ;EP
DATE(D) ;EP
DATA2(NODE) ;GET DATA
DATA(NODE) ;GET DATA
BETA ;Write individual measure
BETA2 ;Do the Details
NUM70(TF) ;Get the numbers for this measure
NUM67(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 NUM67+10, NUM67+12, NUM67+13, NUM67+14, NUM67+15, NUM70+10, NUM70+12, NUM70+13, NUM70+14, NUM70+15
$$DATE^BGPMUAP3 DATA+9, DATA2+11
HDRBLK^BGPMUPH P1+19, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P1+32, P1+34, BETA+16
, BETA+17, BETA+19, BETA+21, BETA+23, BETA+25, BETA+27, BETA+29, BETA+31
HEADER^BGPMUPH P1+18, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P1+32, P1+34, BETA+15
, BETA+17, BETA+19, BETA+21, BETA+23, BETA+25, BETA+27, BETA+29, BETA+31
HEADERL^BGPMUPH P2+3, P2+20, DATA+13, DATA2+13, BETA2+2, BETA2+20
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, P2+19, BETA2+3, BETA2+4, BETA2+5, BETA2+6
, BETA2+7, BETA2+8, BETA2+9, BETA2+10, BETA2+11, BETA2+12, BETA2+13, BETA2+14, BETA2+15, BETA2+16
, BETA2+17, BETA2+18
PTLSORT^BGPMUUTL P2+25, P2+32, P2+39, BETA2+25, BETA2+32, BETA2+39
$$GET1^DIQ DATA+3, DATA+10, DATA2+3, DATA2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Pts 18+ w/CAD or cardiac",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?64,$P(STRING3,U,1)
  • Line Location: P1+21
Function Call: WRITE
  • Prompt: !,"surgery"
  • Line Location: P1+23
Function Call: WRITE
  • Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?64,$P(STRING3,U,4)
  • Line Location: P1+25
Function Call: WRITE
  • Prompt: !,"Pts 18+ w/CAD or cardiac",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?64,$P(STRING3,U,3)
  • Line Location: P1+27
Function Call: WRITE
  • Prompt: !,"surgery less Exc"
  • Line Location: P1+29
Function Call: WRITE
  • Prompt: !!,"# w/antiplatelet therapy",?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+31
Function Call: WRITE
  • Prompt: !,"# w/o antiplatelet therapy",?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(PRD4,",+",1),6),?64,$P(STRING3,U,8),?68,$J($P(STRING3,U,9),5,1),?74,$J($FN(PRN4,",+",1),6)
  • Line Location: P1+33
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?65,"NUMERATOR"
  • Line Location: P2+21
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2+22
Function Call: WRITE
  • Prompt: !!,"Total # of patients on list: "_PTCT
  • Line Location: P2+44
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_" "_NUM2
  • 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_" "_NUM2
  • Line Location: DATA2+16
Function Call: WRITE
  • Prompt: !,"Pts 18+ w/CAD or cardiac",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?64,$P(STRING3,U,1)
  • Line Location: BETA+18
Function Call: WRITE
  • Prompt: !,"surgery"
  • Line Location: BETA+20
Function Call: WRITE
  • Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?64,$P(STRING3,U,4)
  • Line Location: BETA+22
Function Call: WRITE
  • Prompt: !,"Pts 18+ w/CAD or cardiac",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?64,$P(STRING3,U,3)
  • Line Location: BETA+24
Function Call: WRITE
  • Prompt: !,"surgery less exc"
  • Line Location: BETA+26
Function Call: WRITE
  • Prompt: !!,"# w/beta-blocker therapy",?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: BETA+28
Function Call: WRITE
  • Prompt: !,"# w/o beta-blocker therapy",?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(PRD4,",+",1),6),?64,$P(STRING3,U,8),?68,$J($P(STRING3,U,9),5,1),?74,$J($FN(PRN4,",+",1),6)
  • Line Location: BETA+30
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?70,"NUMERATOR"
  • Line Location: BETA2+21
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: BETA2+22
Function Call: WRITE
  • Prompt: !!,"Total # of patients on list: "_PTCT
  • Line Location: BETA2+44

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+7*, SUMMARY2+2!, SUMMARY2+3*, SUMMARY2+7*
^TMP("BGPMU0067" CAD1+2!, NUM67+2, NUM67+3, NUM67+4, NUM67+5
^TMP("BGPMU0070" CADBB+2!, NUM70+2, NUM70+3, NUM70+4, NUM70+5

Label References

Name Line Occurrences
$$NUM67 P1+5, P1+6, P1+7
$$NUM70 BETA+2, BETA+3, BETA+4
BETA CADBB+1
BETA2 BETA+32
DATA P2+29, P2+36, P2+43
DATA2 BETA2+29, BETA2+36, BETA2+43
P1 CAD1+1
P2 P1+35
SUMMARY1 P1+8
SUMMARY2 BETA+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 NUM67+1~, NUM67+16*, NUM67+17, NUM70+1~, NUM70+16*, NUM70+17, NUM70+18
BGPARR P2+1~, P2+24!, P2+25, P2+31!, P2+32, P2+38!, P2+39, BETA2+1~, BETA2+24!, BETA2+25
, BETA2+31!, BETA2+32, BETA2+38!, BETA2+39
BGPARR( P2+26, P2+28, P2+33, P2+35, P2+40, P2+42, BETA2+26, BETA2+28, BETA2+33, BETA2+35
, BETA2+40, BETA2+42
>> BGPED DATA+5, DATA2+5
>> BGPIC P1+35, BETA+32, SUMMARY1+2, SUMMARY1+3, SUMMARY1+7, SUMMARY2+2, SUMMARY2+3, SUMMARY2+7
>> BGPIOSL P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P1+32, P1+34, P2+20, DATA+12
, DATA2+12, BETA+17, BETA+19, BETA+21, BETA+23, BETA+25, BETA+27, BETA+29, BETA+31, BETA2+20
>> BGPLIST P2+23, P2+30, P2+37, BETA2+23, BETA2+30, BETA2+37
>> BGPLIST( P1+35, BETA+32
>> 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, P2+19, BETA2+3, BETA2+4, BETA2+5, BETA2+6
, BETA2+7, BETA2+8, BETA2+9, BETA2+10, BETA2+11, BETA2+12, BETA2+13, BETA2+14, BETA2+15, BETA2+16
, BETA2+17, BETA2+18
>> BGPQUIT P1+18, P1+20, P1+22, P1+24, P1+26, P1+28, P1+30, P1+32, P1+34, P2+20
, DATA+13, DATA2+13, BETA+15, BETA+17, BETA+19, BETA+21, BETA+23, BETA+25, BETA+27, BETA+29
, BETA+31, BETA2+20
BMI P2+1~
BP BETA2+1~
COMM DATA+1~, DATA+10*, DATA+16, DATA2+1~, DATA2+7*, DATA2+16
CT SUMMARY1~
D DATE~, DATE+1, DATE+2
DEN NUM67+1~, NUM67+2*, NUM67+6, NUM67+7, NUM67+8, NUM67+10, NUM67+11, NUM67+13, NUM67+14, NUM67+16
, DATA+1~, DATA+6*, DATA+7, DATA2+1~, DATA2+8*, DATA2+9, BETA+1~, NUM70+1~, NUM70+2*, NUM70+6
, NUM70+7, NUM70+8, NUM70+10, NUM70+11, NUM70+13, NUM70+14, NUM70+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+5, 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 NUM67+1~, NUM67+5*, NUM67+6, NUM67+10, NUM67+14, NUM67+16, NUM70+1~, NUM70+5*, NUM70+6, NUM70+10
, NUM70+14, NUM70+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+22*, DATA+1~, DATA+15*, DATA2+1~, DATA2+15*, BETA2+1~, BETA2+22*, SUMMARY1+1~, SUMMARY1+5*
, SUMMARY1+6*, SUMMARY1+7, 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, BETA2+1~
NNUM NUM67+1~, NUM67+6*, NUM67+8, NUM67+11, NUM67+12, NUM67+13, NUM67+15, NUM67+16, NUM70+1~, NUM70+6*
, NUM70+8, NUM70+11, NUM70+12, NUM70+13, NUM70+15, NUM70+16
NODE P2+1~, P2+28*, P2+29, P2+35*, P2+36, P2+42*, P2+43, DATA~, DATA+2, DATA+3
, DATA+6, DATA+8, DATA2~, DATA2+2, DATA2+3, DATA2+8, DATA2+10, BETA2+1~, BETA2+28*, BETA2+29
, BETA2+35*, BETA2+36, BETA2+42*, BETA2+43
NOT NUM67+1~, NUM67+4*, NUM67+15, NUM67+16, NUM70+1~, NUM70+4*, NUM70+15, NUM70+16
NUM NUM67+1~, NUM67+3*, NUM67+12, NUM67+16, DATA+1~, DATA+8*, DATA+9, DATA2+10*, DATA2+11, BETA+1~
, NUM70+1~, NUM70+3*, NUM70+12, NUM70+16
NUM1 P1+2~, DATA+1~, DATA+9*, DATA+16, DATA2+1~, DATA2+11*, DATA2+16
NUM2 P1+2~, DATA+1~, DATA+9*, DATA+16, DATA2+1~, DATA2+11*, DATA2+16
PC BETA+1~
PC1 P1+2~, NUM67+1~, NUM67+7*, NUM67+9*, NUM67+12*, NUM67+16, NUM70+1~, NUM70+7*, NUM70+9*, NUM70+12*
, NUM70+16
PC11 NUM67+1~, NUM67+7*, NUM67+9*, NUM67+13*, NUM67+16, NUM70+1~, NUM70+7*, NUM70+9*, NUM70+13*, NUM70+16
PC13 NUM67+1~, NUM67+7*, NUM67+10*, NUM67+14*, NUM67+16, NUM70+1~, NUM70+7*, NUM70+10*, NUM70+14*, NUM70+16
PC14 NUM67+1~, NUM67+7*, NUM67+9*, NUM67+15*, NUM67+16, NUM70+1~, NUM70+7*, NUM70+9*, NUM70+15*, NUM70+16
PC2 P1+2~, NUM67+1~, NUM70+1~
PRD BETA+1~
PRD1 P1+3~, P1+10*, P1+31, BETA+1~, BETA+7*, BETA+28
PRD2 P1+3~, P1+11*, BETA+1~, BETA+8*
PRD3 P1+3~, P1+12*, BETA+1~, BETA+9*
PRD4 P1+3~, P1+13*, P1+33, BETA+1~, BETA+10*, BETA+30
PRD5 P1+3~, BETA+1~
PRD6 P1+3~
PRN BETA+1~
PRN1 P1+3~, P1+14*, P1+31, BETA+1~, BETA+11*, BETA+28
PRN2 P1+3~, P1+15*, BETA+1~, BETA+12*
PRN3 P1+3~, P1+16*, BETA+1~, BETA+13*
PRN4 P1+3~, P1+17*, P1+33, BETA+1~, BETA+14*, BETA+30
PRN5 P1+3~, BETA+1~
PRN6 P1+3~
PT P2+1~, P2+26*, P2+28, P2+33*, P2+35, P2+40*, P2+42, BETA2+1~, BETA2+26*, BETA2+28
, BETA2+33*, BETA2+35, BETA2+40*, BETA2+42
PTCT P2+1~, P2+2*, P2+27*, P2+34*, P2+41*, P2+44, BETA2+1~, BETA2+19*, BETA2+27*, BETA2+34*
, BETA2+41*, BETA2+44
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+25, P1+27, P1+31, P1+33, BETA+1~, BETA+2*, BETA+5, BETA+7
, BETA+8, BETA+9, BETA+10, BETA+11, BETA+12, BETA+13, BETA+14, BETA+18, BETA+22, BETA+24
, BETA+28, BETA+30, SUMMARY1~, SUMMARY1+5, SUMMARY2~, SUMMARY2+5
STRING2 P1+2~, P1+6*, P1+8, P1+10, P1+11, P1+12, P1+13, P1+21, P1+25, P1+27
, P1+31, P1+33, BETA+1~, BETA+3*, BETA+5, BETA+7, BETA+8, BETA+9, BETA+10, BETA+18
, BETA+22, BETA+24, BETA+28, BETA+30, SUMMARY1~, SUMMARY1+6, SUMMARY2~, SUMMARY2+6
STRING3 P1+2~, P1+7*, P1+8, P1+14, P1+15, P1+16, P1+17, P1+21, P1+25, P1+27
, P1+31, P1+33, BETA+4*, BETA+5, BETA+11, BETA+12, BETA+13, BETA+14, BETA+18, BETA+22
, BETA+24, BETA+28, BETA+30, SUMMARY1~, SUMMARY1+6, SUMMARY2~, SUMMARY2+6
SUMCT P1+2~, P1+4*
TF NUM67~, NUM67+2, NUM67+3, NUM67+4, NUM67+5, NUM70~, NUM70+2, NUM70+3, NUM70+4, NUM70+5
U P1+10, P1+11, P1+12, P1+13, P1+14, P1+15, P1+16, P1+17, P1+21, P1+25
, P1+27, P1+31, P1+33, NUM67+16, DATA+2, DATA+3, DATA+6, DATA+8, DATA+11, DATA2+2
, DATA2+3, DATA2+6, DATA2+8, DATA2+10, BETA+7, BETA+8, BETA+9, BETA+10, BETA+11, BETA+12
, BETA+13, BETA+14, BETA+18, BETA+22, BETA+24, BETA+28, BETA+30, NUM70+16, SUMMARY1+5, SUMMARY1+6
, 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*, P2+19*, BETA+1~, BETA2+3*
, BETA2+4*, BETA2+5*, BETA2+6*, BETA2+7*, BETA2+8*, BETA2+9*, BETA2+10*, BETA2+11*, BETA2+12*, BETA2+13*
, BETA2+14*, BETA2+15*, BETA2+16*, BETA2+17*, BETA2+18*
Y P1+1~, BETA+1~
Z P1+1~, BETA+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