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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: IBJDF53

Package: Integrated Billing

Routine: IBJDF53


Information

IBJDF53 ;ALB/RB - CHAMPVA/TRICARE FOLLOW-UP REPORT (SUMMARY);15-APR-00

Source Information

Source file <IBJDF53.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 3 E^IBJDE  $$ACT^IBJDF2  $$ARCAT^IBJDF62  
Kernel 1 $$FMDIFF^XLFDT  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Integrated Billing 2 IBJDF51  IBJDF52  

Entry Points

Name Comments DBIA/ICR reference
INIT ; - Initialize counters, if necessary.
; Pre-set variables IBCAT, IBDIV, IBSEL1 required.
EN ; - Compile entry point from IBJDF51.
; Pre-set variables IB(, IBA, IBCAT, IBDIV, IBSEL1, IBTYP required.
ENQ
PRT ; - Print entry point from IBJDF52.
ENQ1
EXTMO(IBS) ; Extract/transmit data to DM Extract Module
; IBS - Array containing the summary information
SUM(IBCAT) ; - Print summary for AR category.
; Input: IBCAT=AR category pointer to file #430.2, and pre-set
; variables IBDIV and IBRPT
SUMQ
HDR ; - Write the summary report header.
DASH(X) ; - Return a dashed line.
PAUSE ; - Page break.
CAT(X) ; - Determine category to place receivable.
CATN ; - List of category names.

External References

Name Field # of Occurrence
^DIR PAUSE+4
E^IBJDE EXTMO+32
$$ACT^IBJDF2 EN+5
$$ARCAT^IBJDF62 SUM+8
$$FMDIFF^XLFDT EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!?(80-$L(IBTYPH))\2,IBTYPH
  • Line Location: SUM+11
Function Call: WRITE
  • Prompt: !?(80-$L(IBTYPH)\2),$$DASH($L(IBTYPH))
  • Line Location: SUM+12
Function Call: WRITE
  • Prompt: !?(80-$L(IBDH)\2),IBDH
  • Line Location: SUM+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: SUM+16
Function Call: WRITE
  • Prompt: "AR Category",?31,"# Receivables",?52,"Total Outstanding Balance",!
  • Line Location: SUM+21
Function Call: WRITE
  • Prompt: "-----------",?31,"-------------",?52,"-------------------------"
  • Line Location: SUM+22
Function Call: WRITE
  • Prompt: !!,"There are no active receivables",$S(IBDIV:" for this division",1:""),"."
  • Line Location: SUM+24
Function Call: WRITE
  • Prompt: !
  • Condition for execution: I=8
  • Line Location: SUM+30
Function Call: WRITE
  • Prompt: !,X,?30,$J(+IB(IBDIV,IBCAT,IBTYP,I),6)
  • Line Location: SUM+30
Function Call: WRITE
  • Prompt: " (",$J(+IB(IBDIV,IBCAT,IBTYP,I)/+IB(IBDIV,IBCAT,IBTYP,8)*100,0,$S(I=8:0,1:2)),"%)"
  • Line Location: SUM+31
Function Call: WRITE
  • Prompt: ?52,$J($S(I=1!(I=9):"$",1:"")_Z,15)
  • Line Location: SUM+33
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "CHAMPVA/TRICARE FOLLOW-UP SUMMARY REPORT"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?71,"Page: ",$J(IBPAG,3),!,"Run Date: ",IBRUN
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,$E(X,1,80)
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] SUM+14
^PRCA(430 - [#430] EN+6

Label References

Name Line Occurrences
$$CAT EN+7
$$DASH SUM+12
ENQ EN+5
ENQ1 PRT+4
EXTMO PRT+4
HDR SUM+6, SUM+9
PAUSE SUM+23, SUM+36
SUM PRT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR PAUSE+2~
DIR(0 PAUSE+4*
DIROUT PAUSE+2~
DIRUT PAUSE+2~, PAUSE+4
DT EN+7
DTOUT PAUSE+2~
DUOUT PAUSE+2~, PAUSE+4
I INIT+2~, INIT+4*, EN+2~, EN+6*, EN+8*, EN+9, EN+10, SUM+3~, SUM+19*, SUM+29*
, SUM+30, SUM+31, SUM+32, SUM+33, SUM+34, HDR+16*
IB PRT+4, EXTMO+3~
IB( INIT+3, INIT+4*, EN+9*, EN+10*, PRT+7, PRT+9, EXTMO+5*, EXTMO+25*, EXTMO+26*, EXTMO+27*
, EXTMO+28*, EXTMO+30*, SUM+7, SUM+19*, SUM+23, SUM+28, SUM+30, SUM+31, SUM+32, SUM+34
IB0 INIT+2~, INIT+4*, EN+2~, EN+7*, EN+9, EN+10
>> IBA EN+5, EN+6
IBAGE EN+2~, EN+7*
IBARD EN+2~, EN+5*, EN+7
IBCAT INIT+3, INIT+4, EN+9, EN+10, PRT+8*, PRT+9*, SUM~, SUM+7, SUM+8, SUM+19
, SUM+23, SUM+28, SUM+30, SUM+31, SUM+32, SUM+34
IBCATNM SUM+4~, SUM+8*, SUM+10
IBCT EXTMO+3~, EXTMO+7*, EXTMO+8*, EXTMO+10, EXTMO+11, EXTMO+12, EXTMO+13, EXTMO+14, EXTMO+15, EXTMO+16
, EXTMO+17, EXTMO+18, EXTMO+19, EXTMO+20, EXTMO+21, EXTMO+24
IBDH SUM+3~, SUM+14*, SUM+15
IBDIV INIT+3, INIT+4, EN+9, EN+10, PRT+1~, PRT+6*, PRT+7*, PRT+9, SUM+7, SUM+13
, SUM+14, SUM+19, SUM+23, SUM+24, SUM+28, SUM+30, SUM+31, SUM+32, SUM+34
>> IBFLG SUM+6*, SUM+25*
IBI EXTMO+3~, EXTMO+5*, EXTMO+23*, EXTMO+24
IBJ EXTMO+3~, EXTMO+5*
IBOUT EN+2~, EN+6*, EN+10
>> IBPAG HDR+3, HDR+4*, HDR+6
>> IBQ PRT+9, SUM+7, SUM+9, PAUSE+4*
IBR EXTMO+3~, EXTMO+32*
>> IBRPT HDR+8
>> IBRUN HDR+6
IBS EXTMO~
IBS(0 EXTMO+8, EXTMO+24
>> IBSAM HDR+14
>> IBSEL1 INIT+4, EN+8
>> IBSMN HDR+9, HDR+10
>> IBSMX HDR+10
>> IBSNA HDR+11
>> IBSNF HDR+12
>> IBSNL HDR+13
IBSQ EXTMO+3~, EXTMO+22*, EXTMO+25, EXTMO+26, EXTMO+29*
IBTP EXTMO+3~, EXTMO+9*, EXTMO+10*, EXTMO+12*, EXTMO+13*, EXTMO+14*, EXTMO+15*, EXTMO+16*, EXTMO+17*, EXTMO+18*
, EXTMO+19*, EXTMO+20*, EXTMO+21*, EXTMO+25, EXTMO+26, EXTMO+27, EXTMO+28, EXTMO+30
>> IBTPR( SUM+10
IBTYP EN+8, SUM+3~, SUM+6*, SUM+7*, SUM+10, SUM+19, SUM+23, SUM+28, SUM+30, SUM+31
, SUM+32, SUM+34
IBTYPH SUM+3~, SUM+10*, SUM+11, SUM+12
IBX PAUSE+2~, PAUSE+3*
>> IBXTRACT PRT+4
IBZ EXTMO+3~, EXTMO+24*, EXTMO+25, EXTMO+26, EXTMO+27, EXTMO+28
IOF HDR+3
IOSL SUM+9, PAUSE+3
IOST HDR+3, PAUSE+1
J SUM+3~, SUM+19*
U EN+6, EN+9, EN+10, SUM+14, SUM+19, SUM+28, SUM+32, SUM+34
X SUM+29*, SUM+30, HDR+1~, HDR+7*, HDR+10*, HDR+12*, HDR+13*, HDR+14*, HDR+15*, HDR+16*
, DASH~, DASH+1, PAUSE+2~, CAT~, CAT+1
Y SUM+28*, SUM+34, PAUSE+2~
>> Z SUM+32*, SUM+33

Marked Items

Name Field # of Occurrence
$T(CATN+I SUM+29
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All