IBAMTEDU ;ALB/CPM - MEANS TEST BULLETIN UTILITIES ; 15-JUN-93
Source file <IBAMTEDU.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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 |
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 |
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! |
Name | Field # of Occurrence |
---|---|
^( | EP+21, EP+32 |
>> | 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 |