Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBOHTOT

Package: Integrated Billing

Routine: IBOHTOT


Information

IBOHTOT ;ALB/EMG - COUNT/AMT OF CHARGES ON HOLD REPORT ; FEB 25 1997

Source Information

Source file <IBOHTOT.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Integrated Billing 2 SITE^IBAUTL  PAUSE^IBOUTL  
VA FileMan 1 D^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IB OUTPUT CNT/AMT RPT  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DEV
DQ ; -entry from tasked job
DATA ; -gross count of action types, total charges
; -^tmp($j,"ib",ibaction type,"gcnt")=count
; -^tmp($j,"ib",ibaction type,"gtot")=sum of charges
; -^tmp($j,"ibtot","fcnt")=final count of entries
; -^tmp($j,"ibtot","ftot")=final sum of charges
PRINT ; -output data
TPRINT ; -grand total of data
LINE ;
HDR ;
END

External References

Name Field # of Occurrence
^%ZIS DEV
HOME^%ZIS EN+2
^%ZISC END+4
^%ZTLOAD DEV+1
D^DIQ PRINT+1
SITE^IBAUTL HDR+4
PAUSE^IBOUTL TPRINT+1, LINE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Count and Dollar Amount of Charges ON HOLD Report",!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+6
Function Call: WRITE
  • Prompt: !!?((IOM-25)/2),"TOTALS BY ACTION TYPE"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,?(IOM-26/2),"**************************"
  • Line Location: TPRINT+2
Function Call: WRITE
  • Prompt: !,?((IOM/2)-20),"TOTAL NUMBER OF ENTRIES: ",$J($S($D(^TMP($J,"IBTOT","FCNT")):^("FCNT"),1:0),13)
  • Line Location: TPRINT+3
Function Call: WRITE
  • Prompt: !,?((IOM/2)-20)," TOTAL DOLLAR AMOUNT: $",$J($S($D(^TMP($J,"IBTOT","FTOT")):^("FTOT"),1:0),12,2)
  • Line Location: TPRINT+4
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: ",$J($S($D(^TMP($J,"IB",IBATYP,"GCNT")):^("GCNT"),1:0),9)
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: !?((IOM/2)-12),"DOLLAR AMOUNT: $",$J($S($D(^TMP($J,"IB",IBATYP,"GTOT")):^("GTOT"),1:0),9,2)
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: ?((IOM-42)/2),"Count and Dollar Amount 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-26/2),"Date Printed: ",IBHDT
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?(IOM-8/2),"Page: ",IBPAG
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?(IOM-26/2),"--------------------------"
  • Line Location: HDR+8
Routine Call
  • %ZIS
  • Line Location:
    • DEV
Routine Call
  • %ZIS
  • Line Location:
    • EN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] HDR+4
^IB - [#350] DQ+3, DATA+6
^IB("AH" DQ+3
^IBE(350.1 - [#350.1] DATA+7
^TMP($J DQ+2!, DATA+8, DATA+9, DATA+10, DATA+11, PRINT+4, TPRINT+3, TPRINT+4, LINE+3, LINE+4
, END!

Label References

Name Line Occurrences
DATA DQ+3
END DEV, DEV+1, DQ+7
HDR PRINT+1, TPRINT+1, LINE+1
LINE PRINT+4
PRINT DQ+5
TPRINT DQ+6

Naked Globals

Name Field # of Occurrence
^("FCNT" DATA+10*, TPRINT+3
^("FTOT" DATA+11*, TPRINT+4
^("GCNT" DATA+8*, LINE+3
^("GTOT" DATA+9*, LINE+4
^(0 DATA+7, HDR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV*
>> %ZIS("A" DEV*
DFN DQ+3*, END+3!
DT PRINT+1
IBATYP DATA+7*, DATA+8, DATA+9, PRINT+4*, LINE+2, LINE+3, LINE+4, END+3!
IBFAC HDR+4, END+3!
IBHDT PRINT+1*, HDR+6, END+3!
IBN DQ+3*, DATA+6, END+3!
IBND DATA+6*, DATA+7, DATA+9, DATA+11, END+3!
IBPAG PRINT+1*, HDR+1, HDR+7*, END+3!
IBQUIT PRINT+1*, PRINT+4, TPRINT+1, LINE+1, END+3!
IBSITE HDR+5, END+3!
IBSNM HDR+4*, HDR+5, END+3!
IBT PRINT+4*, END+3!
IO DEV+2
IO("Q" DEV+1!
IOF EN+2, HDR+1
IOM PRINT+2, TPRINT+2, TPRINT+3, TPRINT+4, LINE+2, LINE+3, LINE+4, HDR+2, HDR+3, HDR+5
, HDR+6, HDR+7, HDR+8
IOSL TPRINT+1, LINE+1
IOST HDR+1
POP DEV, END+3!
X END+3!
Y PRINT+1*, END+3!
>> ZTDESC DEV+1*
>> ZTQUEUED END+2
>> ZTREQ END+2*
>> ZTRTN DEV+1*
>> ZTSAVE("IB*" DEV+1*
ZTSK DEV+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All