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: BUD1RP6E

Package: IHS Uniform Data System

Routine: BUD1RP6E


Information

BUD1RP6E ; IHS/CMI/LAB - UDS REPORT DRIVER TABLE 6B 30 Dec 2011 8:09 PM 14 Dec 2011 1:24 PM ;

Source Information

Source file <BUD1RP6E.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Uniform Data System 1 BUD1RP6B  

Entry Points

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

External References

Name Field # of Occurrence
COMMA^%DTC C+4
HEADER^BUD1RPTP REST6B+1, REST6B+22, G1+1, G2+1, H+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,"CHARTS",?65,"|",?67,"COUNSELING",!
  • Line Location: REST6B+6
Function Call: WRITE
  • Prompt: "",?23,"|",?26,"AGED 3 - 17 ON",?45,"|",?47,"SAMPLED OR EHR",?65,"|",?67,"AND BMI",!
  • Line Location: REST6B+7
Function Call: WRITE
  • Prompt: "WEIGHT ASSESSMENT",?23,"|",?26,"DECEMBER 31",?45,"|",?47,"TOTAL",?65,"|",?67,"DOCUMENTED",!
  • Line Location: REST6B+8
Function Call: WRITE
  • Prompt: "AND COUNSELING",?23,"|",?30,"(a)",?45,"|",?50,"(b)",?65,"|",?70,"(c)",!
  • Line Location: REST6B+9
Function Call: WRITE
  • Prompt: ?1,"12",?5,"Children and",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+11
Function Call: WRITE
  • Prompt: ?5,"adolescents aged",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+12
Function Call: WRITE
  • Prompt: ?5,"2 - 17 with a BMI",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+13
Function Call: WRITE
  • Prompt: ?5,"percentile, and",?23,"|",?30,$$C($G(BUDSECTE("PTS"))),?45,"|",?50,$$C($G(BUDSECTE("PTS"))),?65,"|",?70,$$C($G(BUDSECTE("AWT"))),!
  • Line Location: REST6B+14
Function Call: WRITE
  • Prompt: ?5,"counseling on",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+15
Function Call: WRITE
  • Prompt: ?5,"nutrition and",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+16
Function Call: WRITE
  • Prompt: ?5,"physical activity",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+17
Function Call: WRITE
  • Prompt: ?5,"documented for the",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+18
Function Call: WRITE
  • Prompt: ?5,"current year",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+19
Function Call: WRITE
  • Prompt: $$CTR("SECTION F - ADULT WEIGHT SCREENING AND FOLLOW-UP"),!
  • Line Location: REST6B+23
Function Call: WRITE
  • Prompt: ?23,"|",?45,"|",?65,"|",?67,"NUMBER OF",!
  • Line Location: REST6B+25
Function Call: WRITE
  • Prompt: ?23,"|",?45,"|",?65,"|",?67,"PATIENTS WITH",!
  • Line Location: REST6B+26
Function Call: WRITE
  • Prompt: ?23,"|",?45,"|",?65,"|",?67,"BMI CHARTED",!
  • Line Location: REST6B+27
Function Call: WRITE
  • Prompt: ?23,"|",?45,"|",?65,"|",?67,"AND FOLLOW-UP",!
  • Line Location: REST6B+28
Function Call: WRITE
  • Prompt: "ADULT WEIGHT SCREENING",?23,"|",?26,"",?45,"|",?47,"CHARTS",?65,"|",?67,"PLAN DOCU-",!
  • Line Location: REST6B+29
Function Call: WRITE
  • Prompt: "AND FOLLOW-UP",?23,"|",?26,"TOTAL PATIENTS",?45,"|",?47,"SAMPLED OR EHR",?65,"|",?67,"MENTED AS",!
  • Line Location: REST6B+30
Function Call: WRITE
  • Prompt: "",?23,"|",?26,"18 AND OVER",?45,"|",?47,"TOTAL",?65,"|",?67,"APPROPRIATE",!
  • Line Location: REST6B+31
Function Call: WRITE
  • Prompt: "",?23,"|",?30,"(a)",?45,"|",?50,"(b)",?65,"|",?70,"(c)",!
  • Line Location: REST6B+32
Function Call: WRITE
  • Prompt: ?1,"13",?5,"Patients aged 18",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+34
Function Call: WRITE
  • Prompt: ?5,"and over with (1)",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+35
Function Call: WRITE
  • Prompt: ?5,"BMI charted and",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+36
Function Call: WRITE
  • Prompt: ?5,"(2) follow-up plan",?23,"|",?30,$$C($G(BUDSECTF("PTS"))),?45,"|",?50,$$C($G(BUDSECTF("PTS"))),?65,"|",?70,$$C($G(BUDSECTF("PLAN"))),!
  • Line Location: REST6B+37
Function Call: WRITE
  • Prompt: ?5,"documented if",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+38
Function Call: WRITE
  • Prompt: ?5,"patients are",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+39
Function Call: WRITE
  • Prompt: ?5,"overweight or",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+40
Function Call: WRITE
  • Prompt: ?5,"underweight",?23,"|",?45,"|",?65,"|",!
  • Line Location: REST6B+41
Function Call: WRITE
  • Prompt: $$CTR("SECTION G1 - TOBACCO USE ASSESSMENT"),!
  • 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,"CHARTS",?65,"|",?67,"PATIENTS",!
  • Line Location: G1+5
Function Call: WRITE
  • Prompt: "TOBACCO ASSESSMENT",?23,"|",?26,"TOTAL PATIENTS",?45,"|",?47,"SAMPLED OR EHR",?65,"|",?67,"ASSESSED FOR",!
  • Line Location: G1+6
Function Call: WRITE
  • Prompt: "",?23,"|",?26,"18 AND OVER",?45,"|",?47,"TOTAL",?65,"|",?67,"TOBACCO USE",!
  • Line Location: G1+7
Function Call: WRITE
  • Prompt: "",?23,"|",?30,"(a)",?45,"|",?50,"(b)",?65,"|",?70,"(c)",!
  • Line Location: G1+8
Function Call: WRITE
  • Prompt: ?1,"14",?5,"Patients queried",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+10
Function Call: WRITE
  • Prompt: ?5,"about tobacco",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+11
Function Call: WRITE
  • Prompt: ?5,"use one of more",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+12
Function Call: WRITE
  • Prompt: ?5,"times in the",?23,"|",?30,$$C($G(BUDSECG1("PTS"))),?45,"|",?50,$$C($G(BUDSECG1("PTS"))),?65,"|",?70,$$C($G(BUDSECG1("ABM"))),!
  • Line Location: G1+13
Function Call: WRITE
  • Prompt: ?5,"measurement",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+14
Function Call: WRITE
  • Prompt: ?5,"year or prior",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+15
Function Call: WRITE
  • Prompt: ?5,"year",?23,"|",?45,"|",?65,"|",!
  • Line Location: G1+16
Function Call: WRITE
  • Prompt: $$CTR("SECTION G2 - TOBACCO CESSATION INTERVENTION"),!
  • Line Location: G2+2
Function Call: WRITE
  • Prompt: ?23,"|",?26,"TOTAL PATIENTS",?45,"|",?65,"|",?67,"NUMBER OF",!
  • Line Location: G2+4
Function Call: WRITE
  • Prompt: "",?23,"|",?26,"WITH DIAGNOSED",?45,"|",?47,"CHARTS",?65,"|",?67,"PATIENTS",!
  • Line Location: G2+5
Function Call: WRITE
  • Prompt: "TOBACCO CESSATION",?23,"|",?26,"TOBACCO",?45,"|",?47,"SAMPLED OR EHR",?65,"|",?67,"ADVISED",!
  • Line Location: G2+6
Function Call: WRITE
  • Prompt: "INTERVENTION",?23,"|",?26,"DEPENDENCE",?45,"|",?47,"TOTAL",?65,"|",?67,"TO QUIT",!
  • Line Location: G2+7
Function Call: WRITE
  • Prompt: "",?23,"|",?30,"(a)",?45,"|",?50,"(b)",?65,"|",?70,"(c)",!
  • Line Location: G2+8
Function Call: WRITE
  • Prompt: ?1,"15",?5,"Tobacco users",?23,"|",?45,"|",?65,"|",!
  • Line Location: G2+10
Function Call: WRITE
  • Prompt: ?5,"aged 18 and",?23,"|",?45,"|",?65,"|",!
  • Line Location: G2+11
Function Call: WRITE
  • Prompt: ?5,"above who have",?23,"|",?45,"|",?65,"|",!
  • Line Location: G2+12
Function Call: WRITE
  • Prompt: ?5,"received",?23,"|",?30,$$C($G(BUDSECG2("PTS"))),?45,"|",?50,$$C($G(BUDSECG2("PTS"))),?65,"|",?70,$$C($G(BUDSECG2("ATOB"))),!
  • Line Location: G2+13
Function Call: WRITE
  • Prompt: ?5,"cessation advise",?23,"|",?45,"|",?65,"|",!
  • Line Location: G2+14
Function Call: WRITE
  • Prompt: ?5,"or medication",?23,"|",?45,"|",?65,"|",!
  • Line Location: G2+15
Function Call: WRITE
  • Prompt: $$CTR("SECTION H - ASTHMA PHARMACOLOGICAL 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,"CHARTS",?65,"|",?67,"PATIENTS WITH",!
  • Line Location: H+5
Function Call: WRITE
  • Prompt: "ASTHMA TREATMENT PLAN",?23,"|",?26,"WITH PERSISTENT",?45,"|",?47,"SAMPLED OR EHR",?65,"|",?67,"ACCEPTABLE",!
  • Line Location: H+6
Function Call: WRITE
  • Prompt: "",?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,"Patients aged 5",?23,"|",?45,"|",?65,"|",!
  • Line Location: H+10
Function Call: WRITE
  • Prompt: ?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("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+14, REST6B+37, G1+13, G2+13, H+13
$$CTR REST6B+2, REST6B+23, G1+2, G2+2, H+2, T6BH+1
LINE REST6B+3, REST6B+20, REST6B+24, REST6B+43, G1+3, G1+17, G2+3, G2+17, H+3, H+18
LINE3 REST6B+10, REST6B+33, G1+9, G2+9, H+9
T6BH REST6B+1, REST6B+22, G1+1, G2+1, H+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+22, G1+1, G2+1, H+1
>> BUDSECG1("ABM" G1+13
>> BUDSECG1("PTS" G1+13
>> BUDSECG2("ATOB" G2+13
>> BUDSECG2("PTS" G2+13
>> BUDSECTE("AWT" REST6B+14
>> BUDSECTE("PTS" REST6B+14
>> BUDSECTF("PLAN" REST6B+37
>> BUDSECTF("PTS" REST6B+37
>> BUDSECTH("APT" H+13
>> BUDSECTH("PTS" H+13
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+22, G1+1, G2+1, H+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