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

Package: Integrated Billing

Routine: IBOCOSI


Information

IBOCOSI ;ALB/ARH - LIST INACTIVE CODES FROM COS; 5/27/92

Source Information

Source file <IBOCOSI.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;get device then run the report
; ****
EXIT ;clean up and quit
EN1 ;entry pt. for tasked jobs
PRINT ;set up headers and dates then print
END
P1 ;print the report from the temp sort file to the appropriate device
HDR ;print the report header
PAUSE ;pause at end of screen if being displayed on a terminal
STOP() ;determine if user requested task to stop

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?15,$S(IBSTAT=0:"AMA INACTIVE",1:"NATIONALLY, LOCALLY AND BILLING INACTIVE"),!
  • Line Location: P1+2
Function Call: WRITE
  • Prompt: !,IBCPT,?7,$E(IBCPTP,1,IB1)
  • Line Location: P1+6
Function Call: WRITE
  • Prompt: ?(9+IB1),$E(IBCHECK,1,IB2),?(11+IB1+IB2),$E(IBSUBH,1,IB3)
  • Line Location: P1+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: IBHDR,?(IOM-30),IBCDT,?(IOM-8),"PAGE ",IBPGN,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"PROCEDURE",?(9+IB1),"CHECK-OFF SHEET",?(11+IB1+IB2),"SUBHEADER",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: IBDSH
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,"***TASK STOPPED BY USER***",!!
  • Line Location: STOP+1
Info |  Source |  Entry Points |  Interaction Calls