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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BUDDRPT2

Package: IHS Uniform Data System

Routine: BUDDRPT2


Information

BUDDRPT2 ; IHS/CMI/LAB - UDS REPORT DRIVER 01 Dec 2016 6:00 PM ;

Source Information

Source file <BUDDRPT2.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS Uniform Data System 4 PROC^BUDDRPTC  PT^BUDDRPTE  PRINT^BUDDRPTP  TAXCHK^BUDDXTCH  
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^BUDDRPTC DRIVER+1, NODEV1+1
PT^BUDDRPTE EN1+28
PRINT^BUDDRPTP DRIVER+3, NODEV1+2
TAXCHK^BUDDXTCH 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 & Sex Assigned at Birth (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 Principal 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: !!,"PRINCIPAL 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 & SEX ASSIGNED AT BIRTH (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 sex assigned at birth and lists all visits that fit the definition. "
  • Line Location: T3AI+4
Function Call: WRITE
  • Prompt: !,"Age is calculated as of June 30th of the report year."
  • Line Location: T3AI+5
Function Call: WRITE
  • Prompt: !!,"ALL PATIENTS BY DEMOGRAPHIC CHARACTERISTICS (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: !,"sexual orientation/gender identity who have at least one visit for the "
  • Line Location: T3BRI+3
Function Call: WRITE
  • Prompt: !,"specified time period that meets the visit definition criteria. Sorted by "
  • Line Location: T3BRI+4
Function Call: WRITE
  • Prompt: !,"race/Hispanic identity, age, gender, and community and lists all visits"
  • Line Location: T3BRI+5
Function Call: WRITE
  • Prompt: !,"that fit the definition. "
  • Line Location: T3BRI+6
Function Call: WRITE
  • Prompt: !,"Age is calculated as of June 30th of the report year."
  • Line Location: T3BRI+7
Function Call: WRITE
  • Prompt: !,""
  • Line Location: T3BRI+8
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. 2016"
  • 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 2016",80)
  • Line Location: GENI+3
Function Call: WRITE
  • Prompt: !,"NOTE: Patient lists may be hundreds of pages long, depending on the size of"
  • Line Location: GENI+4
Function Call: WRITE
  • Prompt: !,"your patient population. It is recommended that you run these reports at "
  • Line Location: GENI+5
Function Call: WRITE
  • Prompt: !,"night and 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
^BUDDSITE - [#90668.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BUDDSITE - [#90668.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*
>> BUDBEN EN1+12*, EN1+16*
>> BUDCCAD YEAR+13*
>> 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*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All