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

Package: Integrated Billing

Routine: IBAMTI


Information

IBAMTI ;ALB/CPM - SPECIAL INPATIENT BILLING CASES ; 11-AUG-93

Source Information

Source file <IBAMTI.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 5 ($$CVEDT,$$PATTYPE)^IBACV  SEND^IBACVA2  PAT^IBAERR1  $$BFO^IBECEAU  $$PT^IBEFUNC  
VA FileMan 4 DD^%DT  NOW^%DTC  FILE^DICN  ^DIE  
Kernel 1 $$FMDIFF^XLFDT  
Registration 1 $$BIL^DGMTUB  

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

Package Total Caller Graph
Integrated Billing 4 IBAMTC  IBAMTD  IBAMTI1  IBECEAU5  

Entry Points

Name Comments DBIA/ICR reference
ADM(DFN,IBPM,IBCL) ; Create a new case record upon admission
; Input: DFN -- Pointer to the patient in file #2
; IBPM -- Pointer to the adm movement in file #405
; IBCL -- Patient class [1-ao|2-ir|3-sc|4-swa|5-mst|6-hnc|7-cv|8-shad]
ADMQ
DIS(IBPM) ; Update the case record upon discharge
; Input: IBPM -- Pointer to the adm movement in file #405
DISQ
BGJ ; Perform nightly background monitoring of all case records.
BULL(IBEV,IBCL) ; Send a bulletin at admission and discharge.
; Input: IBEV -- Event [1:admission|2:discharge]
; IBCL -- Patient class [1-ao|2-ir|3-swa|4-sc|5-mst|6-hnc|7-cv|8-shad]
NOTICE(IBNUM,DFN,IBPM,IBCL) ; Notice to disposition billing case
; Input: IBNUM -- Number of days since discharge
; DFN -- Pointer to the patient in file #2
; IBPM -- Pointer to the admission in file #405
; IBCL -- Patient class [1-ao|2-ir|3-swa|4-sc|5-mst|6-hnc|7-cv|8-shad]
UCCL(X) ; Return the upper case classification description.
; Input: X -- Patient class [1-ao|2-ir|3-swa|4-sc|5-mst|6-hnc|7-cv|8-shad]
LCCL(X) ; Return the lower case classification description.
; Input: X -- Patient class [1-ao|2-ir|3-swa|4-sc|5-mst|6-hnc|7-cv|8-shad]

External References

Name Field # of Occurrence
DD^%DT BULL+23, BULL+29, NOTICE+13, NOTICE+15
NOW^%DTC BULL+15
$$BIL^DGMTUB BULL+34
FILE^DICN ADM+10
^DIE ADM+12, DIS+5
$$CVEDT^IBACV BULL+16
$$PATTYPE^IBACV UCCL+2, LCCL+2
SEND^IBACVA2 BULL+36, NOTICE+22
PAT^IBAERR1 BULL+7, NOTICE+12
$$BFO^IBECEAU BULL+35
$$PT^IBEFUNC BULL+3, NOTICE+7
$$FMDIFF^XLFDT BGJ+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(351.2 - [#351.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] BULL+19, BULL+35, NOTICE+13, NOTICE+15
^IBE(351.2 - [#351.2] DIS+3, DIS+6, BGJ+2, BGJ+5*

Label References

Name Line Occurrences
$$LCCL BULL+5, NOTICE+9
$$UCCL BULL+4
ADMQ ADM+4
BULL ADM+13, DIS+6
DISQ DIS+3
NOTICE BGJ+8

Naked Globals

Name Field # of Occurrence
^( BGJ+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BULL+15
DA ADM+5~, ADM+12*, DIS+2~, DIS+5*
DD ADM+10!
DFN ADM~, ADM+4, ADM+10, BULL+3, BULL+16, BULL+34, BULL+35, NOTICE~, NOTICE+7
DIC ADM+5~, ADM+10*, ADM+12
DIC(0 ADM+10*
DIE ADM+5~, ADM+12*, DIS+2~, DIS+5*
DO ADM+10!
DR ADM+5~, ADM+11*, DIS+2~, DIS+4*
DT DIS+4, BGJ+5, BGJ+6, BULL+34
DUZ ADM+11, DIS+4, BULL+7, NOTICE+12
IBC ADM+5~, ADM+10*, ADM+12, DIS+2~, DIS+3*, DIS+5, DIS+6, BGJ+1~, BGJ+2*, BGJ+5
, BULL+6*, BULL+8*, BULL+9*, BULL+10*, BULL+24*, BULL+25*, BULL+26*, BULL+30*, BULL+31*, BULL+34*
, BULL+35*, NOTICE+7~, NOTICE+11*, NOTICE+14*, NOTICE+16*, NOTICE+17*, NOTICE+18*, NOTICE+19*, NOTICE+20*, NOTICE+21*
IBCD BGJ+1~, BGJ+2*, BGJ+3, BGJ+4, BGJ+5, BGJ+6, BGJ+8
IBCL ADM~, ADM+4, ADM+8*, ADM+11, ADM+13, BULL~, BULL+4, BULL+5, BULL+12, NOTICE~
, NOTICE+9
IBDIS BULL+13~, BULL+14*, BULL+19*, BULL+21
>> IBDUZ BULL+7*, NOTICE+12*
IBEV BULL~, BULL+4, BULL+5, BULL+9, BULL+10, BULL+12, BULL+33
IBEXP BULL+13~, BULL+14*, BULL+18*, BULL+21, BULL+23*, BULL+25, BULL+29*, BULL+31
IBFL BULL+13~, BULL+14*, BULL+22*, BULL+28
IBNUM BGJ+1~, BGJ+6*, BGJ+7, BGJ+8, NOTICE~, NOTICE+6, NOTICE+10
IBPM ADM~, ADM+4, ADM+11, DIS~, DIS+3, BULL+19, BULL+35, NOTICE~, NOTICE+13, NOTICE+15
>> IBPT BULL+3*, BULL+4, NOTICE+7*
IBT BULL+3!, NOTICE+7!
IBT( BULL+8*, BULL+9*, BULL+10*, BULL+24*, BULL+25*, BULL+26*, BULL+30*, BULL+31*, BULL+34*, BULL+35*
, NOTICE+14*, NOTICE+16*, NOTICE+17*, NOTICE+18*, NOTICE+19*, NOTICE+20*, NOTICE+21*
IBT(1 BULL+5*, NOTICE+9*
IBT(2 BULL+6*, NOTICE+10*
IBT(3 NOTICE+11*
IBTODAY BULL+13~, BULL+14*, BULL+15*, BULL+16
IBZ BULL+13~, BULL+14*, BULL+16*, BULL+17, BULL+18
X ADM+5~, ADM+10*, BULL+13~, BULL+14*, UCCL~, UCCL+2, LCCL~, LCCL+2
>> XMSUB BULL+4*, NOTICE+8*
Y ADM+5~, ADM+10, BULL+13~, BULL+14*, BULL+23*, BULL+29*, NOTICE+13*, NOTICE+14, NOTICE+15*, NOTICE+16
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