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

Package: Integrated Billing

Routine: IBTODD1


Information

IBTODD1 ;ALB/AAS - CLAIMS TRACKING DENIED DAYS REPORT ; 27-OCT-93

Source Information

Source file <IBTODD1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 3 $$DAT1^IBOUTL  (SUBH,SUBT,SUM)^IBTODD2  $$EXPAND^IBTRE  
VA FileMan 2 COMMA^%DTC  DT^DICRW  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  
List Manager 1 PAUSE^VALM1  
Registration 1 PID^VADPT  

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

Package Total Caller Graph
Integrated Billing 10 IBTODD  IBTODD2  IBTOSUM1  IBTOUR2  IBTOUR4  IBTRC3  IBTRE  IBTRE5  
IBTRE6  IBTUTL3  

Entry Points

Name Comments DBIA/ICR reference
PRINT ; -- print data
; -- ^tmp($j,"ibtodd",event type,primary sort,secondary sort,ibtrc)=DFN ^ attending ^ treating specialty ^ service ^ ^ billing rate
PRINTQ
ONE ; -- print one entry
; -- ^tmp($j,"ibtodd",event type,primary sort,secondary sort,ibtrc)=DFN ^ attending ^ treating specialty ^ service ^ ^ billing rate
L1
L2
ONEQ
LO ; -- print one line for non-inpatient
CNTS ; -- develop summary data
HDR ; -- Print header for billing report
HDRO ; -- Print Header for non-Inpatient denials
CDT(IBTRN) ; -- compute dates of care
APPEAL(IBTRC) ; -- Find appeals
AP(IBTRC) ; -- count days approved
CHRG(D) ; return charge for output

External References

Name Field # of Occurrence
COMMA^%DTC CHRG+1
DT^DICRW %
$$DAT1^IBOUTL L1+2, L1+5, L2, L2+1
SUBH^IBTODD2 PRINT+11, ONE+8
SUBT^IBTODD2 PRINT+10, PRINT+15
SUM^IBTODD2 PRINT+18
$$EXPAND^IBTRE L1+9, L1+12, L2+3, L2+5
PID^VADPT ONE+9
PAUSE^VALM1 HDR+2
$$FMDIFF^XLFDT AP+5
$$FMTE^XLFDT LO+3, HDR+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Denials Found in Date Range."
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),"^"),1,19),?22,VA("BID")
  • Line Location: L1+0
Function Call: WRITE
  • Prompt: ?28,$$DAT1^IBOUTL(+IBCDT\1)
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: " to"
  • Condition for execution: $P(IBCDT,"^",2)
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: ?40,$J($P(IBDATA,"^",2),8)
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: ?54,"ALL"
  • Line Location: L1+4
Function Call: WRITE
  • Prompt: ?54,$$DAT1^IBOUTL($P(IBTRCD,"^",15),"2P")
  • Line Location: L1+5
Function Call: WRITE
  • Prompt: " to"
  • Condition for execution: $P(IBTRCD,"^",16)
  • Line Location: L1+5
Function Call: WRITE
  • Prompt: " (",$P(IBDATA,"^",7),")"
  • Line Location: L1+6
Function Call: WRITE
  • Prompt: ?98,$S(+$P(IBAPL,"^",2):"YES",1:"NO")
  • Line Location: L1+10
Function Call: WRITE
  • Prompt: ?103,$J(+IBAPL,8)
  • Line Location: L1+11
Function Call: WRITE
  • Prompt: ?116,$E($$EXPAND^IBTRE(42.4,3,$P(IBDATA,"^",4)),1,4)
  • Line Location: L1+12
Function Call: WRITE
  • Prompt: "UNKN"
  • Condition for execution: $P(IBDATA,"^",4)=""
  • Line Location: L1+12
Function Call: WRITE
  • Prompt: ?120,$$CHRG(+$P(IBDATA,"^",6))
  • Line Location: L1+13
Function Call: WRITE
  • Prompt: !?28,$$DAT1^IBOUTL($P(IBCDT,"^",2)\1,"2P")
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: ?54,$$DAT1^IBOUTL($P(IBTRCD,"^",16),"2P")
  • Line Location: L2+1
Function Call: WRITE
  • Prompt: " (",$P(IBDATA,"^",7),")"
  • Line Location: L2+2
Function Call: WRITE
  • Prompt: ?68,$E($$EXPAND^IBTRE(356.212,.01,$G(IBC(2))),1,25)
  • Line Location: L2+3
Function Call: WRITE
  • Prompt: !?70,$E($$EXPAND^IBTRE(356.212,.01,$G(IBC(IBDEN))),1,25)
  • Line Location: L2+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ONEQ+0
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),"^"),1,19),?22,VA("BID")
  • Line Location: LO+1
Function Call: WRITE
  • Prompt: ?28,$$FMTE^XLFDT(+IBCDT,2)
  • Line Location: LO+3
Function Call: WRITE
  • Prompt: ?50,$P(IBTRCD,"^",26)
  • Line Location: LO+4
Function Call: WRITE
  • Prompt: ?78,$S(+$P(IBAPL,"^",2):"YES",1:"NO")
  • Line Location: LO+5
Function Call: WRITE
  • Prompt: ?88,$S(+IBAPL:"YES",1:"NO")
  • Line Location: LO+6
Function Call: WRITE
  • Prompt: ?98,$$CHRG(+$P(IBDATA,"^",6))
  • Line Location: LO+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?(IOM-33),"Page ",IBPAG," ",IBHDT
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,?28,"Dates of",?54,"Dates",?103,"Days Approved"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"Patient",?22,"PtID",?28,"Care",?40,"Attending",?54,"Denied",?68,"Denial Reason",?94,"Appealed",?105,"on Appeal",?116,"SRVS",?125,"Amount"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !!,"Patient",?22,"PtID",?28,"Episode Date",?50,"Outpatient Treatment",?75,"Appealed",?85,"Approved",?103,"Amount"
  • Line Location: HDRO+1
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: HDRO+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] CDT+2, CDT+4
^DPT - [#2] L1, LO+1
^IBE(356.6 - [#356.6] HDR+1
^IBT(356 - [#356] LO+2, CDT+1, AP+3
^IBT(356.2 - [#356.2] ONE+5, ONE+10, L1+8, APPEAL+3, AP+3, AP+5
^TMP($J PRINT+5, PRINT+7, PRINT+9, PRINT+12, PRINT+14

Label References

Name Line Occurrences
$$AP APPEAL+3
$$APPEAL ONE+3
$$CDT L1+1
$$CHRG L1+13, LO+7
CNTS ONE+4
HDR PRINT+6, ONE+8
HDRO HDR+7
LO ONE+11
ONE PRINT+14
PRINTQ PRINT+17

Naked Globals

Name Field # of Occurrence
^( PRINT+14, L1+8, AP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AP AP+1~, AP+3*, AP+4
D CHRG~, CHRG+1
>> DFN ONE+9*, L1, LO+1
>> DGPM CDT+2*, CDT+3, CDT+4
>> DIRUT HDR+2
DT %
EV AP+1~, AP+3*, AP+4
IBAPEAL APPEAL+1~
>> IBAPL ONE+3*, L1+10, L1+11, LO+5, LO+6, CNTS+10, CNTS+18, CNTS+19
>> IBBDT HDR+5
IBC L1+7!*, L1+8*
IBC( L1+8*, L2+5
IBC(1 L1+9
IBC(2 L2+3, L2+5
>> IBCDT L1+1*, L1+2, L2, LO+2*, LO+3
IBCNT PRINT+3!
IBCNT( CNTS+6*, CNTS+7*, CNTS+8*, CNTS+9*, CNTS+10*
IBCNTO PRINT+3!
IBCNTO( CNTS+15*, CNTS+16*, CNTS+17*, CNTS+18*, CNTS+19*
>> IBDATA PRINT+14*, ONE+9, L1+3, L1+6, L1+12, L1+13, L2+2, LO+7, CNTS+1, CNTS+3
, CNTS+7, CNTS+8, CNTS+12, CNTS+16
IBDEN L1+7!*, L1+8*, L2+5*
>> IBEDT HDR+5
IBEVNTYP PRINT+3!, PRINT+5*, PRINT+7, PRINT+9, PRINT+12, PRINT+14, ONE+11, CNTS+5, CNTS+14, HDR+1
, HDR+7
IBEVO HDR+1~*, HDR+5
>> IBHDT HDR+6
>> IBI PRINT+8*, PRINT+9*, PRINT+10, PRINT+11, PRINT+12, PRINT+14, ONE+8
>> IBISV PRINT+8*, PRINT+10, PRINT+11*
>> IBJ PRINT+12*, PRINT+14
>> IBPAG HDR+2, HDR+3, HDR+4*, HDR+6
>> IBQUIT PRINT+5, PRINT+9, PRINT+11, PRINT+12, PRINT+14, PRINT+17, HDR+1, HDR+2*
>> IBSERV CNTS+1*, CNTS+2*, CNTS+6, CNTS+7, CNTS+8, CNTS+9, CNTS+10, CNTS+15, CNTS+16, CNTS+17
, CNTS+18, CNTS+19
>> IBSORT PRINT+10
>> IBSUBT CNTS+3*
>> IBSUM PRINT+6, PRINT+7, PRINT+15, ONE+6
>> IBTALL ONE+5*, L1+4, L1+5, L1+6, L2+2
>> IBTOTL CNTS+12*
IBTRC PRINT+13*, PRINT+14*, ONE+3, ONE+5, ONE+10, L1+8, APPEAL~, APPEAL+2, APPEAL+3*, AP~
, AP+3, AP+5
>> IBTRCD ONE+10*, L1+1, L1+5, L1+6, L2+1, L2+2, LO+2, LO+4
IBTRN CDT~, CDT+1, APPEAL+1~
IBTRSV APPEAL+1~, APPEAL+2*, APPEAL+3
IOF HDR+3
IOM HDR+6, HDR+10, HDRO+2
IOSL ONE+8
IOST HDR+2, HDR+3
U LO+2, CNTS+18, AP+3, AP+4
>> VA("BID" L1, LO+1
X CDT+1~*, CDT+2, CDT+5, APPEAL+1~*, APPEAL+3*, APPEAL+5, AP+1~, AP+2*, AP+5*, CHRG+1~*
, CHRG+2
X2 CHRG+1~*
Y CDT+1~*, CDT+3*, CDT+4*, CDT+5*, CDT+6, APPEAL+1~*, APPEAL+3*, APPEAL+5, AP+1~, AP+5*
Z AP+1~, AP+2*, AP+4*, AP+5*, AP+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All