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

Package: IHS Uniform Data System

Routine: BUDHRP6G


Information

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

Source Information

Source file <BUDHRP6G.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Uniform Data System 2 $$VER^BUDHBAN  (HT6B,IN6B)^BUDHDU  
IHS Patient 1 $$HRN^AUPNPAT  
Kernel 1 $$FMTE^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Uniform Data System 2 BUDHRP6F  BUDHRP6I  

Entry Points

Name Comments DBIA/ICR reference
S(V) ;
AWS1H1 ;
AWS2L1 ;
LOC() ;EP - Return location name from file 4 based on DUZ(2).
AWS2H1 ;
CTR(X,Y) ;EP - Center X in a field Y wide.
AWS1L ;EP
AWS2H ;
USR() ;EP - Return name of current user from ^VA(200.
PAUSE ;EP
AWS2L ;EP
AWS1HD ;
GENI ;EP - general introductions
AWS1 ;EP
AWS1H ;
AWS2 ;EP
AWS2HD ;
AWS1L1 ;

External References

Name Field # of Occurrence
$$HRN^AUPNPAT AWS2L1+7, AWS2L1+11, AWS1L1+7, AWS1L1+11
$$VER^BUDHBAN AWS2HD+4, AWS2H1+4, AWS1HD+4, AWS1H1+4
HT6B^BUDHDU AWS2HD+10, AWS2H1+12, AWS1HD+10, AWS1H1+12
IN6B^BUDHDU AWS2+1, AWS1+1
^DIR AWS2H+3, AWS1H+3, PAUSE+1, GENI+4
$$FMTE^XLFDT AWS2HD+3, AWS2HD+8, AWS2H1+3, AWS2H1+8, AWS1HD+3, AWS1HD+8, AWS1H1+3, AWS1H1+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"TOTAL PATIENTS WITHOUT BMI SCREENING OR FOLLOW-UP PLAN: ",BUDTOT,!
  • Line Location: AWS2L+6
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U,1),1,25),?29,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2)),?41,$E(BUDCCOM,1,25),?70,$P(^DPT(DFN,0),U,2),?75,BUDAGE,!
  • Line Location: AWS2L1+7
Function Call: WRITE
  • Prompt: ?5,$P(BUDALL,U,1),?25,$P(BUDALL,U,2),?51,$P(BUDALL,U,3)
  • Line Location: AWS2L1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: AWS2H+3
Function Call: WRITE
  • Prompt: !,$$CTR("***** SENSITIVE INFORMATION *****",IOM)
  • Line Location: AWS2H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?55,"Section "_BUDSCTC_" of "_BUDTSCTC_", Page "_BUDGPG,!
  • Line Location: AWS2H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** RPMS Uniform Data System (UDS) "_$$VER^BUDHBAN()_" ***",80)
  • Line Location: AWS2H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 6B, Section F",80)
  • Line Location: AWS2H1+5
Function Call: WRITE
  • Prompt: !,$$CTR("Without BMI Screening and Follow-up",80),!
  • Line Location: AWS2H1+6
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: AWS2H1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: AWS2H1+8
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: AWS2H1+9
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: AWS2H1+10
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?34,"HRN",?41,"COMMUNITY",?70,"SEX",?75,"AGE"
  • Line Location: AWS2H1+13
Function Call: WRITE
  • Prompt: !?5,"BMI PERCENTILE",?25,"WEIGHT STATUS",?51,"FOLLOW-UP PLAN"
  • Line Location: AWS2H1+14
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: AWS2H1+15
Function Call: WRITE
  • Prompt: !!,"TOTAL PATIENTS WITH BMI SCREENING AND FOLLOW-UP PLAN: ",BUDTOT,!
  • Line Location: AWS1L+6
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U,1),1,25),?29,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2)),?41,$E(BUDCCOM,1,25),?70,$P(^DPT(DFN,0),U,2),?75,BUDAGE,!
  • Line Location: AWS1L1+7
Function Call: WRITE
  • Prompt: ?5,$P(BUDALL,U,1),?25,$P(BUDALL,U,2),?51,$P(BUDALL,U,3)
  • Line Location: AWS1L1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: AWS1H+3
Function Call: WRITE
  • Prompt: !,$$CTR("***** SENSITIVE INFORMATION *****",IOM)
  • Line Location: AWS1H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?55,"Section "_BUDSCTC_" of "_BUDTSCTC_", Page "_BUDGPG,!
  • Line Location: AWS1H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** RPMS Uniform Data System (UDS) "_$$VER^BUDHBAN()_" ***",80)
  • Line Location: AWS1H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 6B, Section F",80)
  • Line Location: AWS1H1+5
Function Call: WRITE
  • Prompt: !,$$CTR("With BMI Screening and Follow-up",80),!
  • Line Location: AWS1H1+6
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: AWS1H1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: AWS1H1+8
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: AWS1H1+9
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: AWS1H1+10
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?34,"HRN",?41,"COMMUNITY",?70,"SEX",?75,"AGE"
  • Line Location: AWS1H1+13
Function Call: WRITE
  • Prompt: !?5,"BMI PERCENTILE",?25,"WEIGHT STATUS",?51,"FOLLOW-UP PLAN"
  • Line Location: AWS1H1+14
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: AWS1H1+15
Function Call: WRITE
  • Prompt: !,"NOTE: Patient lists may be hundreds of pages long, depending on the size of your"
  • Line Location: GENI+1
Function Call: WRITE
  • Prompt: !,"patient population. It is recommended that you run these reports at night and"
  • Line Location: GENI+2
Function Call: WRITE
  • Prompt: !,"print to an electronic file, not directly to a printer.",!
  • Line Location: GENI+3
Function Call: WRITE
  • Prompt: !!,"This Patient List option documents the individual patients and visits"
  • Line Location: GENI+5
Function Call: WRITE
  • Prompt: !,"that are counted and summarized on each Table report (main menu"
  • Line Location: GENI+6
Function Call: WRITE
  • Prompt: !,"option REP). The summary Table report is included at the beginning of each"
  • Line Location: GENI+7
Function Call: WRITE
  • Prompt: !,"List report."
  • Line Location: GENI+8
Function Call: WRITE
  • Prompt: !,"UDS searches your database to find all visits and related patients"
  • Line Location: GENI+9
Function Call: WRITE
  • Prompt: !,"during the time period selected. Based on the UDS definition, to be counted"
  • Line Location: GENI+10
Function Call: WRITE
  • Prompt: !,"as a patient, the patient must have had at least one visit meeting the "
  • Line Location: GENI+11
Function Call: WRITE
  • Prompt: !,"following criteria:"
  • Line Location: GENI+12
Function Call: WRITE
  • Prompt: !?4,"- must be to a location specified in your visit location setup"
  • Line Location: GENI+13
Function Call: WRITE
  • Prompt: !?4,"- must be to Service Category Ambulatory (A), Hospitalization (H), Day"
  • Line Location: GENI+14
Function Call: WRITE
  • Prompt: !?6,"Surgery (S), Observation (O), Telemedicine (M), Nursing home visit (R), "
  • Line Location: GENI+15
Function Call: WRITE
  • Prompt: !?6,"or In-Hospital (I) visit"
  • Line Location: GENI+16
Function Call: WRITE
  • Prompt: !?4,"- must NOT have an excluded clinic code (see User Manual for a list)"
  • Line Location: GENI+17
Function Call: WRITE
  • Prompt: !?4,"- must have a primary provider and a coded purpose of visit"
  • Line Location: GENI+18
Function Call: WRITE
  • Prompt: !?4,"- the patient must NOT have a gender of 'Unknown'"
  • Line Location: GENI+19
Function Call: WRITE
  • Prompt: !
  • Line Location: GENI+20
Routine Call
  • DIR
  • Line Location:
    • AWS2H+3
    • AWS1H+3
    • PAUSE+1
    • GENI+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] AWS2HD+7, AWS2H1+7, LOC+1, AWS1HD+7, AWS1H1+7
^DPT - [#2] AWS2L1+7, AWS2L1+11, AWS1L1+7, AWS1L1+11
^TMP($J S+2*
^VA(200 - [#200] AWS2HD+3, AWS2H1+3, USR+1, AWS1HD+3, AWS1H1+3
^XTMP("BUDHRP6B" AWS2L+3, AWS2L1+2, AWS2L1+3, AWS2L1+4, AWS2L1+5, AWS2L1+9, AWS1L+3, AWS1L1+2, AWS1L1+3, AWS1L1+4
, AWS1L1+5, AWS1L1+9

Label References

Name Line Occurrences
$$CTR AWS2H1+2, AWS2H1+4, AWS2H1+5, AWS2H1+6, AWS2H1+7, AWS2H1+8, AWS2H1+9, AWS1H1+2, AWS1H1+4, AWS1H1+5
, AWS1H1+6, AWS1H1+7, AWS1H1+8, AWS1H1+9
AWS1H AWS1L+2, AWS1L+5, AWS1L1+1, AWS1L1+6
AWS1H1 AWS1H+2
AWS1HD AWS1H+1
AWS1L1 AWS1L+4
AWS2H AWS2L+2, AWS2L+5, AWS2L1+1, AWS2L1+6
AWS2H1 AWS2H+2
AWS2HD AWS2H+1
AWS2L1 AWS2L+4
S AWS2L+3, AWS2L+7, AWS2L1+12, AWS2HD+1, AWS2HD+2, AWS2HD+3, AWS2HD+4, AWS2HD+5, AWS2HD+6, AWS2HD+7
, AWS2HD+8, AWS2HD+9, AWS2HD+11, AWS1L+3, AWS1L+7, AWS1L1+12, AWS1HD+1, AWS1HD+2, AWS1HD+3, AWS1HD+4
, AWS1HD+5, AWS1HD+6, AWS1HD+7, AWS1HD+8, AWS1HD+9, AWS1HD+11

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUDAGE AWS2L1+2*, AWS2L1+3, AWS2L1+4, AWS2L1+5, AWS2L1+7, AWS2L1+9, AWS2L1+11, AWS1L1+2*, AWS1L1+3, AWS1L1+4
, AWS1L1+5, AWS1L1+7, AWS1L1+9, AWS1L1+11
>> BUDALL AWS2L1+9*, AWS2L1+10, AWS2L1+12, AWS1L1+9*, AWS1L1+10, AWS1L1+12
>> BUDBD AWS2HD+8, AWS2H1+8, AWS1HD+8, AWS1H1+8
>> BUDBEN AWS2HD+9, AWS2H1+9, AWS1HD+9, AWS1H1+9
>> BUDCCOM AWS2L1+4*, AWS2L1+5, AWS2L1+7, AWS2L1+9, AWS2L1+11, AWS1L1+4*, AWS1L1+5, AWS1L1+7, AWS1L1+9, AWS1L1+11
>> BUDDECNT S+1*, S+2
>> BUDED AWS2HD+8, AWS2H1+8, AWS1HD+8, AWS1H1+8
>> BUDGPG AWS2H+2, AWS2H1+1*, AWS2H1+3, AWS1H+2, AWS1H1+1*, AWS1H1+3
>> BUDH AWS2L+3, AWS2L1+2, AWS2L1+3, AWS2L1+4, AWS2L1+5, AWS2L1+9, AWS1L+3, AWS1L1+2, AWS1L1+3, AWS1L1+4
, AWS1L1+5, AWS1L1+9
>> BUDJ AWS2L+3, AWS2L1+2, AWS2L1+3, AWS2L1+4, AWS2L1+5, AWS2L1+9, AWS1L+3, AWS1L1+2, AWS1L1+3, AWS1L1+4
, AWS1L1+5, AWS1L1+9
>> BUDNAME AWS2L1+3*, AWS2L1+4, AWS2L1+5, AWS2L1+9, AWS1L1+3*, AWS1L1+4, AWS1L1+5, AWS1L1+9
>> BUDP AWS2L+1*, AWS2H1+11, AWS2H1+16*, AWS1L+1*, AWS1H1+11, AWS1H1+16*
>> BUDQUIT AWS2L+1*, AWS2L+2, AWS2L+5, AWS2L1+1, AWS2L1+2, AWS2L1+3, AWS2L1+4, AWS2L1+5, AWS2L1+6, AWS2H+3*
, AWS1L+1*, AWS1L+2, AWS1L+5, AWS1L1+1, AWS1L1+2, AWS1L1+3, AWS1L1+4, AWS1L1+5, AWS1L1+6, AWS1H+3*
>> BUDROT AWS2L+3, AWS2L+5, AWS2L+6, AWS2L+7, AWS2L1+1, AWS2L1+6, AWS2L1+7, AWS2L1+10, AWS2L1+11, AWS2H+1
, AWS1L+3, AWS1L+5, AWS1L+6, AWS1L+7, AWS1L1+1, AWS1L1+6, AWS1L1+7, AWS1L1+10, AWS1L1+11, AWS1H+1
>> BUDSCTC AWS2H1+3, AWS1H1+3
>> BUDSITE AWS2L1+7, AWS2L1+11, AWS2HD+7, AWS2H1+7, AWS1L1+7, AWS1L1+11, AWS1HD+7, AWS1H1+7
>> BUDTOT AWS2L+1*, AWS2L+6, AWS2L+7, AWS2L1+8*, AWS1L+1*, AWS1L+6, AWS1L+7, AWS1L1+8*
>> BUDTSCTC AWS2H1+3, AWS1H1+3
DA PAUSE+1!
>> DFN AWS2L1+5*, AWS2L1+7, AWS2L1+9, AWS2L1+11, AWS1L1+5*, AWS1L1+7, AWS1L1+9, AWS1L1+11
DIR AWS2H+3!, AWS1H+3!, PAUSE+1!, GENI+4!
DIR("A" PAUSE+1*, GENI+4*
DIR(0 AWS2H+3*, AWS1H+3*, PAUSE+1*, GENI+4*
DT AWS2HD+3, AWS2H1+3, AWS1HD+3, AWS1H1+3
>> DTOUT AWS2H+3, AWS1H+3
DUZ AWS2HD+3, AWS2H1+3, USR+1, AWS1HD+3, AWS1H1+3
DUZ(2 AWS2L1+7, AWS2L1+11, LOC+1, AWS1L1+7, AWS1L1+11
IO AWS2H+3, AWS1H+3
IO(0 AWS2H+3, AWS1H+3
IOF AWS2H1+1, AWS1H1+1
IOM AWS2H1+2, CTR+1, AWS1H1+2
IOSL AWS2L+5, AWS2L1+1, AWS2L1+6, AWS1L+5, AWS1L1+1, AWS1L1+6
IOST AWS2H+3, AWS1H+3
U AWS2L1+7, AWS2L1+10, AWS2L1+11, AWS2L1+12, AWS2HD+3, AWS2HD+7, AWS2H1+3, AWS2H1+7, USR+1, LOC+1
, AWS1L1+7, AWS1L1+10, AWS1L1+11, AWS1L1+12, AWS1HD+3, AWS1HD+7, AWS1H1+3, AWS1H1+7
V S~, S+2
X AWS2L1+11*, AWS2L1+12*, AWS2HD+8*, AWS2HD+9*, AWS2H1+8*, AWS2H1+9*, CTR~, CTR+1, AWS1L1+11*, AWS1L1+12*
, AWS1HD+8*, AWS1HD+9*, AWS1H1+8*, AWS1H1+9*
Y AWS2H+3, CTR~, CTR+1, AWS1H+3
>> ZTQUEUED AWS2H+3, AWS1H+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All