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

Package: Integrated Billing

Routine: IBJDB12


Information

IBJDB12 ;ALB/CPM - BILLING LAG TIME REPORT (OPT PRINT/SUMMARIES) ; 30-DEC-96

Source Information

Source file <IBJDB12.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Integrated Billing 2 $$TITLE^IBJDB1  $$STOP^IBOUTL  
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: 1

Package Total Caller Graph
Integrated Billing 1 IBJDB1  

Entry Points

Name Comments DBIA/ICR reference
OPT ; - Print the outpatient report.
OPTQ
OPTH ; - Write the outpatient detail report header.
AVG ; - Write total days and average line.
WPAT ; - Write patient data.
SUM ; - Print the summary reports.
SUMQ
OPTS ; - Print the outpatient summary report.
INPS ; - Print the inpatient summary report.
CTR(X) ; - Center and write text.
DASH(X) ; - Return a dashed line.
PAUSE ; - Page break.
SSN(X) ; - Format the SSN.
DTE(X) ; - Format date (MMM DD,YYYY).

External References

Name Field # of Occurrence
^DIR PAUSE+4
$$TITLE^IBJDB1 OPT+4, OPTH+4, AVG+2, OPTS+8, OPTS+9, OPTS+10, OPTS+11, OPTS+12, OPTS+13, OPTS+14
, OPTS+15, OPTS+16, OPTS+17, INPS+9, INPS+10, INPS+11, INPS+12, INPS+13, INPS+14, INPS+15
, INPS+16, INPS+17, INPS+18
$$STOP^IBOUTL OPTH+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " (Late Insurance)"
  • Line Location: OPT+5
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: OPTH+1
Function Call: WRITE
  • Prompt: !,"Outpatient Billing Lag Time Report"
  • Line Location: OPTH+2
Function Call: WRITE
  • Prompt: ?48,IBRUN,?72,"Page ",$J(IBPAG,3)
  • Line Location: OPTH+3
Function Call: WRITE
  • Prompt: !,$$TITLE^IBJDB1(+IBX,0)
  • Line Location: OPTH+4
Function Call: WRITE
  • Prompt: " (Late Insurance)"
  • Line Location: OPTH+4
Function Call: WRITE
  • Prompt: !,"Claims w/activity from ",$$DTE(IBBDT)," to ",$$DTE(IBEDT)
  • Line Location: OPTH+5
Function Call: WRITE
  • Prompt: " (*=Insurance found after trmt)"
  • Line Location: OPTH+6
Function Call: WRITE
  • Prompt: !,"Division: ",$P($G(^DG(40.8,IBDIV,0)),U)
  • Condition for execution: IBDIV
  • Line Location: OPTH+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: OPTH+7
Function Call: WRITE
  • Prompt: ?76,"# of",!,"Patient",?27,"SSN",?40,"Bill #"
  • Line Location: OPTH+10
Function Call: WRITE
  • Prompt: ?64,"Activated"
  • Condition for execution: IBX=9
  • Line Location: OPTH+16
Function Call: WRITE
  • Prompt: ?76,"Days",!,$$DASH(80)
  • Line Location: OPTH+16
Function Call: WRITE
  • Prompt: !?75,"-----",!,"Average Number of Days for",?75,$J(IBTL(IBX),5)
  • Line Location: AVG+1
Function Call: WRITE
  • Prompt: !,$$TITLE^IBJDB1(+IBX,0),$S(IBX["I":" (Late Ins)",1:""),": "
  • Line Location: AVG+2
Function Call: WRITE
  • Prompt: " (",IBCT(IBX)," claim",$S(IBCT(IBX)>1:"s",1:""),")"
  • Line Location: AVG+4
Function Call: WRITE
  • Prompt: !,$E($P(IBX1,"@@"),1,25),?27,$$SSN($P(IBX1,"@@",2))
  • Line Location: WPAT+1
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: OPTS+1
Function Call: WRITE
  • Prompt: !?32,"BILLING LAG TIME"
  • Line Location: OPTS+2
Function Call: WRITE
  • Prompt: !?12,$$DASH(55)
  • Line Location: OPTS+5
Function Call: WRITE
  • Prompt: !!?2,"Time Period",?50,"Average Number of days"
  • Line Location: OPTS+6
Function Call: WRITE
  • Prompt: !?2,"-----------",?50,"----------------------"
  • Line Location: OPTS+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: OPTS+21
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: INPS+1
Function Call: WRITE
  • Prompt: !?32,"BILLING LAG TIME"
  • Line Location: INPS+2
Function Call: WRITE
  • Prompt: !?12,$$DASH(55)
  • Line Location: INPS+6
Function Call: WRITE
  • Prompt: !!?2,"Time Period",?50,"Average Number of days"
  • Line Location: INPS+7
Function Call: WRITE
  • Prompt: !?2,"-----------",?50,"----------------------"
  • Line Location: INPS+8
Function Call: WRITE
  • Prompt: !!?2,"*LI=Late Insurance (policy identified after treatment)"
  • Line Location: INPS+19
Function Call: WRITE
  • Prompt: !?2,"+This element does not include Late Insurance claims"
  • Line Location: INPS+20
Function Call: WRITE
  • Prompt: !?(80-$L(X))\2,X
  • Line Location: CTR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DTE+1
^DG(40.8 - [#40.8] OPTH+7, OPTS+3, INPS+3
^TMP("IBJDB1" OPT+2, OPT+10, OPT+14

Label References

Name Line Occurrences
$$DASH OPTH+16, OPTS+5, INPS+6
$$DTE OPT+20, OPT+21, OPTH+5, OPTS+4, INPS+4
$$SSN WPAT+1
AVG OPT+24
CTR OPTS+3, OPTS+4, OPTS+5, INPS+3, INPS+4, INPS+5
INPS SUM+2
OPTH OPT+3, OPT+8, OPT+11, OPT+15
OPTS SUM+1
PAUSE OPT+6, OPT+11, OPT+15, OPT+24, SUM+1, SUM+2
SUMQ SUM+1
WPAT OPT+19

Naked Globals

Name Field # of Occurrence
^( OPT+14

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
DTOUT PAUSE+2~
DUOUT PAUSE+2~, PAUSE+4
>> IBBDT OPTH+5, OPTS+4, INPS+4
IBCT OPT+9!
IBCT( OPT+9*, OPT+22*, AVG+3, AVG+4, OPTS+8, OPTS+9, OPTS+10, OPTS+11, OPTS+12, OPTS+13
, OPTS+14, OPTS+15, OPTS+16, OPTS+17, INPS+9, INPS+10, INPS+11, INPS+12, INPS+13, INPS+14
, INPS+15, INPS+16, INPS+17, INPS+18
>> IBDIV OPT+2, OPT+10, OPT+14, OPTH+7, OPTS+3, OPTS+8, OPTS+9, OPTS+10, OPTS+11, OPTS+12
, OPTS+13, OPTS+14, OPTS+15, OPTS+16, OPTS+17, INPS+3, INPS+9, INPS+10, INPS+11, INPS+12
, INPS+13, INPS+14, INPS+15, INPS+16, INPS+17, INPS+18
>> IBEDT OPTH+5, OPTS+4, INPS+4
>> IBH OPT+13*, OPT+15*, OPT+18*
>> IBPAG OPT+3*, OPT+8*, OPTH+1*, OPTH+3
>> IBQ OPT+1, OPT+3, OPT+8, OPT+10, OPT+11, OPT+14, OPT+15, OPTH+17*, SUM+1, PAUSE+4*
>> IBRUN OPTH+3, OPTS+5, INPS+5
>> IBSEL OPT+1
IBTL OPT+9!
IBTL( OPT+9*, OPT+22*, AVG+1, AVG+3, OPTS+8, OPTS+9, OPTS+10, OPTS+11, OPTS+12, OPTS+13
, OPTS+14, OPTS+15, OPTS+16, OPTS+17, INPS+9, INPS+10, INPS+11, INPS+12, INPS+13, INPS+14
, INPS+15, INPS+16, INPS+17, INPS+18
IBWPT OPT+12~*, OPT+15*, OPT+19*
IBX OPT+1*, OPT+2, OPT+4, OPT+5, OPT+9, OPT+10, OPT+14, OPT+22, OPTH+4, OPTH+8
, OPTH+9, OPTH+11, OPTH+12, OPTH+13, OPTH+14, OPTH+15, OPTH+16, AVG+1, AVG+2, AVG+3
, AVG+4, PAUSE+2~, PAUSE+3*
>> IBX1 OPT+9*, OPT+10*, OPT+14, WPAT+1
>> IBX2 OPT+13*, OPT+14*
>> IBX3 OPT+14*, OPT+20, OPT+21, OPT+22
IOF OPTH+1, OPTS+1, INPS+1
IOSL OPT+11, OPT+15, PAUSE+3
IOST OPTS+1, OPTS+18, INPS+1, INPS+5, PAUSE+1
U OPT+20, OPT+21, OPT+22, OPTH+7, OPTS+3, INPS+3
X CTR~, CTR+1, DASH~, DASH+1, PAUSE+2~, SSN~, SSN+1, DTE~, DTE+1*
Y PAUSE+2~, DTE+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All