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

Package: Integrated Billing

Routine: IBOHIST


Information

IBOHIST ;ALB/EMG - HISTORY OF CHARGES ON HOLD REPORT ; FEB 25 1997

Source Information

Source file <IBOHIST.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
DEV
DQ ; -entry from tasked job
PRINT ; -output data
LINE ;
HDR ;
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"History of Charges ON HOLD Report",!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!?6,"This report uses the date the IB Action was created to determine"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !?6,"whether it should be included in the count and amount totals."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !?6,"Please enter the starting date for this report. The date should"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !?6,"be after 6/1/96 or when patch IB*2.0*70 was installed at your"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !?6,"facility since this report only counts charges with an ON HOLD"
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !?6,"DATE defined. You can also type '^' to exit.",!
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: !!?((IOM-34)/2),"TOTALS BY CURRENT STATUS OF CHARGE",!
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,"Current Status: ",IBSTAT
  • Line Location: LINE+2
Function Call: WRITE
  • Prompt: !?5,"NUMBER ENTRIES: ",$J($S($D(^TMP($J,"IB",IBSTAT,"GCNT")):^("GCNT"),1:0),9)
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: !?5,"DOLLAR AMOUNT: $",$J($S($D(^TMP($J,"IB",IBSTAT,"GTOT")):^("GTOT"),1:0),9,2)
  • Line Location: LINE+5
Function Call: WRITE
  • Prompt: !?((IOM-26)/2),"History of Charges ON HOLD"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?((IOM-3)/2),"for"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?((IOM-($L(IBSNM)+6))/2),IBSNM_" ("_IBSITE_")"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?((IOM-54)/2),"Charges created between ",$$DAT2^IBOUTL(IBSDT)," and ",$P($$DAT2^IBOUTL(IBEDT),"@")
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!?(IOM-26/2),"Date Printed: ",IBHDT
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?(IOM-8/2),"Page: ",IBPAG
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !?(IOM-26/2),"--------------------------"
  • Line Location: HDR+9
Info |  Source |  Entry Points |  Interaction Calls