Routine: BUDARP7P

Package	Total	Call Graph
IHS Uniform Data System	2	DMRACE1^BUDARP7Q HEADER^BUDARPTP
VA Fileman	2	COMMA^%DTC ^DIR
Kernel	1	$$REPEAT^XLFSTR

Package	Total	Caller Graph
IHS Uniform Data System	1	BUDARP7Q

Entry Points

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

External References

Name	Field # of Occurrence
COMMA^%DTC	C+4
DMRACE1^BUDARP7Q	PRINT+55
HEADER^BUDARPTP	PRINT+3, PRINT+20, PRINT+24, PRINT+28, PRINT+32, PRINT+36, PRINT+46, PRINT+50
^DIR	PAUSE+1
$$REPEAT^XLFSTR	T7H+1, LINE+1, LINE1+1, LINE2+1, LINE3+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?29,"\|Unreported/Refused",?49,"\|",?69,"\|",! Line Location: PRINT+4
Function Call: WRITE	Prompt: ?29,"\|to Report Race and",?49,"\|",?55,"Total",?69,"\|",! Line Location: PRINT+5
Function Call: WRITE	Prompt: ?29,"\|Identity (h)",?49,"\|",?56,"(i)",?69,"\|",! Line Location: PRINT+6
Function Call: WRITE	Prompt: "HIV Positive",?29,"\|",?49,"\|",?69,"\|",!,"Pregnant Women",?29,"\|*******************",?49,"\|",$$C($P($G(BUDSECTH(1)),U,18)),?69,"\|",! Line Location: PRINT+8
Function Call: WRITE	Prompt: "(NO PRENATAL CARE PROVIDED? CHECK HERE: "_$S(BUDPREN=0:"X",1:""),")",?69,"\|",! Line Location: PRINT+10
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+12
Function Call: WRITE	Prompt: ?2,"1",?5,"Prenatal care patients",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+16
Function Call: WRITE	Prompt: ?5,"who delivered during ",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+17
Function Call: WRITE	Prompt: ?5,"the year",?29,"\| ",BUDXX,?49,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+18
Function Call: WRITE	Prompt: ?2,"2",?5,"Deliveries performed",?29,"\|",?69,"\|",! Line Location: PRINT+21
Function Call: WRITE	Prompt: ?5,"by Grantee Provider",?29,"\|***************************************",?69,"\|",! Line Location: PRINT+22
Function Call: WRITE	Prompt: ?2,"3",?5,"Live Births <1500",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+25
Function Call: WRITE	Prompt: ?5,"grams",?29,"\| ",BUDXX,?49,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+26
Function Call: WRITE	Prompt: ?2,"4",?5,"Live Births 1500-",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+29
Function Call: WRITE	Prompt: ?5,"2499 grams",?29,"\| ",BUDXX,?49,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+30
Function Call: WRITE	Prompt: ?2,"5",?5,"Live Births >=2500",?29,"\| ",BUDXX,?49,"\| ",BUDXX,?69,"\|",! Line Location: PRINT+33
Function Call: WRITE	Prompt: ?69,"\|",! Line Location: PRINT+37
Function Call: WRITE	Prompt: $$CTR("SECTION B: HYPERTENSION BY RACE AND HISPANIC/LATINO IDENTITY",70),?69,"\|",! Line Location: PRINT+38
Function Call: WRITE	Prompt: $$CTR("Patients 18 to 85 diagnosed with hypertension whose last ",70),?69,"\|",! Line Location: PRINT+40
Function Call: WRITE	Prompt: $$CTR("blood pressure was less than 140/90",70),?69,"\|",! Line Location: PRINT+41
Function Call: WRITE	Prompt: ?2,"6",?5,"Total hypertensive",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+43
Function Call: WRITE	Prompt: ?5,"patients",?29,"\|",$$C($P($G(BUDSECTB(6)),U,17)),?49,"\|",$$C($P($G(BUDSECTB(6)),U,18)),?69,"\|",! Line Location: PRINT+44
Function Call: WRITE	Prompt: ?2,"7",?5,"Charts sampled /",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+47
Function Call: WRITE	Prompt: ?5,"EHR total",?29,"\|",$$C($P($G(BUDSECTB(7)),U,17)),?49,"\|",$$C($P($G(BUDSECTB(7)),U,18)),?69,"\|",! Line Location: PRINT+48
Function Call: WRITE	Prompt: ?2,"8",?5,"Patients with ",?29,"\|",?49,"\|",?69,"\|",! Line Location: PRINT+51
Function Call: WRITE	Prompt: ?5,"HTN controlled",?29,"\|",$$C($P($G(BUDSECTB(8)),U,17)),?49,"\|",$$C($P($G(BUDSECTB(8)),U,18)),?69,"\|",! Line Location: PRINT+53
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("_",19),?49,"\|",$$REPEAT^XLFSTR("_",19),?69,"\|",! Line Location: LINE1+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",29),?29,"\|",$$REPEAT^XLFSTR("_",49),?79,"\|",! Line Location: LINE3+1
Routine Call	DIR Line Location: PAUSE+1

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

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BUDPREN	PRINT+10
>> BUDQUIT	PRINT+2*, PRINT+3, PRINT+20, PRINT+24, PRINT+28, PRINT+32, PRINT+36, PRINT+46, PRINT+50
>> BUDSECTB(6	PRINT+44
>> BUDSECTB(7	PRINT+48
>> BUDSECTB(8	PRINT+53
>> BUDSECTH(1	PRINT+8
>> BUDXX	PRINT+18, PRINT+26, PRINT+30, PRINT+33
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+20, PRINT+24, PRINT+28, PRINT+32, PRINT+36, PRINT+46, PRINT+50
U	PRINT+8, PRINT+44, PRINT+48, PRINT+53, 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: BUDARP7P

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
$$C	PRINT+8, PRINT+44, PRINT+48, PRINT+53
$$CTR	PRINT+12, PRINT+38, PRINT+40, PRINT+41, T7H+1
LINE	PRINT+7, PRINT+11, PRINT+13, PRINT+39, PRINT+42
LINE1	PRINT+9, PRINT+19, PRINT+27, PRINT+31, PRINT+34, PRINT+45, PRINT+49, PRINT+54
LINE2	PRINT+23
T7H	PRINT+3, PRINT+20, PRINT+24, PRINT+28, PRINT+32, PRINT+36, PRINT+46, PRINT+50