Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls