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

Package: Integrated Billing

Routine: IBOST


Information

IBOST ;ALB/AAS - INTEGRATED BILLING STATISTICAL REPORT ; 8-MAR-91

Source Information

Source file <IBOST.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
DEV
DQ ; -entry from tasked job
GROSS ; -gross count of action types, total charges
; -^tmp($j,"ib",ibaction type,"gcnt")=count
; ^tmp($j,"ib",ibaction type,"gtot")=sum of charges
NET ; -net count of new actions that aren't cancelled
; -^tmp($j,"ib",ibaction type,"ncnt")=net count
; ^tmp($j,"ib",ibaction type,"ntot")=net total
PRINT ; -output data
LINE ;
NETLIN ;
HDR ;
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,*13,?20,"Integrated Billing Statistical Report"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+6
Function Call: WRITE
  • Prompt: !!?((IOM-25)/2),"NET TOTALS BY ACTION TYPE"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?((IOM-27)/2),"GROSS TOTALS BY ACTION TYPE"
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !!?((IOM/2)-$L($P(IBATYP," ",2,99))),$P(IBATYP," ",2,99)
  • Line Location: LINE+2
Function Call: WRITE
  • Prompt: !?((IOM/2)-12),"NUMBER ENTRIES: ",$S($D(^TMP($J,"IB",IBSEQNO,IBATYP,"GCNT")):^("GCNT"),1:0)
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: !?((IOM/2)-12),"DOLLAR AMOUNT: $",$S($D(^TMP($J,"IB",IBSEQNO,IBATYP,"GTOT")):^("GTOT"),1:0)
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: !!?((IOM/2)-$L($P(IBATYP," ",2,99))),$P(IBATYP," ",2,99)
  • Line Location: NETLIN+3
Function Call: WRITE
  • Prompt: !?((IOM/2)-12),"NUMBER ENTRIES: ",$S($D(^TMP($J,"IB",IBSEQNO,IBATYP,"NCNT")):^("NCNT"),1:0)
  • Line Location: NETLIN+4
Function Call: WRITE
  • Prompt: !?((IOM/2)-12),"DOLLAR AMOUNT: $",$S($D(^TMP($J,"IB",IBSEQNO,IBATYP,"NTOT")):^("NTOT"),1:0)
  • Line Location: NETLIN+5
Function Call: WRITE
  • Prompt: ?((IOM-37)/2),"INTEGRATED BILLING STATISTICAL REPORT"
  • 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-18/2),"From: "
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?((IOM-16)/2),"To: "
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!?(IOM-26/2),"Date Printed: ",IBHDT
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !?(IOM-8/2),"Page: ",IBPAG
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !?(IOM-26/2),"--------------------------"
  • Line Location: HDR+10
Info |  Source |  Entry Points |  Interaction Calls