Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BUDCRP6E

Package: IHS Uniform Data System

Routine: BUDCRP6E


Information

BUDCRP6E ; IHS/CMI/LAB - UDS REPORT DRIVER TABLE 6B ;

Source Information

Source file <BUDCRP6E.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

Name Field # of Occurrence
^(0 USR+1, LOC+1

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All