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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBACVA1

Package: Integrated Billing

Routine: IBACVA1


Information

IBACVA1 ;ALB/CPM - BILL CHAMPVA SUBSISTENCE CHARGE ; 29-JUL-93

Source Information

Source file <IBACVA1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 7 ERRMSG^IBACVA2  COST^IBAUTL2  ($$CHECK,$$LAST)^IBECEAU  ADD^IBECEAU3  PROC^IBECEAU4  $$DAT1^IBOUTL  AR^IBR  
Kernel 1 $$HTFM^XLFDT  
Registration 1 IN5^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 IBACVA  IBECEA32  

Entry Points

Name Comments DBIA/ICR reference
BILL ; Create the CHAMPVA inpatient subsistence charge.
BILLQ
LIM(DATE) ; Find the CHAMPVA subsistence limit on DATE.
; Input: DATE -- The date on which to determine the limit
; Output: IBLIM -- The maximum subsistence charge for an episode
LIMQ
PD(IBDT) ; Find the CHAMPVA per diem charge on IBDT.
; Input: IBDT -- The date on which to determine the per diem
; Output: IBCHG -- The CHAMPVA per diem charge on IBDT
; IBATYP -- CHAMPVA Action Type
PDQ
PREV(DFN,DATE,LINK) ; Billed an admission the CHAMPVA subsistence charge?
; Input: DFN -- Pointer to patient in file #2
; DATE -- Event (admission) date
; LINK -- Pointer to mvmt in file #405
; Output: 0 -- Admission has not been billed, or
; >0 -- ien of billed charge in file #350
PREVQ

External References

Name Field # of Occurrence
ERRMSG^IBACVA2 BILL+1, BILL+4, BILL+12, BILL+26, BILL+29
COST^IBAUTL2 PD+6
$$CHECK^IBECEAU BILL+1
$$LAST^IBECEAU PREV+8
ADD^IBECEAU3 BILL+26
PROC^IBECEAU4 BILL+21
$$DAT1^IBOUTL BILL+18, BILL+19
AR^IBR BILL+29
IN5^VADPT BILL+8
$$HTFM^XLFDT BILL+3, BILL+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB - [#350] PREV+8
^IB("ACVA" PREV+8
^IBE(350.1 - [#350.1] LIM+4, PD+4, PREV+8
^IBE(350.2 - [#350.2] LIM+5, LIM+6

Label References

Name Line Occurrences
BILLQ BILL+1, BILL+4, BILL+12, BILL+16, BILL+26, BILL+29
LIM BILL+3
LIMQ LIM+4
PD BILL+9
PDQ PD+5
PREVQ PREV+6

Naked Globals

Name Field # of Occurrence
^( LIM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATE LIM~, LIM+5, PREV~, PREV+6, PREV+8
DFN PREV~, PREV+6, PREV+8
>> DGQUIET BILL+24, BILL+31
>> IBATYP PD+4*, PD+5
>> IBBDT BILL+3, BILL+7, BILL+8
>> IBCHG BILL+11, BILL+25*, PD+4*, PD+6
>> IBCHGT BILL+2*, BILL+10, BILL+11*, BILL+13*, BILL+20, BILL+25
>> IBCOMMIT BILL+31*
>> IBD BILL+7*
>> IBDESC BILL+25*
IBDT BILL+7*, BILL+8, BILL+9, BILL+10, BILL+11, BILL+13, PD~
>> IBEDT BILL+7, BILL+8
>> IBFR BILL+10*, BILL+18
>> IBJOB BILL+4, BILL+12, BILL+16, BILL+31
>> IBLIM BILL+13, LIM+3*, LIM+6*
IBN PREV+7~, PREV+8*
IBND PREV+7~, PREV+8*
IBP PREV+7~, PREV+8*
>> IBSL BILL+25*
>> IBTO BILL+11*, BILL+13*, BILL+19
>> IBUNIT BILL+25*
>> IBY BILL+1*, BILL+4, BILL+7, BILL+9, BILL+12, BILL+16, BILL+26, BILL+29, LIM+4*, LIM+6*
, PD+5*, PD+6*
LINK PREV~, PREV+6, PREV+8
>> VAIP("D" BILL+8*
>> VAIP(10 BILL+8
X LIM+3~, LIM+4*, LIM+5*, LIM+6
Y PREV+7~, PREV+8*, PREVQ
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All