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

Package: IHS Uniform Data System

Routine: BUDBDU


Information

BUDBDU ; IHS/CMI/LAB - gpra utility calls ;

Source Information

Source file <BUDBDU.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
DRG Grouper 2 $$CODEN^ICDCODE  $$CPT^ICPTCOD  
Patient Care Component Reports 2 $$START1^APCLDF  $$CLINIC^APCLV  
IHS Patient 1 $$DOB^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
Taxonomy 1 $$ICD^ATXCHK  

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
IHS Uniform Data System 16 BUDBRP6B  BUDBRP6C  BUDBRP6D  BUDBRP6M  BUDBRP6N  BUDBRP6O  BUDBRP6U  BUDBRP6V  
BUDBRP6W  BUDBRP6X  BUDBRP6Y  BUDBRP7  BUDBRP7A  BUDBRP7B  BUDBRP7C  BUDBRPTC  

Entry Points

Name Comments DBIA/ICR reference
TRAN(P,BDATE,EDATE,T,F) ;EP - return ien of CPT entry if patient had this CPT IN A TRAN CODE
PLTAX(P,A) ;EP - is DX on problem list 1 or 0
SIGCPTS ;;
WH(P,BDATE,EDATE,T,F) ;EP
COLOCPTS ;;
RAD(P,BDATE,EDATE,T,F) ;EP - return ien of CPT entry if patient had this CPT
TRANI(P,BDATE,EDATE,CPTI) ;EP
BECPTS ;;
PLCODE(P,A,ED) ;EP
SITE
DEMO(P,T) ;EP - exclude demo patients
CPT(P,BDATE,EDATE,T,F,SCEX) ;EP - return ien of CPT entry if patient had this CPT
XIT ;
LASTITEM(P,BD,ED,BUDT,BUDV) ;PEP - return last item APCLV OF TYPE APCLT DURING BD TO ED IN FORM APCLF
V ; GET VERSION
PRINT
CPTI(P,BDATE,EDATE,CPTI,SCEX,SCLN,SMOD) ;EP - did patient have this cpt (ien) in date range
BANNER ;EP
DATE(D) ;EP

External References

Name Field # of Occurrence
$$START1^APCLDF LASTITEM+5
$$CLINIC^APCLV CPTI+16
$$ICD^ATXCHK PLTAX+5, CPT+16, RAD+15, TRAN+14
$$DOB^AUPNPAT LASTITEM+1
$$CODEN^ICDCODE PLCODE+6
$$CPT^ICPTCOD CPT+25, CPT+26, TRAN+23, TRAN+24
$$VAL^XBDIQ1 PLTAX+5, CPTI+17, CPTI+18
$$FMADD^XLFDT WH+5, CPT+6, RAD+5, TRAN+5
$$FMTE^XLFDT WH+21, CPT+24, RAD+23, TRAN+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?80-$L(BUDX)\2,BUDX
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !?80-(8+$L(BUD("VERSION")))/2,"Version ",BUD("VERSION")
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?80-$L(BUD("SITE"))\2,BUD("SITE")
  • Line Location: SITE+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX("B" PLTAX+3
^AUPNPROB - [#9000011] PLCODE+8, PLTAX+5
^AUPNPROB("AC" PLCODE+8, PLTAX+5
^AUPNVCPT - [#9000010.18] CPT+16, CPT+23, CPT+24, CPT+25, CPT+26, CPTI+14
^AUPNVCPT("AA" CPTI+9, CPTI+12, CPTI+13
^AUPNVCPT("AD" CPT+13, CPT+15
^AUPNVRAD - [#9000010.22] RAD+14, RAD+22, RAD+23, RAD+24, RAD+25
^AUPNVRAD("AD" RAD+12, RAD+13
^AUPNVSIT - [#9000010] CPT+12, CPT+14, CPT+23, CPT+24, CPT+25, CPT+26, RAD+11, RAD+22, RAD+23, RAD+24
, RAD+25, CPTI+15, TRANI+13, TRAN+11, TRAN+21, TRAN+22, TRAN+23, TRAN+24
^AUPNVSIT("AA" CPT+10, CPT+11, RAD+9, RAD+10, TRAN+9, TRAN+10
^AUPNVTC - [#9000010.33] TRANI+10, TRANI+12, TRAN+14, TRAN+21, TRAN+22, TRAN+23, TRAN+24
^AUPNVTC("AC" TRANI+6, TRANI+9
^AUPNVTC("AD" TRAN+12, TRAN+13
^BWPCD - [#9002086.1] WH+9, WH+10, WH+11, WH+20, WH+21
^BWPCD("C" WH+8
^DIBT( DEMO+11, DEMO+17
^DIBT("B" DEMO+9, DEMO+15
^DIC(4 - [#4] SITE
^DPT - [#2] DEMO+7, DEMO+13
^ICPT - [#81] CPTI+8, TRANI+5
^RAMIS(71 - [#71] RAD+14, RAD+24, RAD+25

Label References

Name Line Occurrences
PRINT V+2
XIT SITE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DEMO+8~, DEMO+9*, DEMO+10, DEMO+11, DEMO+14~, DEMO+15*, DEMO+16, DEMO+17, LASTITEM+5~*
A PLCODE~, PLCODE+2, PLCODE+6, PLTAX~, PLTAX+2, PLTAX+3
BD CPT+8~, CPT+9*, CPT+10, RAD+7~, RAD+8*, RAD+9, CPTI+10~, CPTI+11*, CPTI+12, TRAN+7~
, TRAN+8*, TRAN+9, LASTITEM~, LASTITEM+1*, LASTITEM+5
BDATE WH~, WH+5*, WH+12, CPT~, CPT+6*, CPT+9, RAD~, RAD+5*, RAD+8, CPTI~
, CPTI+3, CPTI+11, TRANI~, TRANI+3, TRANI+14, TRAN~, TRAN+5*, TRAN+8
>> BUD("SITE" SITE*, XIT+1!
>> BUD("VERSION" V+1*, PRINT+2, XIT+1!
BUDJ V+3*, PRINT+1*, XIT+1!
BUDLINE V+2*, V+3*, PRINT+1, XIT+1!
BUDR LASTITEM+5~
BUDR(1 LASTITEM+6, LASTITEM+7
BUDT LASTITEM~, LASTITEM+3, LASTITEM+5
BUDTEXT V+2*, XIT+1!
BUDV LASTITEM~, LASTITEM+4, LASTITEM+5
BUDX V+3*, PRINT+1*!, XIT+1!
C RAD+7~, RAD+14*, RAD+15, TRANI+7~, TRANI+10*, TRANI+11
CPTI CPTI~, CPTI+2, CPTI+8, CPTI+12, CPTI+13, TRANI~, TRANI+5, TRANI+11
D DATE~, DATE+1, DATE+2, WH+7~, WH+11*, WH+12, WH+13, WH+14, WH+15, WH+20*
, WH+21*, CPT+8~, RAD+7~, CPTI+10~, TRAN+7~
DT PLCODE+3, LASTITEM+2
DUZ(2 SITE
E LASTITEM+5~*
ED PLCODE~, PLCODE+3*, CPT+8~, CPT+9*, CPT+10*, CPT+11, RAD+7~, RAD+8*, RAD+9*, RAD+10
, CPTI+10~, CPTI+11*, CPTI+12*, CPTI+13, CPTI+24, TRAN+7~, TRAN+8*, TRAN+9*, TRAN+10, LASTITEM~
, LASTITEM+2*, LASTITEM+5
EDATE WH~, WH+4, WH+5, WH+13, CPT~, CPT+5, CPT+6, CPT+9, RAD~, RAD+4
, RAD+5, RAD+8, CPTI~, CPTI+4, CPTI+11, TRANI~, TRANI+4, TRANI+15, TRAN~, TRAN+4
, TRAN+5, TRAN+8
F WH~, WH+3*, WH+18, WH+19, WH+20, WH+21, CPT~, CPT+3*, CPT+21, CPT+22
, CPT+23, CPT+24, CPT+25, CPT+26, RAD~, RAD+3*, RAD+20, RAD+21, RAD+22, RAD+23
, RAD+24, RAD+25, TRAN~, TRAN+3*, TRAN+19, TRAN+20, TRAN+21, TRAN+22, TRAN+23, TRAN+24
G WH+7~, WH+8*, WH+15*, WH+17, WH+18, WH+19, WH+20, WH+21, CPT+8~, CPT+9*
, CPT+10, CPT+11, CPT+15, CPT+16*, CPT+20, CPT+21, CPT+22, CPT+23, CPT+24, CPT+25
, CPT+26, RAD+7~, RAD+8*, RAD+9, RAD+10, RAD+13, RAD+15*, RAD+19, RAD+20, RAD+21
, RAD+22, RAD+23, RAD+24, RAD+25, CPTI+10~, CPTI+11*, CPTI+12, CPTI+13, CPTI+24*, CPTI+25
, TRANI+7~, TRANI+8*, TRANI+16*, TRANI+17, TRAN+7~, TRAN+8*, TRAN+9, TRAN+10, TRAN+13, TRAN+14*
, TRAN+18, TRAN+19, TRAN+20, TRAN+21, TRAN+22, TRAN+23, TRAN+24
G( WH+15*
G(0 WH+14
I WH+8*, WH+14*, PLCODE+8~*, PLCODE+9, PLTAX+5~*, PLTAX+6, CPTI+10~, CPTI+13*, CPTI+14, CPTI+17
, CPTI+18
IOF PRINT
J CPTI+10~, CPTI+20*, CPTI+22*
K CPTI+10~, CPTI+20*, CPTI+22*
M CPTI+10~, CPTI+17*, CPTI+20
M1 CPTI+10~, CPTI+18*, CPTI+22
O WH+7~
P DEMO~, DEMO+1, DEMO+7, DEMO+11, DEMO+13, DEMO+17, WH~, WH+1, WH+8, PLCODE~
, PLCODE+1, PLCODE+8, PLTAX~, PLTAX+1, PLTAX+5, CPT~, CPT+1, CPT+10, CPT+11, RAD~
, RAD+1, RAD+9, RAD+10, CPTI~, CPTI+1, CPTI+9, CPTI+12, CPTI+13, TRANI~, TRANI+1
, TRANI+6, TRANI+9, TRAN~, TRAN+1, TRAN+9, TRAN+10, LASTITEM~, LASTITEM+1, LASTITEM+5
Q CPTI+10~, CPTI+19*, CPTI+20*, CPTI+21, CPTI+22*, CPTI+23
R DEMO+4~, DEMO+5*, DEMO+6, DEMO+7*, DEMO+10*, DEMO+11*, DEMO+12, DEMO+13*, DEMO+16*, DEMO+17*
, DEMO+18*, LASTITEM+5!
SCEX CPT~, CPT+4*, CPT+14, CPTI~, CPTI+5*, CPTI+15
SCLN CPTI~, CPTI+6*, CPTI+16
SMOD CPTI~, CPTI+7*, CPTI+20, CPTI+22
T DEMO~, DEMO+2*, DEMO+3, DEMO+6, DEMO+12, WH~, WH+2, WH+10, PLCODE+4~, PLCODE+6*
, PLCODE+7, PLCODE+8, PLTAX+3~*, PLTAX+4, PLTAX+5, CPT~, CPT+2, CPT+16, RAD~, RAD+2
, RAD+15, TRAN~, TRAN+2, TRAN+14
>> TRANI TRANI+2
U DEMO+7, DEMO+13, WH+10, WH+11, WH+20, WH+21, PLCODE+8, PLTAX+5, CPT+14, CPT+16
, CPT+23, CPT+24, CPT+25, CPT+26, RAD+14, RAD+22, RAD+23, RAD+24, RAD+25, CPTI+14
, CPTI+15, TRANI+10, TRANI+12, TRANI+13, TRAN+14, TRAN+21, TRAN+22, TRAN+23, TRAN+24, LASTITEM+7
V WH+7~, WH+8*, WH+9, WH+10, WH+11, WH+15, CPT+8~, CPT+11*, CPT+12, CPT+13
, CPT+14, CPT+15, CPT+23*, CPT+24*, CPT+25*, CPT+26*, RAD+7~, RAD+10*, RAD+11, RAD+12
, RAD+13, RAD+22*, RAD+23*, RAD+24*, RAD+25*, CPTI+10~, CPTI+14*, CPTI+15, CPTI+16, TRANI+7~
, TRANI+12*, TRANI+13*, TRANI+14, TRANI+15, TRANI+16, TRAN+7~, TRAN+10*, TRAN+11, TRAN+12, TRAN+13
, TRAN+21*, TRAN+22*, TRAN+23*, TRAN+24*
X WH+7~, PLCODE+8~*, PLTAX+5~*, CPT+8~, CPT+15*, CPT+16, RAD+7~, RAD+13*, RAD+14, RAD+15
, CPTI+10~, TRANI+7~, TRANI+9*, TRANI+10, TRANI+12, TRAN+7~, TRAN+13*, TRAN+14
Y WH+7~, PLCODE+8~*, PLTAX+5~*, CPT+8~, RAD+7~, CPTI+10~, TRAN+7~, LASTITEM+5~
Z CPTI+10~

Marked Items

Name Field # of Occurrence
$T(@BUDTEXT+BUDJ V+3, PRINT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All