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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BMCRR6P

Package: Referred Care Information System

Routine: BMCRR6P


Information

BMCRR6P ; IHS/PHXAO/TMJ - PRNT BILL VSTS ;

Source Information

Source file <BMCRR6P.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 $$FMTE^XLFDT  
Referred Care Information System 1 DONE^BMCRLP2  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;ENTRY POINT
HEAD2 ;
HEAD1 ;
START ;
DONE ;
PRINT ;print one referral

External References

Name Field # of Occurrence
DONE^BMCRLP2 DONE+2
^DIR HEAD+2
$$FMTE^XLFDT HEAD2+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No referrals to report",!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,$E(BMCF,1,23)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?25,$J(T,5)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?25,$J(T,5)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,"* any referral with an ending service date of less than 31 days ago is excluded.",!
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),?72,"Page ",BMCPG,!
  • Line Location: HEAD2+2
Function Call: WRITE
  • Prompt: ?20,"TIMELINESS OF RECEIPT OF DISCHARGE LETTERS",!?30,"BY REFERRAL FACILITY"
  • Line Location: HEAD2+3
Function Call: WRITE
  • Prompt: !?10,"REFERRAL INITIATED DATE RANGE: ",$$FMTE^XLFDT(BMCBD)," to ",$$FMTE^XLFDT(BMCED),!
  • Line Location: HEAD2+4
Function Call: WRITE
  • Prompt: !,"* any referral with an ending service date of less than 31 days ago is excluded.",!
  • Line Location: HEAD2+5
Function Call: WRITE
  • Prompt: !,?26,"TOTAL",?33,"NOT YET",?48,"RECEIVED WITH (#MONTHS)"
  • Line Location: HEAD2+6
Function Call: WRITE
  • Prompt: !,"REFERRAL FACILITY",?26,"REFS",?32,"RECD*",?43,"<1",?53,"1-3",?64,"4-6",?75,">6"
  • Line Location: HEAD2+7
Function Call: WRITE
  • Prompt: !?28,"N",?35,"N",?41,"N %",?52,"N %",?63,"N %",?74,"N %"
  • Line Location: HEAD2+8
Function Call: WRITE
  • Prompt: !,$TR($J(" ",80)," ","-")
  • Line Location: HEAD2+9
Routine Call
  • DIR
  • Line Location:
    • HEAD+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] HEAD2+2
^XTMP("BMCRR6" START+1, START+3, DONE+1!, PRINT+2, PRINT+4

Label References

Name Line Occurrences
@( START+1
DONE START+1, START+4, START+5
HEAD START+5, PRINT+1
PRINT START+3

Naked Globals

Name Field # of Occurrence
^( PRINT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRINT+2*
>> BMCBD HEAD2+4
>> BMCBT START+1, START+3, DONE+1
>> BMCBTH PRINT+2, PRINT+4
>> BMCED HEAD2+4
>> BMCF START+2*, START+3*, PRINT+2, PRINT+4
>> BMCJOB START+1, START+3, DONE+1, PRINT+2, PRINT+4
>> BMCPG START+1*, HEAD2+1*, HEAD2+2
BMCQUIT START+2!, START+3, START+4, START+5, PRINT+1, HEAD+2*
DIR HEAD+2!
DIR(0 HEAD+2*
>> DTOUT HEAD+2
DUZ(2 HEAD2+2
IO HEAD+2
IO(0 HEAD+2
IOF HEAD1+1
IOSL START+5, PRINT+1
IOST START+1, HEAD+2
>> J PRINT+3*, PRINT+6
>> K PRINT+3*, PRINT+6
>> T PRINT+2*, PRINT+5
U PRINT+2, PRINT+4, HEAD2+2
>> X PRINT+2*, PRINT+3, PRINT+4
>> Y PRINT+5*, PRINT+6, HEAD+2
>> Z PRINT+4*, PRINT+5, PRINT+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All