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

Package: Integrated Billing

Routine: IBJDB22


Information

IBJDB22 ;ALB/RB - REASONS NOT BILLABLE REPORT (PRINT) ;19-JUN-00

Source Information

Source file <IBJDB22.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Integrated Billing 2 E^IBJDE  ($$DAT2,$$STOP)^IBOUTL  
VA FileMan 2 NOW^%DTC  ^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 IBJDB21  IBTUTL5  

Entry Points

Name Comments DBIA/ICR reference
EN ; - Entry point from IBJDB21.
ENQ
DET ; - Print detailed report.
DETQ
EXTMO(IBSM) ; Extract/transmit data to DM Extract Module
; IBSM - Array containing the summary information
SUM ; - Print summary line(s).
SUMH ; - Print summary header.
SUMT ; - Print summary totals.
HDR ; - Write the detailed report header.
WPAT ; - Write patient data.
TOT1 ; - Print episode totals.
TOT2 ; - Print sub-totals.
DASH(X) ; - Return a dashed line.
PAUSE ; - Page break.
DTE(X) ; - Format the date.
RNB ; - Reasons Not Billable

External References

Name Field # of Occurrence
NOW^%DTC EN+5
^DIR PAUSE+4
E^IBJDE EXTMO+18
$$DAT2^IBOUTL EN+5
$$STOP^IBOUTL SUMH+13, HDR+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No entries for this episode.",!
  • Line Location: DET+2
Function Call: WRITE
  • Prompt: ?45,$$DTE(+IBN),?55,$$DTE($P(IBN,U,2))
  • Line Location: DET+11
Function Call: WRITE
  • Prompt: ?65,$$DTE($P(IBN,U,3)),?76,$E($P(IBN,U,4),1,19)
  • Line Location: DET+12
Function Call: WRITE
  • Prompt: ?65,$$DTE($P(IBN,U,2))
  • Line Location: DET+13
Function Call: WRITE
  • Prompt: ?76,"POSTMASTER"
  • Line Location: DET+13
Function Call: WRITE
  • Prompt: ?97,$E($P(IBN,U,IBU),1,25),?124,$J($P(IBN,U,8),8,2),!
  • Line Location: DET+15
Function Call: WRITE
  • Prompt: ?99,$J($P(IBN,U,8),8,2)
  • Line Location: DET+16
Function Call: WRITE
  • Prompt: ?114,$P($P(IBN,U,11),";",X)_" "
  • Line Location: DET+16
Function Call: WRITE
  • Prompt: ?99,$J($P(IBN,U,8),8,2),!
  • Line Location: DET+17
Function Call: WRITE
  • Prompt: !
  • Line Location: DET+18
Function Call: WRITE
  • Prompt: ?27,"Related Bills: "
  • Line Location: DET+20
Function Call: WRITE
  • Prompt: ?41,$P($P(IBN,U,11),";",X)_" "
  • Line Location: DET+20
Function Call: WRITE
  • Prompt: ?76,"Nx Adm:",?85,$P(IBN,U,10)
  • Line Location: DET+21
Function Call: WRITE
  • Prompt: !,?27,"Related Bills: "
  • Line Location: DET+22
Function Call: WRITE
  • Prompt: ?41,$P($P(IBN,U,11),";",X)_" "
  • Line Location: DET+22
Function Call: WRITE
  • Prompt: ?97,$E($P(IBN,U,$S("PR"[IBSORT:7,1:6)),1,25),!
  • Line Location: DET+23
Function Call: WRITE
  • Prompt: !!?14,"No statistics available."
  • Line Location: SUM+2
Function Call: WRITE
  • Prompt: !?14,$P($G(^IBE(356.8,IBRNB,0)),U),?48,$J(+IBN,5),?57,$J($P(IBN,U,2),9,2)
  • Line Location: SUM+6
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: SUMH+1
Function Call: WRITE
  • Prompt: ?68,"Page: ",IBPAG
  • Line Location: SUMH+2
Function Call: WRITE
  • Prompt: !!?(80-$L(IBEPH))\2,IBEPH
  • Line Location: SUMH+4
Function Call: WRITE
  • Prompt: !?22,"Period : from ",$$DTE(IBBDT)," thru ",$$DTE(IBEDT),!
  • Line Location: SUMH+9
Function Call: WRITE
  • Prompt: !?24,"Run Date: ",IBRUN
  • Line Location: SUMH+10
Function Call: WRITE
  • Prompt: !!?46,"No. of",?61,"Total",!?14,"RNB Category",?46,"Entries"
  • Line Location: SUMH+11
Function Call: WRITE
  • Prompt: ?60,"Amount",!?14,$$DASH(52)
  • Line Location: SUMH+12
Function Call: WRITE
  • Prompt: !?47,"-------------------"
  • Line Location: SUMT+1
Function Call: WRITE
  • Prompt: !?33,"Grand Totals:",?47,$J(+GTOT,6),?56,$J($P(GTOT,U,2),10,2)
  • Line Location: SUMT+2
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: "Reasons Not Billable (RNB) Report "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?88,"Run Date: ",IBRUN,?123,"Page: ",$J(IBPAG,3)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$E(X,1,132)
  • Line Location: HDR+19
Function Call: WRITE
  • Prompt: !,"Division: ",$P($G(^DG(40.8,IBDIV,0)),U)
  • Line Location: HDR+21
Function Call: WRITE
  • Prompt: !!?26,"Last",?32,"Insurance",?45,"Episode Date Dte Last"
  • Line Location: HDR+22
Function Call: WRITE
  • Prompt: ?97,$S("PS"[IBSORT:"RNB Category",1:"Provider")
  • Line Location: HDR+23
Function Call: WRITE
  • Prompt: !,"Patient",?26,"4SSN",?32,"Carrier"
  • Line Location: HDR+24
Function Call: WRITE
  • Prompt: ?45,"Date Entered Edited Last Edited By"
  • Line Location: HDR+25
Function Call: WRITE
  • Prompt: ?97,$S("PR"[IBSORT:"Specialty",1:"Provider")
  • Line Location: HDR+26
Function Call: WRITE
  • Prompt: ?101,"Amount",?114,"Related Bills",!,$$DASH(IOM),!
  • Line Location: HDR+28
Function Call: WRITE
  • Prompt: ?126,"Amount",!,$$DASH(IOM),!
  • Line Location: HDR+29
Function Call: WRITE
  • Prompt: $P(IBPT,"@@"),?26,$P(IBPT,"@@",2),?32,$E($P(IBP,U),1,12)
  • Line Location: WPAT+1
Function Call: WRITE
  • Prompt: !?97,"----------",!
  • Line Location: TOT1+1
Function Call: WRITE
  • Prompt: !?122,"----------",!
  • Line Location: TOT1+2
Function Call: WRITE
  • Prompt: ?55
  • Line Location: TOT1+3
Function Call: WRITE
  • Prompt: ?80
  • Line Location: TOT1+4
Function Call: WRITE
  • Prompt: "TOTAL FOR EPISODE - Count: ",$J(ECNT,5)," Amount: ",$J(ETOT,10,2)
  • Line Location: TOT1+5
Function Call: WRITE
  • Prompt: ?98,"---------",!
  • Line Location: TOT2+1
Function Call: WRITE
  • Prompt: ?123,"---------",!
  • Line Location: TOT2+2
Function Call: WRITE
  • Prompt: ?60
  • Line Location: TOT2+3
Function Call: WRITE
  • Prompt: ?85
  • Line Location: TOT2+4
Function Call: WRITE
  • Prompt: "TOTAL EVENTS - Count: ",$J(SCNT,4)," Amount: ",$J(STOT,9,2),!
  • Line Location: TOT2+5
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] SUMH+6, HDR+21
^IBE(356.8 - [#356.8] EXTMO+6, EXTMO+9, SUM+6
^TMP("IBJDB2" DET+1, DET+4, DET+6, DET+9, DET+26

Label References

Name Line Occurrences
$$DASH SUMH+12, HDR+28, HDR+29
$$DTE DET+11, DET+12, DET+13, SUMH+9, HDR+9
@( EN+10
ENQ EN+3, EN+12
EXTMO EN+3
HDR DET+2, DET+5, DET+7, DET+10
PAUSE DET+1, DET+7, DET+10, DET+26, DET+27, SUM+1, SUMT+2
SUM EN+17
SUMH SUM+2, SUM+3
SUMT SUM+8
TOT1 DET+27
TOT2 DET+26
WPAT DET+8, DET+10

Naked Globals

Name Field # of Occurrence
^( DET+6, DET+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+5, ENQ!
DIR PAUSE+2~
DIR(0 PAUSE+4*
DIROUT PAUSE+2~
DIRUT PAUSE+2~, PAUSE+4
DTOUT PAUSE+2~
DUOUT PAUSE+2~, PAUSE+4
ECNT EN+5*, ENQ+1!, DET+24*, TOT1+5, TOT1+6*
ETOT EN+5*, ENQ+1!, DET+25*, TOT1+5, TOT1+6*
GTOT ENQ+1!, SUM+7*, SUMH+13*, SUMT+2
I EXTMO+3~, EXTMO+5*, EXTMO+7, EXTMO+18*, HDR+19*
IB EN+3, EXTMO+3~
IB( EXTMO+11*, EXTMO+16*, EXTMO+17*, EXTMO+19!, SUM+1, SUM+4, SUM+5
IB0 ENQ!, DET+3*, DET+9*
>> IBBDT SUMH+9, HDR+9
>> IBD HDR+9
IBDH ENQ!, SUMH+6*, SUMH+7
IBDIV EN+7*, EN+8*, EN+15*, EN+16*, ENQ!, DET+1, DET+4, DET+6, DET+9, DET+26
, SUM+1, SUM+4, SUM+5, SUMH+5, SUMH+6, HDR+21
>> IBE( HDR+4
>> IBEDT SUMH+9, HDR+9
IBEP EN+9*, EN+17*, ENQ!, DET+1, DET+4, DET+6, DET+9, DET+14, DET+15, DET+16
, DET+17, DET+18, DET+19, DET+20, DET+21, DET+22, DET+23, DET+26, SUM+1, SUM+4
, SUM+5, SUMH+3, HDR+4, HDR+5, HDR+10, HDR+15, HDR+17, HDR+23, HDR+26, HDR+28
, TOT1+1, TOT1+3, TOT2+1, TOT2+3
IBEPH ENQ!, SUMH+3*, SUMH+4
>> IBEPS( SUMH+3
IBI EXTMO+3~
IBJ EXTMO+3~, EXTMO+11*
IBLST EXTMO+3~, EXTMO+9*, EXTMO+11
IBN ENQ!, DET+9*, DET+11, DET+12, DET+13, DET+15, DET+16, DET+17, DET+18, DET+19
, DET+20, DET+21, DET+22, DET+23, DET+25, SUM+5*, SUM+6, SUM+7
IBP ENQ!, DET+6*, WPAT+1
IBPAG ENQ!, SUMH+1, SUMH+2*, HDR+1, HDR+2*, HDR+3
IBPT ENQ!, DET+3*, DET+6*, DET+9, WPAT+1
IBQ EN+5*, EN+8, EN+9, EN+12, EN+14, EN+16, EN+17, ENQ!, DET+2, DET+4
, DET+5, DET+6, DET+7, DET+9, DET+10, DET+26, DET+27, SUM+3, SUM+4, SUMH+13*
, HDR+30*, PAUSE+4*
IBR EXTMO+3~
IBRNB EXTMO+3~, EXTMO+9*, EXTMO+12*, EXTMO+13, EXTMO+14, EXTMO+15, SUM+4*, SUM+5, SUM+6
>> IBRPT EN+10, EN+14
IBRT ENQ!
IBRUN EN+5*, ENQ!, SUMH+10, HDR+3
>> IBSD EN+7, EN+15
>> IBSEL EN+9, EN+17
>> IBSISP HDR+16
IBSM EXTMO~
IBSM(0 EXTMO+12, EXTMO+15
IBSORT ENQ!, DET+14, DET+23, HDR+6, HDR+11, HDR+13, HDR+15, HDR+17, HDR+23, HDR+26
>> IBSORT1 DET+3*, DET+4*, DET+6, DET+9, DET+26, HDR+7
>> IBSOSP HDR+18
>> IBSPRV HDR+14
IBSQ EXTMO+3~, EXTMO+14*, EXTMO+16, EXTMO+17
>> IBSRNB HDR+12
IBT1 ENQ+1!, DET+3*
IBTP EXTMO+3~, EXTMO+10*, EXTMO+11, EXTMO+12, EXTMO+15, EXTMO+16, EXTMO+17, EXTMO+18, EXTMO+19
IBTR EXTMO+3~
IBTR( EXTMO+7*, EXTMO+13, EXTMO+14
IBU ENQ+1!, DET+14*, DET+15
IBX PAUSE+2~, PAUSE+3*
>> IBXTRACT EN+3
IBZ EXTMO+3~, EXTMO+15*, EXTMO+16, EXTMO+17
IOF SUMH+1, HDR+1
IOM HDR+28, HDR+29
IOSL DET+7, DET+10, PAUSE+3
IOST SUMH+1, HDR+1, PAUSE+1
RNBC EXTMO+3~, EXTMO+6*, EXTMO+7
RNBN EXTMO+3~, EXTMO+5*, EXTMO+6
SCNT EN+5*, ENQ+1!, DET+24*, TOT2+5, TOT2+6*
STOT EN+5*, ENQ+1!, DET+25*, TOT2+5, TOT2+6*
U DET+11, DET+12, DET+13, DET+15, DET+16, DET+17, DET+18, DET+19, DET+20, DET+21
, DET+22, DET+23, DET+25, SUM+6, SUM+7, SUMH+6, SUMT+2, HDR+21, WPAT+1
>> VAUTD( EN+8, EN+16
>> VAUTD(0 EN+7*, EN+15*
X DET+16*, DET+20*, DET+22*, HDR+4*, HDR+6*, HDR+7*, HDR+8*, HDR+9*, HDR+12*, HDR+14*
, HDR+16*, HDR+18*, HDR+19*, DASH~, DASH+1, PAUSE+2~, DTE~, DTE+1
Y PAUSE+2~

Marked Items

Name Field # of Occurrence
$T(RNB+I EXTMO+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All