IBAMTS2 ;ALB/CPM - PROCESS UPDATED OUTPATIENT ENCOUNTERS ; 25-AUG-93
Source file <IBAMTS2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | ($$CHKS,BLD,CLSF,NEW)^IBAMTS1 CANCH^IBECEAU4 |
Registration | 1 | $$BIL^DGMTUB |
Name | Comments | DBIA/ICR reference |
---|---|---|
LINKQ | ||
LINK(IBOE,IBEVT,IBN) | ; Was the billed charge for the current appointment?
|
|
UPD | ; Perform encounter update actions.
|
|
CRES | ; List of cancellation reasons
|
|
ENCL(IBOE) | ; Return classification results for an encounter.
|
|
CLUPDQ | ||
UPDQ | ||
CLUPD() | ; Examine changes in the classification.
|
|
CANC | ; Determine cancellation reason and cancel charge
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | UPD+30 |
^IB - [#350] | LINK+7 |
^IBE(350.3 - [#350.3] | CANC+3 |
^SCE - [#409.68] | UPD+23 |
^SCE("ADFN" | UPD+19, UPD+20 |
^SDD(409.42 - [#409.42] | ENCL+6 |
Name | Line Occurrences |
---|---|
$$CLUPD | UPD+6 |
$$ENCL | UPD+34 |
$$LINK | UPD+13 |
CANC | UPD+14 |
CLUPDQ | CLUPD+7, CLUPD+8 |
LINKQ | LINK+6, LINK+8 |
UPDQ | UPD+6, UPD+12, UPD+13, UPD+14, UPD+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CL | ENCL+5~, ENCL+6* |
CLD | ENCL+5~, ENCL+6* |
>> DFN | UPD+17, UPD+19, UPD+20, UPD+30 |
I | CLUPD+6~, CLUPD+8*, CLUPD+9* |
IBACT | UPD+6*, UPD+7, UPD+8, UPDQ! |
>> IBAPTY | UPD+29* |
>> IBAST | UPD+3, UPD+6 |
>> IBBILLED | UPD+13, UPD+18*, UPD+19, UPD+20, UPD+25*, UPD+39*, CANC+4 |
>> IBBST | UPD+3, UPD+6 |
IBC | UPDQ! |
IBCLSF | UPD+6, UPD+8~, UPD+34*, UPD+35, UPDQ! |
IBCLSF("AFTER" | CLUPD+7, CLUPD+8, CLUPD+9 |
IBCLSF("BEFORE" | CLUPD+7, CLUPD+8, CLUPD+9 |
>> IBCRES | UPD+3*, UPD+7*, UPD+12, CANC+3*, CANC+4 |
>> IBD | UPD+18*, UPD+19*, UPD+20 |
>> IBDAT | UPD+18, UPD+19 |
>> IBDISP | UPD+30* |
>> IBDT | UPD+17 |
>> IBEV0 | UPD+13 |
IBEVT | UPD+13, UPD+23*, UPD+24, UPD+25, UPD+26, UPD+29, UPD+30, UPDQ!, LINK~, LINK+6 , LINK+8 |
IBN | LINK~, LINK+6, LINK+7 |
IBOE | UPD+13, UPD+22, LINK~, LINK+6, LINK+9, ENCL~, ENCL+6 |
IBOEN | UPD+20*, UPD+22, UPD+23, UPD+34, UPD+36, UPDQ! |
>> IBORG | UPD+29*, UPD+30 |
IBSL | UPD+36*, LINK+7~*, LINK+8, LINK+9 |
>> IBY | UPD+14 |
X | ENCL+5~ |
Y | LINK+7~, LINK+8*, LINK+9*, LINKQ, CLUPD+6~*, CLUPD+8*, CLUPD+9*, CLUPDQ, ENCL+5~*, ENCL+6* , ENCL+7 |
Name | Field # of Occurrence |
---|---|
$T(CRES+IBCRES | CANC+3 |