IBAUTL8C ;ALB/MGD - DUPLICATE COPAY TRANSACTION UTILITIES CONT.; Sep 30, 2020@15:16:44
Source file <IBAUTL8C.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 |
|---|---|---|
| ICPYNEW(IBN,IBEVDT,IBACTION,IBINTACT) | ;
; Perform checks for a new Inpatient Copay charge to determine if this charge should be passed over to AR. ; Input: ; IBN = Pointer to Inpatient Copay 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 |
|
| BFI(DFN,IBDATE,IBNEW) | ; Patient Billed For Inpatient 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 |
| Name | Field # of Occurrence |
|---|---|
| $$BFO^IBAUTL8A | ICPYNEW+179 |
| $$BFOB^IBAUTL8A | ICPYNEW+42, ICPYNEW+80, ICPYNEW+120 |
| $$BFPD^IBAUTL8A | ICPYNEW+143 |
| $$LTC^IBAUTL8B | ICPYNEW+191 |
| $$BFI^IBAUTL8C | ICPYNEW+34 |
| STORE1^IBAUTL9 | ICPYNEW+77 |
| STORE2^IBAUTL9 | ICPYNEW+61, ICPYNEW+98, ICPYNEW+117, ICPYNEW+136, ICPYNEW+174, ICPYNEW+188, ICPYNEW+200 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB - [#350] | ICPYNEW+28, ICPYNEW+67, ICPYNEW+149, BFI+36 |
| ^IB("ACHDT" | BFI+27, BFI+30 |
| ^IBE(350.1 - [#350.1] | BFI+40, BFI+42 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | BFI~, BFI+21, BFI+27, BFI+30 |
| IBACTION | ICPYNEW~, ICPYNEW+21*, ICPYNEW+37, ICPYNEW+39*, ICPYNEW+46*, ICPYNEW+65, ICPYNEW+71*, ICPYNEW+85*, ICPYNEW+103*, ICPYNEW+145 , ICPYNEW+147*, ICPYNEW+152*, ICPYNEW+155*, ICPYNEW+157*, ICPYNEW+159, ICPYNEW+183*, ICPYNEW+195* |
| IBAMT | BFI+17~, BFI+18*, BFI+59* |
| IBAT1 | ICPYNEW+26~, ICPYNEW+30*, ICPYNEW+152, ICPYNEW+155, ICPYNEW+157 |
| IBAT2 | ICPYNEW+26~, ICPYNEW+149*, ICPYNEW+152, ICPYNEW+155, ICPYNEW+157 |
| IBATYP | BFI+17~, BFI+18*, BFI+40*, BFI+42, BFI+44, BFI+56 |
| IBATYPN | BFI+17~, BFI+18*, BFI+42*, BFI+44, BFI+48, BFI+50 |
| IBBFI | ICPYNEW+26~, ICPYNEW+34*, ICPYNEW+37, ICPYNEW+65, ICPYNEW+67, ICPYNEW+71, ICPYNEW+77, ICPYNEW+103, ICPYNEW+117 |
| IBBFO | ICPYNEW+26~, ICPYNEW+179*, ICPYNEW+181, ICPYNEW+183, ICPYNEW+188 |
| IBBFOB | ICPYNEW+26~, ICPYNEW+42*, ICPYNEW+44, ICPYNEW+46, ICPYNEW+61, ICPYNEW+80*, ICPYNEW+81, ICPYNEW+85, ICPYNEW+98, ICPYNEW+120* , ICPYNEW+121, ICPYNEW+136 |
| IBBPD | ICPYNEW+26~, ICPYNEW+143*, ICPYNEW+145, ICPYNEW+147, ICPYNEW+149, ICPYNEW+174 |
| IBCHK | BFI+17~, BFI+34*, BFI+48*, BFI+50*, BFI+51 |
| IBCHRG | BFI+17~, BFI+20*, BFI+21, BFI+59*, BFI+64 |
| IBCTOT | ICPYNEW+26~, ICPYNEW+67*, ICPYNEW+69, ICPYNEW+101 |
| IBDATA0 | ICPYNEW+26~, ICPYNEW+28*, ICPYNEW+30, BFI+17~, BFI+36*, BFI+38, BFI+40, BFI+44, BFI+48, BFI+50 , BFI+56, BFI+59 |
| IBDATE | BFI~, BFI+21, BFI+23, BFI+25*, BFI+27*, BFI+30 |
| IBDFN | ICPYNEW+26~, ICPYNEW+30*, ICPYNEW+32, ICPYNEW+34, ICPYNEW+42, ICPYNEW+80, ICPYNEW+120, ICPYNEW+143, ICPYNEW+179, ICPYNEW+191 |
| IBETOT | ICPYNEW+26~, ICPYNEW+67*, ICPYNEW+69, ICPYNEW+101 |
| IBEVDT | ICPYNEW~, ICPYNEW+23, ICPYNEW+34, ICPYNEW+42, ICPYNEW+80, ICPYNEW+120, ICPYNEW+143, ICPYNEW+179, ICPYNEW+191 |
| IBINTACT | ICPYNEW~, ICPYNEW+25*, ICPYNEW+48, ICPYNEW+75, ICPYNEW+83, ICPYNEW+115, ICPYNEW+123, ICPYNEW+161, ICPYNEW+185, ICPYNEW+197 |
| IBLTC | ICPYNEW+26~, ICPYNEW+191*, ICPYNEW+193, ICPYNEW+195, ICPYNEW+200 |
| IBN | ICPYNEW~, ICPYNEW+23, ICPYNEW+28, ICPYNEW+34, ICPYNEW+42, ICPYNEW+61, ICPYNEW+67, ICPYNEW+77, ICPYNEW+80, ICPYNEW+98 , ICPYNEW+117, ICPYNEW+120, ICPYNEW+136, ICPYNEW+143, ICPYNEW+174, ICPYNEW+179, ICPYNEW+188, ICPYNEW+191, ICPYNEW+200, BFI+17~ , BFI+29*, BFI+30*, BFI+32, BFI+36, BFI+59 |
| IBNEW | BFI~, BFI+32 |
| IBRSN | ICPYNEW+26~, ICPYNEW+60*, ICPYNEW+61, ICPYNEW+76*, ICPYNEW+77, ICPYNEW+97*, ICPYNEW+98, ICPYNEW+116*, ICPYNEW+117, ICPYNEW+135* , ICPYNEW+136, ICPYNEW+173*, ICPYNEW+174, ICPYNEW+187*, ICPYNEW+188, ICPYNEW+199*, ICPYNEW+200 |
| IBSTOPDT | BFI+17~, BFI+23*, BFI+27 |
| U | ICPYNEW+30, ICPYNEW+67, ICPYNEW+85, ICPYNEW+149, BFI+38, BFI+48, BFI+50, BFI+59 |
