Routine: BUDCRPT2

Package	Total	Call Graph
IHS Uniform Data System	4	PROC^BUDCRPTC PT^BUDCRPTE PRINT^BUDCRPTP TAXCHK^BUDCXTCH
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
IHS VA Utilities	2	^XBDBQUE EN^XBVK
VA Fileman	2	^DIC ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
TOL	;EP
T5BI	;
T3AI	;intro for table 3A
TUSVE	;EP
T3BRI	;intro for table 3B - RACE
USR()	;EP - Return name of current user from ^VA(200.
T5AI	;
T3BEI	;intro for table 3B - RACE
TSKMN	;EP ENTRY POINT FROM TASKMAN
TUSVR	;EP
T6I	;intro for table 6
NODEV	;
QUARTER	;
TZ	;EP - entry point for Table 3A only
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
EN1	;
TOLI	;
T4PMIS	;EP - called from option
T4IPMIS	;intro for table 4 PMIS
TZAI	;intro for table Z
EN	;EP
ZIS	;call to XBDBQUE
T6	;EP - entry point for Table 6A only
DRIVER	;
T4CHAR	;EP - called from option
T5	;EP
M	;EP - called from option
T4ICHAR	;intro for table 4 CHAR
T5I	;
EOJ	;
YEAR	;
T5A	;EP - called from option
T5B	;EP
T5C	;EP
T4IPPL	;EP - called from option
T4IPPLI	;intro for table 3A
ZIS1	;
T5CI	;
T3A	;EP - entry point for Table 3A only
GENI	;general introductions
NODEV1	;

External References

Name	Field # of Occurrence
^%ZIS	ZIS+2
^%ZISC	DRIVER+4, NODEV1+3
^%ZTLOAD	TSKMN+5
PROC^BUDCRPTC	DRIVER+1, NODEV1+1
PT^BUDCRPTE	EN1+28
PRINT^BUDCRPTP	DRIVER+3, NODEV1+2
TAXCHK^BUDCXTCH	EN1+6
^DIC	EN1+2
^DIR	EN1+14, EN1+22, M+16, QUARTER+9, YEAR+7, GENI+7
^XBDBQUE	NODEV+2
EN^XBVK	EOJ+1
$$FMTE^XLFDT	QUARTER+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN1+2
Function Call: WRITE	Prompt: !!,"Warning: There are no locations defined in the site parameter file for this",!,"site. Report will not be accurate!" Line Location: EN1+5
Function Call: WRITE	Prompt: !!,"Year not entered.",! Line Location: EN1+8
Function Call: WRITE	Prompt: !,"Time period not entered." Line Location: EN1+10
Function Call: WRITE	Prompt: !!,"Classification not entered." Line Location: EN1+15
Function Call: WRITE	Prompt: !!,"Depending on the size of your database, this report may take 2-4 hours to run" Line Location: EN1+17
Function Call: WRITE	Prompt: !,"and produce patient reports that are hundreds of pages long. It is recommended" Line Location: EN1+18
Function Call: WRITE	Prompt: !,"that these reports be run at night and printed to an electronic file, rather " Line Location: EN1+19
Function Call: WRITE	Prompt: !,"than directly to a printer." Line Location: EN1+20
Function Call: WRITE	Prompt: ! Line Location: EN1+21
Function Call: WRITE	Prompt: !,"Report Aborted" Line Location: ZIS1+1
Function Call: WRITE	Prompt: "UDS Patient and Provider List Selection" Line Location: M+4
Function Call: WRITE	Prompt: !!?5,"1 All Patients w/Visits by ZIP Code and Insurance Source" Line Location: M+5
Function Call: WRITE	Prompt: !?5,"2 All Patients w/Visits, by Age & Gender (Tables 3A)" Line Location: M+6
Function Call: WRITE	Prompt: !?5,"3 All Patients w/Visits, by Hispanic or Latino Identity & Race (Table 3B)" Line Location: M+7
Function Call: WRITE	Prompt: !?5,"4 Income Percent of Poverty Level (Table 4)" Line Location: M+8
Function Call: WRITE	Prompt: !?5,"5 Principle Third Party Medical Insurance Source (Table 4)" Line Location: M+9
Function Call: WRITE	Prompt: !?5,"6 Characteristics of Special Populations (Table 4)" Line Location: M+10
Function Call: WRITE	Prompt: !?5,"7 Provider/Staff List (Table 5 col A)" Line Location: M+11
Function Call: WRITE	Prompt: !?5,"8 All patients by Service Category (Table 5 col B&C)" Line Location: M+12
Function Call: WRITE	Prompt: !?5,"9 All Visits w/Uncategorized Primary Prov (Table 5 col B&C)" Line Location: M+13
Function Call: WRITE	Prompt: !?5,"10 All Patients by Diagnosis (Table 6A)" Line Location: M+14
Function Call: WRITE	Prompt: !?5,"11 ALL Patient Lists for LST1 -Sub Menu" Line Location: M+15
Function Call: WRITE	Prompt: !!,"INCOME PERCENT OF POVERTY LEVEL (TABLE 4)" Line Location: T4IPPLI+1
Function Call: WRITE	Prompt: !,"This report provides a list of all patients with an income percent " Line Location: T4IPPLI+2
Function Call: WRITE	Prompt: !,"of poverty level (=<100%, 101-150%, 151-200% >200%, Unknown) during" Line Location: T4IPPLI+3
Function Call: WRITE	Prompt: !,"the report period." Line Location: T4IPPLI+4
Function Call: WRITE	Prompt: ! Line Location: T4IPPLI+5
Function Call: WRITE	Prompt: !!,"PRINCIPLE THIRD PARTY MEDICAL INSURANCE SOURCE (TABLE 4)" Line Location: T4IPMIS+1
Function Call: WRITE	Prompt: !,"This report will provide a list of all patients and the type of medical" Line Location: T4IPMIS+2
Function Call: WRITE	Prompt: !,"insurance the patient had as of the patient's last visit during the" Line Location: T4IPMIS+3
Function Call: WRITE	Prompt: !,"report period." Line Location: T4IPMIS+4
Function Call: WRITE	Prompt: ! Line Location: T4IPMIS+5
Function Call: WRITE	Prompt: !!,"CHARACTERISTICS OF SPECIAL POPULATIONS (TABLE 4)" Line Location: T4ICHAR+1
Function Call: WRITE	Prompt: !,"This report provides a list of all patients who are migrant workers," Line Location: T4ICHAR+2
Function Call: WRITE	Prompt: !,"seasonal workers, homeless, school based health center patients, or" Line Location: T4ICHAR+3
Function Call: WRITE	Prompt: !,"a veteran during the report period." Line Location: T4ICHAR+4
Function Call: WRITE	Prompt: ! Line Location: T4ICHAR+5
Function Call: WRITE	Prompt: !!,"ALL PATIENTS BY AGE & GENDER (Tables 3A)" Line Location: T3AI+1
Function Call: WRITE	Prompt: !,"This report lists all patients who have at least one visit for the specified" Line Location: T3AI+2
Function Call: WRITE	Prompt: !,"time period that meets the visit definition criteria. Sorted by community, " Line Location: T3AI+3
Function Call: WRITE	Prompt: !,"age, and gender and lists all visits that fit the definition. Age is " Line Location: T3AI+4
Function Call: WRITE	Prompt: !,"calculated as of June 30th of the report year." Line Location: T3AI+5
Function Call: WRITE	Prompt: !!,"ALL PATIENTS BY HISPANIC IDENTITY & RACE (Tables 3B)" Line Location: T3BRI+1
Function Call: WRITE	Prompt: !,"This report lists all patients by Hispanic or Latino Identity/Race/Language" Line Location: T3BRI+2
Function Call: WRITE	Prompt: !,"who have at least one visit for the specified time period that meets the " Line Location: T3BRI+3
Function Call: WRITE	Prompt: !,"visit definition criteria. Sorted by race/Hispanic identity, age, gender, " Line Location: T3BRI+4
Function Call: WRITE	Prompt: !,"and community and lists all visits that fit the definition. Age is calculated" Line Location: T3BRI+5
Function Call: WRITE	Prompt: !,"as of June 30th of the report year." Line Location: T3BRI+6
Function Call: WRITE	Prompt: !!,"ALL PATIENTS BY ETHNICITY (TABLE 3B)" Line Location: T3BEI+1
Function Call: WRITE	Prompt: !,"This report lists all patients who have at least on visit for the specified" Line Location: T3BEI+2
Function Call: WRITE	Prompt: !,"time period that meet the above criteria. Sorted by ethncicity, age, sex " Line Location: T3BEI+3
Function Call: WRITE	Prompt: !,"and community." Line Location: T3BEI+4
Function Call: WRITE	Prompt: !,"Lists all visits that fit the definition. Age is calculated as of June 30th" Line Location: T3BEI+5
Function Call: WRITE	Prompt: !,"of the report year." Line Location: T3BEI+6
Function Call: WRITE	Prompt: !!,"Patients by Zip Code and Insurance Source" Line Location: TZAI+1
Function Call: WRITE	Prompt: !,"The Patient Zip Code by Insurance Source table reports the number of patients" Line Location: TZAI+2
Function Call: WRITE	Prompt: !,"by their most recent (last) zip code as entered in patient registration and" Line Location: TZAI+3
Function Call: WRITE	Prompt: !,"their primary health insurance source as of the last visit during the " Line Location: TZAI+4
Function Call: WRITE	Prompt: !,"report period." Line Location: TZAI+5
Function Call: WRITE	Prompt: !,"ALL PATIENTS BY SERVICE CATEGORY (Table 5, columns b and c)" Line Location: T5I+1
Function Call: WRITE	Prompt: !,"This report lists all patients and related visits as defined above, categorized" Line Location: T5I+2
Function Call: WRITE	Prompt: !,"by UDS-defined service categories (primary provider code). Sorted by" Line Location: T5I+3
Function Call: WRITE	Prompt: !,"community, age and gender. See UDS User Manual for how UDS disciplines are" Line Location: T5I+4
Function Call: WRITE	Prompt: !,"mapped to RPMS provider codes." Line Location: T5I+5
Function Call: WRITE	Prompt: !,"ALL PATIENTS FOR UNCATEGORIZED PROVIDER VISITS (Table 5, columns b and c)" Line Location: T5BI+1
Function Call: WRITE	Prompt: !,"This report lists all patients and related visits as defined above, that" Line Location: T5BI+2
Function Call: WRITE	Prompt: !,"are not counted toward Table 5 because the primary provider code could not " Line Location: T5BI+3
Function Call: WRITE	Prompt: !,"be categorized by UDS-defined service categories. Sorted by community, age" Line Location: T5BI+4
Function Call: WRITE	Prompt: !,"and gender. See UDS User Manual for how UDS disciplines are mapped to RPMS" Line Location: T5BI+5
Function Call: WRITE	Prompt: !,"provider codes." Line Location: T5BI+6
Function Call: WRITE	Prompt: !,"ALL PATIENTS BY DIAGNOSIS (Table 6A)" Line Location: T6I+1
Function Call: WRITE	Prompt: !,"This report lists all patients and related visits as defined above, categorized" Line Location: T6I+2
Function Call: WRITE	Prompt: !,"by specific UDS-defined diagnoses or tests/screenings. Sorted by" Line Location: T6I+3
Function Call: WRITE	Prompt: !,"community, age and gender." Line Location: T6I+4
Function Call: WRITE	Prompt: !,"PROVIDER/STAFF LIST (Table 5 column a)" Line Location: T5AI+1
Function Call: WRITE	Prompt: !,"This report provides a list of all Providers and other facility staff who are" Line Location: T5AI+2
Function Call: WRITE	Prompt: !,"documented in RPMS categorized by UDS-defined service categories. Use this" Line Location: T5AI+3
Function Call: WRITE	Prompt: !,"list to manually calculate FTEs for each staff category to document in Table" Line Location: T5AI+4
Function Call: WRITE	Prompt: !,"5 column a (FTEs)." Line Location: T5AI+5
Function Call: WRITE	Prompt: !,"This report will list any visit that is incomplete but has a service",!,"relevant to lines 21 through 26 of Table 6A attached to it." Line Location: TOLI+1
Function Call: WRITE	Prompt: !,"Incomplete visits are not looked at when generating this report so ",!,"this list will provide you with a list of visits that potentially should be " Line Location: TOLI+2
Function Call: WRITE	Prompt: !,"completed or merged to a complete visit in order to be counted in Table 6A" Line Location: TOLI+3
Function Call: WRITE	Prompt: !,"ALL PATIENTS W/MULTIPLE VISIS IN SVC CATS (TABLE 5 COL B&C)" Line Location: T5CI+1
Function Call: WRITE	Prompt: !,"This report provides a list of patients who had more than one visit on" Line Location: T5CI+2
Function Call: WRITE	Prompt: !,"a single day for any of the six BPHC Service Categories. Per the BPHC " Line Location: T5CI+3
Function Call: WRITE	Prompt: !,"Uniform Data System Manual, 2007 Revision, page 6 each patient may have, " Line Location: T5CI+4
Function Call: WRITE	Prompt: !,"at a maximum:" Line Location: T5CI+5
Function Call: WRITE	Prompt: !,"- One medical visit (Line 15)" Line Location: T5CI+6
Function Call: WRITE	Prompt: !,"- One dental visit (Line 19)" Line Location: T5CI+7
Function Call: WRITE	Prompt: !,"- One mental health visit (Line 20)" Line Location: T5CI+8
Function Call: WRITE	Prompt: !,"- One substance abuse visit (Line 21)" Line Location: T5CI+9
Function Call: WRITE	Prompt: !,"- One 'other health' visit for each type of 'other health' provider" Line Location: T5CI+10
Function Call: WRITE	Prompt: !," (e.g. nutritionist, podiatrist, speech therapist, acupuncturist, " Line Location: T5CI+11
Function Call: WRITE	Prompt: !," optometrist) (Line 22)" Line Location: T5CI+12
Function Call: WRITE	Prompt: !,"- One enabling service visit for each type of enabling provider" Line Location: T5CI+13
Function Call: WRITE	Prompt: !," (e.g. case management or health education) (Line 29)" Line Location: T5CI+14
Function Call: WRITE	Prompt: !!,"Your report will be run for the time period: ",$$FMTE^XLFDT(BUDBD)," to ",$$FMTE^XLFDT(BUDED) Line Location: QUARTER+17
Function Call: WRITE	Prompt: ! Line Location: YEAR+2
Function Call: WRITE	Prompt: !,"Enter the Calendar Year. Use a 4 digit year, e.g. 2015" Line Location: YEAR+3
Function Call: WRITE	Prompt: !!,"Please enter a year only!",! Line Location: YEAR+11
Function Call: WRITE	Prompt: !,$$CTR($$LOC,80) Line Location: GENI+2
Function Call: WRITE	Prompt: !,$$CTR("UDS 2015",80) Line Location: GENI+3
Function Call: WRITE	Prompt: !,"NOTE: Patient lists may be hundreds of pages long, depending on the size of your" Line Location: GENI+4
Function Call: WRITE	Prompt: !,"patient population. It is recommended that you run these reports at night and" Line Location: GENI+5
Function Call: WRITE	Prompt: !,"print to an electronic file, not directly to a printer.",! Line Location: GENI+6
Function Call: WRITE	Prompt: !!,"The Patient List option documents the individual patients and visits" Line Location: GENI+8
Function Call: WRITE	Prompt: !,"that are counted and summarized on each Table report (main menu" Line Location: GENI+9
Function Call: WRITE	Prompt: !,"option REP). The summary Table report is included at the beginning of each" Line Location: GENI+10
Function Call: WRITE	Prompt: !,"List report." Line Location: GENI+11
Function Call: WRITE	Prompt: !,"UDS searches your database to find all visits and related patients" Line Location: GENI+12
Function Call: WRITE	Prompt: !,"during the time period selected. Based on the UDS definition, to be counted" Line Location: GENI+13
Function Call: WRITE	Prompt: !,"as a patient, the patient must have had at least one visit meeting the " Line Location: GENI+14
Function Call: WRITE	Prompt: !,"following criteria:" Line Location: GENI+15
Function Call: WRITE	Prompt: !?4,"- must be to a location specified in your visit location setup" Line Location: GENI+16
Function Call: WRITE	Prompt: !?4,"- must be to Service Category Ambulatory (A), Hospitalization (H), Day" Line Location: GENI+17
Function Call: WRITE	Prompt: !?6,"Surgery (S), Observation (O), Telemedicine (M), Nursing home visit (R), " Line Location: GENI+18
Function Call: WRITE	Prompt: !?6,"or In-Hospital (I) visit" Line Location: GENI+19
Function Call: WRITE	Prompt: !?4,"- must NOT have an excluded clinic code (see User Manual for a list)" Line Location: GENI+20
Function Call: WRITE	Prompt: !?4,"- must have a primary provider and a coded purpose of visit" Line Location: GENI+21
Function Call: WRITE	Prompt: !?4,"- the patient must NOT have a gender of 'Unknown'" Line Location: GENI+22
Function Call: WRITE	Prompt: ! Line Location: GENI+23
Routine Call	DIC Line Location: EN1+2
Routine Call	DIR Line Location: EN1+14 EN1+22 M+16 QUARTER+9 YEAR+7 GENI+7
Routine Call	%ZIS Line Location: ZIS+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BUDCSITE - [#90667.1]	Classic Fileman Calls

Global Variables Directly Accessed

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

Label References

Name	Line Occurrences
$$CTR	GENI+2, GENI+3
$$LOC	GENI+2
EN	EN1+5
EN1	EN1+29, M+30, T3A+5, T4IPPL+5, T4PMIS+5, T4CHAR+5, TUSVE+5, TUSVR+5, TZ+5, T5+5 , T5B+5, T6+5, T5A+5, TOL+5, T5C+5
EOJ	EN+1, EN1+3, EN1+8, EN1+10, EN1+15, EN1+23, EN1+24, ZIS+1, ZIS1+1, DRIVER+6 , NODEV1+4, TSKMN+5, M+1, M+17, T3A+1, T4IPPL+1, T4PMIS+1, T4CHAR+1, TUSVE+1, TUSVR+1 , TZ+1, T5+1, T5B+1, T6+1, T5A+1, TOL+1, T5C+1
GENI	M+2, T3A+3, T4IPPL+3, T4PMIS+3, T4CHAR+3, TUSVE+3, TUSVR+3, TZ+3, T5+3, T5B+3 , T6+3, T5A+3, TOL+3, T5C+3
NODEV	ZIS+1
QUARTER	EN1+9
T3AI	T3A+4
T3BEI	TUSVE+4
T3BRI	TUSVR+4
T4ICHAR	T4CHAR+4
T4IPMIS	T4PMIS+4
T4IPPLI	T4IPPL+4
T5AI	T5A+4
T5BI	T5B+4
T5CI	T5C+4
T5I	T5+4
T6I	T6+4
TOLI	TOL+4
TSKMN	ZIS1+2
TZAI	TZ+4
YEAR	EN1+7, YEAR+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
%ZIS	ZIS+1!, ZIS+2*
>> BUDBD	QUARTER+12, QUARTER+13, QUARTER+14, QUARTER+15, QUARTER+16, QUARTER+17, YEAR+12
>> BUDCAD	YEAR+13*
>> BUDCEN	EN1+12, EN1+16
>> BUDDELT	ZIS+1, ZIS+2
>> BUDED	QUARTER+12, QUARTER+13, QUARTER+14, QUARTER+15, QUARTER+16, QUARTER+17, YEAR+12
>> BUDQTR	EN1+10, QUARTER+1, QUARTER+11
>> BUDQUIT	QUARTER+10*
>> BUDROT	EN1+29, ZIS+1
>> BUDSITE	EN1+1, EN1+4, EN1+5
BUDT3A	M+3!, M+19, M+20, T3A+2*
>> BUDT3AL	M+19, M+20, T3A+2*
BUDT3B	M+3!, M+19, M+21, TUSVE+2, TUSVR+2
>> BUDT3BEL	TUSVE+2*
>> BUDT3BRL	M+19, M+21, TUSVR+2*
>> BUDT4	M+19, M+22, M+23, M+24, T4IPPL+2, T4PMIS+2, T4CHAR+2*
>> BUDT4CHA	M+19, M+24, T4CHAR+2*
>> BUDT4IPP	M+19, M+22, T4IPPL+2*
>> BUDT4PMI	M+19, M+23, T4PMIS+2*
BUDT5	M+3!, M+19, M+25, M+26, M+27, T5+2, T5B+2, T5A+2, T5C+2
BUDT5L	M+3!, M+19, M+26, T5+2*
BUDT5L1	M+3!, M+19, M+25, T5A+2*
BUDT5L2	M+3!, M+19, M+27, T5B+2*
BUDT5L3	M+3!, T5C+2*
BUDT6	M+3!, M+19, M+28, T6+2, TOL+2
BUDT6L	M+3!, M+19, M+28, T6+2*
>> BUDTOL	TOL+2*
>> BUDTZ	M+19, M+29, TZ+2*
>> BUDTZL	M+19, M+29, TZ+2*
>> BUDYEAR	EN1+8, QUARTER+12, QUARTER+13, QUARTER+14, QUARTER+15, QUARTER+16, YEAR+1, YEAR+12, YEAR+13
DA	EN1+14!, EN1+22!, M+16!, QUARTER+9!
DIC	EN1+2*, YEAR+8!
DIC("A"	EN1+2*
DIC(0	EN1+2*
DIR	EN1+14!, EN1+22!, M+16!, QUARTER+9!, YEAR+7!, GENI+7!
DIR("?"	QUARTER+2, QUARTER+3, QUARTER+4, QUARTER+5, QUARTER+6, QUARTER+7, YEAR+6*
DIR("A"	EN1+13, EN1+22, M+16, QUARTER+9, YEAR+5, GENI+7
DIR("B"	EN1+14, EN1+22, M+16, QUARTER+9
DIR(0	EN1+13, EN1+22, M+16, QUARTER+8, YEAR+4, GENI+7
>> DIRUT	EN1+15, EN1+23, M+17, QUARTER+10, YEAR+9*, YEAR+10
>> DUOUT	YEAR+9
DUZ	USR+1
DUZ(2	LOC+1
IO	DRIVER+2, TSKMN+1
IO("DOC"	TSKMN+2
IO("Q"	ZIS1+2
>> IOCPU	TSKMN+5
IOF	GENI+1
IOM	TSKMN+3, CTR+1
ION	TSKMN+1
IOP	ZIS+1!
IOSL	TSKMN+3
IOST	TSKMN+1
>> POP	ZIS1+1
U	USR+1, LOC+1
X	M+18*, CTR~, CTR+1
>> XBNS	NODEV+1*
>> XBRC	NODEV+1*
>> XBRP	NODEV+1*
>> XBRX	NODEV+1*
Y	EN1+3, EN1+4, EN1+16, EN1+24, M+18, QUARTER+10, QUARTER+11, QUARTER+12, QUARTER+13, QUARTER+14 , QUARTER+15, QUARTER+16, YEAR+11, YEAR+12, CTR~, CTR+1
>> Z	M+18*, M+19, M+20, M+21, M+22, M+23, M+24, M+25, M+26, M+27 , M+28, M+29
>> ZTCPU	TSKMN+5*
>> ZTDESC	TSKMN+5*
>> ZTDTH	TSKMN+5*
>> ZTIO	TSKMN+1, TSKMN+2, TSKMN+3*
>> ZTQUEUED	DRIVER+5
>> ZTREQ	DRIVER+5*
>> ZTRTN	TSKMN+5*
ZTSAVE	TSKMN+4!
ZTSAVE("BUD*"	TSKMN+4*

Customize PDF page

Package: IHS Uniform Data System

Routine: BUDCRPT2

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: