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

Package: Integrated Billing

Routine: IBOHDT1


Information

IBOHDT1 ;ALB/EMG - REPORT OF CHARGES ON HOLD > 60 DAYS-CONT ;FEB 18 1997

Source Information

Source file <IBOHDT1.m>

Entry Points

Name Comments DBIA/ICR reference
REPORT ;
LOOP ;
PRNTBILL ; prints bills for a charge
PRNTPAT ; prints patient data
PRNTCHG ; prints a charge
HEADER ; writes the report header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REPORT+5
Function Call: WRITE
  • Prompt: ?122,IBPD,!
  • Line Location: PRNTBILL+11
Function Call: WRITE
  • Prompt: $E(IBNAME,1,20),?22,IBSSN
  • Line Location: PRNTPAT+3
Function Call: WRITE
  • Prompt: ?29,IBACT,?40,IBTYPE
  • Line Location: PRNTCHG+37
Function Call: WRITE
  • Prompt: ?46,"Rx #: "_IBRX_$S(IBRF>0:"("_IBRF_")",1:""),?68,$S(IBECME:"ECME #: "_IBECME,1:""),?95,"||",!
  • Condition for execution: IBRX>0
  • Line Location: PRNTCHG+37
Function Call: WRITE
  • Prompt: ?46,IBFR,?55,IBTO,?66,IBOHDT,?77,IBDAY,?86,IBCHG
  • Line Location: PRNTCHG+39
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: READ
  • Prompt: " Press RETURN to continue"
  • Variable: T
  • Timeout: DTIME
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: ?53,"CHARGES ON HOLD LONGER THAN "_IBNUM_" DAYS",?110,IBNOW," PAGE ",IBPAGE,!,"HELD CHARGES",?98,"CORRESPONDING THIRD PARTY BILLS",!,IBLINE
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,?46,"From/",?55,"To/",?66,"On Hold",?77,"# Days",?95,"||",?105,"AR"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"Name",?22,"Pt.ID",?29,"Act.ID",?40,"Type",?46,"Fill Dt",?55,"Rls Dt",?66,"Date",?77,"On Hold",?89,"Charge",?95,"||",?98,"Bill#",?105,"Status",?113,"Charge",?125,"Paid"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,IBLINE,!
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: ?44,"'*' = outpt visit on same day as Rx fill date",?95,"||",!,IBLINE,!
  • Line Location: HEADER+10
Info |  Source |  Entry Points |  Interaction Calls