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

Package: Integrated Billing

Routine: IBOMBL


Information

IBOMBL ;ALB/SGD - MAS BILLING LOG ;25 MAY 88 11:42

Source Information

Source file <IBOMBL.m>

Entry Points

Name Comments DBIA/ICR reference
DATE
DATE1
BEGIN
Q
PRINT
HEAD

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Go to DATE: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: DATE1+0
Function Call: WRITE
  • Prompt: *7," ??",!,"ENDING DATE must follow BEGINNING DATE."
  • Line Location: DATE1+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: DATE1+1
Function Call: WRITE
  • Prompt: !!,*7,"*** Margin width of this output is 132 ***"
  • Line Location: DATE1+3
Function Call: WRITE
  • Prompt: !!,?30,"No matches found."
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: $P(^DPT(DFN,0),"^",1),?30,VA("BID")
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: ?39,$P(IB0,"^",1)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?50,Y
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?64,$J(X,15)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?81,$P(^(0),"^",1)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ?116,Y
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,@IOF,!,?94,"Date/Time Printed: "
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: Y,!!,IBHD,?120,"Page ",IBPG,!,IBL1,!!
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: "PATIENT NAME",?30,"PT ID",?38,"BILL NO.",?50,"DATE OF BILL",?67,"AMT. BILLED",?81,"BILL CATEGORY",?102,"INPT./OPT.",?116,"DATE CANCELLED",!,IBL
  • Line Location: HEAD+1
Info |  Source |  Entry Points |  Interaction Calls