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

Package: Integrated Billing

Routine: IBTUBAV


Information

IBTUBAV ;ALB/AAS - UNBILLED AMOUNTS - AVERAGE BILL AMOUNT LOGIC ; 29-SEP-94

Source Information

Source file <IBTUBAV.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 3 $$DAT2^IBOUTL  (DT2,LD)^IBTUBOU  SEND^IBTUBUL  
Kernel 3 HOME^%ZIS  ^%ZTLOAD  $$FMADD^XLFDT  
VA FileMan 2 FILE^DICN  DT^DICRW  

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

Package Total Caller Graph
Integrated Billing 4 IBT MONTHLY AUTO GEN AVE BILL  IBT RE-GEN AVE BILL AMOUNT  IBTUB  IBTUBOA  

Entry Points

Name Comments DBIA/ICR reference
DATE ; - Select date.
DEV ; - Select device.
AUTO ; - Entry point for scheduled option (update monthly number of bills
; and prior 12 months fields).
DQ ; - Entry point for user options when queued.
END
MONTH(IBYRMO,IBOVRW) ; - Calculate/update Inpatient Unbilled Amounts
; Input: IBYRMO - YEAR/MONTH (YYYMM00) being calculated/updated
; IBOVRW - Overwrite the data currently on file? (1-YES/0-NO)
INPT ; - For inpatient bills (add count of bills/total dollars).
INP1 ; - Add number of inpatient episodes.
INPQ
YEAR(IBYRMO,IBOVRW) ; - Calculate YEARLY totals, and store if necessary
; - Input: IBYRMO - YEAR/MONTH (YYYMM00) being calculated/updated
; IBOVRW - Overwrite the data currently on file? (1-YES/0-NO)
YEARQ
SEND ; - Send a mail message to the Unbilled Amounts mail group informing
; which months had their data (MONTHLY & YEARLY) updated.
ADD(IBYRMO) ; - Add entry to file 356.19 (unbilled amounts file).
; Input: IBYRMO=date/time in month year format no days allowed
; Output: IBADD=1-entry or entry added, 0-not added or error
ADDQ

External References

Name Field # of Occurrence
HOME^%ZIS DEV+6
^%ZTLOAD DEV+6
FILE^DICN ADD+8
DT^DICRW %+1
$$DAT2^IBOUTL SEND+3, SEND+9, SEND+13
DT2^IBTUBOU DATE+1
LD^IBTUBOU MONTH+31, YEAR+29
SEND^IBTUBUL SEND+15
$$FMADD^XLFDT DQ+18, DQ+23, YEAR+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: IBTUBAV+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !!,"This will automatically be tasked to run and needs no device."
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"A mail Message will be sent when the process completes."
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !,"Use the option View Unbilled Amounts to see cumulative totals.",!!
  • Line Location: DEV+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(356.19 - [#356.19] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] MONTH+19, MONTH+20, MONTH+21, MONTH+24, INPT+1
^IBE(356.19 - [#356.19] DQ+10, DQ+17, MONTH+10, YEAR+8, YEAR+17, ADD+5, ADD+7, ADD+9
^TMP($J DQ+1!, DQ+30, END!, MONTH+7!, MONTH+31*, MONTH+33!, INP1+1, INP1+3*, YEAR+30*, SEND+8
, SEND+12

Label References

Name Line Occurrences
$$ADD DQ+17, DQ+27
ADDQ ADD+4, ADD+5
END DATE+1, DEV+6
INP1 INPT+2, INPT+7
INPQ INPT+12
INPT MONTH+26
MONTH DQ+20, DQ+27
SEND DQ+30
YEAR DQ+21, DQ+28
YEARQ YEAR+5, YEAR+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT END+2!
BGDT MONTH+4~, MONTH+12*, MONTH+18, MONTH+25
D END+2!
D0 END+2!
DA YEAR+4~, ADD+3~
DD ADD+3~
DIC YEAR+4~, ADD+3~, ADD+6*
DIC(0 ADD+6*
DIE YEAR+4~, ADD+3~
>> DINUM ADD+8*
DIRUT END+2!
>> DLAYGO ADD+6*
DO ADD+3~
DR YEAR+4~, ADD+3~
DT %+1, DQ+4, DQ+27, YEAR+5
ENDT MONTH+4~, MONTH+12*, MONTH+19, MONTH+25
I YEAR+4~, YEAR+16*, SEND+2~
IBADD ADD+3~*, ADD+5*, ADD+8*, ADDQ
IBAMT MONTH+4~, INPT+1*, INPT+4, INPT+9
IBAVG MONTH+4~, YEAR+4~
IBAVG("$AMNT-" MONTH+15*, YEAR+12*
IBAVG("$AMNT-I" MONTH+29*, INPT+4*, YEAR+19*, YEAR+27*
IBAVG("$AMNT-P" MONTH+30*, INPT+9*, YEAR+22*, YEAR+28*
IBAVG("BILLS-" MONTH+15*, YEAR+12*
IBAVG("BILLS-I" INPT+3*, YEAR+18*
IBAVG("BILLS-P" INPT+8*, YEAR+21*
IBAVG("EPISD-" MONTH+15*, INP1+2*, YEAR+12*
IBAVG("EPISD-I" YEAR+20*
IBAVG("EPISD-P" YEAR+23*
IBCNT SEND+2~, SEND+7*, SEND+9, SEND+10*, SEND+11*, SEND+13, SEND+14*, SEND+15
IBCOMP AUTO+3*, END+2!
IBDA MONTH+4~, MONTH+20*, MONTH+21, MONTH+24, INPT+1
IBDFN MONTH+4~, INPT+1*, INPT+5*, INPT+10*, INP1+1, INP1+2, INP1+3
IBDT MONTH+4~, MONTH+18*, MONTH+19*, MONTH+20, SEND+2~, SEND+7*, SEND+8*, SEND+9, SEND+11*, SEND+12*
, SEND+13
IBGMON DQ+7*, DQ+10, DQ+11*, DQ+15, DQ+17, DQ+18*, DQ+20, DQ+21, DQ+23*, YEAR+4~
, YEAR+15*, YEAR+16, YEAR+24*
IBGRP SEND+2~
IBNOD MONTH+4~, MONTH+21*, MONTH+22, MONTH+23, MONTH+26, INPT+1, INPT+2, INPT+7
IBOVRW MONTH~, MONTH+10, YEAR~, YEAR+8
IBT SEND+2~
IBT( SEND+9*, SEND+11*, SEND+13*, SEND+15*
IBT(1 SEND+4*
IBT(2 SEND+5*
IBT(3 SEND+6*
IBT(4 SEND+6*
IBTIMON DATE+1, DQ+4*, DQ+7, DQ+15, DQ+27, DQ+28, END+2!, SEND+3
IBTMON YEAR+4~, YEAR+16*, YEAR+17
IBTNMON YEAR+4~
IBYRMO MONTH~, MONTH+6, MONTH+10, MONTH+12, MONTH+31, YEAR~, YEAR+5, YEAR+8, YEAR+15, YEAR+16
, YEAR+29, YEAR+30, ADD~, ADD+4, ADD+5, ADD+7, ADD+8, ADD+9
IO("Q" DEV+6!
SUBCNT YEAR+4~, YEAR+15*, YEAR+24*, YEAR+26
U MONTH+22, MONTH+23, MONTH+24, MONTH+26, INPT+1, INPT+2, INPT+7, INP1+2, YEAR+18, YEAR+19
, YEAR+20, YEAR+21, YEAR+22, YEAR+23
X MONTH+4~, MONTH+15*, MONTH+23*, MONTH+24*, MONTH+25, YEAR+4~, YEAR+11*, YEAR+12, YEAR+17*, YEAR+18
, YEAR+19, YEAR+20, YEAR+21, YEAR+22, YEAR+23, SEND+2~, ADD+8*
XCNP SEND+2~
XMDUZ SEND+2~
XMSUB SEND+2~, SEND+3*
XMTEXT SEND+2~
XMY SEND+2~
XMZ SEND+2~
Y INP1+2*, ADD+3~, ADD+8
>> ZTDESC DEV+5*
>> ZTIO DEV+4*
>> ZTQUEUED END+1
>> ZTREQ END+1*
>> ZTRTN DEV+4*
>> ZTSAVE("IB*" DEV+4*
ZTSK DEV+6!
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