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 |  Marked Items |  All
Print Page as PDF
Routine: BGPMUGP5

Package: IHS GPRA Information System

Routine: BGPMUGP5


Information

BGPMUGP5 ; IHS/MSC/MMT - Print MU EP measures NQF0036 ;20-Aug-2011 11:27;DU

Source Information

Source file <BGPMUGP5.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS GPRA Information System 4 $$ROUND^BGPMUA01  (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 BGPMUGD5  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Do the Details
ASTPHARM ;EP
P1 ;Write individual measure
P1SUB(POP) ;Population tabular output
SUMSUB(POP,DESC) ;create array entry for summary line
DATA(NODE) ;GET DATA
LISTSUB(POP) ;write out patient list for given population
NUM36(TF,ARRAY) ;Get the numbers for this measure
P1TEXT ;Text lines for output
XML36 ;Populate the BGPXML array with data for each population/numerator
; BGPXMLOUT(i)=PQRI number^""^Denominator Count^Numerator Count^Exclusion Count
SUMMARY1(STRING1,STRING2,STRING3,CT) ;Summmary setup
NUMSUB(POP) ;pull numbers out of temp global

External References

Name Field # of Occurrence
$$AGE^AUPNPAT DATA+5
$$HRN^AUPNPAT DATA+4
$$ROUND^BGPMUA01 NUMSUB+10, NUMSUB+11
HDRBLK^BGPMUPH P1+11, P1SUB+5, P1SUB+9, P1SUB+11, P1SUB+14, P1SUB+17
HEADER^BGPMUPH P1+10, P1SUB+5, P1SUB+9, P1SUB+11, P1SUB+14, P1SUB+17
HEADERL^BGPMUPH P2+2, P2+18, DATA+12
W^BGPMUPP P2+3, 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
PTLSORT^BGPMUUTL LISTSUB+4, LISTSUB+11, LISTSUB+18
$$GET1^DIQ DATA+3, DATA+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Denominator ",POP
  • Line Location: P1SUB+6
Function Call: WRITE
  • Prompt: !!,$P($T(P1TEXT+POP),";;",2),?33,$P(STRING1(POP),U,1),?44,$P(STRING2(POP),U,1),?64,$P(STRING3(POP),U,1)
  • Line Location: P1SUB+7
Function Call: WRITE
  • Prompt: !,"indicative of asthma"
  • Line Location: P1SUB+8
Function Call: WRITE
  • Prompt: !,"# Excluded (Exc)",?33,$P(STRING1(POP),U,4),?44,$P(STRING2(POP),U,4),?64,$P(STRING3(POP),U,4)
  • Line Location: P1SUB+10
Function Call: WRITE
  • Prompt: !,$P($T(P1TEXT+POP),";;",2),?33,$P(STRING1(POP),U,3),?44,$P(STRING2(POP),U,3),?64,$P(STRING3(POP),U,3)
  • Line Location: P1SUB+12
Function Call: WRITE
  • Prompt: !,"indicative of asthma less Exc"
  • Line Location: P1SUB+13
Function Call: WRITE
  • Prompt: !!,"# w/asthma medications",?33,$P(STRING1(POP),U,2),?38,$J($P(STRING1(POP),U,5),5,1),?44,$P(STRING2(POP),U,2)
  • Line Location: P1SUB+15
Function Call: WRITE
  • Prompt: ?49,$J($P(STRING2(POP),U,5),5,1),?56,$J($FN(PRD1,",+",1),6),?64,$P(STRING3(POP),U,2),?68,$J($P(STRING3(POP),U,5),5,1),?74,$J($FN(PRN1,",+",1),6)
  • Line Location: P1SUB+16
Function Call: WRITE
  • Prompt: !,"# w/o asthma medications",?33,$P(STRING1(POP),U,6),?38,$J($P(STRING1(POP),U,7),5,1),?44,$P(STRING2(POP),U,6)
  • Line Location: P1SUB+18
Function Call: WRITE
  • Prompt: ?49,$J($P(STRING2(POP),U,7),5,1),?56,$J($FN(PRD4,",+",1),6),?64,$P(STRING3(POP),U,6),?68,$J($P(STRING3(POP),U,7),5,1),?74,$J($FN(PRN4,",+",1),6)
  • Line Location: P1SUB+19
Function Call: WRITE
  • Prompt: !!,"Patients 5-11"
  • Line Location: P2+19
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: !!,"Patients 12-50"
  • Line Location: P2+23
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?65,"NUMERATOR"
  • Line Location: P2+24
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2+25
Function Call: WRITE
  • Prompt: !!,"Total # of patients on list: "_PTCT
  • Line Location: LISTSUB+23
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: DATA+14
Function Call: WRITE
  • Prompt: !,NAME,?23,HRN,?30,COMM,?43,SEX,?46,AGE,?50,DEN1,?65,NUM
  • Line Location: DATA+15
Function Call: WRITE
  • Prompt: !,?50,$P(DEN,";",I)
  • Line Location: DATA+17

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+10
^TMP("BGPMU SUMMARY" SUMMARY1+2!, SUMMARY1+3*, SUMSUB+4*
^TMP("BGPMU0036" ASTPHARM+2!, NUMSUB+1, NUMSUB+2, NUMSUB+3, NUMSUB+4, XML36+2, XML36+3!

Label References

Name Line Occurrences
$$NUMSUB NUM36+2
DATA LISTSUB+8, LISTSUB+15, LISTSUB+22
LISTSUB P2+22, P2+26
NUM36 P1+6, P1+7, P1+8
P1 ASTPHARM+1
P1SUB P1+12, P1+13, P1+14
P2 P1+15
SUMMARY1 P1+9
SUMSUB SUMMARY1+5, SUMMARY1+7, SUMMARY1+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE DATA+1~, DATA+5*, DATA+15
ARRAY NUM36~
ARRAY( NUM36+2*
BGPARR P2+1~, LISTSUB+3!, LISTSUB+4, LISTSUB+10!, LISTSUB+11, LISTSUB+17!, LISTSUB+18
BGPARR( LISTSUB+5, LISTSUB+7, LISTSUB+12, LISTSUB+14, LISTSUB+19, LISTSUB+21
>> BGPED DATA+5
>> BGPIC P1+15, SUMMARY1+2, SUMMARY1+3, SUMSUB+4
>> BGPIOSL P1SUB+5, P1SUB+9, P1SUB+11, P1SUB+14, P1SUB+17, P2+18, DATA+11
>> BGPLIST LISTSUB+2, LISTSUB+9, LISTSUB+16
>> BGPLIST( P1+15
>> BGPPTYPE P2+3, 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
>> BGPQUIT P1+10, P1SUB+5, P1SUB+9, P1SUB+11, P1SUB+14, P1SUB+17, P2+18, DATA+12
>> BGPXML(1 XML36+2*
BMI P2+1~
COMM DATA+1~, DATA+9*, DATA+15
CT SUMMARY1~
DEN DATA+1~, DATA+6*, DATA+7, DATA+16, DATA+17
DEN1 P1+2~, DATA+1~, DATA+7*, DATA+15
DEN2 P1+2~, DATA+1~
DEN3 DATA+1~
DENLEN DATA+1~, DATA+16*, DATA+17
DENTOT NUM36+1~, NUMSUB+1*, NUMSUB+5, NUMSUB+6, NUMSUB+7, NUMSUB+9, NUMSUB+12
DESC SUMMARY1+1~, SUMMARY1+4*, SUMMARY1+5, SUMMARY1+6*, SUMMARY1+7, SUMMARY1+8*, SUMMARY1+9, SUMSUB~, SUMSUB+2
DFN DATA+1~, DATA+2*, DATA+4, DATA+5, DATA+9, DATA+10
DUZ(2 DATA+4
EXC NUM36+1~, NUMSUB+4*, NUMSUB+5, NUMSUB+12
EXC1 P1+2~
EXC2 P1+2~
FINALDEN NUM36+1~, NUMSUB+5*, NUMSUB+7, NUMSUB+9, NUMSUB+10, NUMSUB+11, NUMSUB+12
FOL P2+1~
HRN DATA+1~, DATA+4*, DATA+15
I NUM36+1~, NUM36+2*, DATA+1~, DATA+17*
LINE P2+1~, P2+21*, P2+25*, DATA+1~, DATA+14*, SUMMARY1+1~, SUMSUB+1*, SUMSUB+2*, SUMSUB+3*, SUMSUB+4
LIST1 P1+1~
LIST2 P1+1~
LIST3 P1+1~
NAME P2+1~, DATA+1~, DATA+3*, DATA+15
NODE P2+1~, LISTSUB+7*, LISTSUB+8, LISTSUB+14*, LISTSUB+15, LISTSUB+21*, LISTSUB+22, DATA~, DATA+2, DATA+3
, DATA+6, DATA+8
NOT NUM36+1~, NUMSUB+3*, NUMSUB+11, NUMSUB+12
NOTPCT NUM36+1~, NUMSUB+6*, NUMSUB+8*, NUMSUB+11*, NUMSUB+12
NUM NUM36+1~, NUMSUB+2*, NUMSUB+10, NUMSUB+12, DATA+1~, DATA+8*, DATA+15
NUM1 P1+2~, DATA+1~
NUM2 P1+2~, DATA+1~
NUMPCT P1+2~, NUM36+1~, NUMSUB+6*, NUMSUB+8*, NUMSUB+10*, NUMSUB+12
PC2 P1+2~
POP P1SUB~, P1SUB+1, P1SUB+2, P1SUB+3, P1SUB+4, P1SUB+6, P1SUB+7, P1SUB+10, P1SUB+12, P1SUB+15
, P1SUB+16, P1SUB+18, P1SUB+19, NUMSUB~, NUMSUB+1, NUMSUB+2, NUMSUB+3, NUMSUB+4, LISTSUB~, LISTSUB+4
, LISTSUB+11, LISTSUB+18, SUMSUB~, SUMSUB+2, SUMSUB+3, SUMSUB+4
PRD1 P1+3~, P1SUB+1*, P1SUB+16
PRD4 P1+3~, P1SUB+2*, P1SUB+19
PRN1 P1+3~, P1SUB+3*, P1SUB+16
PRN4 P1+3~, P1SUB+4*, P1SUB+19
PT P2+1~, LISTSUB+5*, LISTSUB+7, LISTSUB+12*, LISTSUB+14, LISTSUB+19*, LISTSUB+21
PTCT P2+1~, LISTSUB+1*, LISTSUB+6*, LISTSUB+13*, LISTSUB+20*, LISTSUB+23
SEX DATA+1~, DATA+10*, DATA+15
STRING NUM36+1~, NUMSUB+12*, NUMSUB+13
STRING1 P1+2~, P1+4!, P1+6, P1+9, SUMMARY1~
STRING1( P1SUB+1, P1SUB+2, P1SUB+3, P1SUB+4, P1SUB+7, P1SUB+10, P1SUB+12, P1SUB+15, P1SUB+18, SUMSUB+2
STRING2 P1+2~, P1+4!, P1+7, P1+9, SUMMARY1~
STRING2( P1SUB+1, P1SUB+2, P1SUB+7, P1SUB+10, P1SUB+12, P1SUB+15, P1SUB+16, P1SUB+18, P1SUB+19, SUMSUB+3
STRING3 P1+2~, P1+4!, P1+8, P1+9, SUMMARY1~
STRING3( P1SUB+3, P1SUB+4, P1SUB+7, P1SUB+10, P1SUB+12, P1SUB+16, P1SUB+19, SUMSUB+3
SUMCT P1+2~, P1+5*
TF NUM36~, NUMSUB+1, NUMSUB+2, NUMSUB+3, NUMSUB+4
U P1SUB+1, P1SUB+2, P1SUB+3, P1SUB+4, P1SUB+7, P1SUB+10, P1SUB+12, P1SUB+15, P1SUB+16, P1SUB+18
, P1SUB+19, NUMSUB+12, DATA+2, DATA+3, DATA+6, DATA+8, DATA+10, SUMSUB+2, SUMSUB+3, XML36+2
VST P2+1~
X P1+1~, P2+1~, P2+3*, 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*
Y P1+1~
Z P1+1~

Marked Items

Name Field # of Occurrence
$T(P1TEXT+POP P1SUB+7, P1SUB+12
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 |  Marked Items |  All