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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBAMTV2

Package: Integrated Billing

Routine: IBAMTV2


Information

IBAMTV2 ;ALB/CPM - CREATE CHARGES FOR BILLABLE EPISODES ; 01-JUN-94

Source Information

Source file <IBAMTV2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 8 ^IBAERR1  KILL1^IBAMTC  SITE^IBAUTL  (SERV,TYPE)^IBAUTL2  (CLADD,CLDATA,CLOCKCL,CLUPD,DED)^IBAUTL3  ^IBAUTL4  ADD^IBECEAU3  $$GETSC^IBEMTSCU  
Kernel 1 ($$FMADD,$$FMDIFF,$$FMTH)^XLFDT  
VA FileMan 1 ^DIE  

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 IBAMTV  

Entry Points

Name Comments DBIA/ICR reference
BLD ; Create back charges for an array of episodes.
BLDQ
INPT ; Bill inpatient care.
INPTQ
OPT ; Bill the Outpatient copayment.
; Input: IBEPSTR -- 1^2^3, where
; 1 => visit date
; 2 => null
; 3 => softlink (may be null)
; DFN -- Pointer to the patient in file #2
OPTQ
OLDCL(DFN,IBDT) ; Can an old billing clock be used?
; Input: DFN -- Pointer to the patient in file #2
; IBDT -- Date of first potentially billable episode
; Output: 0 -- No old billing clock available
; >0 -- Pointer to old billing clock in file #351
OLDCLQ
UPD(IBN) ; Place the charge in a review status.
; Input: IBN -- Pointer to the charge in file #350
CLEV() ; Should the event record be closed?
; Input: variables IBEVDA -- Pointer to event in file #350
; IBEND -- Last date through which to bill
; Output: 1 -- yes, close event
; 0 -- don't close event
CLEVQ

External References

Name Field # of Occurrence
^DIE UPD+2
^IBAERR1 BLDQ
KILL1^IBAMTC BLDQ+1
SITE^IBAUTL BLD+15
SERV^IBAUTL2 BLD+16
TYPE^IBAUTL2 OPT+24
CLADD^IBAUTL3 OPT+10
CLDATA^IBAUTL3 BLD+20
CLOCKCL^IBAUTL3 BLD+27, OPT+9
CLUPD^IBAUTL3 INPT+9
DED^IBAUTL3 BLD+20
^IBAUTL4 INPT+5
ADD^IBECEAU3 OPT+26
$$GETSC^IBEMTSCU OPT+17
$$FMADD^XLFDT CLEV+7
$$FMDIFF^XLFDT BLD+27, INPT+2, OPT+9, OLDCL+10
$$FMTH^XLFDT INPT+3, INPT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] CLEV+8, CLEV+9
^IB - [#350] CLEV+8
^IBE(351 - [#351] OLDCL+7, OLDCL+8, OLDCL+9
^IBE(352.5 - [#352.5] OPT+19
^TMP("IBAMTV" BLD+19, BLD+23

Label References

Name Line Occurrences
$$CLEV INPT+10
$$OLDCL BLD+19
@( BLD+23, INPT+10
BLDQ BLD+15, BLD+16, BLD+24
CLEVQ CLEV+6, CLEV+7
INPTQ INPT+5
OLDCLQ OLDCL+5
OPTQ OPT+9, OPT+10, OPT+19, OPT+24, OPT+26
UPD INPT+7, INPT+8, OPT+29

Naked Globals

Name Field # of Occurrence
^( BLD+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% OPT+7~, OPT+17*
DA UPD+2*!
DFN BLD+19, OLDCL~, OLDCL+5, OLDCL+7, OLDCL+8
DIE UPD+2*!
DR UPD+2*!
DT BLD+27, CLEV+7
DUZ BLD+14
IBATYP INPTQ!, OPTQ!
>> IBBDT INPT+3*
IBBS INPTQ!, OPTQ!
IBCHCDA INPT+8, INPTQ!
IBCHFR INPTQ!
IBCHG INPTQ!, OPTQ!
IBCHPDA INPT+7, INPTQ!
IBCHTO INPTQ!
IBCHTOTL INPTQ!
>> IBCLCT INPT+2*
>> IBCLDA BLD+19*, BLD+20, BLD+27, INPT+2, INPT+9, OPT+9, OPT+10
>> IBCLDAY OPT+10*
IBCLDOL BLD+27!, OPT+9!, OPT+10*
>> IBCLDT BLD+27, INPT+2, OPT+9, OPT+10*
IBDATE INPTQ!
IBDESC INPTQ+1!, OPTQ!
IBDT INPT+10, OPT+14*, OLDCL~, OLDCL+7, OLDCL+10
>> IBDUZ BLD+14*
>> IBEDT INPT+4*
>> IBEND CLEV+6, CLEV+7
IBEPDT BLD+23*, BLDQ+1!
IBEPSTR BLD+23*, BLDQ+1!, INPT+2, INPT+3, INPT+4, OPT+9, OPT+10, OPT+13, OPT+14
IBEVCAL INPTQ+1!
IBEVCLD INPT+10*, INPTQ+1!
IBEVDA INPT+1*, INPT+10, INPTQ+1!, OPT+25*, OPTQ!, CLEV+6, CLEV+8
IBEVDT INPTQ+1!, OPT+14*, OPT+17, OPTQ!
IBEVNEW INPTQ+1!
IBEVOLD INPTQ+1!
IBFR OPT+14*, OPTQ!
IBIL INPTQ+1!
>> IBJOB BLD+14*
IBN OPT+29, OPTQ!, UPD~, UPD+2
IBNH INPTQ!
IBRTED OPTQ!
IBSL INPTQ+1!, OPT+13*, OPT+17, OPTQ!
IBST OLDCL+6~*, OLDCL+7, OLDCL+8, OLDCL+10*
IBSTOPDA OPT+7~, OPT+17*, OPT+19
IBTO OPT+14*, OPTQ!
IBTOTL INPTQ+1!
IBTRAN INPTQ!
IBTYPE OPT+7~, OPT+19*, OPT+21*
IBUNIT OPT+25*, OPTQ!
>> IBWHER BLD+14*
IBX OPT+14*, OPTQ!, OLDCL+6~, OLDCL+7*, OLDCL+8, CLEV+5~*, CLEV+6*, CLEV+7*, CLEV+9*, CLEVQ
IBY BLD+14*, BLD+15*, BLD+16, BLD+23, BLD+24, BLDQINPT+5, OPT+9, OPT+10, OPT+24
OPT+26, OLDCL+6~, OLDCL+8*, OLDCL+9, OLDCLQ
IBZ OLDCL+6~, OLDCL+9*, OLDCL+10, CLEV+5~, CLEV+8*, CLEV+9
>> Y BLD+14*, BLD+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All