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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBQLD2

Package: Utilization Management Rollup

Routine: IBQLD2


Information

IBQLD2 ;LEB/MRY - PATIENT DOWNLOAD TO SPREADSHEET ; 17-MAY-95

Source Information

Source file <IBQLD2.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Utilization Management Rollup 3 (ADMIT,STAY)^IBQL538  PRINT^IBQLD2A  PHY^IBQLD3  
VA FileMan 3 ^%DTC  DT^DICRW  ^DIR  
Kernel 2 ^%ZIS  ^%ZISC  
Integrated Billing 1 DATE^IBOUTL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Integrated Billing 1 IBQL PATIENT REVIEW DOWNLOAD  
Utilization Management Rollup 1 IBQL PATIENT REVIEW DOWNLOAD  

Entry Points

Name Comments DBIA/ICR reference
DATE
SVCI
TSI
DEV ; -- select device, run option
START ;
END ; -- Clean up
DATA ;
ADMIT ; -- get Admission Review info.
STAY ; -- get Stay Review info.

External References

Name Field # of Occurrence
^%DTC DATE+2
^%ZIS DEV+2
^%ZISC END+3
DT^DICRW IBQLD2+4
^DIR DATE+5, DATE+9, SVCI+1, TSI+1, DEV+3
DATE^IBOUTL DATE
ADMIT^IBQL538 ADMIT+1
STAY^IBQL538 STAY+2
PRINT^IBQLD2A START+5
PHY^IBQLD3 DATE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !,"<<< please report 1 years of information only. >>>"
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: !!,"Set your Device settings to '0;255;9999'"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !,"Working...",!
  • Line Location: DEV+4
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Routine Call
  • DIR
  • Line Location:
    • DATE+5
    • DATE+9
    • SVCI+1
    • TSI+1
    • DEV+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBQ(538 - [#538] START+2, START+3, STAY+1
^TMP("IBQLD2" START+1!, END+1!, ADMIT+5*, ADMIT+6, ADMIT+7, ADMIT+8, STAY+5, STAY+7*, STAY+9, STAY+10
, STAY+11, STAY+12, STAY+13

Label References

Name Line Occurrences
DATA START+3
DATE DATE+2
DEV DATE+10, SVCI+1, TSI+1
END DATE+1, DATE+5, DATE+9, SVCI+1, TSI+1, DEV+2, DEV+3
STAY ADMIT+3
SVCI SVCI+1, SVCI+2
TSI DATE+11, TSI+1, TSI+2

Naked Globals

Name Field # of Occurrence
^( STAY+10*
^("LOS" ADMIT+6*, STAY+11*
^("S-AC" ADMIT+7*, STAY+12*
^("S-NAC" ADMIT+8*, STAY+13*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR DATE+5!, DATE+9!, SVCI+1!, TSI+1!
DIR("A" DATE+4*, DATE+7*, DATE+8*, SVCI*, TSI*, DEV+3*
DIR(0 DATE+4*, DATE+7*, DATE+8*, SVCI*, TSI*, DEV+3*
DT IBQLD2+4
>> DTOUT DATE+5, DATE+9, SVCI+1, TSI+1, DEV+3
>> DUOUT DATE+5, DATE+9, SVCI+1, TSI+1
I END+1!, STAY+8*
IB END+1!
IB( ADMIT+2, ADMIT+4, ADMIT+5, ADMIT+6, ADMIT+7, ADMIT+8, STAY+3, STAY+5, STAY+6, STAY+7
, STAY+8, STAY+9, STAY+10, STAY+11, STAY+12, STAY+13
IB("ACUTE ADM ISSION" , ADMIT+4, ADMIT+7
IB("ACUTE STA Y" , STAY+12
IBBDT DATE+1, DATE+2, START+1, END+1!
IBDATA END+1!, ADMIT+4*, ADMIT+5, STAY+6*, STAY+7
IBDDT START+1*, START+2*, START+3, END+1!
IBEDT DATE+1, DATE+2, START+2, END+1!
IBHDR END+1!
IBLV END+1!, ADMIT+1*, STAY+9*, STAY+14
IBLVH START+1*, END+1!, STAY+14*
IBPAG DATE+3*, END+1!
IBQUIT DATE+3*, END+1!
IBREA END+1!
>> IBSVC ADMIT+2*, ADMIT+3, ADMIT+5, ADMIT+6, ADMIT+7, ADMIT+8, STAY+3*, STAY+4, STAY+5, STAY+7
, STAY+9, STAY+10, STAY+11, STAY+12, STAY+13
>> IBSVC( SVCI+2*, ADMIT+3, STAY+4
>> IBSVC("" SVCI+1
IBTEXT END+1!
IBTRN START+3*, END+1!, STAY+1
IBTRND END+1!
>> IBTRV STAY+1*
IBTS END+1!, ADMIT+2*, ADMIT+3, ADMIT+5, ADMIT+6, ADMIT+7, ADMIT+8, STAY+3*, STAY+4, STAY+5
, STAY+7, STAY+9, STAY+10, STAY+11, STAY+12, STAY+13
IBTS( TSI+2*, ADMIT+3, STAY+4
IBTS("" TSI+1
IBTY DATE+6*, DATE+7, DATE+8, DATE+11, END+1!, ADMIT+2, ADMIT+3, STAY+3, STAY+4
>> IBTY1 DATE+10*, ADMIT+3, STAY+4
IO DEV+5
N END+1!
>> POP DEV+2
>> REA STAY+8*, STAY+9, STAY+10
X DATE+2, SVCI+1, TSI+1, END+1!
>> X1 DATE+2*
>> X2 DATE+2*
>> Y DATE+6, DATE+10, SVCI+2
>> Y(0 SVCI+2, TSI+2
>> ZTQUEUED END+2
>> ZTREQ END+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All