Routine: BGPMUDP4

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

Package	Total	Caller Graph
IHS GPRA Information System	1	BGPMUDD4

Entry Points

Name	Comments	DBIA/ICR reference
027(BGPMUTF)	;Get the numbers for this measure
P27	;Write individual measure
P27D	;Do the Details
P27ENT	;EP output routine for 0027 Prenatal Anti-D Immune Globulin
XML027	;Populate the BGPXML array with data for each population/numerator ; BGPXMLOUT(i)=Population Number^Numerator Number^Denominator Count^Numerator Count^Exclusion Count
D027(NODE)	;GET DATA

External References

Name	Field # of Occurrence
$$AGE^AUPNPAT	D027+5
$$HRN^AUPNPAT	D027+4
$$SEX^AUPNPAT	D027+6
$$ROUND^BGPMUA01	027+11, 027+12, 027+13, 027+14
SUM027^BGPMUDD4	P27+34
HDRBLK^BGPMUPH	P27+18
HEADER^BGPMUPH	P27+16, P27+20, P27+25
HEADERL^BGPMUPH	P27D+3, P27D+17, D027+11
W^BGPMUPP	P27D+4, P27D+5, P27D+6, P27D+7, P27D+8, P27D+9, P27D+10, P27D+11, P27D+12, P27D+13 , P27D+14, P27D+15, P27D+35, P27D+53
PTLSORT^BGPMUUTL	P27D+24, P27D+30, P27D+42, P27D+48
$$GET1^DIQ	D027+3, D027+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Pts 18+",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?64,$P(STRING3,U,1) Line Location: P27+19
Function Call: WRITE	Prompt: ! Line Location: P27+21
Function Call: WRITE	Prompt: !,"Numerator 1" Line Location: P27+22
Function Call: WRITE	Prompt: !,"# w/tobacco use",?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(PRD12,",+",1),6),?64,$P(STRING3,U,2),?68,$J($P(STRING3,U,5),5,1),?74,$J($FN(PRD13,",+",1),6) Line Location: P27+23
Function Call: WRITE	Prompt: !,"# w/o tobacco use",?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(PRD14,",+",1),6),?64,$P(STRING3,U,3),?68,$J($P(STRING3,U,6),5,1),?74,$J($FN(PRD15,",+",1),6) Line Location: P27+24
Function Call: WRITE	Prompt: ! Line Location: P27+26
Function Call: WRITE	Prompt: !,"Numerator 2" Line Location: P27+27
Function Call: WRITE	Prompt: !,"# w/tobacco use and",?33,$P(STRING1,U,8),?38,$J($P(STRING1,U,11),5,1),?44,$P(STRING2,U,8),?49,$J($P(STRING2,U,11),5,1),?56,$J($FN(PRD22,",+",1),6),?64,$P(STRING3,U,8),?68,$J($P(STRING3,U,11),5,1),?74,$J($FN(PRD23,",+",1),6) Line Location: P27+28
Function Call: WRITE	Prompt: !,"cessation counseling" Line Location: P27+29
Function Call: WRITE	Prompt: !,"# w/o tobacco use or",?33,$P(STRING1,U,9),?38,$J($P(STRING1,U,12),5,1),?44,$P(STRING2,U,9),?49,$J($P(STRING2,U,12),5,1),?56,$J($FN(PRD24,",+",1),6),?64,$P(STRING3,U,9),?68,$J($P(STRING3,U,12),5,1),?74,$J($FN(PRD25,",+",1),6) Line Location: P27+30
Function Call: WRITE	Prompt: !,"w/tobacco use and no" Line Location: P27+31
Function Call: WRITE	Prompt: !,"cessation counseling" Line Location: P27+32
Function Call: WRITE	Prompt: !!,"Numerator 1: Tobacco users" Line Location: P27D+18
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?23,"HRN",?31,"COMMUNITY",?41,"SEX",?45,"AGE",?50,"DENOMINATOR",?63,"NUMERATOR" Line Location: P27D+19
Function Call: WRITE	Prompt: !,LINE Line Location: P27D+20
Function Call: WRITE	Prompt: !!,"Numerator 2: Tobacco users who received tobacco use cessation counseling" Line Location: P27D+36
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?23,"HRN",?31,"COMMUNITY",?41,"SEX",?45,"AGE",?50,"DENOMINATOR",?63,"NUMERATOR" Line Location: P27D+37
Function Call: WRITE	Prompt: !,LINE Line Location: P27D+38
Function Call: WRITE	Prompt: !,LINE Line Location: D027+13
Function Call: WRITE	Prompt: !,NAME,?23,HRN,?31,COMM,?41,SEX,?45,AGE,?50,$P(DEN,";",1),?63,$P(NUM,";",1) Line Location: D027+14
Function Call: WRITE	Prompt: !,?50,$S($P(DEN,";",2)'="":$P(DEN,";",2),1:""),?63,$S($P(NUM,";",2)'="":$P(NUM,";",2),1:"") Line Location: D027+15
Function Call: WRITE	Prompt: !,?50,$S($P(DEN,";",3)'="":$P(DEN,";",3),1:""),?63,$S($P(NUM,";",3)'="":$P(NUM,";",3),1:"") Line Location: D027+16

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("BGPMU0027"	P27ENT+2!, 027+2, 027+3, 027+4, 027+5, 027+6, P27D+22, P27D+29, P27D+40, P27D+47 , XML027+2, XML027+3, XML027+4!

Label References

Name	Line Occurrences
$$027	P27+3, P27+4, P27+5
D027	P27D+28, P27D+34, P27D+46, P27D+52
P27	P27ENT+1
P27D	P27+33

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	D027+1~, D027+5*, D027+14
ARRAY	027+1~, 027+16*, 027+17
BGPARR	P27D+2~, P27D+23!, P27D+24, P27D+30, P27D+41!, P27D+42, P27D+48
BGPARR(	P27D+25, P27D+27, P27D+31, P27D+33, P27D+43, P27D+45, P27D+49, P27D+51
>> BGPED	D027+5
BGPI	D027+1~
>> BGPIC	P27+33
>> BGPIOSL	P27+20, P27+25, P27D+17, D027+10
>> BGPLIST	P27D+22, P27D+29, P27D+40, P27D+47
>> BGPLIST(	P27+33
BGPMUTF	027~, 027+2, 027+3, 027+4, 027+5, 027+6
>> BGPPTYPE	P27D+4, P27D+5, P27D+6, P27D+7, P27D+8, P27D+9, P27D+10, P27D+11, P27D+12, P27D+13 , P27D+14, P27D+15, P27D+35, P27D+53
>> BGPQUIT	P27+16, P27+20, P27+25, P27D+3, P27D+17, D027+11
>> BGPXML(1	XML027+2*
>> BGPXML(2	XML027+3*
BMI	P27D+1~
>> COMM	D027+7*, D027+14
DATA	D027+1~
DEN	P27+2~, 027+2, 027+7, 027+8, 027+9, 027+11, 027+12, 027+13, 027+14, 027+16 , D027+1~, D027+8, D027+14, D027+15, D027+16
DFN	D027+1~, D027+2*, D027+4, D027+5, D027+6, D027+7
DUZ(2	D027+4
EXC1	P27+2~
FOL	P27D+1~
HRN	D027+1~, D027+4*, D027+14
>> LINE	P27D+20, P27D+38, D027+13*
LIST1	P27+1~
LIST2	P27+1~
LIST3	P27+1~
NAME	P27D+1~, D027+1~, D027+3*, D027+14
NODE	P27D+1~, P27D+27, P27D+28, P27D+33, P27D+34, P27D+45, P27D+46, P27D+51, P27D+52, D027~ , D027+2, D027+3, D027+8, D027+9
NONUM	P27+2~
>> NONUM1	027+4*, 027+12, 027+16
>> NONUM2	027+6*, 027+14, 027+16
NUM	D027+1~, D027+9*, D027+14, D027+15, D027+16
NUM1	P27+2~, 027+3*, 027+11, 027+16
>> NUM2	027+5*, 027+13, 027+16
PC1	P27+2~, 027+7, 027+9, 027+11*, 027+16
PC11	P27+2~, 027+7, 027+9, 027+12*, 027+16
PC13	P27+2~
>> PC2	027+7, 027+9, 027+13*, 027+16
>> PC21	027+7, 027+9, 027+14*, 027+16
PRD1	P27+2~
>> PRD12	P27+7*, P27+23
>> PRD13	P27+8*, P27+23
>> PRD14	P27+9*, P27+24
>> PRD15	P27+10*, P27+24
PRD2	P27+2~
>> PRD22	P27+12*, P27+28
>> PRD23	P27+13*, P27+28
>> PRD24	P27+14*, P27+30
>> PRD25	P27+15*, P27+30
PRD3	P27+2~
PRD4	P27+2~
PRD5	P27+2~
PRD6	P27+2~
PT	P27D+1~, P27D+25, P27D+27, P27D+31, P27D+33, P27D+43, P27D+45, P27D+49, P27D+51
PTCNT	P27D+1~
>> PTCT	P27D+21, P27D+26, P27D+32, P27D+35, P27D+39, P27D+44, P27D+50, P27D+53
>> SEX	D027+6*, D027+14
STRING1	P27+2~, P27+3*, P27+7, P27+8, P27+9, P27+10, P27+12, P27+13, P27+14, P27+15 , P27+19, P27+23, P27+24, P27+28, P27+30
STRING2	P27+2~, P27+4*, P27+7, P27+9, P27+12, P27+14, P27+19, P27+23, P27+24, P27+28 , P27+30
STRING3	P27+2~, P27+5*, P27+8, P27+10, P27+13, P27+15, P27+19, P27+23, P27+24, P27+28 , P27+30
U	P27+7, P27+8, P27+9, P27+10, P27+12, P27+13, P27+14, P27+15, P27+19, P27+23 , P27+24, P27+28, P27+30, 027+16, D027+2, D027+3, D027+8, D027+9, XML027+2, XML027+3
VST	P27D+1~
X	P27+1~, P27+2~, P27D+1~, P27D+4, P27D+5, P27D+6, P27D+7, P27D+8, P27D+9, P27D+10* , P27D+11, P27D+12, P27D+13, P27D+14, P27D+15, P27D+35, P27D+53*
Y	P27+1~
Z	P27+1~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPMUDP4

Information

Source Information

Call Graph

Call Graph Total: 7

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: