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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BMCRLU

Package: Referred Care Information System

Routine: BMCRLU


Information

BMCRLU ; IHS/PHXAO/TMJ - GEN RETR UTILITIES ;

Source Information

Source file <BMCRLU.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
DRG Grouper 2 $$ICDDX^ICDEX  $$CPT^ICPTCOD  
Referred Care Information System 2 DT1^BMCOSUT  $$RRR^BMCRLU1  
IHS Patient 1 ($$MCD,$$MCR,$$PI)^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 60

Package Total Caller Graph
Referred Care Information System 58 BMCADD1  BMCAL1  BMCALERT  BMCBULL  BMCCLO  BMCFAHC1  BMCFAHC2  BMCFAHC3  
BMCFDRS  BMCFPIN  BMCFPRN  BMCFPRN1  BMCFPRN2  BMCFPRNA  BMCFPRNP  BMCFUNC  
BMCFUTL  BMCHS  BMCLKID  BMCLKID1  BMCMM  BMCMOD  BMCOUTRP  BMCPCCL  
BMCRCRV1  BMCRD  BMCRR101  BMCRR10P  BMCRR11  BMCRR121  BMCRR13P  BMCRR141  
BMCRR14P  BMCRR171  BMCRR17P  BMCRR181  BMCRR18P  BMCRR191  BMCRR19P  BMCRR1P  
BMCRR20P  BMCRR21  BMCRR221  BMCRR22P  BMCRR2P  BMCRR31  BMCRR51  BMCRR5P  
BMCRR61  BMCRR71  BMCRR7P  BMCRR7P2  BMCRR8P  BMCRR91  BMCRR9P  BMCRRSPP  
BMCTEN1  ^BMCREF  
Clinical Scheduling for Windows 1 BSDX41J  
Health Summary Components 1 BHSRCIS  

Entry Points

Name Comments DBIA/ICR reference
ANYINS(P,D) ;EP - return 1 or 0 if patient has any insurance
AVTCOST(R) ; EP
CASEMAN(R) ;EP return case manager
AVOP(R,A,T) ;EP
SETOP ;
AVDOS(R,F) ;EP - return available date of service (actual or estimated) in either internal or external format
FACREF(R) ;EP return facility referred to (piece 7-8-9)
AVICOST(R) ; EP
SETDX ;
LBLK(V,L) ;left blank fill
EXPENDT(R,F) ;Expected End DOS
REFDTI(R,F) ; EP - Date Referral Initiated
ACTBDT(R,F) ;Actual Beginning DOS
LZERO(V,L) ;left zero fill
ACTDT(R,F) ;Actual End DOS
AVLOS(R,F) ;EP return available LOS
RAIL(P,D) ;EP - Check for Railroad Retirement Data
AVEOS(R,F) ;EP return available end date of service
AVDX(R,A,T) ;EP - return array of available dx's
EXPBGDT(R,F) ;Expected Begin Date of Service
RZERO(V,L) ;ep right zero fill
CSECOM(R,D) ;EP -TEST FOR SORT BY, IF BY CSE COM DATES NEED TO TEST FOR DATES

External References

Name Field # of Occurrence
$$MCD^AUPNPAT ANYINS+4
$$MCR^AUPNPAT ANYINS+3
$$PI^AUPNPAT ANYINS+5
DT1^BMCOSUT AVEOS+6, EXPBGDT+6, EXPENDT+6, ACTBDT+6, ACTDT+6
$$RRR^BMCRLU1 RAIL+1
$$ICDDX^ICDEX SETDX+6, SETDX+9
$$CPT^ICPTCOD SETOP+4, SETOP+6
$$VAL^XBDIQ1 AVDOS+9, AVEOS+6, REFDTI+8
$$FMTE^XLFDT AVDOS+7, AVEOS+5, REFDTI+6, EXPBGDT+5, EXPENDT+5, ACTBDT+5, ACTDT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNPOV - [#9999999.27] SETOP+7
^AUTTVNDR - [#9999999.11] FACREF+3
^BMCCOM - [#90001.03] CSECOM+5, CSECOM+12
^BMCDX - [#90001.01] AVDX+8, AVDX+10, SETDX+1, SETDX+2
^BMCDX("AD" AVDX+8, AVDX+10
^BMCLPRV - [#90001.53] FACREF+3
^BMCPX - [#90001.02] AVOP+8, AVOP+9, SETOP+1, SETOP+4, SETOP+6, SETOP+7
^BMCPX("AD" AVOP+8, AVOP+9
^BMCREF - [#90001] AVDX+7, AVOP+7, AVDOS+4, AVEOS+4, AVLOS+3, AVLOS+5, AVICOST+3, AVICOST+4, AVICOST+6, AVICOST+7
, AVICOST+8, AVTCOST+3, AVTCOST+4, AVTCOST+6, AVTCOST+7, AVTCOST+8, FACREF+2, CASEMAN+1, REFDTI+4, EXPBGDT+4
, EXPENDT+4, ACTBDT+4, ACTDT+4
^BMCRTMP - [#90001.82] CSECOM+2, CSECOM+6, CSECOM+7, CSECOM+11, CSECOM+12
^BMCTSORT - [#90001.81] CSECOM+4, CSECOM+9
^DIC(4 - [#4] FACREF+3
^DIC(40.7 - [#40.7] FACREF+3
^VA(200 - [#200] CASEMAN+1

Label References

Name Line Occurrences
$$RAIL ANYINS+6
SETDX AVDX+8, AVDX+10
SETOP AVOP+8, AVOP+9

Naked Globals

Name Field # of Occurrence
^(11 AVICOST+6, AVTCOST+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RZERO+1~, RZERO+2*, LZERO+1~, LZERO+2*, LBLK+1~, LBLK+2*, AVLOS+2~, AVLOS+3*, AVLOS+4, AVLOS+5*
, AVLOS+6, AVICOST+4*, AVICOST+5, AVTCOST+4*, AVTCOST+5, FACREF+1~, FACREF+2*, FACREF+3
>> %1 AVICOST+4*, AVTCOST+4*
A AVDX~, AVDX+4*, AVDX+5, SETDX+1, SETDX+6, SETDX+9, AVOP~, AVOP+4*, AVOP+5, SETOP+1
, SETOP+4, SETOP+6, SETOP+7
BMCA ANYINS+1~, ANYINS+2*, ANYINS+3*, ANYINS+4*, ANYINS+5*, ANYINS+6*, ANYINS+7
BMCCDI SETDX+2~*, SETDX+6, SETDX+9
BMCDOS AVDOS+1~, AVDOS+3*, AVDOS+4*, AVDOS+5, AVDOS+6, AVDOS+7*, AVDOS+8*, AVDOS+9*, AVDOS+10, AVEOS+1~
, AVEOS+3*, AVEOS+4*, AVEOS+5*, AVEOS+6*, AVEOS+7, AVEOS+8, REFDTI+1~, REFDTI+3*, REFDTI+4*, REFDTI+5
, REFDTI+6*, REFDTI+7*, REFDTI+8*, REFDTI+9, EXPBGDT+1~, EXPBGDT+3*, EXPBGDT+4*, EXPBGDT+5*, EXPBGDT+6*, EXPBGDT+7
, EXPBGDT+8, EXPENDT+1~, EXPENDT+3*, EXPENDT+4*, EXPENDT+5*, EXPENDT+6*, EXPENDT+7, EXPENDT+8, ACTBDT+1~, ACTBDT+3*
, ACTBDT+4*, ACTBDT+5*, ACTBDT+6*, ACTBDT+7, ACTBDT+8, ACTDT+1~, ACTDT+3*, ACTDT+4*, ACTDT+5*, ACTDT+6*
, ACTDT+7, ACTDT+8
>> BMCDTYP AVDX+10
BMCF FACREF+1~, FACREF+3*, FACREF+4
BMCFLG AVDX+1~, AVDX+3*, AVDX+6*, AVDX+7*, AVDX+11, AVOP+1~, AVOP+3*, AVOP+6*, AVOP+7*, AVOP+10
>> BMCRPT CSECOM+2, CSECOM+6, CSECOM+7, CSECOM+11, CSECOM+12
BMCX AVDX+1~, AVDX+8*, AVDX+10*, SETDX+1, SETDX+2, AVOP+1~, AVOP+8*, AVOP+9*, SETOP+1, SETOP+4
, SETOP+6, SETOP+7
>> C AVDX+8*, AVDX+10*, AVOP+8*, AVOP+9*
D ANYINS~, ANYINS+3, ANYINS+4, ANYINS+5, ANYINS+6, RAIL~, RAIL+1, CSECOM~, CSECOM+5, CSECOM+12
F AVDOS~, AVDOS+2*, AVDOS+6, AVDOS+7, AVDOS+8, AVDOS+9, AVEOS~, AVEOS+2*, AVEOS+5, AVEOS+6
, AVEOS+7, AVLOS~, AVLOS+1*, AVLOS+5, REFDTI~, REFDTI+2*, REFDTI+6, REFDTI+7, REFDTI+8, EXPBGDT~
, EXPBGDT+2*, EXPBGDT+5, EXPBGDT+6, EXPBGDT+7, EXPENDT~, EXPENDT+2*, EXPENDT+5, EXPENDT+6, EXPENDT+7, ACTBDT~
, ACTBDT+2*, ACTBDT+5, ACTBDT+6, ACTBDT+7, ACTDT~, ACTDT+2*, ACTDT+5, ACTDT+6, ACTDT+7
I RZERO+1~, RZERO+2*, LZERO+1~, LZERO+2*, LBLK+1~, LBLK+2*
L RZERO~, RZERO+2, LZERO~, LZERO+2, LBLK~, LBLK+2
P ANYINS~, ANYINS+3, ANYINS+4, ANYINS+5, ANYINS+6, RAIL~, RAIL+1
R AVDX~, AVDX+6, AVDX+7, AVDX+8, AVDX+10, AVOP~, AVOP+6, AVOP+7, AVOP+8, AVOP+9
, AVDOS~, AVDOS+4, AVDOS+9, AVEOS~, AVEOS+4, AVEOS+6, AVLOS~, AVLOS+3, AVLOS+5, AVICOST~
, AVICOST+3, AVICOST+4, AVICOST+6, AVICOST+7, AVICOST+8, AVTCOST~, AVTCOST+3, AVTCOST+4, AVTCOST+6, AVTCOST+7
, AVTCOST+8, FACREF~, FACREF+2, CASEMAN~, CASEMAN+1, REFDTI~, REFDTI+4, REFDTI+8, EXPBGDT~, EXPBGDT+4
, EXPENDT~, EXPENDT+4, ACTBDT~, ACTBDT+4, ACTDT~, ACTDT+4, CSECOM~
T AVDX~, AVDX+2*, SETDX+1, SETDX+6, SETDX+9, AVOP~, AVOP+2*, SETOP+1, SETOP+4, SETOP+6
, SETOP+7
U AVDX+8, AVDX+10, SETDX+1, SETDX+2, SETDX+6, SETDX+9, AVOP+8, AVOP+9, SETOP+1, SETOP+4
, SETOP+6, SETOP+7, AVDOS+4, AVEOS+4, AVLOS+3, AVLOS+5, AVICOST+4, AVICOST+6, AVICOST+7, AVICOST+8
, AVTCOST+4, AVTCOST+6, AVTCOST+7, AVTCOST+8, FACREF+3, CASEMAN+1, REFDTI+4, EXPBGDT+4, EXPENDT+4, ACTBDT+4
, ACTDT+4, CSECOM+4, CSECOM+5, CSECOM+6, CSECOM+7, CSECOM+9, CSECOM+12
V RZERO~, RZERO+2*, RZERO+3, LZERO~, LZERO+2*, LZERO+3, LBLK~, LBLK+2*, LBLK+3
>> X CSECOM+2*, CSECOM+14*, CSECOM+15
>> X1 CSECOM+3*, CSECOM+5*, CSECOM+8*, CSECOM+14
>> X2 CSECOM+3*, CSECOM+10*, CSECOM+11, CSECOM+13*, CSECOM+14
>> X3 CSECOM+5*, CSECOM+6, CSECOM+7
>> Y AVEOS+6*, EXPBGDT+6*, EXPENDT+6*, ACTBDT+6*, ACTDT+6*, CSECOM+2*, CSECOM+4, CSECOM+6, CSECOM+7, CSECOM+9
, CSECOM+11, CSECOM+12
>> Y1 CSECOM+11*, CSECOM+12
>> Z RZERO+2*, LZERO+2*, LBLK+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All