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

Package: Integrated Billing

Routine: IBAECI


Information

IBAECI ;ALB/BGA-LONG TERM CARE INPATIENT TRACKER ; 09-OCT-01

Source Information

Source file <IBAECI.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Integrated Billing 5 ($$BILDATE,$$ISLTC4DT,$$ORIGADM)^IBAECN1  ($$CLOCK,$$FACSPEC,$$LASTDT,$$LASTMJ,$$LTCSPEC,$$LTCST,TOT,XMBACK,XMNOEC)^IBAECU  $$STDATE^IBAECU1  $$TREATSP^IBAECU2  $$LOS^IBCU64  
Kernel 1 $$FMTE^XLFDT  
Registration 1 (IN5,INP)^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: 2

Package Total Caller Graph
Integrated Billing 2 IBAMTD  IBECEA3  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main Entry Point
BACKBIL ;called from EN
; back billing issue? send message and quit
CALC ; tag for completion of manual adding of inpt charges
; requires DFN, IBCHG, IBEVDA, IBTO

External References

Name Field # of Occurrence
$$BILDATE^IBAECN1 CALC+6
$$ISLTC4DT^IBAECN1 EN+13
$$ORIGADM^IBAECN1 EN+13
$$CLOCK^IBAECU EN+45
$$FACSPEC^IBAECU EN+15
$$LASTDT^IBAECU CALC+6
$$LASTMJ^IBAECU BACKBIL+3
$$LTCSPEC^IBAECU EN+15
$$LTCST^IBAECU EN+25, CALC+9
TOT^IBAECU CALC+12
XMBACK^IBAECU BACKBIL+3
XMNOEC^IBAECU EN+31
$$STDATE^IBAECU1 EN+7, EN+45
$$TREATSP^IBAECU2 EN+12, EN+17
$$LOS^IBCU64 CALC+6
IN5^VADPT EN+12
INP^VADPT EN+17
$$FMTE^XLFDT BACKBIL+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," This patient is not LTC billable on the date."
  • Line Location: CALC+9
Function Call: WRITE
  • Prompt: !!," Calculated Monthly Copay Cap Type to be used: INPATIENT ",$S(IBLOS<181:"< 181",1:"> 180")," days."
  • Line Location: CALC+14
Function Call: WRITE
  • Prompt: !," Calculated Monthly Copay Cap is: $ ",$FN($P(IBLTCST,"^",$S(IBLOS<181:3,1:4)),",",2)
  • Line Location: CALC+15
Function Call: WRITE
  • Prompt: !," Total previously billed: $ ",$FN(IBT,",",2)
  • Line Location: CALC+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] EN+39
^DIC(42 - [#42] EN+36, EN+37, EN+38, EN+39
^DIC(45.7 - [#45.7] EN+12, EN+17
^IB - [#350] CALC+6
^UTILITY("DGPM" EN+15, EN+16, EN+37, EN+38
^UTILITY($J EN+22

Label References

Name Line Occurrences
BACKBIL EN+12, EN+13, EN+42

Naked Globals

Name Field # of Occurrence
^("A" EN+37
^("P" EN+38
^(0 EN+39

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN EN+13, EN+25, EN+31, EN+45, BACKBIL+3, CALC+9
>> DGPMA EN+6, EN+21, EN+22, EN+33, BACKBIL+5
>> DGPMDA EN+22
>> DGPMP EN+6, EN+10, EN+22, EN+32, BACKBIL+2
DT EN+7
>> IBALTC EN+5*, EN+15*, EN+16, EN+17*, EN+18, EN+28*
>> IBCHG CALC+18*, CALC+21*
IBCL EN+8~, EN+45*
IBDT EN+8~, EN+11~*, EN+12, EN+13, EN+21*, EN+22*, EN+25, EN+31, EN+45, BACKBIL+3
, BACKBIL+7
IBDTA EN+8~, EN+22*
IBE EN+8~, EN+31
IBE(1 EN+33*
IBE(2 EN+33*
IBE(3 EN+34*
IBE(4 EN+34*
IBE(5 EN+35*
IBE(6 EN+35*, EN+36*, EN+37*, EN+38*, EN+39*, EN+40*
>> IBEVDA CALC+6
IBLOS CALC+3~, CALC+6*, CALC+9, CALC+14, CALC+15, CALC+18, CALC+21
IBLTCST EN+8~, EN+25*, EN+28, EN+31, CALC+9*, CALC+15, CALC+18, CALC+21
IBM EN+8~, BACKBIL+3
IBM(1 BACKBIL+4*, BACKBIL+5*
IBM(2 BACKBIL+6*
IBM(3 BACKBIL+6*
IBM(4 BACKBIL+7*
IBM(5 BACKBIL+8*
IBT EN+8~, EN+22*, CALC+3~, CALC+16, CALC+18
>> IBTO CALC+6, CALC+9
IBTS EN+8~, EN+15*
IBTYP CALC+3~
IBV EN+8~, EN+10*, EN+11, EN+17, EN+32*, EN+33, EN+34, EN+36, EN+37, EN+38
, EN+39, BACKBIL+2*, BACKBIL+4, BACKBIL+5
IBX EN+8~, EN+15*, EN+22*
IBY EN+8~, EN+15*, CALC+9*
IBZ EN+8~, EN+22*, CALC+3~, CALC+6*
U EN+12, EN+17
VAIN EN+17~
VAIN(3 EN+17
VAINDT EN+17~*
VAIP EN+12~
VAIP("D" EN+12*
VAIP(1 EN+13*
VAIP(8 EN+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All