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

Package: IHS Uniform Data System

Routine: BUD9RP71


Information

BUD9RP71 ; IHS/CMI/LAB - UDS REPORT DRIVER TABLE 6B 03 Dec 2009 6:10 AM 30 Dec 2009 8:12 PM ;

Source Information

Source file <BUD9RP71.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
IHS Uniform Data System 8 ^BUD9RP7F  (PRGHL,PRGRL)^BUD9RP7I  (HTCRL,HTRL,HTURL)^BUD9RP7J  (DMR1L,DMR2L,DMRL)^BUD9RP7L  (DMRACE1,DMRACE2)^BUD9RP7O  ^BUD9RP7P  DMR3L^BUD9RP7T  HEADER^BUD9RPTP  
VA Fileman 2 COMMA^%DTC  ^DIR  
Kernel 1 $$REPEAT^XLFSTR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Uniform Data System 2 BUD9RP7  BUD9RP7O  

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
^BUD9RP7F NEXT+62
PRGHL^BUD9RP7I NEXT+65
PRGRL^BUD9RP7I NEXT+66
HTCRL^BUD9RP7J NEXT+69
HTRL^BUD9RP7J NEXT+68
HTURL^BUD9RP7J NEXT+70
DMR1L^BUD9RP7L NEXT+75
DMR2L^BUD9RP7L NEXT+76
DMRL^BUD9RP7L NEXT+74
DMRACE1^BUD9RP7O PRINT+60
DMRACE2^BUD9RP7O NEXT+59
^BUD9RP7P NEXT+64
DMR3L^BUD9RP7T NEXT+77
HEADER^BUD9RPTP PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55, NEXT+1, NEXT+24
, NEXT+28, NEXT+32, NEXT+36, NEXT+40, NEXT+50, NEXT+54
^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,"|",$$C($P($G(BUDSECTH(1)),U)),?39,"|",$$C($P($G(BUDSECTH(1)),U,2)),?49,"|",$$C($P($G(BUDSECTH(1)),U,3)),?59,"|",$$C($P($G(BUDSECTH(1)),U,4)),?69,"|",!
  • Line Location: PRINT+12
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 LOW BIRTH WEIGHT BY RACE",80),?69,"|",!,$$CTR("AND HISPANIC/LATINO IDENTITY",80),?69,"|",!
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: $$CTR("Deliveries and Babies by birth weight"),?69,"|",!
  • Line Location: PRINT+19
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,"|",?31,"HISPANIC/LATINO IDENTITY",?59,"|",!
  • Line Location: NEXT+2
Function Call: WRITE
  • Prompt: ?29,"|",?31,"American",?39,"|",?49,"|",?52,"More",?59,"|",!
  • Line Location: NEXT+3
Function Call: WRITE
  • Prompt: ?29,"|",?31,"Indian/",?39,"|",?42,"",?49,"|",?52,"than",?59,"|",!
  • Line Location: NEXT+4
Function Call: WRITE
  • Prompt: ?29,"|",?31,"Alaska",?39,"|",?42,"",?49,"|",?52,"one",?59,"|",!
  • Line Location: NEXT+5
Function Call: WRITE
  • Prompt: ?29,"|",?31,"Native",?39,"|",?42,"White",?49,"|",?52,"race",?59,"|",!
  • Line Location: NEXT+6
Function Call: WRITE
  • Prompt: ?29,"|",?33,"(d)",?39,"|",?42,"(e)",?49,"|",?52,"(f)",?59,"|",!
  • Line Location: NEXT+7
Function Call: WRITE
  • Prompt: "HIV Positive",?29,"|",?59,"|",!
  • Line Location: NEXT+9
Function Call: WRITE
  • Prompt: "Pregnant Women",?29,"|",$$C($P($G(BUDSECTH(1)),U,5)),?39,"|",$$C($P($G(BUDSECTH(1)),U,6)),?49,"|",$$C($P($G(BUDSECTH(1)),U,7)),?59,"|",!
  • Line Location: NEXT+10
Function Call: WRITE
  • Prompt: "(NO PRENATAL CARE PROVIDED? CHECK HERE: "_$S(BUDPREN=0:"X",1:""),")",?59,"|",!
  • Line Location: NEXT+14
Function Call: WRITE
  • Prompt: $$CTR("SECTION A: DELIVERIES AND LOW BIRTH WEIGHT BY RACE AND ",60),?59,"|",!
  • Line Location: NEXT+16
Function Call: WRITE
  • Prompt: $$CTR("Deliveries and Babies by birth weight",60),?59,"|",!
  • Line Location: NEXT+18
Function Call: WRITE
  • Prompt: ?2,"1",?5,"Prenatal care patients",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+20
Function Call: WRITE
  • Prompt: ?5,"who delivered during ",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+21
Function Call: WRITE
  • Prompt: ?5,"the year",?29,"| ",BUDXX,?39,"| ",BUDXX,?49,"| ",BUDXX,?59,"|",!
  • Line Location: NEXT+22
Function Call: WRITE
  • Prompt: ?2,"2",?5,"Deliveries performed",?29,"|",?59,"|",!
  • Line Location: NEXT+25
Function Call: WRITE
  • Prompt: ?5,"by Grantee Provider",?29,"|*****************************",?59,"|",!
  • Line Location: NEXT+26
Function Call: WRITE
  • Prompt: ?2,"3",?5,"Live Births <1500",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+29
Function Call: WRITE
  • Prompt: ?5,"grams",?29,"| ",BUDXX,?39,"| ",BUDXX,?49,"| ",BUDXX,?59,"|",!
  • Line Location: NEXT+30
Function Call: WRITE
  • Prompt: ?2,"4",?5,"Live Births 1500-",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+33
Function Call: WRITE
  • Prompt: ?5,"2499 grams",?29,"| ",BUDXX,?39,"| ",BUDXX,?49,"| ",BUDXX,?59,"|",!
  • Line Location: NEXT+34
Function Call: WRITE
  • Prompt: ?2,"5",?5,"Live Births >=2500",?29,"| ",BUDXX,?39,"| ",BUDXX,?49,"| ",BUDXX,?59,"|",!
  • Line Location: NEXT+37
Function Call: WRITE
  • Prompt: ?59,"|",!
  • Line Location: NEXT+41
Function Call: WRITE
  • Prompt: $$CTR("SECTION B: HYPERTENSION BY RACE AND ",60),?59,"|",!,$$CTR("HISPANIC/LATINO IDENTITY",60),?59,"|",!
  • Line Location: NEXT+42
Function Call: WRITE
  • Prompt: $$CTR("Patients diagnosed with hypertension whose last",60),?59,"|",!
  • Line Location: NEXT+44
Function Call: WRITE
  • Prompt: $$CTR("blood pressure was less than 140/90",60),?59,"|",!
  • Line Location: NEXT+45
Function Call: WRITE
  • Prompt: ?2,"6",?5,"Total hypertensive",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+47
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,"|",!
  • Line Location: NEXT+48
Function Call: WRITE
  • Prompt: ?2,"7",?5,"Charts sampled or",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+51
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,"|",!
  • Line Location: NEXT+52
Function Call: WRITE
  • Prompt: ?2,"8",?5,"Patients with ",?29,"|",?39,"|",?49,"|",?59,"|",!
  • Line Location: NEXT+55
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,"|",!
  • Line Location: NEXT+57
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("_",49),?79,"|",!
  • Line Location: LINE3+1
Function Call: WRITE
  • Prompt: !,$$CTR("TABLE 7 - HEALTH OUTCOMES AND DISPARITIES",60),!,$$REPEAT^XLFSTR("_",59),!
  • Line Location: T7H1+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",59),?59,"|",!
  • Line Location: LINE4+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",29),?29,"|",$$REPEAT^XLFSTR("_",9),?39,"|",$$REPEAT^XLFSTR("_",9),?49,"|",$$REPEAT^XLFSTR("_",9),?59,"|",!
  • 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

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$C PRINT+12, PRINT+49, PRINT+53, PRINT+58, NEXT+10, NEXT+48, NEXT+52, NEXT+57
$$CTR PRINT+17, PRINT+19, PRINT+43, PRINT+45, PRINT+46, NEXT+16, NEXT+18, NEXT+42, NEXT+44, NEXT+45
, T7H+1, T7H1+1
LINE PRINT+10, PRINT+16, PRINT+18, PRINT+20, 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+8, NEXT+15, NEXT+17, NEXT+19, NEXT+43, NEXT+46
LINE5 NEXT+23, NEXT+31, NEXT+35, NEXT+38, NEXT+49, NEXT+53, NEXT+58
LINE6 NEXT+13, NEXT+27
T7H PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55
T7H1 NEXT+1, NEXT+24, NEXT+28, NEXT+32, NEXT+36, NEXT+40, NEXT+50, NEXT+54

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUDDMR1L NEXT+75
>> BUDDMR2L NEXT+76
>> BUDDMR3L NEXT+77
>> BUDDMRL NEXT+74
>> BUDGPG NEXT+65*, NEXT+66*, NEXT+68*, NEXT+69*, NEXT+70*, NEXT+74*, NEXT+75*, NEXT+76*, NEXT+77*
>> BUDH NEXT+82
>> BUDHTCRL NEXT+69
>> BUDHTRL NEXT+68
>> BUDHTURL NEXT+70
>> BUDJ NEXT+82
>> BUDPG PRINT+1*
>> BUDPREN PRINT+14, PRINT+15, NEXT+14
>> BUDPRGHL NEXT+65
>> BUDPRGRL NEXT+66
>> BUDQUIT PRINT+3*, PRINT+4, PRINT+25, PRINT+29, PRINT+33, PRINT+37, PRINT+41, PRINT+51, PRINT+55, NEXT+1
, NEXT+24, NEXT+28, NEXT+32, NEXT+36, NEXT+40, NEXT+50, NEXT+54, NEXT+63
>> BUDSECTB(6 PRINT+49, NEXT+48
>> BUDSECTB(7 PRINT+53, NEXT+52
>> BUDSECTB(8 PRINT+58, NEXT+57
>> BUDSECTH(1 PRINT+12, NEXT+10
>> BUDXX PRINT+15*, PRINT+23, PRINT+31, PRINT+35, PRINT+38, NEXT+22, NEXT+30, NEXT+34, NEXT+37
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+24, NEXT+28, NEXT+32
, NEXT+36, NEXT+40, NEXT+50, NEXT+54
U PRINT+12, PRINT+49, PRINT+53, PRINT+58, NEXT+10, NEXT+48, NEXT+52, NEXT+57, 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