Routine: BUDCRP6E

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

Package	Total	Caller Graph
IHS Uniform Data System	1	BUDCRP6B

Entry Points

Name	Comments	DBIA/ICR reference
NRY	;
PAUSE	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
G1	;SECTION G1
I	;SECTION I
H	;SECTION H
K	;SECTION I
J	;SECTION I
M	;
L	;
LINE1	;
N	;
USR()	;EP - Return name of current user from ^VA(200.
CTR(X,Y)	;EP - Center X in a field Y wide.
T6BH	;
LINE	;
LINE2	;
REST6B	;EP
LINE3	;
C(X,Y)	;

External References

Name	Field # of Occurrence
COMMA^%DTC	C+4
HEADER^BUDCRPTP	REST6B+1, REST6B+25, G1+1, H+1, I+1, J+1, K+1, L+1, M+1, N+1
^DIR	PAUSE+1
$$REPEAT^XLFSTR	T6BH+1, LINE+1, LINE1+1, LINE2+1, LINE3+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$CTR("SECTION E - WEIGHT ASSESSMENT AND COUNSELING FOR CHILDREN AND ADOLESCENTS"),! Line Location: REST6B+2
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: REST6B+4
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"PATIENTS WITH",! Line Location: REST6B+5
Function Call: WRITE	Prompt: "CHILD AND ADOLESCENT",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?47,"NUMBER CHARTS",?65,"\|",?67,"COUNSELING",! Line Location: REST6B+6
Function Call: WRITE	Prompt: "WEIGHT ASSESSMENT",?23,"\|",?26,"AGED 3 - 17 ON",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"AND BMI",! Line Location: REST6B+7
Function Call: WRITE	Prompt: "AND COUNSELING",?23,"\|",?26,"DECEMBER 31",?45,"\|",?47,"TOTAL",?65,"\|",?67,"DOCUMENTED",! Line Location: REST6B+8
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: REST6B+9
Function Call: WRITE	Prompt: ?1,"12",?5,"MEASURE: Children",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+11
Function Call: WRITE	Prompt: ?5,"and adolescents",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+12
Function Call: WRITE	Prompt: ?5,"aged 3 - 17 during",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+13
Function Call: WRITE	Prompt: ?5,"measurement year",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+14
Function Call: WRITE	Prompt: ?5,"(on or prior to 31",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+15
Function Call: WRITE	Prompt: ?5,"December) with a",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+16
Function Call: WRITE	Prompt: ?5,"BMI percentile, ",?23,"\|",?30,$$C($G(BUDSECTE("PTS"))),?45,"\|",?50,$$C($G(BUDSECTE("PTS"))),?65,"\|",?70,$$C($G(BUDSECTE("AWT"))),! Line Location: REST6B+17
Function Call: WRITE	Prompt: ?5,"and counseling on",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+18
Function Call: WRITE	Prompt: ?5,"nutrition and",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+19
Function Call: WRITE	Prompt: ?5,"physical activity",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+20
Function Call: WRITE	Prompt: ?5,"documented for the",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+21
Function Call: WRITE	Prompt: ?5,"current year",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+22
Function Call: WRITE	Prompt: $$CTR("SECTION F - ADULT WEIGHT SCREENING AND FOLLOW-UP"),! Line Location: REST6B+26
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: REST6B+28
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"PATIENTS WITH",! Line Location: REST6B+29
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"BMI CHARTED",! Line Location: REST6B+30
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"AND FOLLOW-UP",! Line Location: REST6B+31
Function Call: WRITE	Prompt: "ADULT WEIGHT SCREENING",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?47,"NUMBER CHARTS",?65,"\|",?67,"PLAN DOCU-",! Line Location: REST6B+32
Function Call: WRITE	Prompt: "AND FOLLOW-UP",?23,"\|",?26,"AGED 18 AND",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"MENTED AS",! Line Location: REST6B+33
Function Call: WRITE	Prompt: "",?23,"\|",?26,"OLDER",?45,"\|",?47,"TOTAL",?65,"\|",?67,"APPROPRIATE",! Line Location: REST6B+34
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: REST6B+35
Function Call: WRITE	Prompt: ?1,"13",?5,"MEASURE: Patients ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+37
Function Call: WRITE	Prompt: ?5,"aged 18 and over",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+38
Function Call: WRITE	Prompt: ?5,"with (1) BMI ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+39
Function Call: WRITE	Prompt: ?5,"charted and (2) ",?23,"\|",?30,$$C($G(BUDSECTF("PTS"))),?45,"\|",?50,$$C($G(BUDSECTF("PTS"))),?65,"\|",?70,$$C($G(BUDSECTF("PLAN"))),! Line Location: REST6B+40
Function Call: WRITE	Prompt: ?5,"follow-up plan ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+41
Function Call: WRITE	Prompt: ?5,"documented if ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+42
Function Call: WRITE	Prompt: ?5,"patients are ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+43
Function Call: WRITE	Prompt: ?5,"overweight or ",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+44
Function Call: WRITE	Prompt: ?5,"underweight",?23,"\|",?45,"\|",?65,"\|",! Line Location: REST6B+45
Function Call: WRITE	Prompt: $$CTR("SECTION G - TOBACCO USE SCREENING AND CESSATION INTERVENTION"),! Line Location: G1+2
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: G1+4
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"NUMBER CHARTS",?65,"\|",?67,"PATIENTS",! Line Location: G1+5
Function Call: WRITE	Prompt: "TOBACCO USE SCREENING",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"ASSESSED FOR",! Line Location: G1+6
Function Call: WRITE	Prompt: "AND CESSATION",?23,"\|",?26,"AGED 18 AND",?45,"\|",?47,"TOTAL",?65,"\|",?67,"TOBACCO USE",! Line Location: G1+7
Function Call: WRITE	Prompt: "INTERVENTION",?23,"\|",?26,"OLDER",?45,"\|",?65,"\|",?67,"AND PROVIDED",! Line Location: G1+8
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"INTERVENTION",! Line Location: G1+9
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"IF A TOBACCO",! Line Location: G1+10
Function Call: WRITE	Prompt: ?23,"\|",?45,"\|",?65,"\|",?67,"USER",! Line Location: G1+11
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: G1+12
Function Call: WRITE	Prompt: ?1,"14a",?5,"MEASURE: Patients",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+14
Function Call: WRITE	Prompt: ?5,"aged 18 and older ",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+15
Function Call: WRITE	Prompt: ?5,"(1) were screened",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+16
Function Call: WRITE	Prompt: ?5,"for tobacco use",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+17
Function Call: WRITE	Prompt: ?5,"one or more times",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+18
Function Call: WRITE	Prompt: ?5,"in the measurement",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+19
Function Call: WRITE	Prompt: ?5,"year or the prior",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+20
Function Call: WRITE	Prompt: ?5,"year AND",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+21
Function Call: WRITE	Prompt: ?5,"(2) for those",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+22
Function Call: WRITE	Prompt: ?5,"found to be a",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+23
Function Call: WRITE	Prompt: ?5,"tobacco user, ",?23,"\|",?30,$$C($G(BUDSECG1("PTS"))),?45,"\|",?50,$$C($G(BUDSECG1("PTS"))),?65,"\|",?70,$$C($G(BUDSECG1("ABM"))),! Line Location: G1+24
Function Call: WRITE	Prompt: ?5,"received cessation",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+25
Function Call: WRITE	Prompt: ?5,"counseling",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+26
Function Call: WRITE	Prompt: ?5,"intervention",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+27
Function Call: WRITE	Prompt: ?5,"or medication",?23,"\|",?45,"\|",?65,"\|",! Line Location: G1+28
Function Call: WRITE	Prompt: $$CTR("SECTION H - ASTHMA PHARMACOLOGIC THERAPY"),! Line Location: H+2
Function Call: WRITE	Prompt: ?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: H+4
Function Call: WRITE	Prompt: "",?23,"\|",?26,"AGED 5 - 40",?45,"\|",?47,"NUMBER CHARTS",?65,"\|",?67,"PATIENTS WITH",! Line Location: H+5
Function Call: WRITE	Prompt: "ASTHMA PHARMACOLOGIC",?23,"\|",?26,"WITH PERSISTENT",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"ACCEPTABLE",! Line Location: H+6
Function Call: WRITE	Prompt: "THERAPY",?23,"\|",?26,"ASTHMA",?45,"\|",?47,"TOTAL",?65,"\|",?67,"PLAN",! Line Location: H+7
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: H+8
Function Call: WRITE	Prompt: ?1,"16",?5,"MEASURE: Patients ",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+10
Function Call: WRITE	Prompt: ?5,"aged 5 through 40",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+11
Function Call: WRITE	Prompt: ?5,"diagnosed with",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+12
Function Call: WRITE	Prompt: ?5,"persistent asthma",?23,"\|",?30,$$C($G(BUDSECTH("PTS"))),?45,"\|",?50,$$C($G(BUDSECTH("PTS"))),?65,"\|",?70,$$C($G(BUDSECTH("APT"))),! Line Location: H+13
Function Call: WRITE	Prompt: ?5,"who have an",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+14
Function Call: WRITE	Prompt: ?5,"acceptable",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+15
Function Call: WRITE	Prompt: ?5,"pharmacological",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+16
Function Call: WRITE	Prompt: ?5,"treatment plan",?23,"\|",?45,"\|",?65,"\|",! Line Location: H+17
Function Call: WRITE	Prompt: $$CTR("SECTION I - CORONARY ARTERY DISEASE (CAD): LIPID THERAPY"),! Line Location: I+2
Function Call: WRITE	Prompt: "CORONARY ARTERY",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: I+4
Function Call: WRITE	Prompt: "DISEASE (CAD):",?23,"\|",?26,"18 AND OLDER",?45,"\|",?47,"NUMBER CHARTS",?65,"\|",?67,"PATIENTS ",! Line Location: I+5
Function Call: WRITE	Prompt: "LIPID THERAPY",?23,"\|",?26,"WITH CAD",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"PRESCRIBED",! Line Location: I+6
Function Call: WRITE	Prompt: "",?23,"\|",?26,"DIAGNOSIS",?45,"\|",?47,"TOTAL",?65,"\|",?67,"A LIPID LOW-",! Line Location: I+7
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"ERING THERAPY",! Line Location: I+8
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: I+9
Function Call: WRITE	Prompt: ?1,"17",?5,"MEASURE: Patients ",?23,"\|",?45,"\|",?65,"\|",! Line Location: I+11
Function Call: WRITE	Prompt: ?5,"aged 18 and older",?23,"\|",?45,"\|",?65,"\|",! Line Location: I+12
Function Call: WRITE	Prompt: ?5,"with a diagnosis ",?23,"\|",?45,"\|",?65,"\|",! Line Location: I+13
Function Call: WRITE	Prompt: ?5,"of CAD prescribed",?23,"\|",?30,$$C($G(BUDSECTI("PTS"))),?45,"\|",?50,$$C($G(BUDSECTI("PTS"))),?65,"\|",?70,$$C($G(BUDSECTI("CAD"))),! Line Location: I+14
Function Call: WRITE	Prompt: ?5,"a lipid lowering",?23,"\|",?45,"\|",?65,"\|",! Line Location: I+15
Function Call: WRITE	Prompt: ?5,"therapy",?23,"\|",?45,"\|",?65,"\|",! Line Location: I+16
Function Call: WRITE	Prompt: $$CTR("SECTION J - ISCHEMIC VASCULAR DISEASE (IVD): ASPIRIN OR ANTITHROMBOTIC THERAPY"),! Line Location: J+2
Function Call: WRITE	Prompt: "ISCHEMIC VASCULAR",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: J+4
Function Call: WRITE	Prompt: "DISEASE (IVD):",?23,"\|",?26,"18 AND OLDER WITH",?45,"\|",?47,"CHARTS",?65,"\|",?67,"PATIENTS ",! Line Location: J+5
Function Call: WRITE	Prompt: "ASPIRIN OR",?23,"\|",?26,"IVD DIAGNOSIS",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"WITH ASPIRIN",! Line Location: J+6
Function Call: WRITE	Prompt: "OTHER",?23,"\|",?26,"OR AMI, CABG, OR",?45,"\|",?47,"TOTAL",?65,"\|",?67,"OR OTHER ",! Line Location: J+7
Function Call: WRITE	Prompt: "ANTITHROMBOTIC",?23,"\|",?26,"PTCA PROCEDURE",?45,"\|",?47,"",?65,"\|",?67,"ANTITHROMBOTIC",! Line Location: J+8
Function Call: WRITE	Prompt: "THERAPY",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"THERAPY",! Line Location: J+9
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: J+10
Function Call: WRITE	Prompt: ?1,"18",?5,"MEASURE: Patients ",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+12
Function Call: WRITE	Prompt: ?5,"aged 18 and older",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+13
Function Call: WRITE	Prompt: ?5,"with a diagnosis",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+14
Function Call: WRITE	Prompt: ?5,"of IVD or AMI, ",?23,"\|",?30,$$C($G(BUDSECTJ("PTS"))),?45,"\|",?50,$$C($G(BUDSECTJ("PTS"))),?65,"\|",?70,$$C($G(BUDSECTJ("IVD"))),! Line Location: J+15
Function Call: WRITE	Prompt: ?5,"CABG, or PTCA ",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+16
Function Call: WRITE	Prompt: ?5,"procedure with ",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+17
Function Call: WRITE	Prompt: ?5,"aspirin or another",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+18
Function Call: WRITE	Prompt: ?5,"antithrombotic ",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+19
Function Call: WRITE	Prompt: ?5,"therapy",?23,"\|",?45,"\|",?65,"\|",! Line Location: J+20
Function Call: WRITE	Prompt: $$CTR("SECTION K - COLORECTAL CANCER SCREENING"),! Line Location: K+2
Function Call: WRITE	Prompt: ?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: K+4
Function Call: WRITE	Prompt: "",?23,"\|",?26,"51 TO 74",?45,"\|",?47,"CHARTS",?65,"\|",?67,"PATIENTS WITH",! Line Location: K+5
Function Call: WRITE	Prompt: "COLORECTAL CANCER",?23,"\|",?26,"YEARS OF AGE",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"APPROPRIATE",! Line Location: K+6
Function Call: WRITE	Prompt: "SCREENING",?23,"\|",?26,"",?45,"\|",?47,"TOTAL",?65,"\|",?67,"SCREENING FOR",! Line Location: K+7
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"COLORECTAL",! Line Location: K+8
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"CANCER",! Line Location: K+9
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: K+10
Function Call: WRITE	Prompt: ?1,"19",?5,"MEASURE: Patients",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+12
Function Call: WRITE	Prompt: ?5,"age 51 through ",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+13
Function Call: WRITE	Prompt: ?5,"74 years of age ",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+14
Function Call: WRITE	Prompt: ?5,"during the ",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+15
Function Call: WRITE	Prompt: ?5,"measurement year ",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+16
Function Call: WRITE	Prompt: ?5,"(on or prior to 31",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+17
Function Call: WRITE	Prompt: ?5,"December) with ",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+18
Function Call: WRITE	Prompt: ?5,"appropriate",?23,"\|" Line Location: K+19
Function Call: WRITE	Prompt: ?30,$$C($G(BUDSECTK("PTS"))),?45,"\|",?50,$$C($G(BUDSECTK("PTS"))),?65,"\|",?70,$$C($G(BUDSECTK("CRC"))),! Line Location: K+20
Function Call: WRITE	Prompt: ?5,"screening for",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+21
Function Call: WRITE	Prompt: ?5,"colorectal cancer",?23,"\|",?45,"\|",?65,"\|",! Line Location: K+22
Function Call: WRITE	Prompt: $$CTR("SECTION L - HIV LINKAGE TO CARE"),! Line Location: L+2
Function Call: WRITE	Prompt: ?23,"\|",?26,"TOTAL",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: L+4
Function Call: WRITE	Prompt: "HIV LINKAGE",?23,"\|",?26,"PATIENTS FIRST",?45,"\|",?47,"CHARTS",?65,"\|",?67,"PATIENTS ",! Line Location: L+5
Function Call: WRITE	Prompt: "TO CARE",?23,"\|",?26,"DIAGNOSED",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"SEEN WITHIN",! Line Location: L+6
Function Call: WRITE	Prompt: "",?23,"\|",?26,"WITH HIV",?45,"\|",?47,"TOTAL",?65,"\|",?67,"90 DAYS OF",! Line Location: L+7
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"FIRST ",! Line Location: L+8
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"DIAGNOSIS",! Line Location: L+9
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"OF HIV",! Line Location: L+10
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: L+11
Function Call: WRITE	Prompt: ?1,"20",?5,"MEASURE: Patients",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+13
Function Call: WRITE	Prompt: ?5,"whose first ever",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+14
Function Call: WRITE	Prompt: ?5,"HIV diagnosis was",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+15
Function Call: WRITE	Prompt: ?5,"made by health",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+16
Function Call: WRITE	Prompt: ?5,"center staff ",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+17
Function Call: WRITE	Prompt: ?5,"between October 1",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+18
Function Call: WRITE	Prompt: ?5,"and September 30",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+19
Function Call: WRITE	Prompt: ?5,"of the measurement",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+20
Function Call: WRITE	Prompt: ?5,"year and who were",?23,"\|" Line Location: L+21
Function Call: WRITE	Prompt: ?30,$$C($G(BUDSECTL("PTS"))),?45,"\|",?50,$$C($G(BUDSECTL("PTS"))),?65,"\|",?70,$$C($G(BUDSECTL("HIV"))),! Line Location: L+22
Function Call: WRITE	Prompt: ?5,"seen for follow-up",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+23
Function Call: WRITE	Prompt: ?5,"treatment within",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+24
Function Call: WRITE	Prompt: ?5,"90 days of that",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+25
Function Call: WRITE	Prompt: ?5,"first ever",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+26
Function Call: WRITE	Prompt: ?5,"diagnosis",?23,"\|",?45,"\|",?65,"\|",! Line Location: L+27
Function Call: WRITE	Prompt: $$CTR("SECTION M - PATIENTS SCREENED FOR DEPRESSION AND FOLLOW-UP"),! Line Location: M+2
Function Call: WRITE	Prompt: ?23,"\|",?26,"",?45,"\|",?65,"\|",?67,"NUMBER OF",! Line Location: M+4
Function Call: WRITE	Prompt: ?23,"\|",?26,"",?45,"\|",?65,"\|",?67,"PATIENTS",! Line Location: M+5
Function Call: WRITE	Prompt: "PATIENTS SCREENED",?23,"\|",?26,"",?45,"\|",?47,"CHARTS",?65,"\|",?67,"SCREENED FOR",! Line Location: M+6
Function Call: WRITE	Prompt: "FOR DEPRESSION",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"DEPRESSION",! Line Location: M+7
Function Call: WRITE	Prompt: "AND FOLLOW-UP",?23,"\|",?26,"AGED 12 AND",?45,"\|",?47,"TOTAL",?65,"\|",?67,"AND FOLLOW-UP",! Line Location: M+8
Function Call: WRITE	Prompt: "",?23,"\|",?26,"OLDER",?45,"\|",?47,"",?65,"\|",?67,"PLAN",! Line Location: M+9
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"DOCUMENTED AS",! Line Location: M+10
Function Call: WRITE	Prompt: "",?23,"\|",?26,"",?45,"\|",?47,"",?65,"\|",?67,"APPROPRIATE",! Line Location: M+11
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: M+12
Function Call: WRITE	Prompt: ?1,"21",?5,"MEASURE: Patients",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+14
Function Call: WRITE	Prompt: ?5,"aged 12 and older",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+15
Function Call: WRITE	Prompt: ?5,"who were (1) ",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+16
Function Call: WRITE	Prompt: ?5,"screened for ",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+17
Function Call: WRITE	Prompt: ?5,"depression with a",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+18
Function Call: WRITE	Prompt: ?5,"standardized tool",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+19
Function Call: WRITE	Prompt: ?5,"AND IF SCREENING",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+20
Function Call: WRITE	Prompt: ?5,"WAS POSITIVE (2)",?23,"\|" Line Location: M+21
Function Call: WRITE	Prompt: ?30,$$C($G(BUDSECTM("PTS"))),?45,"\|",?50,$$C($G(BUDSECTM("PTS"))),?65,"\|",?70,$$C($G(BUDSECTM("DEP"))),! Line Location: M+22
Function Call: WRITE	Prompt: ?5,"had a follow-up",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+23
Function Call: WRITE	Prompt: ?5,"plan documented",?23,"\|",?45,"\|",?65,"\|",! Line Location: M+24
Function Call: WRITE	Prompt: $$CTR("SECTION N - DENTAL SEALANTS"),! Line Location: N+2
Function Call: WRITE	Prompt: "",?23,"\|",?26,"TOTAL PATIENTS",?45,"\|",?47,"CHARTS",?65,"\|",?67,"NUMBER OF",! Line Location: N+4
Function Call: WRITE	Prompt: "DENTAL SEALANTS",?23,"\|",?26,"AGED 6 THROUGH",?45,"\|",?47,"SAMPLED OR EHR",?65,"\|",?67,"PATIENTS",! Line Location: N+5
Function Call: WRITE	Prompt: "",?23,"\|",?26,"9 IDENTIFIED AS",?45,"\|",?47,"TOTAL",?65,"\|",?67,"WITH",! Line Location: N+6
Function Call: WRITE	Prompt: "",?23,"\|",?26,"MODERATE TO",?45,"\|",?47,"",?65,"\|",?67,"SEALANTS",! Line Location: N+7
Function Call: WRITE	Prompt: "",?23,"\|",?26,"HIGH RISK",?45,"\|",?47,"",?65,"\|",?67,"TO FIRST",! Line Location: N+8
Function Call: WRITE	Prompt: "",?23,"\|",?26,"FOR CARIES",?45,"\|",?47,"",?65,"\|",?67,"MOLARS",! Line Location: N+9
Function Call: WRITE	Prompt: "",?23,"\|",?30,"(a)",?45,"\|",?50,"(b)",?65,"\|",?70,"(c)",! Line Location: N+10
Function Call: WRITE	Prompt: ?1,"22",?5,"MEASURE: Children",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+12
Function Call: WRITE	Prompt: ?5,"age 6-9 years",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+13
Function Call: WRITE	Prompt: ?5,"at moderate to",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+14
Function Call: WRITE	Prompt: ?5,"high risk of",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+15
Function Call: WRITE	Prompt: ?5,"caries who",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+16
Function Call: WRITE	Prompt: ?5,"received a",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+17
Function Call: WRITE	Prompt: ?5,"sealant on a",?23,"\|" Line Location: N+18
Function Call: WRITE	Prompt: ?30,$$C($G(BUDSECTN("PTS"))),?45,"\|",?50,$$C($G(BUDSECTN("PTS"))),?65,"\|",?70,$$C($G(BUDSECTN("SEAL"))),! Line Location: N+19
Function Call: WRITE	Prompt: ?5,"permanent first",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+20
Function Call: WRITE	Prompt: ?5,"molar tooth",?23,"\|",?45,"\|",?65,"\|",! Line Location: N+21
Function Call: WRITE	Prompt: !,$$CTR("TABLE 6B - QUALITY OF CARE INDICATORS"),!,$$REPEAT^XLFSTR("_",79),! Line Location: T6BH+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",79),! Line Location: LINE+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",45),"\|",$$REPEAT^XLFSTR("_",33),! Line Location: LINE1+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",37),"\|",$$REPEAT^XLFSTR("_",22),"\|",$$REPEAT^XLFSTR("_",18),! Line Location: LINE2+1
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("_",23),"\|",$$REPEAT^XLFSTR("_",21),"\|",$$REPEAT^XLFSTR("_",19),"\|",$$REPEAT^XLFSTR("_",13),! Line Location: LINE3+1
Function Call: WRITE	Prompt: !!,"not developed yet....." Line Location: NRY+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
>> BUDQUIT	REST6B+1, REST6B+25, G1+1, H+1, I+1, J+1, K+1, L+1, M+1, N+1
>> BUDSECG1("ABM"	G1+24
>> BUDSECG1("PTS"	G1+24
>> BUDSECTE("AWT"	REST6B+17
>> BUDSECTE("PTS"	REST6B+17
>> BUDSECTF("PLAN"	REST6B+40
>> BUDSECTF("PTS"	REST6B+40
>> BUDSECTH("APT"	H+13
>> BUDSECTH("PTS"	H+13
>> BUDSECTI("CAD"	I+14
>> BUDSECTI("PTS"	I+14
>> BUDSECTJ("IVD"	J+15
>> BUDSECTJ("PTS"	J+15
>> BUDSECTK("CRC"	K+20
>> BUDSECTK("PTS"	K+20
>> BUDSECTL("HIV"	L+22
>> BUDSECTL("PTS"	L+22
>> BUDSECTM("DEP"	M+22
>> BUDSECTM("PTS"	M+22
>> BUDSECTN("PTS"	N+19
>> BUDSECTN("SEAL"	N+19
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	REST6B+1, REST6B+25, G1+1, H+1, I+1, J+1, K+1, L+1, M+1, N+1
U	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: BUDCRP6E

Information

Source Information

Call Graph

Call Graph Total: 4

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	REST6B+17, REST6B+40, G1+24, H+13, I+14, J+15, K+20, L+22, M+22, N+19
$$CTR	REST6B+2, REST6B+26, G1+2, H+2, I+2, J+2, K+2, L+2, M+2, N+2 , T6BH+1
LINE	REST6B+3, REST6B+23, REST6B+27, REST6B+46, G1+3, G1+29, H+3, H+18, I+3, I+17 , J+3, J+21, K+3, K+23, L+3, L+28, M+3, M+25, N+3, N+22
LINE3	REST6B+10, REST6B+36, G1+13, H+9, I+10, J+11, K+11, L+12, M+13, N+11
T6BH	REST6B+1, REST6B+25, G1+1, H+1, I+1, J+1, K+1, L+1, M+1, N+1