Routine: BGPMUFP5

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

Package	Total	Caller Graph
IHS GPRA Information System	1	BGPMUFD5

Name	Comments	DBIA/ICR reference
P2	;Do the Details
P1	;Write individual measure
D75(TF)	;Get the numbers for this measure
XML75	;Populate the BGPXML array with data for each population/numerator ; BGPXMLOUT(i)=PQRI number^""^Denominator Count^Numerator Count^Exclusion Count
IVDLDL	;EP
DATA(NODE)	;DISPLAY DATA
SUM75	;Populate "BGPMU SUMMARY" for IVD LDL

Name	Field # of Occurrence
$$AGE^AUPNPAT	DATA+7
$$HRN^AUPNPAT	DATA+6
$$ROUND^BGPMUA01	D75+7, D75+8, SUM75+11, SUM75+12, SUM75+16, SUM75+17, SUM75+21, SUM75+22
HDRBLK^BGPMUPH	P1+15
HEADER^BGPMUPH	P1+14, P1+16, P1+19, P1+24
HEADERL^BGPMUPH	P2+2, P2+24, P2+47, DATA+16
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, P2+18, P2+19, P2+20, P2+21, P2+22 , P2+23, P2+25, P2+26, P2+48, P2+49
$$DATE^BGPMUUTL	DATA+12, DATA+13, DATA+14
PTLSORT^BGPMUUTL	P2+33, P2+41, P2+56, P2+64
$$GET1^DIQ	DATA+5, DATA+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Pts 18+ w/PTCA, AMI, CABG",?33,($P(STRING1,U,1)+$P(STRING1,U,4)),?44,($P(STRING2,U,1)+$P(STRING2,U,4)),?64,($P(STRING3,U,1)+$P(STRING3,U,4)) Line Location: P1+17
Function Call: WRITE	Prompt: !,"or IVD" Line Location: P1+18
Function Call: WRITE	Prompt: !!,"Numerator 1" Line Location: P1+20
Function Call: WRITE	Prompt: !,"# w/LDL test result",?33,$P(STRING1,U,2),?38,$J($P(STRING1,U,3),5,1),?44,$P(STRING2,U,2),?49,$J($P(STRING2,U,3),5,1),?56,$J($FN(PRD,",+",1),6),?64,$P(STRING3,U,2),?68,$J($P(STRING3,U,3),5,1),?74,$J($FN(PRN,",+",1),6) Line Location: P1+21
Function Call: WRITE	Prompt: !,"# w/o LDL test result",?33,($P(STRING1,U,1)-$P(STRING1,U,2)),?38,$J($P(STRING1,U,5),5,1),?44,($P(STRING2,U,1)-$P(STRING2,U,2)),?49,$J($P(STRING2,U,5),5,1),?56,$J($FN(PRD1,",+",1),6) Line Location: P1+22
Function Call: WRITE	Prompt: ?64,($P(STRING3,U,1)-$P(STRING3,U,2)),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRN1,",+",1),6) Line Location: P1+23
Function Call: WRITE	Prompt: !!,"Numerator 2" Line Location: P1+25
Function Call: WRITE	Prompt: !,"w/LDL < 100mg/dL",?33,$P(STRING1,U,6),?38,$J($P(STRING1,U,7),5,1),?44,$P(STRING2,U,6),?49,$J($P(STRING2,U,7),5,1),?56,$J($FN(PRD2,",+",1),6),?64,$P(STRING3,U,6),?68,$J($P(STRING3,U,7),5,1),?74,$J($FN(PRN2,",+",1),6) Line Location: P1+26
Function Call: WRITE	Prompt: !,"w/o LDL < 100mg/dL",?33,($P(STRING1,U,1)-$P(STRING1,U,6)),?38,$J($P(STRING1,U,8),5,1),?44,($P(STRING2,U,1)-$P(STRING2,U,6)),?49,$J($P(STRING2,U,8),5,1),?56,$J($FN(PRD3,",+",1),6) Line Location: P1+27
Function Call: WRITE	Prompt: ?64,($P(STRING3,U,1)-$P(STRING3,U,6)),?68,$J($P(STRING3,U,8),5,1),?74,$J($FN(PRN3,",+",1),6) Line Location: P1+28
Function Call: WRITE	Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?64,"NUMERATOR" Line Location: P2+28
Function Call: WRITE	Prompt: !,LINE Line Location: P2+29
Function Call: WRITE	Prompt: !!,"Total # of patients on list: "_PTCT Line Location: P2+46
Function Call: WRITE	Prompt: !,"PATIENT NAME",?23,"HRN",?30,"COMMUNITY",?42,"SEX",?46,"AGE",?50,"DENOMINATOR",?64,"NUMERATOR" Line Location: P2+51
Function Call: WRITE	Prompt: !,LINE Line Location: P2+52
Function Call: WRITE	Prompt: !!,"Total # of patients on list: "_PTCT Line Location: P2+69
Function Call: WRITE	Prompt: !,LINE Line Location: DATA+18
Function Call: WRITE	Prompt: !,NAME,?23,HRN,?30,COMM,?43,SEX,?46,AGE,?50,DEN1,?64,$S(NOTMET:"NM:",1:"M:"),NUM1 Line Location: DATA+19

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

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DATA+9
^TMP("BGPMU SUMMARY"	SUM75+4!, SUM75+5, SUM75+30, SUM75+38*
^TMP("BGPMU0075"	IVDLDL+2!, D75+2, D75+3, D75+4, XML75+3, XML75+4, XML75+5!, SUM75+8, SUM75+9, SUM75+10 , SUM75+13, SUM75+14, SUM75+15, SUM75+18, SUM75+19, SUM75+20

Name	Line Occurrences
$$D75	P1+3, P1+4, P1+5
DATA	P2+37, P2+45, P2+60, P2+68
P1	IVDLDL+1
P2	P1+29
SUM75	P1+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	DATA+1~, DATA+7*, DATA+19, DATA+22!
>> BDEN1CT	SUM75+18*, SUM75+21, SUM75+22, SUM75+29, SUM75+37
BGPARR	P2+1~, P2+32!, P2+33, P2+40!, P2+41, P2+55!, P2+56, P2+63!, P2+64
BGPARR(	P2+34, P2+36, P2+42, P2+44, P2+57, P2+59, P2+65, P2+67
BGPDNCNT	SUM75+2~, SUM75+3, SUM75+24, SUM75+30, SUM75+32*, SUM75+38
>> BGPED	DATA+7
>> BGPIC	P1+29, SUM75+4, SUM75+5, SUM75+30, SUM75+38
>> BGPIOSL	P1+16, P1+19, P1+24, P2+24, P2+47, DATA+15
>> BGPLIST	P2+30, P2+38, P2+53, P2+61
>> BGPLIST(	P1+29
>> 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, P2+18, P2+19, P2+20, P2+21, P2+22 , P2+23, P2+25, P2+26, P2+48, P2+49
>> BGPQUIT	P1+14, P1+16, P1+19, P1+24, P2+24, P2+47, DATA+16
BGPSSTR	SUM75+2~, SUM75+25, SUM75+27, SUM75+29, SUM75+30, SUM75+32, SUM75+33, SUM75+35, SUM75+37*, SUM75+38
>> BGPXML(1	XML75+3, XML75+4
>> BMP	SUM75+21*, SUM75+29
>> BMP2	SUM75+22*, SUM75+37
>> BNUM1CT	SUM75+19*, SUM75+21, SUM75+29
>> BNUM2CT	SUM75+20*, SUM75+22, SUM75+37
>> CDEN1CT	SUM75+8*, SUM75+11, SUM75+12, SUM75+25, SUM75+33
>> CMP	SUM75+11*, SUM75+25
>> CMP2	SUM75+12*, SUM75+33
>> CNUM1CT	SUM75+9*, SUM75+11, SUM75+25
>> CNUM2CT	SUM75+10*, SUM75+12, SUM75+33
COLON	P2+1~, P2+70!
COMM	DATA+1~, DATA+8*, DATA+19, DATA+22!
DATA	D75+1~, D75+9*, D75+10
DEN	P1+1~, P1+31!, D75+2, D75+5, D75+6, D75+7, D75+8, D75+9, DATA+1~, DATA+10 , DATA+11, DATA+22!
DEN1	DATA+1~, DATA+3, DATA+11, DATA+19, DATA+22!
DEN2	DATA+1~, DATA+3, DATA+11, DATA+20, DATA+22!
DFN	DATA+1~, DATA+4*, DATA+6, DATA+7, DATA+8, DATA+9, DATA+22!
DUZ(2	DATA+6
FOL	P2+1~, P2+70!
HRN	DATA+1~, DATA+6*, DATA+19, DATA+22!
J	SUM75+2~
LINE	P2+1~, P2+29, P2+52, DATA+1~, DATA+18*, DATA+22!
N	SUM75+2~, SUM75+6*
NAME	P2+1~, P2+70!, DATA+1~, DATA+5*, DATA+19, DATA+22!
NODE	P2+1~, P2+36, P2+37, P2+44, P2+45, P2+59, P2+60, P2+67, P2+68, P2+70! , DATA~, DATA+4, DATA+5, DATA+10
NOTMET	P2+1~, P2+31, P2+39, P2+54, P2+62, DATA+19
NUM1	P1+1~, P1+31!, D75+3, D75+7, D75+9, DATA+1~, DATA+3, DATA+12*, DATA+19, DATA+22!
NUM2	P1+1~, P1+31!, D75+4, D75+8, D75+9, DATA+1~, DATA+3, DATA+13*, DATA+20, DATA+22!
NUM3	DATA+1~, DATA+3, DATA+14, DATA+21, DATA+22!
NUMDATES	DATA+2~, DATA+10*, DATA+12, DATA+13, DATA+14, DATA+23!
NUMVALS	DATA+2~, DATA+10*, DATA+12, DATA+13, DATA+14, DATA+23!
PC1	P1+1~, P1+31!, D75+5, D75+7, D75+9
PC2	P1+1~, P1+31!, D75+5, D75+7, D75+9
PC3	P1+1~, P1+31!, D75+5, D75+8, D75+9
PC4	P1+1~, P1+31!, D75+5, D75+8, D75+9
>> PDEN1CT	SUM75+13*, SUM75+16, SUM75+17, SUM75+27, SUM75+35
>> PMP	SUM75+16*, SUM75+27
>> PMP2	SUM75+17*, SUM75+35
>> PNUM1CT	SUM75+14*, SUM75+16, SUM75+27
>> PNUM2CT	SUM75+15*, SUM75+17, SUM75+35
PRD	P1+2~, P1+6*, P1+21, P1+32!
PRD1	P1+2~, P1+8*, P1+22, P1+32!
PRD2	P1+2~, P1+10*, P1+26, P1+32!
PRD3	P1+2~, P1+12*, P1+27, P1+32!
PRN	P1+2~, P1+7*, P1+21, P1+32!
PRN1	P1+2~, P1+9*, P1+23, P1+32!
PRN2	P1+2~, P1+11*, P1+26, P1+32!
PRN3	P1+2~, P1+13*, P1+28, P1+32!
PT	P2+1~, P2+34, P2+36, P2+42, P2+44, P2+57, P2+59, P2+65, P2+67, P2+70!
PTCT	P2+1~, P2+27, P2+35, P2+43, P2+46, P2+50, P2+58, P2+66, P2+69
SEX	DATA+1~, DATA+9*, DATA+19, DATA+22!
STRING1	P1+1~, P1+3*, P1+6, P1+7, P1+8, P1+9, P1+10, P1+11, P1+12, P1+13 , P1+17, P1+21, P1+22, P1+26, P1+27, P1+31!
STRING2	P1+1~, P1+4*, P1+6, P1+8, P1+10, P1+12, P1+17, P1+21, P1+22, P1+26 , P1+27, P1+31!
STRING3	P1+1~, P1+5*, P1+7, P1+9, P1+11, P1+13, P1+17, P1+21, P1+23, P1+26 , P1+28, P1+31!
TF	D75~, D75+2, D75+3, D75+4
U	P1+6, P1+7, P1+8, P1+9, P1+10, P1+11, P1+12, P1+13, P1+17, P1+21 , P1+22, P1+23, P1+26, P1+27, P1+28, D75+9, DATA+4, DATA+5, DATA+9, DATA+10 , XML75+3, XML75+4, SUM75+5, SUM75+25, SUM75+27, SUM75+29, SUM75+33, SUM75+35, SUM75+37
VST	P2+1~, P2+70!
X	P1+1~, P1+31!, 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, P2+18, P2+19, P2+20 , P2+21, P2+22, P2+23, P2+25, P2+26, P2+48, P2+49*, DATA+1~, DATA+22!
Y	P1+1~, P1+31!
Z	P1+1~, P1+31!

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPMUFP5

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: