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: IBQLR1A

Package: Utilization Management Rollup

Routine: IBQLR1A


Information

IBQLR1A ;LEB/MRY - ACUTE/NON-ACUTE REPORT ; 13-JUL-95

Source Information

Source file <IBQLR1A.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Utilization Management Rollup 2 DTC^IBQLPL2  SVCTAB^IBQLR1B  
List Manager 1 PAUSE^VALM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Utilization Management Rollup 1 IBQLR1  

Entry Points

Name Comments DBIA/ICR reference
MDATA ;
ACUTE ;
END
HDR ; -- print headers
PLINE ;
TS
MONTH ;
CHKL ; -- check end of page
REASON ;
PRINT

External References

Name Field # of Occurrence
DTC^IBQLPL2 PRINT+2
SVCTAB^IBQLR1B PRINT
PAUSE^VALM1 CHKL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?3,"CONTINUED STAY REVIEWS"
  • Line Location: ACUTE+2
Function Call: WRITE
  • Prompt: $P(IBDATA,","),?30
  • Line Location: PLINE+5
Function Call: WRITE
  • Prompt: $J($P(IBDATA,",",I),3)_" "
  • Line Location: PLINE+6
Function Call: WRITE
  • Prompt: !,IBTDT,?(IOM-$L(IBHDR)/2),IBHDR,?(IOM-10),"PAGE ",IBPAG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?(IOM-$L(IBHDR1)/2),IBHDR1,!,?(IOM-$L(IBHDR2)/2),IBHDR2
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CHKL+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("IBQLR1" PRINT+5, TS, TS+6, ACUTE+4, REASON+3, REASON+5

Label References

Name Line Occurrences
ACUTE TS+7
CHKL PLINE+7
END PRINT+6
HDR PLINE+1, CHKL+1, CHKL+2
MDATA ACUTE+4, REASON+5
MONTH PRINT
PLINE TS+3, ACUTE+5, REASON+6
REASON TS+8
TS PRINT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DIRUT CHKL+1
I END!, MDATA+2*, MDATA+4, PLINE+4*, PLINE+5, PLINE+6, MONTH+2*
IBCAT TS+5*, TS+6*, TS+7, TS+8, END!, ACUTE+4, REASON+3, REASON+5, MDATA+6, PLINE+2
, PLINE+5
IBCATF TS+5*, END!, ACUTE+2*
IBDATA PRINT*, END!, MDATA+4*, MDATA+6*, PLINE+3*, PLINE+4, PLINE+5, PLINE+6
IBDAY TS+4*, TS+6, END!, ACUTE+2, ACUTE+4, REASON+2, REASON+3, REASON+5
>> IBDRNG PRINT+3
IBHDR PRINT*, PRINT+3*, END!, HDR+2
>> IBHDR1 PRINT+3*, HDR+3
>> IBHDR2 PRINT+3*, HDR+3
IBMD END!, MDATA+1*, MDATA+2
IBMONTH END!, ACUTE+1*, ACUTE+3*, ACUTE+4, REASON+4*, REASON+5, MDATA+1
IBMONTH( ACUTE+3, REASON+4, MONTH+2
IBMTH END!, MDATA+1*
>> IBPAG PRINT*, PLINE+1, HDR+1*, HDR+2
IBQUIT PRINT*, PRINT+5, TS, TS+4, TS+6, END!, ACUTE+3, ACUTE+5, REASON+3, REASON+4
, REASON+6, PLINE+7, CHKL+1*
>> IBREA REASON+1*, REASON+3*, REASON+5, MDATA+6
IBRES END!, ACUTE+4*, REASON+5*, MDATA+4
>> IBSUBH TS+1*, TS+2*, PLINE+3
>> IBSVC PRINT*, PRINT+5*, TS, TS+1, TS+2, TS+6, ACUTE+4, REASON+3, REASON+5
>> IBSVC( TS+1, TS+2
>> IBSVC("UNK" TS+1, TS+2
>> IBTDT HDR+2
IBTEXT PRINT*, END!, MDATA+2, PLINE+3, MONTH+3*, MONTH+4*
IBTS PRINT*, TS*, TS+1, TS+2, TS+6, END!, ACUTE+4, REASON+3, REASON+5
>> IBTY PRINT+3
IOF HDR+1, CHKL+1
IOM HDR+2, HDR+3, HDR+4
IOSL CHKL+1, CHKL+2
IOST HDR+1, CHKL+1, CHKL+2
MSTRING END!, MDATA+1, MONTH+1*, MONTH+3
N END!
X END!, MDATA+2*, MDATA+3, MONTH+1*, MONTH+2*, MONTH+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All