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 |  Local Variables |  All
Print Page as PDF
Routine: BUDARPTD

Package: IHS Uniform Data System

Routine: BUDARPTD


Information

BUDARPTD ; IHS/CMI/LAB - UDS REPORT PROCESSOR 05 Oct 2013 5:03 PM ;

Source Information

Source file <BUDARPTD.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS VA Utilities 2 $$VAL^XBDIQ1  ^XBGSAVE  
Kernel 2 $$FMTE^XLFDT  $$VERSION^XPDUTL  
Patient Care Component Reports 2 $$START1^APCLDF  ($$CLINIC,$$PRIMPOV,$$PRIMPROV,$$VD)^APCLV  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
IHS Uniform Data System 5 BUDARP6B  BUDARP7  BUDARPTC  BUDARPTL  BUDARPTP  

Entry Points

Name Comments DBIA/ICR reference
OTH
MEDC
SET
SUB
TZH1 ;
CTR(X,Y) ;EP
ENAB
MH
DENT
VISION
TZH ;EP
WDEL ;EP - write out delimited file 9d
MEDC1
GETV ;EP - get all visits for this patient and tally in BUDTV

External References

Name Field # of Occurrence
$$START1^APCLDF GETV+7
$$CLINIC^APCLV GETV+17
$$PRIMPOV^APCLV MH+3, SET+5
$$PRIMPROV^APCLV GETV+22, GETV+31
$$VD^APCLV GETV+21, SET+13
^DIR TZH+2
$$VAL^XBDIQ1 MEDC+4, SET+31
^XBGSAVE WDEL+13
$$FMTE^XLFDT GETV+7, SET+31, SET+54, TZH1+3, TZH1+7
$$VERSION^XPDUTL SET+20, SET+43

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TZH+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: TZH1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: TZH1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** BPHC Uniform Data System (UDS) ***",80)
  • Line Location: TZH1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List: Patient by Zip Code/Insurance",80),!
  • Line Location: TZH1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: TZH1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: TZH1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: TZH1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: TZH1+9
Function Call: WRITE
  • Prompt: !,"List of all patients with one or more visits during the calendar year."
  • Line Location: TZH1+10
Function Call: WRITE
  • Prompt: !,"Zip code is from patient registration."
  • Line Location: TZH1+11
Function Call: WRITE
  • Prompt: !!,"NOTE: Patients with a zip code included in the Other Zip Codes category"
  • Line Location: TZH1+12
Function Call: WRITE
  • Prompt: !,"have their zip code value followed by a ""","*",""" (e.g. 87015*)."
  • Line Location: TZH1+13
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"ZIP CODE",?65,"INS"
  • Line Location: TZH1+14
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"SRV",?45,"CLINIC",?62,"LOCATION"
  • Line Location: TZH1+15
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: TZH1+17
Routine Call
  • DIR
  • Line Location:
    • TZH+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPOV("AD" GETV+24, SET+3
^AUPNVSIT - [#9000010] GETV+10, GETV+11, GETV+12, GETV+13, GETV+16, GETV+23, GETV+28, GETV+29, MEDC1+3, MEDC1+4
, DENT+6, DENT+7, MH+8, MH+9, SUB+6, SUB+7, VISION+6, VISION+7, OTH+5, OTH+6
, ENAB+6, ENAB+7, SET+9
^BUDDATA WDEL+3, WDEL+5!, WDEL+15, WDEL+16!, WDEL+11*
^BUDDATA(1 WDEL+8*
^BUDQCNTL - [#90665.2] GETV+19, MEDC1+1, DENT+4, MH+6, SUB+4, VISION+4, ENAB+4, SET+8
^BUDQCNTL("B" GETV+18, MEDC+2, DENT+2, MH+2, SUB+2, VISION+2, ENAB+2, SET+7
^BUDQSITE - [#90665.1] GETV+15, SET+30, SET+53
^BUDQTFIV - [#90665.5] OTH+3
^BUDQTFIV("AA" MEDC+6
^BUDQTFIV("B" OTH+1
^BUDQTFIV("C" MEDC+5
^BWPCD - [#9002086.1] SET+22, SET+23, SET+24, SET+27, SET+28, SET+45, SET+46, SET+47, SET+50, SET+51
^BWPCD("C" SET+21, SET+44
^BWPN("B" SET+17, SET+18, SET+19, SET+42
^DIC(4 - [#4] TZH1+6
^TMP($J GETV+5!, GETV+8, GETV+9, GETV+27, GETV+29*, MEDC1+2, MEDC1+4*, DENT+5, DENT+7*, MH+7
, MH+9*, SUB+5, SUB+7*, VISION+5, VISION+7*, OTH+4, OTH+6*, ENAB+5, ENAB+7*, SET+1*
, SET+12*, SET+31*, SET+54*, WDEL+4!
^VA(200 - [#200] TZH1+3
^XTMP("BUDARP9DEL" WDEL+9, WDEL+10, WDEL+11

Label References

Name Line Occurrences
$$CTR TZH1+4, TZH1+5, TZH1+6, TZH1+7, TZH1+8
MEDC1 MEDC+4, MEDC+5
SET GETV+23, GETV+24, GETV+32
SUB MH+4
TZH1 TZH+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A GETV+7*
>> B GETV+7*
>> BUDBD GETV+7, SET+25, SET+48, TZH1+7
>> BUDBEN TZH1+8
>> BUDCLINC GETV+17*, GETV+19, SET+8
>> BUDED GETV+7, SET+26, SET+49, TZH1+7
>> BUDFILE WDEL+12
>> BUDGPG TZH+1, TZH1+1*, TZH1+3
>> BUDH WDEL+9, WDEL+10, WDEL+11
>> BUDJ WDEL+9, WDEL+10, WDEL+11
>> BUDLASTV GETV+6*, SET+13*
>> BUDLINE MEDC+4*, MEDC+5*, MEDC+6*, MEDC1+1, DENT+4, MH+6, SUB+4, VISION+4, ENAB+4
>> BUDMEDV GETV+6*, MEDC1+5*
>> BUDMEDVI GETV+6*, MEDC1+5*
>> BUDP TZH1+10, TZH1+11, TZH1+12, TZH1+13, TZH1+16*
>> BUDPP GETV+22*, GETV+26, GETV+27, GETV+29, GETV+31*, GETV+32, MEDC+4, MEDC+5, MEDC+6, OTH+3
, OTH+4, OTH+6, ENAB+5, ENAB+7, SET+10
>> BUDQUIT TZH+2*
>> BUDSITE GETV+15, SET+30, SET+53, TZH1+6
>> BUDT35V GETV+6*, SET+11*, SET+15
>> BUDT6V GETV+6*
>> BUDTIEN GETV+18*, GETV+19, MEDC+2*, MEDC1+1, MEDC1+2, MEDC1+4, DENT+2*, DENT+4, DENT+5, DENT+7
, MH+2*, MH+6, MH+7, MH+9, SUB+2*, SUB+4, SUB+5, SUB+7, VISION+2*, VISION+4
, VISION+5, VISION+7, OTH+1*, OTH+3, ENAB+2*, ENAB+4, SET+7*, SET+8
>> BUDTV GETV+6*, SET*
>> BUDVDATE GETV+21*, GETV+27, GETV+29, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5
, SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7
>> BUDVLOC GETV+13*, GETV+14, GETV+15, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5
, SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7
>> BUDVSIT GETV+9*, GETV+10, GETV+11, GETV+12, GETV+13, GETV+16, GETV+17, GETV+21, GETV+22, GETV+23
, GETV+24, GETV+28, GETV+29, GETV+31, MEDC+4, MEDC1+3, MEDC1+4, MEDC1+5, DENT+6, DENT+7
, MH+3, MH+8, MH+9, SUB+6, SUB+7, VISION+6, VISION+7, OTH+5, OTH+6, ENAB+6
, ENAB+7, SET+1, SET+3, SET+5, SET+9, SET+12, SET+13, SET+22, SET+23, SET+24
, SET+27, SET+28, SET+44*, SET+45, SET+46, SET+47, SET+50, SET+51, SET+54
>> BUDX GETV+9*
>> BUDY MEDC+5*
>> C WDEL+9*, WDEL+11*
>> D GETV+27*, GETV+28, MEDC1+2*, MEDC1+3, DENT+5*, DENT+6, MH+7*, MH+8, SUB+5*, SUB+6
, VISION+5*, VISION+6, OTH+4*, OTH+5, ENAB+5*, ENAB+6, SET+23*, SET+25, SET+26, SET+31
, SET+46*, SET+48, SET+49, SET+54, WDEL+9*, WDEL+10, WDEL+11
>> DFN GETV+7, GETV+27, GETV+29, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5
, SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7, SET+21, SET+44
DIR TZH+2!
DIR(0 TZH+2*
DT TZH1+3
>> DTOUT TZH+2
DUZ TZH1+3
>> E GETV+7*
>> G SET+21*, SET+44*
IO TZH+2
IO(0 TZH+2
IOF TZH1+1
IOM CTR+1
IOST TZH+2
>> J SET+24*, SET+47*
>> L SET+28*, SET+29, SET+30, SET+51*, SET+52, SET+53
>> P MH+3*, MH+4
>> S GETV+25*, GETV+28*, GETV+30, MEDC+1*, MEDC1*, MEDC1+3*, MEDC1+6, DENT+1*, DENT+3*, DENT+6*
, DENT+8, MH+1*, MH+5*, MH+8*, MH+10, SUB+1*, SUB+3*, SUB+6*, SUB+8, VISION+1*
, VISION+3*, VISION+6*, VISION+8, OTH+2*, OTH+5*, OTH+7, ENAB+1*, ENAB+3*, ENAB+6*, ENAB+8
>> T SET+17*, SET+24, SET+42*, SET+47
>> T1 SET+18*, SET+24
>> T2 SET+19*, SET+24
U GETV+9, GETV+11, GETV+12, GETV+13, GETV+16, GETV+23, GETV+27, GETV+28, GETV+29, MEDC1+2
, MEDC1+3, MEDC1+4, DENT+5, DENT+6, DENT+7, MH+7, MH+8, MH+9, SUB+5, SUB+6
, SUB+7, VISION+5, VISION+6, VISION+7, OTH+4, OTH+5, OTH+6, ENAB+5, ENAB+6, ENAB+7
, SET+9, SET+23, SET+24, SET+27, SET+28, SET+31, SET+46, SET+47, SET+50, SET+51
, SET+54, TZH1+3, TZH1+6
>> V SET+21*, SET+31
X TZH1+7*, TZH1+8*, CTR~, CTR+1, WDEL+6*, WDEL+7*, WDEL+8, WDEL+10*, WDEL+11
XBE WDEL+14!
XBF WDEL+12*, WDEL+14!
XBFLT WDEL+12*, WDEL+14!
XBFN WDEL+12*, WDEL+14!
>> XBGL WDEL+2*
XBMED WDEL+12*, WDEL+14!
>> XBQ WDEL+12*
XBTLE WDEL+12*, WDEL+14!
Y SET+5*, TZH+2, CTR~, CTR+1
>> ZTQUEUED TZH+2, WDEL+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All