Routine: BUD0RP71

Package	Total	Call Graph
IHS Uniform Data System	8	^BUD0RP7F (PRGHL,PRGRL)^BUD0RP7I (HTCRL,HTRL,HTURL)^BUD0RP7J (DMR1L,DMR2L,DMRL)^BUD0RP7L (DMRACE1,DMRACE2)^BUD0RP7O ^BUD0RP7P DMR3L^BUD0RP7T HEADER^BUD0RPTP
VA Fileman	2	COMMA^%DTC ^DIR
Kernel	1	$$REPEAT^XLFSTR

Package	Total	Caller Graph
IHS Uniform Data System	2	BUD0RP7 BUD0RP7O

Entry Points

Name	Comments	DBIA/ICR reference
PAUSE	;
C(X,Y)	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
LINE7	;EP
LINE6	;EP
T7H	;EP
LINE4	;EP
LINE3	;EP
LINE2	;EP
LINE1	;EP
NEXT	;second page of sections a,b
USR()	;EP - Return name of current user from ^VA(200.
T7H1	;EP
CTR(X,Y)	;EP - Center X in a field Y wide.
PRINT	;EP
LINE	;EP
LINE5	;EP

External References

Name	Field # of Occurrence
COMMA^%DTC	C+4
^BUD0RP7F	NEXT+64
PRGHL^BUD0RP7I	NEXT+67
PRGRL^BUD0RP7I	NEXT+68
HTCRL^BUD0RP7J	NEXT+71
HTRL^BUD0RP7J	NEXT+70
HTURL^BUD0RP7J	NEXT+72
DMR1L^BUD0RP7L	NEXT+77
DMR2L^BUD0RP7L	NEXT+78
DMRL^BUD0RP7L	NEXT+76
DMRACE1^BUD0RP7O	PRINT+60
DMRACE2^BUD0RP7O	NEXT+61
^BUD0RP7P	NEXT+66
DMR3L^BUD0RP7T	NEXT+79
HEADER^BUD0RPTP	PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55, NEXT+1, NEXT+25 , NEXT+29, NEXT+34, NEXT+38, NEXT+42, NEXT+52, NEXT+56
^DIR	PAUSE+1
$$REPEAT^XLFSTR	T7H+1, LINE+1, LINE1+1, LINE2+1, LINE3+1, T7H1+1, LINE4+1, LINE5+1, LINE6+1, LINE7+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?29,"\|",?41,"HISPANIC/LATINO",?69,"\|",! Line Location: PRINT+5
Function Call: WRITE	Prompt: ?29,"\|",?39,"\|",?49,"\|",?59,"\|",?62,"Black/",?69,"\|",! Line Location: PRINT+6
Function Call: WRITE	Prompt: ?29,"\|",?39,"\|",?41,"Native",?49,"\|",?51,"Pacific",?59,"\|",?61,"African",?69,"\|",! Line Location: PRINT+7
Function Call: WRITE	Prompt: ?29,"\|",?32,"Asian",?39,"\|",?41,"Hawaiian",?49,"\|",?51,"Islander",?59,"\|",?61,"American",?69,"\|",! Line Location: PRINT+8
Function Call: WRITE	Prompt: ?29,"\|",?33,"(a)",?39,"\|",?42,"(b1)",?49,"\|",?52,"(b2)",?59,"\|",?62,"(c)",?69,"\|",! Line Location: PRINT+9
Function Call: WRITE	Prompt: "HIV Positive",?29,"\|",?69,"\|",!,"Pregnant Women",?29,"\|***************************************",?69,"\|",! Line Location: PRINT+11
Function Call: WRITE	Prompt: "(NO PRENATAL CARE PROVIDED? CHECK HERE: "_$S(BUDPREN=0:"X",1:""),")",?69,"\|",! Line Location: PRINT+14
Function Call: WRITE	Prompt: $$CTR("SECTION A: DELIVERIES AND BIRTH WEIGHT BY RACE",80),?69,"\|",!,$$CTR("AND HISPANIC/LATINO IDENTITY",80),?69,"\|",! Line Location: PRINT+17
Function Call: WRITE	Prompt: ?2,"1",?5,"Prenatal care patients",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+21
Function Call: WRITE	Prompt: ?5,"who delivered during ",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+22
Function Call: WRITE	Prompt: ?5,"the year",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+23
Function Call: WRITE	Prompt: ?2,"2",?5,"Deliveries performed",?29,"\|",?69,"\|",! Line Location: PRINT+26
Function Call: WRITE	Prompt: ?5,"by Grantee Provider",?29,"\|***************************************",?69,"\|",! Line Location: PRINT+27
Function Call: WRITE	Prompt: ?2,"3",?5,"Live Births <1500",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+30
Function Call: WRITE	Prompt: ?5,"grams",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+31
Function Call: WRITE	Prompt: ?2,"4",?5,"Live Births 1500-",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+34
Function Call: WRITE	Prompt: ?5,"2499 grams",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+35
Function Call: WRITE	Prompt: ?2,"5",?5,"Live Births >=2500",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+38
Function Call: WRITE	Prompt: ?69,"\|",! Line Location: PRINT+42
Function Call: WRITE	Prompt: $$CTR("SECTION B: HYPERTENSION BY RACE AND HISPANIC/LATINO IDENTITY",70),?69,"\|",! Line Location: PRINT+43
Function Call: WRITE	Prompt: $$CTR("Patients 18 to 85 diagnosed with hypertension whose last ",70),?69,"\|",! Line Location: PRINT+45
Function Call: WRITE	Prompt: $$CTR("blood pressure was less than 140/90",70),?69,"\|",! Line Location: PRINT+46
Function Call: WRITE	Prompt: ?2,"6",?5,"Total hypertensive",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+48
Function Call: WRITE	Prompt: ?5,"patients",?29,"\|",$$C($P($G(BUDSECTB(6)),U)),?39,"\|",$$C($P($G(BUDSECTB(6)),U,2)),?49,"\|",$$C($P($G(BUDSECTB(6)),U,3)),?59,"\|",$$C($P($G(BUDSECTB(6)),U,4)),?69,"\|",! Line Location: PRINT+49
Function Call: WRITE	Prompt: ?2,"7",?5,"Charts sampled or",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+52
Function Call: WRITE	Prompt: ?5,"EHR total",?29,"\|",$$C($P($G(BUDSECTB(7)),U)),?39,"\|",$$C($P($G(BUDSECTB(7)),U,2)),?49,"\|",$$C($P($G(BUDSECTB(7)),U,3)),?59,"\|",$$C($P($G(BUDSECTB(7)),U,4)),?69,"\|",! Line Location: PRINT+53
Function Call: WRITE	Prompt: ?2,"8",?5,"Patients with ",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: PRINT+56
Function Call: WRITE	Prompt: ?5,"HTN controlled",?29,"\|",$$C($P($G(BUDSECTB(8)),U)),?39,"\|",$$C($P($G(BUDSECTB(8)),U,2)),?49,"\|",$$C($P($G(BUDSECTB(8)),U,3)),?59,"\|",$$C($P($G(BUDSECTB(8)),U,4)),?69,"\|",! Line Location: PRINT+58
Function Call: WRITE	Prompt: ?29,"\|",?38,"HISPANIC/LATINO",?69,"\|",! Line Location: NEXT+2
Function Call: WRITE	Prompt: ?29,"\|",?31,"American",?39,"\|",?49,"\|",?52,"More",?59,"\|",?60,"Unreport-",?69,"\|",! Line Location: NEXT+3
Function Call: WRITE	Prompt: ?29,"\|",?31,"Indian/",?39,"\|",?42,"",?49,"\|",?52,"than",?59,"\|",?60,"ed/",?69,"\|",! Line Location: NEXT+4
Function Call: WRITE	Prompt: ?29,"\|",?31,"Alaska",?39,"\|",?42,"",?49,"\|",?52,"one",?59,"\|",?60,"Refused",?69,"\|",! Line Location: NEXT+5
Function Call: WRITE	Prompt: ?29,"\|",?31,"Native",?39,"\|",?42,"White",?49,"\|",?52,"race",?59,"\|",?60,"to Report",?69,"\|",! Line Location: NEXT+6
Function Call: WRITE	Prompt: ?29,"\|",?33,"(d)",?39,"\|",?42,"(e)",?49,"\|",?52,"(f)",?59,"\|",?62,"(g)",?69,"\|",! Line Location: NEXT+7
Function Call: WRITE	Prompt: "HIV Positive",?29,"\|",?69,"\|",!,"Pregnant Women",?29,"\|***************************************",?69,"\|",! Line Location: NEXT+13
Function Call: WRITE	Prompt: "(NO PRENATAL CARE PROVIDED? CHECK HERE: "_$S(BUDPREN=0:"X",1:""),")",?69,"\|",! Line Location: NEXT+15
Function Call: WRITE	Prompt: $$CTR("SECTION A: DELIVERIES AND BIRTH WEIGHT BY RACE AND ",70),?69,"\|",!,$$CTR("HISPANIC/LATINO IDENTITY",60),?69,"\|",! Line Location: NEXT+17
Function Call: WRITE	Prompt: ?2,"1",?5,"Prenatal care patients",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+21
Function Call: WRITE	Prompt: ?5,"who delivered during ",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+22
Function Call: WRITE	Prompt: ?5,"the year",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\|",?69,"\|",! Line Location: NEXT+23
Function Call: WRITE	Prompt: ?2,"2",?5,"Deliveries performed",?29,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+26
Function Call: WRITE	Prompt: ?5,"by Grantee Provider",?29,"\|***************************************",?69,"\|",! Line Location: NEXT+27
Function Call: WRITE	Prompt: ?2,"3",?5,"Live Births <1500",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+30
Function Call: WRITE	Prompt: ?5,"grams",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\|",?69,"\|",! Line Location: NEXT+31
Function Call: WRITE	Prompt: ?2,"4",?5,"Live Births 1500-",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+35
Function Call: WRITE	Prompt: ?5,"2499 grams",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\|",?69,"\|",! Line Location: NEXT+36
Function Call: WRITE	Prompt: ?2,"5",?5,"Live Births >=2500",?29,"\| ",BUDXX,?39,"\| ",BUDXX,?49,"\| ",BUDXX,?59,"\|",?69,"\|",! Line Location: NEXT+39
Function Call: WRITE	Prompt: ?69,"\|",! Line Location: NEXT+43
Function Call: WRITE	Prompt: $$CTR("SECTION B: HYPERTENSION BY RACE AND ",70),?69,"\|",!,$$CTR("HISPANIC/LATINO IDENTITY",70),?69,"\|",! Line Location: NEXT+44
Function Call: WRITE	Prompt: $$CTR("Patients diagnosed with hypertension whose last",70),?69,"\|",! Line Location: NEXT+46
Function Call: WRITE	Prompt: $$CTR("blood pressure was less than 140/90",70),?69,"\|",! Line Location: NEXT+47
Function Call: WRITE	Prompt: ?2,"6",?5,"Total hypertensive",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+49
Function Call: WRITE	Prompt: ?5,"patients",?29,"\|",$$C($P($G(BUDSECTB(6)),U,5)),?39,"\|",$$C($P($G(BUDSECTB(6)),U,6)),?49,"\|",$$C($P($G(BUDSECTB(6)),U,7)),?59,"\|",$$C($P($G(BUDSECTB(6)),U,8)),?69,"\|",! Line Location: NEXT+50
Function Call: WRITE	Prompt: ?2,"7",?5,"Charts sampled or",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+53
Function Call: WRITE	Prompt: ?5,"EHR total",?29,"\|",$$C($P($G(BUDSECTB(7)),U,5)),?39,"\|",$$C($P($G(BUDSECTB(7)),U,6)),?49,"\|",$$C($P($G(BUDSECTB(7)),U,7)),?59,"\|",$$C($P($G(BUDSECTB(7)),U,8)),?69,"\|",! Line Location: NEXT+54
Function Call: WRITE	Prompt: ?2,"8",?5,"Patients with ",?29,"\|",?39,"\|",?49,"\|",?59,"\|",?69,"\|",! Line Location: NEXT+57
Function Call: WRITE	Prompt: ?5,"HTN controlled",?29,"\|",$$C($P($G(BUDSECTB(8)),U,5)),?39,"\|",$$C($P($G(BUDSECTB(8)),U,6)),?49,"\|",$$C($P($G(BUDSECTB(8)),U,7)),?59,"\|",$$C($P($G(BUDSECTB(8)),U,8)),?69,"\|",! Line Location: NEXT+59
Function Call: WRITE	Prompt: !,$$CTR("TABLE 7 - HEALTH OUTCOMES AND DISPARITIES"),!,$$REPEAT^XLFSTR("_",69),! Line Location: T7H+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",69),?69,"\|",! Line Location: LINE+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",9),?39,"\|",$$REPEAT^XLFSTR("_",9),?49,"\|",$$REPEAT^XLFSTR("_",9),?59,"\|",$$REPEAT^XLFSTR("_",9),?69,"\|",! Line Location: LINE1+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",39),?69,"\|",! Line Location: LINE2+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",49),?79,"\|",! Line Location: LINE3+1
Function Call: WRITE	Prompt: !,$$CTR("TABLE 7 - HEALTH OUTCOMES AND DISPARITIES",60),!,$$REPEAT^XLFSTR("_",69),! Line Location: T7H1+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",69),?69,"\|",! Line Location: LINE4+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",9),?39,"\|",$$REPEAT^XLFSTR("_",9),?49,"\|",$$REPEAT^XLFSTR("_",9),?59,"\|",$$REPEAT^XLFSTR("_",9),?69,"\|",! Line Location: LINE5+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",29),?59,"\|",! Line Location: LINE7+1
Routine Call	DIR Line Location: PAUSE+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	LOC+1
^VA(200 - [#200]	USR+1
^XTMP("BUD0RP7"	NEXT+84!

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BUDDMR1L	NEXT+77
>> BUDDMR2L	NEXT+78
>> BUDDMR3L	NEXT+79
>> BUDDMRL	NEXT+76
>> BUDGPG	NEXT+67, NEXT+68, NEXT+70, NEXT+71, NEXT+72, NEXT+76, NEXT+77, NEXT+78, NEXT+79*
>> BUDH	NEXT+84
>> BUDHTCRL	NEXT+71
>> BUDHTRL	NEXT+70
>> BUDHTURL	NEXT+72
>> BUDJ	NEXT+84
>> BUDPG	PRINT+1*
>> BUDPREN	PRINT+14, PRINT+15, NEXT+15
>> BUDPRGHL	NEXT+67
>> BUDPRGRL	NEXT+68
>> BUDQUIT	PRINT+3*, PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55, NEXT+1 , NEXT+25, NEXT+29, NEXT+34, NEXT+38, NEXT+42, NEXT+52, NEXT+56, NEXT+65
>> BUDSECTB(6	PRINT+49, NEXT+50
>> BUDSECTB(7	PRINT+53, NEXT+54
>> BUDSECTB(8	PRINT+58, NEXT+59
>> BUDXX	PRINT+15*, PRINT+23, PRINT+31, PRINT+35, PRINT+38, NEXT+23, NEXT+31, NEXT+36, NEXT+39
DA	PAUSE+1!
DIR	PAUSE+1!
DIR("A"	PAUSE+1*
DIR(0	PAUSE+1*
DUZ	USR+1
DUZ(2	LOC+1
IOM	CTR+1
IOSL	PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55, NEXT+25, NEXT+29, NEXT+34 , NEXT+38, NEXT+42, NEXT+52, NEXT+56
U	PRINT+49, PRINT+53, PRINT+58, NEXT+50, NEXT+54, NEXT+59, USR+1, LOC+1
X	CTR~, CTR+1, C~, C+1, C+5
>> X2	C+3*
>> X3	C+3*
Y	CTR~, CTR+1, C~, C+1, C+2

Customize PDF page

Package: IHS Uniform Data System

Routine: BUD0RP71

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
$$C	PRINT+49, PRINT+53, PRINT+58, NEXT+50, NEXT+54, NEXT+59
$$CTR	PRINT+17, PRINT+43, PRINT+45, PRINT+46, NEXT+17, NEXT+44, NEXT+46, NEXT+47, T7H+1, T7H1+1
LINE	PRINT+10, PRINT+16, PRINT+18, PRINT+44, PRINT+47
LINE1	PRINT+24, PRINT+32, PRINT+36, PRINT+39, PRINT+50, PRINT+54, PRINT+59
LINE2	PRINT+13, PRINT+28
LINE4	NEXT+16, NEXT+18, NEXT+45, NEXT+48
LINE5	NEXT+24, NEXT+33, NEXT+37, NEXT+40, NEXT+51, NEXT+55, NEXT+60
LINE6	NEXT+8, NEXT+14, NEXT+28
T7H	PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55
T7H1	NEXT+1, NEXT+25, NEXT+29, NEXT+34, NEXT+38, NEXT+42, NEXT+52, NEXT+56