Routine: BGPMUHP8

Package	Total	Call Graph
IHS GPRA Information System	5	$$ROUND^BGPMUA01 (SUM375,SUM376)^BGPMUHD7 (HDRBLK,HEADER,HEADERL)^BGPMUPH W^BGPMUPP PTLSORT^BGPMUUTL
IHS Patient	1	($$AGE,$$HRN,$$SEX)^AUPNPAT
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS GPRA Information System	1	BGPMUHD7

Entry Points

Name	Comments	DBIA/ICR reference
376(BGPMUTF)	;Get the numbers for this measure
VTE5	;EH output routine for 0375 VTE-5 (BGPMUH14)
375(BGPMUTF)	;Get the numbers for this measure
P5	;Write individual measure
P5D	;Do the Details
VTE6	;EH output routine for 0376 VTE-6 (BGPMUH15)
D375(NODE)	;get data
P6D	;Do the details
XML375	;Populate the BGPXML array with data for each population/numerator ; BGPXMLOUT(i)=Measure number^""^Denominator Count^Numerator Count^Exclusion Count
DEXC375(NODE)	;GET DATA
XML376	;Populate the BGPXML array with data for each population/numerator ; BGPXMLOUT(i)=Measure number^""^Denominator Count^Numerator Count^Exclusion Count
P6	;Write individual measure
DEXC376(NODE)	;GET DATA
D376(NODE)	;get data

External References

Name	Field # of Occurrence
$$AGE^AUPNPAT	D376+5, D375+5, DEXC375+5
$$HRN^AUPNPAT	D376+4, D375+4, DEXC375+4
$$SEX^AUPNPAT	D376+6, D375+6, DEXC375+6
$$ROUND^BGPMUA01	P5+11, 375+10, 375+11, P6+11, 376+10, 376+11
SUM375^BGPMUHD7	P5+33
SUM376^BGPMUHD7	P6+33
HDRBLK^BGPMUPH	P5+15, P6+15
HEADER^BGPMUPH	P5+13, P5+18, P5+20, P5+24, P5+28, DEXC375+11, P6+13, P6+18, P6+20, P6+24 , P6+28
HEADERL^BGPMUPH	P5D+2, P5D+16, D376+11, D375+11, P6D+3, P6D+15
W^BGPMUPP	P5D+3, P5D+4, P5D+5, P5D+6, P5D+7, P5D+8, P5D+9, P5D+10, P5D+11, P5D+12 , P5D+13, P5D+14, P5D+40, P6D+4, P6D+5, P6D+6, P6D+7, P6D+8, P6D+9, P6D+10 , P6D+11, P6D+12, P6D+13, P6D+14, P6D+39
PTLSORT^BGPMUUTL	P5D+22, P5D+28, P5D+35, P6D+21, P6D+27, P6D+34
$$GET1^DIQ	D376+3, D376+7, D375+3, D375+7, DEXC375+3, DEXC375+7
$$FMTE^XLFDT	D376+14, D375+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: P5+14
Function Call: WRITE	Prompt: !,"# Discharges for Pts",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?65,$P(STRING3,U,1) Line Location: P5+16
Function Call: WRITE	Prompt: !,"w/confirmed VTE" Line Location: P5+17
Function Call: WRITE	Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?65,$P(STRING3,U,4) Line Location: P5+19
Function Call: WRITE	Prompt: !,"# Discharges for Pts",?33,$P(STRING1,U,1)-$P(STRING1,U,4),?44,$P(STRING2,U,1)-$P(STRING2,U,4),?65,$P(STRING3,U,1)-$P(STRING3,U,4) Line Location: P5+21
Function Call: WRITE	Prompt: !,"w/confirmed VTE Less Exc" Line Location: P5+22
Function Call: WRITE	Prompt: ! Line Location: P5+23
Function Call: WRITE	Prompt: !,"# w/documentation",?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(PRD2,",+",1),6),?65,$P(STRING3,U,2),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRD3,",+",1),6) Line Location: P5+25
Function Call: WRITE	Prompt: !,"(discharge instruction" Line Location: P5+26
Function Call: WRITE	Prompt: !,"or educational material)" Line Location: P5+27
Function Call: WRITE	Prompt: !,"# w/o documentation",?33,$P(STRING1,U,3),?38,$J($P(STRING1,U,6),5,1),?44,$P(STRING2,U,3),?49,$J($P(STRING2,U,6),5,1),?56,$J($FN(PRD4,",+",1),6),?65,$P(STRING3,U,3),?68,$J($P(STRING3,U,6),5,1),?74,$J($FN(PRD5,",+",1),6) Line Location: P5+29
Function Call: WRITE	Prompt: !,"(discharge instruction" Line Location: P5+30
Function Call: WRITE	Prompt: !,"or educational material)" Line Location: P5+31
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?44,"SEX",?48,"AGE",?53,"DENOMINATOR",?69,"NUMERATOR" Line Location: P5D+17
Function Call: WRITE	Prompt: !,LINE Line Location: P5D+18
Function Call: WRITE	Prompt: !,LINE Line Location: D376+13
Function Call: WRITE	Prompt: !,LINE Line Location: D375+13
Function Call: WRITE	Prompt: !,LINE Line Location: DEXC375+13
Function Call: WRITE	Prompt: !,NAME,?25,HRN,?33,COMM,?44,SEX,?48,AGE,?53,"Excluded" Line Location: DEXC375+14
Function Call: WRITE	Prompt: ! Line Location: P6+14
Function Call: WRITE	Prompt: !,"# Discharges for Pts",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?65,$P(STRING3,U,1) Line Location: P6+16
Function Call: WRITE	Prompt: !,"w/confirmed VTE" Line Location: P6+17
Function Call: WRITE	Prompt: !,"# Excluded (Exc)",?33,$P(STRING1,U,4),?44,$P(STRING2,U,4),?65,$P(STRING3,U,4) Line Location: P6+19
Function Call: WRITE	Prompt: !,"# Discharges for Pts",?33,$P(STRING1,U,1)-$P(STRING1,U,4),?44,$P(STRING2,U,1)-$P(STRING2,U,4),?65,$P(STRING3,U,1)-$P(STRING3,U,4) Line Location: P6+21
Function Call: WRITE	Prompt: !,"w/confirmed VTE Less Exc" Line Location: P6+22
Function Call: WRITE	Prompt: ! Line Location: P6+23
Function Call: WRITE	Prompt: !,"# w/o VTE prophylaxis",?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(PRD2,",+",1),6),?65,$P(STRING3,U,2),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRD3,",+",1),6) Line Location: P6+25
Function Call: WRITE	Prompt: !,"prior to the VTE" Line Location: P6+26
Function Call: WRITE	Prompt: !,"diagnostic test date" Line Location: P6+27
Function Call: WRITE	Prompt: !,"# w/VTE prophylaxis",?33,$P(STRING1,U,3),?38,$J($P(STRING1,U,6),5,1),?44,$P(STRING2,U,3),?49,$J($P(STRING2,U,6),5,1),?56,$J($FN(PRD4,",+",1),6),?65,$P(STRING3,U,3),?68,$J($P(STRING3,U,6),5,1),?74,$J($FN(PRD5,",+",1),6) Line Location: P6+29
Function Call: WRITE	Prompt: !,"prior to the VTE" Line Location: P6+30
Function Call: WRITE	Prompt: !,"diagnostic test date" Line Location: P6+31
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?44,"SEX",?48,"AGE",?53,"DENOMINATOR",?69,"NUMERATOR" Line Location: P6D+16
Function Call: WRITE	Prompt: !,LINE Line Location: P6D+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)
^TMP("BGPMU0375"	VTE5+2!, 375+2, 375+3, 375+4, 375+5, P5D+20, P5D+27, P5D+34, XML375+2, XML375+3!
^TMP("BGPMU0376"	VTE6+2!, 376+2, 376+3, 376+4, 376+5, P6D+19, P6D+26, P6D+33, XML376+2, XML376+3!

Label References

Name	Line Occurrences
$$375	P5+3, P5+4, P5+5
$$376	P6+3, P6+4, P6+5
D375	P5D+26, P5D+32
D376	P6D+25, P6D+31
DEXC375	P5D+39, DEXC376+1
DEXC376	P6D+38
P5	VTE5+1
P5D	P5+32
P6	VTE6+1
P6D	P6+32

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	D376+1~, D376+5, D376+14, D375+1~, D375+5, D375+14, DEXC375+1~, DEXC375+5*, DEXC375+14
ARRAY	375+1~, 375+12, 375+13, 376+1~, 376+12, 376+13
BGPARR	P5D+21!, P5D+22, P5D+28, P5D+35, P6D+2~, P6D+20!, P6D+21, P6D+27, P6D+34
BGPARR(	P5D+23, P5D+25, P5D+29, P5D+31, P5D+36, P5D+38, P6D+22, P6D+24, P6D+28, P6D+30 , P6D+35, P6D+37
>> BGPED	D376+5, D375+5, DEXC375+5
BGPI	D376+1~, D375+1~, DEXC375+1~
>> BGPIC	P5+32, P6+32
>> BGPIOSL	P5+18, P5+20, P5+24, P5+28, P5D+16, D376+10, D375+10, DEXC375+10, P6+18, P6+20 , P6+24, P6+28, P6D+15
>> BGPLIST	P5D+20, P5D+27, P5D+34, P6D+19, P6D+26, P6D+33
>> BGPLIST(	P5+32, P6+32
BGPMUTF	375~, 375+2, 375+3, 375+4, 375+5, 376~, 376+2, 376+3, 376+4, 376+5
>> BGPPTYPE	P5D+3, P5D+4, P5D+5, P5D+6, P5D+7, P5D+8, P5D+9, P5D+10, P5D+11, P5D+12 , P5D+13, P5D+14, P5D+40, P6D+4, P6D+5, P6D+6, P6D+7, P6D+8, P6D+9, P6D+10 , P6D+11, P6D+12, P6D+13, P6D+14, P6D+39
>> BGPQUIT	P5+13, P5+18, P5+20, P5+24, P5+28, P5D+2, P5D+16, D376+11, D375+11, DEXC375+11 , P6+13, P6+18, P6+20, P6+24, P6+28, P6D+3, P6D+15
>> BGPXML(1	XML375+2, XML376+2
BMI	P5D+1~, P6D+1~
>> COMM	D376+7, D376+14, D375+7, D375+14, DEXC375+7*, DEXC375+14
DATA	D376+1~, D375+1~, DEXC375+1~
DEN	P5+2~, 375+2, 375+6, 375+7, 375+8, 375+10, 375+11, 375+12, D376+1~, D376+8 , D376+14, D375+1~, D375+8, D375+14, DEXC375+1~, DEXC375+8, P6+2~, 376+2*, 376+6, 376+7 , 376+8, 376+10, 376+11, 376+12
DFN	D376+1~, D376+2, D376+4, D376+5, D376+6, D376+7, D375+1~, D375+2, D375+4, D375+5 , D375+6, D375+7, DEXC375+1~, DEXC375+2*, DEXC375+4, DEXC375+5, DEXC375+6, DEXC375+7
DUZ(2	D376+4, D375+4, DEXC375+4
EXC	P5+2~, 375+4, 375+8, 375+10, 375+11, 375+12, P6+2~, 376+4, 376+8, 376+10 , 376+11, 376+12
FOL	P5D+1~, P6D+1~
HRN	D376+1~, D376+4, D376+14, D375+1~, D375+4, D375+14, DEXC375+1~, DEXC375+4*, DEXC375+14
>> LINE	P5D+18, D376+13, D375+13, DEXC375+13, P6D+17*
LIST1	P5+1~, P6+1~
LIST2	P5+1~, P6+1~
LIST3	P5+1~, P6+1~
NAME	P5D+1~, D376+1~, D376+3, D376+14, D375+1~, D375+3, D375+14, DEXC375+1~, DEXC375+3*, DEXC375+14 , P6D+1~
NODE	P5D+1~, P5D+25, P5D+26, P5D+31, P5D+32, P5D+38, P5D+39, D376~, D376+2, D376+3 , D376+8, D376+9, D376+14, D375~, D375+2, D375+3, D375+8, D375+9, D375+14, DEXC376~ , DEXC376+1, DEXC375~, DEXC375+2, DEXC375+3, DEXC375+8, DEXC375+9, P6D+1~, P6D+24, P6D+25, P6D+30* , P6D+31, P6D+37*, P6D+38
NONUM	P5+2~, 375+5, 375+11, 375+12, P6+2~, 376+5, 376+11, 376+12
NUM	P5+2~, 375+3, 375+10, 375+12, D376+1~, D376+9, D376+14, D375+1~, D375+9, D375+14 , DEXC375+1~, DEXC375+9, P6+2~, 376+3*, 376+10, 376+12
PC1	P5+2~, 375+6, 375+8, 375+10, 375+12, P6+2~, 376+6, 376+8, 376+10, 376+12
PC2	P5+2~, 375+6, 375+8, 375+11, 375+12, P6+2~, 376+6, 376+8, 376+11, 376+12
PRB1	P5+2~, P6+2~
PRB2	P5+2~, P6+2~
PRD1	P5+2~, P5+6, P6+2~, P6+6
PRD2	P5+2~, P5+7, P5+25, P6+2~, P6+7, P6+25
>> PRD3	P5+8, P5+25, P6+8, P6+25
>> PRD4	P5+9, P5+29, P6+9, P6+29
>> PRD5	P5+10, P5+29, P6+10, P6+29
>> PRD6	P5+11, P5+12, P6+11, P6+12
PT	P5D+1~, P5D+23, P5D+25, P5D+29, P5D+31, P5D+36, P5D+38, P6D+1~, P6D+22, P6D+24 , P6D+28, P6D+30, P6D+35, P6D+37
>> PTCT	P5D+19, P5D+24, P5D+30, P5D+37, P5D+40, P6D+18, P6D+23, P6D+29, P6D+36, P6D+39
>> SEX	D376+6, D376+14, D375+6, D375+14, DEXC375+6*, DEXC375+14
STRING1	P5+2~, P5+3, P5+6, P5+7, P5+8, P5+9, P5+10, P5+11, P5+16, P5+19 , P5+21, P5+25, P5+29, P6+2~, P6+3, P6+6, P6+7, P6+8, P6+9, P6+10 , P6+11, P6+16, P6+19, P6+21, P6+25, P6+29
STRING2	P5+2~, P5+4, P5+6, P5+7, P5+9, P5+16, P5+19, P5+21, P5+25, P5+29 , P6+2~, P6+4, P6+6, P6+7, P6+9, P6+16, P6+19, P6+21, P6+25, P6+29
STRING3	P5+2~, P5+5, P5+8, P5+10, P5+11, P5+16, P5+19, P5+21, P5+25, P5+29 , P6+2~, P6+5, P6+8, P6+10, P6+11, P6+16, P6+19, P6+21, P6+25, P6+29
U	P5+6, P5+7, P5+8, P5+9, P5+10, P5+11, P5+16, P5+19, P5+21, P5+25 , P5+29, 375+12, D376+2, D376+3, D376+8, D376+9, D375+2, D375+3, D375+8, D375+9 , DEXC375+2, DEXC375+3, DEXC375+8, DEXC375+9, P6+6, P6+7, P6+8, P6+9, P6+10, P6+11 , P6+16, P6+19, P6+21, P6+25, P6+29, 376+12, XML375+2, XML376+2
VST	P5D+1~, P6D+1~
X	P5+1~, P5D+1~, P5D+3, P5D+4, P5D+5, P5D+6, P5D+7, P5D+8, P5D+9, P5D+10 , P5D+11, P5D+12, P5D+13, P5D+14, P5D+40, P6+1~, P6D+1~, P6D+4, P6D+5, P6D+6 , P6D+7, P6D+8, P6D+9, P6D+10, P6D+11, P6D+12, P6D+13, P6D+14, P6D+39*
Y	P5+1~, P6+1~
Z	P5+1~, P6+1~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPMUHP8

Information

Source Information

Call Graph

Call Graph Total: 8

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: