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

Package: Referred Care Information System

Routine: BMCRR3


Information

BMCRR3 ; IHS/PHXAO/TMJ - list patients for which medical and/or cost data has not been received ;

Source Information

Source file <BMCRR3.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 C^%DTC  ^DIR  
IHS Patient 1 KILL^AUPNPAT  
IHS VA Utilities 1 ^XBDBQUE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Referred Care Information System 1 BMC RPT-HIGH COST USERS LIST  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
D ;DATE RANGE
BROWSE ;
ED ;get ending date
DOLLAR ;
START ;
COST ;
XIT ;EP - CALLED FROM BMCRR3
ZIS ;call to XBDBQUE

External References

Name Field # of Occurrence
C^%DTC ED+4
KILL^AUPNPAT XIT+1
^DIR BD+1, ED+1, DOLLAR+1, COST+2, ZIS+2
^XBDBQUE ZIS+8, BROWSE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This report will present a list of high cost users. The user will enter",!,"a date range and a dollar amount which will serve as the indicator of high",!,"cost. "
  • Line Location: START+1
Function Call: WRITE
  • Prompt: "All referrals incurred by a patient in that date range will be totalled.",!,"If the total cost is greater than or equal to the dollar amount entered by the",!,"user, that patient will be considered a high cost user.",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"The Total Cost can be either IHS COST or TOTAL COST.",!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"If ACTUAL Cost is available, it will be used. If not available, estimated",!,"cost is used. Inhouse Referrals are NOT included.",!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DOLLAR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ZIS+2
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • DOLLAR+1
    • COST+2
    • ZIS+2

Label References

Name Line Occurrences
BD ED+2, DOLLAR+2, DOLLAR+3
BROWSE ZIS+6
COST ZIS+5
DOLLAR COST+3
XIT BD+2, ZIS+6, ZIS+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BMC11 XIT+2!
BMC80D XIT+2!
BMC80E XIT+2!
BMCAMT DOLLAR+4*, XIT+2!
BMCBD BD+3*, ED+1, ED+4, XIT+2!
BMCBT XIT+2!
BMCBTH XIT+2!
BMCCOST COST+1*, COST+4*, XIT+2!
BMCDOLL XIT+2!
BMCED ED+3*, XIT+2!
BMCET XIT+2!
BMCHRN XIT+2!
BMCJOB XIT+2!
BMCOPT ZIS+1!, ZIS+4*, ZIS+6, XIT+2!
BMCPG XIT+2!
BMCPN XIT+2!
BMCQUIT ZIS+3*, ZIS+5, XIT+2!
BMCRCNT XIT+2!
BMCREF XIT+2!
BMCRREC XIT+2!
BMCSD ED+4*, XIT+2!
DA DOLLAR+1!, COST+2!, ZIS+2!, XIT+3!
DFN XIT+3!
DIR BD+1!, ED+1!, DOLLAR+1!, COST+2!, ZIS+2!, XIT+3!
DIR("A" BD+1*, ED+1*, DOLLAR+1*, COST+2*, ZIS+2*
DIR("B" COST+2*, ZIS+2*
DIR(0 BD+1*, ED+1*, DOLLAR+1*, COST+2*, ZIS+2*
DIRUT BD+1*, BD+2, ED+1*, ED+2, DOLLAR+3, COST+3, ZIS+3, XIT+3!
DTOUT XIT+3!
DUOUT BD+1, ED+1, XIT+3!
X ED+4, XIT+3!
X1 ED+4*, XIT+3!
X2 ED+4*, XIT+3!
>> XBIOP BROWSE+2*
>> XBNS ZIS+7*
>> XBRC ZIS+7*, BROWSE+2*
>> XBRP ZIS+7*, BROWSE+1*
>> XBRX ZIS+7*, BROWSE+2*
Y BD+3, ED+3, DOLLAR+2, DOLLAR+4, COST+4, ZIS+4, XIT+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All