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 |  Marked Items |  All
Print Page as PDF
Routine: BUD1RPTL

Package: IHS Uniform Data System

Routine: BUD1RPTL


Information

BUD1RPTL ; IHS/CMI/LAB - UDS print lists 12 Dec 2007 12:12 PM 02 Dec 2011 10:43 AM ;

Source Information

Source file <BUD1RPTL.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
IHS Uniform Data System 5 (T51,T52)^BUD1RPL2  T3BR^BUD1RPL4  (T4CHAR,T4IPPL,T4PMIS)^BUD1RPL5  $$RACE^BUD1RPTC  TZH^BUD1RPTD  
IHS Patient 1 ($$AGE,$$HRN)^AUPNPAT  
Kernel 1 $$FMTE^XLFDT  
Patient Care Component Reports 1 ($$CLINIC,$$LOCENC,$$PRIMPROV,$$VD)^APCLV  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Uniform Data System 1 BUD1RPTP  

Entry Points

Name Comments DBIA/ICR reference
6 ;;Chronic bronchitis and emphysema
28 ;;II. Oral Exams
T6W ;
70 ;;Hepatitis C test;;21b
T5H1 ;
29 ;;Prophylaxis - adult or child
60 ;;Overweight and obesity;;14a
61 ;;Tobacco use disorder;;19a
62 ;;Childhood lead test screening (9 to 72 months);;26a
63 ;;Screening, Brief Intervention, and Referral (SBIRT);;26b
64 ;;Smoke and tobacco use cessation counseling;;26c
T6H ;
66 ;;H1N1 Flu vaccine;;24b
67 ;;Hepatitis B;;4a
68 ;;Hepatitis C;;4b
69 ;;Hepatitis B test;;21a
32 ;;III. Restorative Services
34 ;;V. Rehabilitative Services (Endo, Perio, Prostho, Ortho)
24 ;;Selected Immunizations
25 ;;Contraceptive Management
26 ;;Health supervision of infant or child (ages 0 through 11)
27 ;;I. Emergency Services
TZ ;
21 ;;HIV Test
22 ;;Mammogram
23 ;;Pap Test
T51 ;EP
T52 ;
42 ;;Attention Deficit and disruptive behavior disorders;;20c
43 ;;Other Mental disorders, excl drug or alcohol dependence (incl mental retardation);;20d
40 ;;Depression and Other Mood Disorders;;20a
41 ;;Anxiety disorders including PTSD;;20b
1 ;;Symptomatic and Asymptomatic HIV;;1,2
3 ;;Tuberculosis
2 ;;Asymptomatic HIV
5 ;;Asthma
4 ;;Syphilis and other sexually transmitted diseases
7 ;;Abnormal breast findings, female
T4PMIS ;
9 ;;Diabetes mellitus
TZH ;
TZ1 ;
TZ2 ;
10 ;;Heart disease (selected)
T6 ;
T4CHAR ;
T5 ;
T5W
T5H ;
START ;
17 ;;Lack of expected normal physiological development
71 ;;Comprehensive and Intermediate Eye Exams;;26d
8 ;;Abnormal cervical findings
20 ;;Other Mental disorders, excluding drug or alcohol dependence
T3H1 ;
T3BR ;
14 ;;Exposure to heat or cold
11 ;;Hypertension
T4IPPL ;
13 ;;Dehydration
12 ;;Contact dermatitis and other eczema
15 ;;Otitis media and Eustachian tube disorders
CTR(X,Y) ;EP
T3H ;
16 ;;Selected perinatal medical conditions
19 ;;Other substance related disorders (excluding tobacco use disorders)
18 ;;Alcohol related disorders
31 ;;Fluoride treatment
30 ;;Sealants
T3A ;
33 ;;IV. Oral Surgery (extractions only)
T6H1 ;
65 ;;Seasonal Flu vaccine;;24a

External References

Name Field # of Occurrence
$$CLINIC^APCLV T3A+11, T5W+7, TZ2+11, TZ1+10, T6W+8
$$LOCENC^APCLV T3A+11, T5W+7, TZ2+11, TZ1+10, T6W+8
$$PRIMPROV^APCLV T3A+11, T5W+7, TZ2+11, TZ1+10
$$VD^APCLV T6W+4
$$AGE^AUPNPAT T3A+8, T5W+1, T6W+3
$$HRN^AUPNPAT T3A+8, T5W, TZ2+8, TZ1+7, T6W+2
T51^BUD1RPL2 T51+1
T52^BUD1RPL2 T52+1
T3BR^BUD1RPL4 T3BR+1
T4CHAR^BUD1RPL5 T4CHAR+1
T4IPPL^BUD1RPL5 T4IPPL+1
T4PMIS^BUD1RPL5 T4PMIS+1
$$RACE^BUD1RPTC T5W+1, T6W+3
TZH^BUD1RPTD TZH+1
^DIR T3H+2, T5H+2, T6H+2
$$FMTE^XLFDT T3A+11, T3H1+3, T3H1+7, T5W+7, T5H1+3, T5H1+7, TZ2+11, TZ1+10, T6W+8, T6H1+3
, T6H1+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: T3A+12
Function Call: WRITE
  • Prompt: !
  • Line Location: T3H+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T3H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T3H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** BPHC Uniform Data System (UDS) ***",80)
  • Line Location: T3H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 3A, Patients by Age and Gender",80),!
  • Line Location: T3H1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T3H1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3H1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3H1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T3H1+9
Function Call: WRITE
  • Prompt: !,"List of all patients with one or more visits during the calendar year,",!,"with gender, age, and visit information.",!,"Age is calculated as of June 30.",!
  • Line Location: T3H1+10
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE"
  • Line Location: T3H1+11
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"SRV",?45,"CLINIC",?62,"LOCATION"
  • Line Location: T3H1+12
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T3H1+14
Function Call: WRITE
  • Prompt: !
  • Line Location: T5+17
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U,1),1,22),?24,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2))
  • Line Location: T5W+0
Function Call: WRITE
  • Prompt: ?36,$E(BUDCOM,1,12),?51,$P(^DPT(DFN,0),U,2),?55,$$AGE^AUPNPAT(DFN,BUDCAD),?60,$E($P($$RACE^BUD1RPTC(DFN),U,4),1,16)," (",$P($$RACE^BUD1RPTC(DFN),U,3),")"
  • Line Location: T5W+1
Function Call: WRITE
  • Prompt: !
  • Line Location: T5H+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T5H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T5H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** BPHC Uniform Data System (UDS) ***",80)
  • Line Location: T5H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 5 Columns B & C, By Service Category",80),!
  • Line Location: T5H1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T5H1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T5H1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T5H1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T5H1+9
Function Call: WRITE
  • Prompt: !,"List of all patients, sorted by defined Service Categories. Displays",!,"community, gender, age and visit data, including Provider codes.",!,"Age is calculated as of June 30."
  • Line Location: T5H1+10
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE",?60,"RACE*"
  • Line Location: T5H1+13
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"PROV CD",?50,"SRV",?55,"CLINIC",?62,"LOCATION"
  • Line Location: T5H1+14
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T5H1+15
Function Call: WRITE
  • Prompt: !!,BUDSUBT,!
  • Line Location: T5H1+16
Function Call: WRITE
  • Prompt: !
  • Line Location: TZ2+12
Function Call: WRITE
  • Prompt: !
  • Line Location: TZ1+11
Function Call: WRITE
  • Prompt: !
  • Line Location: T6+14
Function Call: WRITE
  • Prompt: !!,"Line ",$S($P($T(@BUD1L),";;",3)]"":$P($T(@BUD1L),";;",3),1:BUD1L)," ",$P($T(@BUD1L),";;",2)
  • Line Location: T6W+1
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U,1),1,22),?24,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2))
  • Line Location: T6W+2
Function Call: WRITE
  • Prompt: ?36,$E(BUDCOM,1,12),?51,$P(^DPT(DFN,0),U,2),?55,$$AGE^AUPNPAT(DFN,BUDCAD),?60,$E($P($$RACE^BUD1RPTC(DFN),U,4),1,16)," (",$P($$RACE^BUD1RPTC(DFN),U,3),")"
  • Line Location: T6W+3
Function Call: WRITE
  • Prompt: !!,"Line ",$S($P($T(@BUD1L),";;",3)]"":$P($T(@BUD1L),";;",3),1:BUD1L)," ",$P($T(@BUD1L),";;",2)
  • Line Location: T6W+6
Function Call: WRITE
  • Prompt: !
  • Line Location: T6H+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T6H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T6H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** BPHC Uniform Data System (UDS) ***",80)
  • Line Location: T6H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 6A, By Diagnosis Category",80),!
  • Line Location: T6H1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T6H1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T6H1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T6H1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T6H1+9
Function Call: WRITE
  • Prompt: !,"List of all patients, sorted by primary diagnosis and tests/screening",!,"categories. Displays community, gender, age and visit data, and codes."
  • Line Location: T6H1+10
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE",?60,"RACE*"
  • Line Location: T6H1+13
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"VALUE",?41,"SRV",?45,"CLINIC",?63,"LOCATION"
  • Line Location: T6H1+14
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T6H1+15
Routine Call
  • DIR
  • Line Location:
    • T3H+2
    • T5H+2
    • T6H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] T3A+11, T5W+3, T5W+7, TZ2+11, TZ1+10, T6W+8
^BUDLTFIV - [#90663.5] T5+6
^BUDLTFIV("B" T5+6
^DIC(4 - [#4] T3H1+6, T5H1+6, T6H1+6
^DPT - [#2] T3A+8, T5W, T5W+1, TZ2+8, TZ1+7, T6W+2, T6W+3
^VA(200 - [#200] T3H1+3, T5H1+3, T6H1+3
^XTMP("BUD1RPT1" T3A+3, T3A+4, T3A+5, T3A+6, T3A+9, T5+2, T5+4, T5+9, T5+10, T5+11
, T5+12, T5W+2, TZ+3, TZ2+3, TZ2+4, TZ2+5, TZ2+6, TZ2+9, TZ1+1, TZ1+2
, TZ1+3, TZ1+4, TZ1+5, TZ1+8, T6+3, T6+6, T6+7, T6+8, T6+9, T6W+4
, T6W+8, T6W+11, T6W+12, T6W+14, T6W+15

Label References

Name Line Occurrences
$$CTR T3H1+4, T3H1+5, T3H1+6, T3H1+7, T3H1+8, T5H1+4, T5H1+5, T5H1+6, T5H1+7, T5H1+8
, T6H1+4, T6H1+5, T6H1+6, T6H1+7, T6H1+8
T3A START+4
T3BR START+6
T3H T3A+2, T3A+7, T3A+10
T3H1 T3H+1
T4CHAR START+12
T4IPPL START+8
T4PMIS START+10
T5 START+14
T51 START+16
T52 START+18
T5H T5+8, T5W+6
T5H1 T5H+1
T5W T5+12
T6 START+20
T6H T6+4, T6W+1, T6W+6
T6H1 T6H+1
T6W T6+9
TZ START+2
TZ1 TZ+3
TZ2 TZ+6
TZH TZ+2, TZ2+7, TZ2+10, TZ1+6, TZ1+9

Naked Globals

Name Field # of Occurrence
^( T6W+12, T6W+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUD1L T5+2*, T5+3, T5+4, T5+5, T5+9, T5+10, T5+11, T5+12, T5W+2, T6+2*
, T6+3, T6+5, T6+6, T6+7, T6+8, T6+9, T6W+1, T6W+4, T6W+6, T6W+8
, T6W+10, T6W+11, T6W+12, T6W+13, T6W+14, T6W+15
>> BUD1L2 T5+4*, T5+5, T5+9, T5+10, T5+11, T5+12, T5W+2
>> BUD1LL T5+5*, T5+6, T5+7
>> BUDAGE T3A+3*, T3A+4, T3A+5, T3A+6, T3A+9, T5+10*, T5+11, T5+12, T5W+2, T6+7*
, T6+8, T6+9, T6W+4, T6W+8, T6W+11, T6W+12, T6W+14, T6W+15
>> BUDBD T3H1+7, T5H1+7, T6H1+7
>> BUDBEN T3H1+8, T5H1+8, T6H1+8
>> BUDCAD T3A+8, T5W+1, T6W+3
>> BUDCOM T3A+5*, T3A+6, T3A+8, T3A+9, T5+9*, T5+10, T5+11, T5+12, T5W+1, T5W+2
, TZ2+3*, TZ2+4, TZ2+5, TZ2+6, TZ2+8, TZ2+9, TZ1+2*, TZ1+3, TZ1+4, TZ1+5
, TZ1+7, TZ1+8, T6+6*, T6+7, T6+8, T6+9, T6W+3, T6W+4, T6W+8, T6W+11
, T6W+12, T6W+14, T6W+15
>> BUDDD T5W+4*, T5W+5
>> BUDED T3H1+7, T5H1+7, T6H1+7
>> BUDGPG START+1*, START+2*, START+4*, START+6*, START+8*, START+10*, START+12*, START+14*, START+16*, START+18*
, START+20*, T3H+1, T3H1+1*, T3H1+3, T5H+1, T5H1+1*, T5H1+3, T6H+1, T6H1+1*, T6H1+3
>> BUDH T3A+3, T3A+4, T3A+5, T3A+6, T3A+9, T5+2, T5+4, T5+9, T5+10, T5+11
, T5+12, T5W+2, TZ+3, TZ2+3, TZ2+4, TZ2+5, TZ2+6, TZ2+9, TZ1+1, TZ1+2
, TZ1+3, TZ1+4, TZ1+5, TZ1+8, T6+3, T6+6, T6+7, T6+8, T6+9, T6W+4
, T6W+8, T6W+11, T6W+12, T6W+14, T6W+15
>> BUDJ T3A+3, T3A+4, T3A+5, T3A+6, T3A+9, T5+2, T5+4, T5+9, T5+10, T5+11
, T5+12, T5W+2, TZ+3, TZ2+3, TZ2+4, TZ2+5, TZ2+6, TZ2+9, TZ1+1, TZ1+2
, TZ1+3, TZ1+4, TZ1+5, TZ1+8, T6+3, T6+6, T6+7, T6+8, T6+9, T6W+4
, T6W+8, T6W+11, T6W+12, T6W+14, T6W+15
>> BUDNAME TZ2+5*, TZ2+6, TZ2+9, TZ1+4*, TZ1+5, TZ1+8
>> BUDP T3A+1*, T3H1+10, T3H1+13*, T5+1*, T5H1+10, T5H1+17*, TZ+1*, T6+1*, T6H1+10, T6H1+16*
>> BUDQUIT START+1*, START+3, START+5, START+7, START+9, START+11, START+13, START+15, START+17, START+19
, START+21, T3A+2, T3A+3, T3A+4, T3A+5, T3A+6, T3A+7, T3A+9, T3A+10, T3H+2*
, T5+2, T5+4, T5+8, T5+9, T5+10, T5+11, T5+12, T5W+2, T5W+4, T5W+5
, T5W+6, T5H+2*, TZ+2, TZ+3, TZ+4, TZ2+3, TZ2+4, TZ2+5, TZ2+6, TZ2+7
, TZ2+9, TZ2+10, TZ1+1, TZ1+2, TZ1+3, TZ1+4, TZ1+5, TZ1+6, TZ1+8, TZ1+9
, T6+4, T6+6, T6+7, T6+8, T6+9, T6W+1, T6W+4, T6W+6, T6W+11, T6W+14
, T6H+2*
>> BUDSEX T3A+4*, T3A+5, T3A+6, T3A+9, T5+11*, T5+12, T5W+2, TZ2+4*, TZ2+5, TZ2+6
, TZ2+9, TZ1+3*, TZ1+4, TZ1+5, TZ1+8, T6+8*, T6+9, T6W+4, T6W+8, T6W+11
, T6W+12, T6W+14, T6W+15
>> BUDSITE T3A+8, T3H1+6, T5W, T5H1+6, TZ2+8, TZ1+7, T6W+2, T6H1+6
>> BUDSUBT T5+7*, T5H1+16
>> BUDT3AL START+4
>> BUDT3BRL START+6
>> BUDT4CHA START+12
>> BUDT4IPP START+8
>> BUDT4PMI START+10
>> BUDT5L START+14
>> BUDT5L1 START+16
>> BUDT5L2 START+18
>> BUDT6L START+20
>> BUDTZL START+2
>> BUDV T3A+9*, T3A+11, T5W+2*, T5W+3, T5W+5*, T5W+7, TZ2+9*, TZ2+11, TZ1+8*, TZ1+10
, T6W+4*, T6W+7*, T6W+8
>> BUDVC T6W+4*, T6W+5*, T6W+7
>> BUDVD T6W+5*, T6W+7
BUDVLST T5W+2!
BUDVLST( T5W+3*, T5W+4, T5W+5
BUDVRR T6W+4!
BUDVRR( T6W+4*, T6W+5, T6W+7
>> BUDW T6W+11*, T6W+12, T6W+14*, T6W+15
>> BUDY T5+6*, T5+7
>> BUDYY TZ+3*, TZ+6*, TZ2+3, TZ2+4, TZ2+5, TZ2+6, TZ2+8, TZ2+9, TZ1+1, TZ1+2
, TZ1+3, TZ1+4, TZ1+5, TZ1+8
>> BUDZIP TZ1+1*, TZ1+2, TZ1+3, TZ1+4, TZ1+5, TZ1+7, TZ1+8
>> DFN T3A+6*, T3A+8, T3A+9, T5+12*, T5W, T5W+1, T5W+2, TZ2+6*, TZ2+8, TZ2+9
, TZ1+5*, TZ1+7, TZ1+8, T6+9*, T6W+2, T6W+3, T6W+4, T6W+8, T6W+11, T6W+12
, T6W+14, T6W+15
DIR T3H+2!, T5H+2!, T6H+2!
DIR(0 T3H+2*, T5H+2*, T6H+2*
DT T3H1+3, T5H1+3, T6H1+3
>> DTOUT T3H+2, T5H+2, T6H+2
DUZ T3H1+3, T5H1+3, T6H1+3
DUZ(2 T3A+8, T5W, TZ2+8, TZ1+7, T6W+2
IO T3H+2, T5H+2, T6H+2
IO(0 T3H+2, T5H+2, T6H+2
IOF T3H1+1, T5H1+1, T6H1+1
IOM CTR+1
IOSL T3A+7, T3A+10, T5W+6, TZ2+7, TZ2+10, TZ1+6, TZ1+9, T6W+1, T6W+6
IOST T3H+2, T5H+2, T6H+2
U T3A+8, T3A+11, T3H1+3, T3H1+6, T5+6, T5W, T5W+1, T5W+3, T5W+7, T5H1+3
, T5H1+6, TZ2+8, TZ2+11, TZ1+7, TZ1+10, T6W+2, T6W+3, T6W+8, T6W+12, T6W+15
, T6H1+3, T6H1+6
X T3H1+7*, T3H1+8*, T5H1+7*, T5H1+8*, T6H1+7*, T6H1+8*, CTR~, CTR+1
Y T3H+2, T5H+2, T6H+2, CTR~, CTR+1
>> ZTQUEUED T3H+2, T5H+2, T6H+2

Marked Items

Name Field # of Occurrence
$T(@BUD1L T6+5, T6W+1, T6W+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All