IBAUTL8A ;ALB/MGD - DUPLICATE COPAY TRANSACTION UTILITIES CONT.; Sep 30, 2020@15:16:44
Source file <IBAUTL8A.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 4 | IBAUTL8 IBAUTL8A IBAUTL8B IBAUTL8C |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IPDNEW(IBN,IBEVDT,IBACTION,IBINTACT) | ;
; Perform checks for a new Inpatient Per Diem charge to determine if this charge should be passed over to AR. ; Input: IBN = Pointer to Inpatient Per Diem charge currently being reviewed in the INTEGRATED BILLING ACTION (#350) file ; IBEVDT = Event Date for the charge currently being reviewed in the INTEGRATED BILLING ACTION (#350) file ; IBACTION = Passed by reference. Passed in as 0:Pass to AR ; IBINTACT = Optional - Flag to indicate when the call is being made from an interactive option. ; 1:Interactive ; 0:Non-Interactive ; For more info see COPAYCHK above |
|
| BFO(DFN,IBDATE,IBNEW) | ; Patient Billed For Outpatient Copay on a specified date?
; Input: DFN - Pointer to the patient in file #2 ; IBDATE - Date of the Inpatient Visit ; IBNEW - IEN of new charge in File #350 ; Output: 0 - Not billed the OPT copay on the visit date ; >0 - Pointer to charge in file #350 that was billed |
|
| BFOB(DFN,IBDATE,IBNEW) | ; Patient Billed For Outpatient Observation Copay on a specified date?
; Input: DFN - Pointer to the patient in file #2 ; IBDATE - Date of the Outpatient Visit ; IBNEW - IEN of new charge in File #350 ; Output: 0 - Not billed the OPT copay on the visit date ; >0 - Pointer to charge in file #350 that was billed |
|
| BFPD(DFN,IBDATE,IBNEW) | ; Patient Billed For Per Diem Copay on a specified date?
; Input: DFN - Pointer to the patient in file #2 ; IBDATE - Date of the Outpatient Visit ; IBNEW - IEN of charge in File #350 ; Output: 0 - Not billed the OPT copay on the visit date ; >0 - Pointer to charge in file #350 that was billed |
|
| CNCLCHRG(IBN,IBCANRSN) | ; Cancel a charge that will never be passed over to AR
; OR an existing charge in AR which is being replaced by a new charge at a higher Tier Rate. ; Input: IBN = IEN of record in the INTEGRATED BILLING ACTION (#350) file to edit ; IBCANRSN = the value to set into the CANCELLATION REASON (#.1) field in internal format ; Output: None |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB - [#350] | IPDNEW+22, IPDNEW+33, IPDNEW+57, BFO+28, BFOB+28, BFPD+29 |
| ^IB("ACHDT" | BFO+21, BFO+24, BFOB+21, BFOB+24, BFPD+22, BFPD+25 |
| ^IBE(350.1 - [#350.1] | BFO+32, BFO+34, BFOB+32, BFOB+34, BFPD+33, BFPD+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | BFO~, BFO+15, BFO+21, BFO+24, BFOB~, BFOB+15, BFOB+21, BFOB+24, BFPD~, BFPD+16 , BFPD+22, BFPD+25 |
| IBACTION | IPDNEW~, IPDNEW+15*, IPDNEW+17, IPDNEW+24, IPDNEW+28, IPDNEW+30*, IPDNEW+36*, IPDNEW+39*, IPDNEW+41*, IPDNEW+53* , IPDNEW+88*, IPDNEW+111*, IPDNEW+134* |
| IBAMT | BFO+11~, BFO+12*, BFO+48*, BFOB+11~, BFOB+12*, BFOB+46*, BFPD+12~, BFPD+13*, BFPD+47* |
| IBAT1 | IPDNEW+20~, IPDNEW+33*, IPDNEW+36, IPDNEW+39, IPDNEW+41 |
| IBAT2 | IPDNEW+20~, IPDNEW+33*, IPDNEW+36, IPDNEW+39, IPDNEW+41 |
| IBATYP | BFO+11~, BFO+12*, BFO+32*, BFO+34, BFO+36, BFO+45, BFOB+11~, BFOB+12*, BFOB+32*, BFOB+34 , BFOB+36, BFOB+43, BFPD+12~, BFPD+13*, BFPD+33*, BFPD+35, BFPD+37, BFPD+44 |
| IBATYPN | BFO+11~, BFO+12*, BFO+34*, BFO+36, BFO+40, BFOB+11~, BFOB+12*, BFOB+34*, BFOB+36, BFOB+43 , BFPD+12~, BFPD+13*, BFPD+35*, BFPD+37, BFPD+44 |
| IBBFI | IPDNEW+20~, IPDNEW+26*, IPDNEW+28, IPDNEW+30, IPDNEW+33, IPDNEW+46 |
| IBBFO | IPDNEW+20~, IPDNEW+107*, IPDNEW+109, IPDNEW+111, IPDNEW+126 |
| IBBFOB | IPDNEW+20~, IPDNEW+84*, IPDNEW+86, IPDNEW+88, IPDNEW+103 |
| IBBPD | IPDNEW+20~, IPDNEW+49*, IPDNEW+51, IPDNEW+53, IPDNEW+57, IPDNEW+64, IPDNEW+79 |
| IBCANRSN | CNCLCHRG~, CNCLCHRG+13*, CNCLCHRG+17 |
| IBCHRG | BFO+11~, BFO+14*, BFO+15, BFO+48*, BFO+53, BFOB+11~, BFOB+14*, BFOB+15, BFOB+46*, BFOB+49 , BFPD+12~, BFPD+15*, BFPD+16, BFPD+47*, BFPD+50 |
| IBCTOT | IPDNEW+20~, IPDNEW+57*, IPDNEW+59, IPDNEW+67 |
| IBDATA0 | BFO+11~, BFO+28*, BFO+30, BFO+32, BFO+36, BFO+40, BFO+45, BFO+48, BFOB+11~, BFOB+28* , BFOB+30, BFOB+32, BFOB+36, BFOB+43, BFOB+46, BFPD+12~, BFPD+29*, BFPD+31, BFPD+33, BFPD+37 , BFPD+44, BFPD+47 |
| IBDATE | BFO~, BFO+15, BFO+17, BFO+19*, BFO+21*, BFO+24, BFOB~, BFOB+15, BFOB+17, BFOB+19* , BFOB+21*, BFOB+24, BFPD~, BFPD+16, BFPD+18, BFPD+20*, BFPD+22*, BFPD+25 |
| IBDFN | IPDNEW+20~, IPDNEW+22*, IPDNEW+24, IPDNEW+26, IPDNEW+49, IPDNEW+84, IPDNEW+107, IPDNEW+130 |
| IBETOT | IPDNEW+20~, IPDNEW+57*, IPDNEW+59, IPDNEW+67 |
| IBEVDT | IPDNEW~, IPDNEW+17, IPDNEW+26, IPDNEW+49, IPDNEW+84, IPDNEW+107, IPDNEW+130 |
| IBFDA | CNCLCHRG+9~ |
| IBFDA(350 | CNCLCHRG+15*, CNCLCHRG+17* |
| IBINTACT | IPDNEW~, IPDNEW+19*, IPDNEW+43, IPDNEW+55, IPDNEW+90, IPDNEW+113, IPDNEW+136 |
| IBLTC | IPDNEW+20~, IPDNEW+130*, IPDNEW+132, IPDNEW+134, IPDNEW+149 |
| IBN | IPDNEW~, IPDNEW+17, IPDNEW+22, IPDNEW+26, IPDNEW+33, IPDNEW+46, IPDNEW+49, IPDNEW+57, IPDNEW+64, IPDNEW+79 , IPDNEW+84, IPDNEW+103, IPDNEW+107, IPDNEW+126, IPDNEW+130, IPDNEW+149, BFO+11~, BFO+23*, BFO+24*, BFO+26 , BFO+28, BFO+48, BFOB+11~, BFOB+23*, BFOB+24*, BFOB+26, BFOB+28, BFOB+46, BFPD+12~, BFPD+24* , BFPD+25*, BFPD+27, BFPD+29, BFPD+47, CNCLCHRG~, CNCLCHRG+11, CNCLCHRG+15, CNCLCHRG+17 |
| IBNEW | BFO~, BFO+26, BFOB~, BFOB+26, BFPD~, BFPD+27 |
| IBRSN | IPDNEW+20~, IPDNEW+45*, IPDNEW+46, IPDNEW+63*, IPDNEW+64, IPDNEW+78*, IPDNEW+79, IPDNEW+102*, IPDNEW+103, IPDNEW+125* , IPDNEW+126, IPDNEW+148*, IPDNEW+149 |
| IBSTOPDT | BFO+11~, BFO+17*, BFO+21, BFOB+11~, BFOB+17*, BFOB+21, BFPD+12~, BFPD+18*, BFPD+22 |
| U | IPDNEW+22, IPDNEW+33, IPDNEW+57, BFO+30, BFO+40, BFO+48, BFOB+30, BFOB+46, BFPD+31, BFPD+47 |
| Y | BFOB+11~ |
