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

Package: Integrated Billing

Routine: IBAMTV1


Information

IBAMTV1 ;ALB/CPM - BUILD ARRAY OF BILLABLE EPISODES ; 31-MAY-94

Source Information

Source file <IBAMTV1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Integrated Billing 4 $$BILLCK^IBAMTEDU  $$ASIH^IBAUTL5  $$NBCSC^IBEFUNC  SCAN^IBSDU  
Registration 2 $$MVT^DGPMOBS  ADM^VADPT2  
Kernel 1 $$FMADD^XLFDT  

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
CARE ; Build an array of episodes to be back-billed.
INP(DATE) ; Was the patient an inpatient on DATE?
; Input: DATE -- Date of outpatient visit
; array IBARR
; Output: 1 -- Patient was an inpatient on DATE
; 0 -- Patient was not
INPQ
ORIG(IBA) ; Find first admission pointer, considering ASIH movements
; Input: IBA -- Pointer to admission in #405
; Output: Z -- Pointer to original admission in #405

External References

Name Field # of Occurrence
$$MVT^DGPMOBS CARE+20, CARE+29
$$BILLCK^IBAMTEDU CARE+48
$$ASIH^IBAUTL5 CARE+30
$$NBCSC^IBEFUNC CARE+53
SCAN^IBSDU CARE+43
ADM^VADPT2 CARE+17
$$FMADD^XLFDT CARE+22, CARE+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] CARE+19, CARE+21, CARE+27, CARE+32, ORIG+4
^DGPM("ATID1" CARE+26
^TMP("DIERR" CARE+43!
^TMP("IBAMTV" CARE+14!, CARE+23*, CARE+34*, CARE+52, CARE+53, CARE+55*
^TMP("IBOE" CARE+42!, CARE+45, CARE+46, CARE+56!

Label References

Name Line Occurrences
$$ORIG CARE+19
INPQ INP+6

Naked Globals

Name Field # of Occurrence
^( CARE+26, CARE+46

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATE INP~, INP+6, INP+7, INP+8
>> DFN CARE+26, CARE+38
IBA CARE+19*, CARE+20, CARE+21, CARE+26*, CARE+27, CARE+29, CARE+32, CARE+58!, ORIG~, ORIG+3
IBAD CARE+58!
IBADM CARE+19*, CARE+23, CARE+58!
IBADM0 CARE+27*, CARE+28, CARE+30, CARE+34, CARE+58!
>> IBARR( INP+7, INP+8
IBCBK CARE+37~, CARE+41*, CARE+43
IBCK CARE+37~, CARE+48
IBCK( CARE+44*
IBD CARE+26*, CARE+58!
IBDIS CARE+21*, CARE+22*, CARE+23, CARE+32*, CARE+33*, CARE+34, CARE+58!
IBDT CARE+58!
>> IBEND CARE+22, CARE+28, CARE+33, CARE+38
IBFILTER CARE+37~, CARE+40*, CARE+43
IBI CARE+58!
IBOE CARE+37~, CARE+46*, CARE+48, CARE+55
IBOE0 CARE+37~, CARE+46*, CARE+48, CARE+52, CARE+53, CARE+55
IBPB CARE+37~, CARE+47!, CARE+48
IBPB(0 CARE+49
>> IBSTART CARE+17, CARE+23, CARE+26, CARE+38
IBT CARE+37~, CARE+45*, CARE+46
IBVAL CARE+37~, CARE+43
IBVAL("BDT" CARE+38*
IBVAL("DFN" CARE+38*
IBVAL("EDT" CARE+38*
U CARE+53, CARE+55
VADMVT CARE+18, CARE+19, CARE+58!
VAINDT CARE+17*, CARE+58!
X INP+5~*, INP+7, INP+8*, INPQ, ORIG+3~, ORIG+4*
Y INP+5~, INP+7*, INP+8, ORIG+3~, ORIG+4*
Z CARE+37~, CARE+44*, CARE+49*, CARE+52, CARE+53, INP+5~, INP+8*, ORIG+3~*, ORIG+4*, ORIG+5
>> Z1 INP+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All