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

Package: Integrated Billing

Routine: IBAMTEDU


Information

IBAMTEDU ;ALB/CPM - MEANS TEST BULLETIN UTILITIES ; 15-JUN-93

Source Information

Source file <IBAMTEDU.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 6 $$INPT^IBAMTS1  $$ENCL^IBAMTS2  ($$CHECK,$$CNP,$$LAST)^IBECEAU  CANCH^IBECEAU4  ($$APPTCT,$$DISCT,$$IGN,$$NBCL,$$NBCSC,$$NBCT,$$NBDIS,$$NBST,$$NCTCL,$$RPT)^IBEFUNC  ($$DISND,SCAN)^IBSDU  
Registration 2 $$BIL^DGMTUB  IN5^VADPT  
VA FileMan 1 NOW^%DTC  

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

Package Total Caller Graph
Integrated Billing 7 IBAMTED  IBAMTV1  IBCOPV  IBCU81  IBJDI7  IBOVOP1  IBTUBOU  

Entry Points

Name Comments DBIA/ICR reference
CHG(IBDAT) ; Any charges billed on or after IBDAT?
; Input: IBDAT -- Date on or after which charges have been billed
; Output: 0 -- No charges billed
; 1 -- Charges were billed; IBARR contains array
; of those charges
CHGQ
CHK(IBN) ; Place charge into the array.
; Input: IBN -- Charge to check
CHKQ
CANC ; Cancel any charges for the patient for today.
EP(IBDAT) ; Any billable episodes of care since IBDAT?
; Input: IBDAT -- Date on or after which patient received care
; Output: 0 -- No billable episodes found
; 1 -- Billable episodes were found; IBARR contains an
; array of those episodes
EPQ
BILLCK(IBOE,IBOE0,IBCK,IBPB) ; Check for potentially billable outpt enctr
; IBOE = encounter ien in file 409.68
; IBOE0 = encounter 0-node
; IBCK = array subscriptd by # that, if defined, specifies edit to check
; and exclude if it doesn't pass it
; (0) = check if pt claimed exposure
; (1) = check if non-billable appt type for means test
; (2) = check if non-count clinic
; (3) = check if non-billable clinic
; (4) = check if pt not Means Test copay pt
; (5) = check if pt admitted by midnight same date
; (6) = check if C&P exam same date
; (7) = check if non-billable stop code (third party)
; (8) = check if non-billable stop code (auto-biller)
; (9) = check if disposition and application without exam
; (10) = check if non-billable disposition
; (11) = check if service connected (ck parent only)
; (12) = check if non-billable clinic
; (13) = check if appt status is set (cancelled/noshow/inpt/etc)
; (13.1) = same as (13) except don't exclude if encounter status is non-count
; (14) = check if non-billable appt type for report
; Returns IBPB = the # of the edit that failed
; IBPB(1) = "" if valid appt
; IBPB(2) = "" if valid add/edit stop code
; IBPB(3) = 0-node of disposition file entry if valid disp
; Function returns true if potentially billable or false if not
BILLCKQ

External References

Name Field # of Occurrence
NOW^%DTC EP+13
$$BIL^DGMTUB BILLCK+36
$$INPT^IBAMTS1 BILLCK+37
$$ENCL^IBAMTS2 BILLCK+31, BILLCK+33
$$CHECK^IBECEAU CANC+2
$$CNP^IBECEAU BILLCK+38
$$LAST^IBECEAU CHK+4
CANCH^IBECEAU4 CANC+6, CANC+7
$$APPTCT^IBEFUNC BILLCK+43
$$DISCT^IBEFUNC BILLCK+56
$$IGN^IBEFUNC BILLCK+45
$$NBCL^IBEFUNC BILLCK+47
$$NBCSC^IBEFUNC BILLCK+49
$$NBCT^IBEFUNC BILLCK+50
$$NBDIS^IBEFUNC BILLCK+57
$$NBST^IBEFUNC BILLCK+48
$$NCTCL^IBEFUNC BILLCK+46
$$RPT^IBEFUNC BILLCK+44
$$DISND^IBSDU BILLCK+55
SCAN^IBSDU EP+19
IN5^VADPT EP+31

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] EP+31, EP+32
^DGPM("ATID1" EP+32
^IB - [#350] CHG+12, CHK+3, CHK+4, CANC+6
^IB("AF" CHG+13, CANC+7
^IB("AFDT" CHG+11, CANC+5
^IBE(350.1 - [#350.1] CHK+5
^IBE(350.3 - [#350.3] CANC+3
^TMP("DIERR" EP+19!
^TMP("IBOE" EP+14!, EP+21, EP+28!

Label References

Name Line Occurrences
$$BILLCK EP+23
BILLCKQ BILLCK+28, BILLCK+36, BILLCK+37, BILLCK+38, BILLCK+41, BILLCK+56, BILLCK+57
CANC CHG+8
CHGQ CHG+8
CHK CHG+12, CHG+13
CHKQ CHK+3
EPQ EP+9

Naked Globals

Name Field # of Occurrence
^( EP+21, EP+32

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EP+13
DFN CHG+11, CANC+5, EP+15, EP+32, BILLCK+26~, BILLCK+27*, BILLCK+36, BILLCK+37, BILLCK+38
DT CHG+8, CANC+5, EP+9
DUZ CANC+4
IBAD EP+6~, BILLCK+26~, BILLCK+55*, BILLCK+57, BILLCK+58
IBARR CHG+5!, EP+14!
IBARR( CHK+5*, EP+25*, EP+26*, EP+27*, EP+31*, EP+32*
IBCBK EP+6~, EP+18*, EP+19
IBCK EP+23, BILLCK~
IBCK( EP+20*, BILLCK+42, BILLCK+43
IBCK(0 BILLCK+28, BILLCK+34
IBCK(1 BILLCK+45
IBCK(10 BILLCK+57
IBCK(11 BILLCK+28, BILLCK+30, BILLCK+35
IBCK(12 BILLCK+50
IBCK(13 BILLCK+42
IBCK(14 BILLCK+44
IBCK(2 BILLCK+46
IBCK(3 BILLCK+47
IBCK(4 BILLCK+36
IBCK(5 BILLCK+37
IBCK(6 BILLCK+38
IBCK(7 BILLCK+48
IBCK(8 BILLCK+49
IBCK(9 BILLCK+56
IBCRES CANC+1~, CANC+3*, CANC+4*, CANC+6, CANC+7
IBD CHG+5~, CHG+11*, CHG+12, CHG+13, CANC+1~, CANC+5*, CANC+6, CANC+7, EP+6~, EP+32*
, BILLCK+26~, BILLCK+27*, BILLCK+37, BILLCK+38, BILLCK+44, BILLCK+45, BILLCK+47, BILLCK+48, BILLCK+49, BILLCK+50
, BILLCK+57
IBDAT CHG~, CHG+8, CHG+12, CHK+3, EP~, EP+9, EP+15, EP+31, EP+32
IBDT EP+6~
IBDUZ CANC+1~, CANC+4*
IBEP EP+6~, EP+23*, EP+31*, EP+32*, EPQ
IBFAC CANC+1~
>> IBFILTER EP+17*, EP+19
IBFND CHG+5~, CHGQ, CHK+5*
IBI EP+6~
IBJOB CHG+5~, CANC+4*
IBLAST CHK+2~, CHK+4*, CHK+5
IBN CHG+5~, CHG+13*, CHK~, CHK+3, CANC+1~, CANC+7*
IBND CHK+2~, CHK+3*, CHK+4
IBNDL CHK+2~, CHK+4*, CHK+5
IBNOW EP+6~, EP+13*, EP+15
IBOE EP+21*, EP+23, EP+26, BILLCK~, BILLCK+33, BILLCK+46, BILLCK+55, BILLCK+56
IBOE0 EP+21*, EP+23, EP+25, EP+26, EP+27, BILLCK~, BILLCK+27, BILLCK+30, BILLCK+31, BILLCK+35
, BILLCK+36, BILLCK+43, BILLCK+44, BILLCK+45, BILLCK+47, BILLCK+48, BILLCK+49, BILLCK+50, BILLCK+55, BILLCK+56
IBPB EP+6~, EP+22!, EP+23, BILLCK~, BILLCK+32*, BILLCK+34*, BILLCK+35*, BILLCK+36*, BILLCK+37*, BILLCK+38*
, BILLCK+42, BILLCK+43*, BILLCK+44*, BILLCK+45*, BILLCK+46*, BILLCK+47*, BILLCK+48*, BILLCK+49*, BILLCK+50*, BILLCK+56*
, BILLCK+57*, BILLCKQ
IBPB( EP+24, BILLCK+52*
IBPB(3 EP+27, BILLCK+58*
IBPM EP+6~, EP+31*, EP+32*
IBSERV CANC+1~
IBSITE CANC+1~
IBSRCE BILLCK+26~, BILLCK+27*, BILLCK+41, BILLCK+42, BILLCK+52
IBVAL EP+6~, EP+19
IBVAL("BDT" EP+15*
IBVAL("DFN" EP+15*
IBVAL("EDT" EP+15*
IBWHER CHG+5~, CANC+4*
IBX CHG+5~, CHG+11*, CHG+12
IBZ EP+6~, EP+20*, EP+24*, EP+25, EP+26, EP+27
QUIT BILLCK+26~, BILLCK+28*, BILLCK+30, BILLCK+32*, BILLCK+34*, BILLCK+35*
U EP+25, EP+26, EP+27, BILLCK+27, BILLCK+30, BILLCK+31, BILLCK+32, BILLCK+35, BILLCK+43, BILLCK+44
, BILLCK+45, BILLCK+47, BILLCK+48, BILLCK+49, BILLCK+50, BILLCK+57
VA EP+6~
VAERR EP+6~
VAIP EP+6~
VAIP("D" EP+31*
VAIP(13 EP+31
Z BILLCK+29~, BILLCK+31*, BILLCK+32, BILLCK+33*, BILLCK+34, BILLCK+35
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All