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

Package: Utilization Management Rollup

Routine: IBQLCHK


Information

IBQLCHK ;LEB/MRY - UM ROLLUP - CHECK INFO. IN IB(array) ; 4-JUN-95

Source Information

Source file <IBQLCHK.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Utilization Management Rollup 1 (ADMIT,CLAIMS,STAY)^IBQL356  
VA FileMan 1 DT^DICRW  

Entry Points

Name Comments DBIA/ICR reference
CLAIMS ;
ADM ;
STAY ;
PRINT ;

External References

Name Field # of Occurrence
DT^DICRW IBQLCHK+7
ADMIT^IBQL356 ADM+2
CLAIMS^IBQL356 CLAIMS+1
STAY^IBQL356 STAY+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: #,"CLAIMS TRACKING AND ADMISSION REVIEW DATA"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !!,"IB(.01) - ENTRY ID: ",?25,IB(.01)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,"IB(.02) - SITE: ",?25,IB(.02)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !,"IB(.03) - SSN#: ",?25,IB(.03)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,"IB(.04) - ADM DIAGNOSIS: ",?25,IB(.04)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,"IB(.05) - ENROLL: ",?25,IB(.05)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !,"IB(.06) - ADMITTING PHY: ",?25,IB(.06)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,"IB(.07) - ATTENDING PHY: ",?25,IB(.07)
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !,"IB(.08) - RESIDENT PHY: ",?25,IB(.08)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,"IB(.09) - ADMISSION: ",?25,IB(.09)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,"IB(.1) - DISCHARGE: ",?25,IB(.1)
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !,"IB(.11) - WARD: ",?25,IB(.11)
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !,"IB(.12) - TREATING SPECIALTY: ",?25,IB(.12)
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !,"IB(1.01) - SI FROM ADM: ",?25,IB(1.01)
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: !,"IB(1.02) - IS FROM ADM: ",?25,IB(1.02)
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: !,"IB(1.03) - REASONS FROM ADM: ",?25,IB(1.03)
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !,"IB(1.04) - PROVIDER INTERVIEWED?: ",?25,IB(1.04)
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,"IB(1.05) - ADM INFLUENCED?: ",?25,IB(1.05)
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !,"IB(1.06) - ROLLUP TYPE: ",?25,IB(1.06)
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: !,"IB(1.07) - SERVICE: ",?25,IB(1.07)
  • Line Location: PRINT+23
Function Call: WRITE
  • Prompt: !,"<<< DATA STREAM FOR TRANSMISSION >>>",!
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: !,"<<< VADPT CALL VARIABLES >>>",!
  • Line Location: PRINT+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBT(356.1 - [#356.1] ADM+1, STAY+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT IBQLCHK+7
>> I PRINT+3*
>> IB( ADM+3, ADM+5, STAY+1, STAY+4, STAY+5, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+9
, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19
, PRINT+20, PRINT+21, PRINT+22, PRINT+23
IBDATA IBQLCHK+8!
IBDATA( STAY+5*
IBDATA(0 ADM+4*
IBDATA(1 ADM+6*
>> IBFLD ADM+3*, ADM+5*, STAY+4*
>> IBPIS STAY+1*
>> IBQUIT IBQLCHK+8*, CLAIMS+1, ADM+2, STAY+2, STAY+3
>> IBTRN ADM+1, STAY+2
>> IBTRV ADM+1*, STAY+2*
>> X ADM+3*, ADM+4, ADM+5*, ADM+6, STAY+4*, STAY+5, PRINT+25*, PRINT+26*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All