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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBTUBO

Package: Integrated Billing

Routine: IBTUBO


Information

IBTUBO ;ALB/AAS - UNBILLED AMOUNTS - GENERATE UNBILLED REPORTS ;29-SEP-94

Source Information

Source file <IBTUBO.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 5 $$MLTP^IBJD  ($$LDATE,$$M1,$$M2,$$M3)^IBJDE  $$DAT2^IBOUTL  ^IBTUBOA  DT1^IBTUBOU  
VA FileMan 4 (,FIND)^DIC  DT^DICRW  $$GET1^DIQ  ^DIR  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  

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

Package Total Caller Graph
Integrated Billing 3 IBT MONTHLY AUTO GEN UNBILLED  IBT RE-GEN UNBILLED REPORT  IBTUB  

Entry Points

Name Comments DBIA/ICR reference
DIV ; division
DIVX ; Exit Division selection.
RDATE ; - Select re-compile date, if necessary.
DET ; - Ask to print detail report.
QUE ; - Queue report/summary, if necessary.
AUTO ; - Entry point for scheduled option.
DQ ; - Entry point for DM extract.
; - If AUTO PRINT UNBILLED LIST=yes and default report printer then
; automatically requeue to device.
STR
END
MSG ; - Compile message.
DT2(STR) ; - Select re-compile date (returns variable IBTIMON).
; Input: STR - String that describe the type of data that will be
; re-compiled: "Unbilled Amounts", "Average Bill Amounts", etc...
DT2Q

External References

Name Field # of Occurrence
^%ZIS DET+26
HOME^%ZIS QUE+5
^%ZTLOAD QUE+4, DQ+7
^DIC DIV+13
FIND^DIC DIVX+32, DIVX+36
DT^DICRW %+2
$$GET1^DIQ DIVX+7
^DIR %+19, %+36, DIV+5, DIVX+24, DET+6, DET+9, DET+19, DT2+18
$$MLTP^IBJD DIVX+56
$$LDATE^IBJDE RDATE+10, DT2+10, DT2+11
$$M1^IBJDE DT2+12
$$M2^IBJDE RDATE+8
$$M3^IBJDE RDATE+10
$$DAT2^IBOUTL MSG+2, DT2+9, DT2+12
^IBTUBOA STR
DT1^IBTUBOU DIVX+41

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Re-Generate Unbilled Amounts Report",!
  • Line Location: IBTUBO+10
Function Call: WRITE
  • Prompt: !
  • Line Location: IBTUBO+34
Function Call: WRITE
  • Prompt: !!
  • Line Location: DIV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+9
Function Call: WRITE
  • Prompt: *7,!!?3,"No divisions have been selected. Please try again."
  • Line Location: DIV+22
Function Call: WRITE
  • Prompt: !
  • Line Location: DIVX+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DIVX+41
Function Call: WRITE
  • Prompt: !
  • Line Location: RDATE+2
Function Call: WRITE
  • Prompt: !!,"NOTE: Just a reminder that by entering the above month/year this"
  • Line Location: RDATE+3
Function Call: WRITE
  • Prompt: !," report will re-calculate and update the Unbilled Amounts"
  • Line Location: RDATE+4
Function Call: WRITE
  • Prompt: !," data on file in your system.",*7
  • Line Location: RDATE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: RDATE+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DET+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DET+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DET+14
Function Call: WRITE
  • Prompt: !!,"This report takes a while to run, so you should queue it to run"
  • Line Location: DET+23
Function Call: WRITE
  • Prompt: !,"after normal business hours."
  • Line Location: DET+24
Function Call: WRITE
  • Prompt: !!,"You will need a 132 column printer for this report!",!
  • Line Location: DET+25
Function Call: WRITE
  • Prompt: !!,"NOTE: After this report is run, the Unbilled Amounts totals for"
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !?6,"the month of "_$$DAT2^IBOUTL(IBTIMON)_" will be updated."
  • Line Location: MSG+2
Function Call: WRITE
  • Prompt: " ??"
  • Line Location: DT2+19
Routine Call
  • %ZIS
  • Line Location:
    • DET+26
Routine Call
  • %ZIS
  • Line Location:
    • QUE+5
Routine Call
  • DIC
  • Line Location:
    • DIV+13
Routine Call
  • DIC
  • Line Location:
    • DIVX+32
    • DIVX+36
Routine Call
  • DIR
  • Line Location:
    • %+19
    • %+36
    • DIV+5
    • DIVX+24
    • DET+6
    • DET+9
    • DET+19
    • DT2+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGCR(399.3 - [#399.3] GET1^DIQ
^SD(409.1 - [#409.1] FIND^DIC
^DIC(8 - [#8] FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(350.9 - [#350.9] DIVX+6, DQ+3
^IBE(353 - [#353] DQ+4, DQ+5
^TMP("DILIST" DIVX+32!, DIVX+33, DIVX+36!, DIVX+37
^TMP($J %+23!, DIV+12, DIV+16*, DIV+21

Label References

Name Line Occurrences
DET RDATE+1
DIV DIV+21
DIVX %+37, DIV+7
DT2 RDATE+2, DT2+19
DT2Q DT2+18
END %+19, %+36, DIV+19, DIVX+24, DIVX+41, DIVX+56, RDATE+1, DET+6, DET+9, DET+13
DET+26, QUE+5, DQ+3
MSG RDATE+11
QUE DET+6, DET+26
RDATE %+24
STR DET+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DET+26*
ARTIEN DIVX+3~, DIVX+6*, DIVX+7, DIVX+19*, DIVX+20, DIVX+21, DIVX+33*
ARTYP DIVX+3~, DIVX+30*, DIVX+32
DIC DIV+11*, DIV+13!
DIC("A" DIV+11*, DIV+12*
DIC(0 DIV+11*
DIR %+19!, %+36!, DIV+5!, DIVX+24!, DET+6!, DET+9!, DET+19!, DT2+18!
DIR("?" %+8*, %+9*, %+10*, %+11*, %+12*, %+13*, %+14*, %+15*, %+16*, %+17*
, %+18*, %+29*, %+30*, %+31*, %+32*, %+33*, %+34*, %+35*, DIVX+13*, DIVX+14*
DIVX+15*, DIVX+18*, DIVX+20*, DIVX+21*, DIVX+22*, DIVX+23*, DET+3*, DET+4*, DET+5*, DET+16*
DET+17*, DET+18*, DT2+15*, DT2+16*, DT2+17*
DIR("A" %+7*, %+28*, DIV+3*, DIVX+11*, DET+2*, DET+9*, DET+14*, DT2+14*
DIR("B" %+6*, %+27*, DIV+4*, DIVX+12*, DET+1*, DET+9*, DET+14*, DT2+12*
DIR(0 %+6*, %+27*, DIV+2*, DIVX+10*, DET+1*, DET+9*, DET+15*, DT2+13*
>> DIROUT DIV+6, DIVX+24
DIRUT %+19, %+36, DIV+6, DIVX+24, DET+6, DET+9, DET+13, END!, DT2+7~, DT2+18
DT %+2, DT2+10, DT2+11
DT0 DT2+7~, DT2+9*, DT2+13
DT1 DT2+7~, DT2+9*, DT2+16
DT2 DT2+7~, DT2+10*, DT2+11*, DT2+12*, DT2+13
ELIG DIVX+3~, DIVX+34*, DIVX+36
ELIGIEN DIVX+3~, DIVX+37*
IBBDT %+1~, DIVX+41, RDATE+9*, RDATE+10*
IBCOMP %+1~, %+19*, %+24, RDATE+1
IBDET %+1~, DET+6*, QUE+1, DQ+6*, DQ+8*
IBEDT %+1~, RDATE+9*, RDATE+10*, RDATE+13
>> IBINMRA DET+10*
IBMCCF DIVX+25*, DIVX+49, DIVX+56, DIVX+59, END!
IBMCCF("ATYP" DIVX+33*
IBMCCF("ELIG" DIVX+37*
IBMCCF("RTYP" DIVX+7*, DIVX+19, DIVX+20, DIVX+21
IBOPT %+1~, DIVX+56
IBOPT(1 DIVX+49*, DIVX+51*
IBOPT(2 DIVX+52*
IBOPT(3 DIVX+53*
IBOPT(4 DIVX+54*
IBPRT %+1~, DIVX+44*, DIVX+56
IBQUIT %+1~, %+2*, DIV+10*, DIV+14*, DIV+15*, DIV+19
IBSBD %+1~, %+2*, %+37*, DET+13, DET+20*
IBSEL %+1~, DIVX+56*, DIVX+59*, DIVX+60*, RDATE+9*, RDATE+10*
IBTIMON %+1~, RDATE+1, RDATE+2, RDATE+8, RDATE+10, RDATE+13*, MSG+2, DT2+18*, DT2+20*
>> IBXTRACT DQ+3, DQ+6*, DQ+8*
IO DET+28
IO("Q" DET+26, QUE+4!
LN DIVX+3~, DIVX+19*, DIVX+20*, DIVX+21, DIVX+22
>> POP DET+26
STR DT2~, DT2+14
U DIV+16, RDATE+9, DQ+3, DQ+5
X DIV+14, DIVX+3~, DIVX+33*, DIVX+37*, RDATE+8~*, RDATE+9, DQ+4~*, DQ+5
Y %+19, %+37, DIV+7, DIV+15, DIV+16, DIVX+25, DET+6, DET+10, DET+20, DT2+7~
, DT2+19, DT2+20
ZTDESC QUE+3*, DQ+7*, DQ+9!
ZTDTH DQ+6*, DQ+9!
>> ZTIO QUE+1*, DQ+5*
ZTRTN QUE+2*, DQ+6*, DQ+9!
ZTSAVE DQ+9!
ZTSAVE("IB*" QUE+2*, DQ+6*
ZTSK QUE+4!, DQ+9!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All