Routine: BUDDRP7S

Package	Total	Call Graph
IHS Patient	1	($$AGE,$$HRN)^AUPNPAT
IHS Uniform Data System	1	$$HISP^BUDDRPTC
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component Reports	1	($$CLINIC,$$PRIMPROV)^APCLV
VA Fileman	1	^DIR

Name	Comments	DBIA/ICR reference
PAUSE	;
DME3	;EP
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
DME3L	;EP
DME3H	;
USR()	;EP - Return name of current user from ^VA(200.
DME3LX	;
DME3H1	;
GENI	;general introductions
DME3L2	;
DME3L1	;

Name	Field # of Occurrence
$$CLINIC^APCLV	DME3L2+17
$$PRIMPROV^APCLV	DME3L2+17
$$AGE^AUPNPAT	DME3L2+8
$$HRN^AUPNPAT	DME3L2+7
$$HISP^BUDDRPTC	DME3L2+8
^DIR	PAUSE+1, GENI+4, DME3H+2
$$VAL^XBDIQ1	DME3L2+17
$$FMTE^XLFDT	DME3L2+17, DME3H1+3, DME3H1+7

Interaction Calls

Name	Line Occurrences
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
Function Call: WRITE	Prompt: !,$$CTR($$LOC,80) Line Location: DME3+2
Function Call: WRITE	Prompt: !,$$CTR("UDS 2016",80) Line Location: DME3+3
Function Call: WRITE	Prompt: !!,"All Patients w/DM and A1c >9 by Ethnicity (Table 7)",! Line Location: DME3+4
Function Call: WRITE	Prompt: !!,"This report provides a list by ethnicity of patients age 18 and older who" Line Location: DME3+7
Function Call: WRITE	Prompt: !,"have had two medical visits during the report period, with a diagnosis" Line Location: DME3+8
Function Call: WRITE	Prompt: !,"of Type I or Type II diabetes anytime through the end of the report" Line Location: DME3+9
Function Call: WRITE	Prompt: !,"period, and without a diagnosis of polycystic ovaries, gestational diabetes," Line Location: DME3+10
Function Call: WRITE	Prompt: !,"or steroid-induced diabetes and with a most recent hemoglobin A1c greater" Line Location: DME3+11
Function Call: WRITE	Prompt: !,"than 9%, or with an A1c with no result, or with no A1c test during the" Line Location: DME3+12
Function Call: WRITE	Prompt: !,"report period." Line Location: DME3+13
Function Call: WRITE	Prompt: ! Line Location: DME3+14
Function Call: WRITE	Prompt: !!,"No patients to report." Line Location: DME3L+3
Function Call: WRITE	Prompt: !!,"TOTAL DM PATIENTS 18+ W/A1C >9% BY EHTNICITY: ",BUDTOT,! Line Location: DME3L+6
Function Call: WRITE	Prompt: !,BUDRACE Line Location: DME3L2+2
Function Call: WRITE	Prompt: !,BUDRACE,! Line Location: DME3L2+6
Function Call: WRITE	Prompt: !,BUDRACE,! Line Location: DME3L2+14
Function Call: WRITE	Prompt: ?5,BUDV,! Line Location: DME3L2+15
Function Call: WRITE	Prompt: !,BUDRACE,! Line Location: DME3L2+18
Function Call: WRITE	Prompt: !,"Sub-Total ",BUDRACE,": ",BUDSTOT,! Line Location: DME3L2+19
Function Call: WRITE	Prompt: ! Line Location: DME3H+2
Function Call: WRITE	Prompt: !,"*** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT ***" Line Location: DME3H1+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,! Line Location: DME3H1+3
Function Call: WRITE	Prompt: !,$$CTR("* RPMS Uniform Data System (UDS) *",80) Line Location: DME3H1+4
Function Call: WRITE	Prompt: !,$$CTR("Patient List for Table 7, Section C, Diabetes w/A1c >9 by Ethnicity",80),! Line Location: DME3H1+5
Function Call: WRITE	Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),! Line Location: DME3H1+6
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: DME3H1+7
Function Call: WRITE	Prompt: $TR($J("",80)," ","-") Line Location: DME3H1+8
Function Call: WRITE	Prompt: !?2,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?47,"SEX",?51,"AGE",?55,"ETHNICITY*" Line Location: DME3H1+20
Function Call: WRITE	Prompt: !?5,"LAST A1C VALUE OR CD & DATE" Line Location: DME3H1+21
Function Call: WRITE	Prompt: !?5,"LAST DM DATE",?19,"DX OR SVC CD",?35,"PROV TYPE",?45,"SVC CAT",?53,"CLINIC",?65,"LOCATION" Line Location: DME3H1+22
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-"),! Line Location: DME3H1+23
Routine Call	DIR Line Location: PAUSE+1 GENI+4 DME3H+2

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	DME3L2+17
^DIC(4 - [#4]	LOC+1, DME3H1+6
^DPT - [#2]	DME3L2+7, DME3L2+8
^VA(200 - [#200]	USR+1, DME3H1+3
^XTMP("BUDDRP7"	DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10

Name	Line Occurrences
$$CTR	DME3+2, DME3+3, DME3H1+4, DME3H1+5, DME3H1+6, DME3H1+7
$$LOC	DME3+2
DME3H	DME3L+2, DME3L+5, DME3L1+1, DME3L2+6, DME3L2+14, DME3L2+18
DME3H1	DME3H+1
DME3L1	DME3L+4
DME3L2	DME3L1+3
DME3LX	DME3L+5
GENI	DME3+5
PAUSE	DME3+6

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BUDALL	DME3L2+10*, DME3L2+11, DME3L2+12
>> BUDBD	DME3H1+7
>> BUDCCOM	DME3L2+4*, DME3L2+5, DME3L2+8, DME3L2+10
>> BUDED	DME3L2+8, DME3H1+7
>> BUDGPG	DME3H+1, DME3H1+1*, DME3H1+3
>> BUDH	DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDJ	DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDNAME	DME3L2+3*, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDP	DME3L+1, DME3H1+9, DME3H1+24
>> BUDPPV	DME3L2+12*, DME3L2+13
>> BUDQUIT	DME3L+1, DME3L+2, DME3L+5, DME3L1+1, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+6, DME3L2+13 , DME3L2+14, DME3L2+18, DME3H+2
>> BUDRACE	DME3L1+3*, DME3L2+2, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+6, DME3L2+10, DME3L2+14, DME3L2+18, DME3L2+19
>> BUDSITE	DME3L2+7, DME3H1+6
>> BUDSTOT	DME3L2+1, DME3L2+9, DME3L2+19
>> BUDTOT	DME3L+1, DME3L+6, DME3L1+2, DME3L2+9*
>> BUDV	DME3L2+13*, DME3L2+15, DME3L2+16
>> BUDX	DME3L2+13*
>> C	DME3L2+16*, DME3L2+17
DA	PAUSE+1!
>> DFN	DME3L2+5*, DME3L2+7, DME3L2+8, DME3L2+10
DIR	PAUSE+1!, GENI+4!, DME3H+2!
DIR("A"	PAUSE+1, GENI+4
DIR(0	PAUSE+1, GENI+4, DME3H+2*
DT	DME3H1+3
>> DTOUT	DME3H+2
DUZ	USR+1, DME3H1+3
DUZ(2	LOC+1, DME3L2+7
IO	DME3H+2
IO(0	DME3H+2
IOF	DME3+1, DME3H1+1
IOM	CTR+1
IOSL	DME3L+5, DME3L1+1, DME3L2+6, DME3L2+14, DME3L2+18
IOST	DME3H+2
U	USR+1, LOC+1, DME3L2+7, DME3L2+8, DME3L2+11, DME3L2+13, DME3L2+17, DME3H1+3, DME3H1+6
>> V	DME3L2+16*, DME3L2+17
X	CTR~, CTR+1, DME3H1+7*
Y	CTR~, CTR+1, DME3H+2
>> ZTQUEUED	DME3H+2

Customize PDF page

Package: IHS Uniform Data System

Routine: BUDDRP7S

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: