IBAUTL8 ;ALB/MGD - DUPLICATE COPAY TRANSACTION UTILITIES; Sep 30, 2020@15:16:44
Source file <IBAUTL8.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 |
|---|---|---|
| COPAYCHK(IBDFN,IBN,IBINTACT) | ;
; Determine if the Copay charge currently being reviewed should be passed over to Accounts Receivable (AR) ; Input: ; IBDFN = Pointer to the Patient in file #2 ; IBN = Pointer to the charge in file #350 ; IBINTACT = Optional - Flag to indicate when the call is being made from an interactive option. ; 1:Interactive ; For Interactive call, the IEN of the existing copay charge will be passed ; back and this info will be used to display an error message for the ; Release Charges 'On Hold' [IB MT RELEASE CHARGES] option and the Pass a Charge ; action on the Cancel/Edit/Add Patient Charges [IB CANCEL/EDIT/ADD CHARGES] option. ; 0:Non-Interactive ; For Non-Interactive calls, duplicate copay transaction information ; will be stored in ^XTMP("IB TRANS"). ; At the end of the IB nightly background job, any duplicate copay info in ; ^XTMP("IB TRANS") will be sent via MailMan to the IB DUPLICATE TRANSACTIONS mail group. |
|
| OCPYNEW(IBN,IBEVDT,IBACTION,IBINTACT) | ;
; Perform checks for a new Outpatient Copay charge to determine if this charge should be passed over to AR. ; Input: ; IBN = Pointer to Outpatient 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 ; ; Output: IBACTION = 0 if the current charge being reviewed should be passed over to AR ; # The IEN of the existing Copay charge for the Patient/Date of interest. ; The charge being reviewed should NOT be passed over to AR. |
| Name | Field # of Occurrence |
|---|---|
| $$BFO^IBAUTL8A | OCPYNEW+50 |
| $$BFOB^IBAUTL8A | OCPYNEW+31 |
| $$BFPD^IBAUTL8A | OCPYNEW+29 |
| IPDNEW^IBAUTL8A | COPAYCHK+62 |
| $$LTC^IBAUTL8B | OCPYNEW+87 |
| LTCNEW^IBAUTL8B | COPAYCHK+81 |
| $$BFI^IBAUTL8C | OCPYNEW+27 |
| ICPYNEW^IBAUTL8C | COPAYCHK+75 |
| STORE1^IBAUTL9 | OCPYNEW+46, OCPYNEW+67 |
| STORE2^IBAUTL9 | OCPYNEW+82, OCPYNEW+96 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | COPAYCHK+37 |
| ^IB - [#350] | COPAYCHK+39, OCPYNEW+23, OCPYNEW+60 |
| Name | Line Occurrences |
|---|---|
| OCPYNEW | COPAYCHK+55 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| IBACTION | COPAYCHK+25~, COPAYCHK+31*, COPAYCHK+33, COPAYCHK+37, COPAYCHK+40, COPAYCHK+46, COPAYCHK+50, COPAYCHK+55, COPAYCHK+62, COPAYCHK+75 , COPAYCHK+81, COPAYCHK+82, OCPYNEW~, OCPYNEW+16*, OCPYNEW+36*, OCPYNEW+55*, OCPYNEW+91* |
| IBAT | COPAYCHK+25~, COPAYCHK+48*, COPAYCHK+50, COPAYCHK+55, COPAYCHK+62, COPAYCHK+75, COPAYCHK+81 |
| IBBFI | OCPYNEW+21~, OCPYNEW+27*, OCPYNEW+34, OCPYNEW+36, OCPYNEW+42 |
| IBBFO | OCPYNEW+21~, OCPYNEW+50*, OCPYNEW+53, OCPYNEW+55, OCPYNEW+60, OCPYNEW+67, OCPYNEW+82 |
| IBBOB | OCPYNEW+21~, OCPYNEW+31*, OCPYNEW+34, OCPYNEW+36, OCPYNEW+44 |
| IBBPD | OCPYNEW+21~, OCPYNEW+29*, OCPYNEW+34, OCPYNEW+36, OCPYNEW+43 |
| IBCTOT | OCPYNEW+58~, OCPYNEW+60*, OCPYNEW+62, OCPYNEW+69 |
| IBDATA0 | COPAYCHK+25~, COPAYCHK+39*, COPAYCHK+40, COPAYCHK+42, COPAYCHK+44, COPAYCHK+48 |
| IBDFN | COPAYCHK~, COPAYCHK+33, COPAYCHK+37, OCPYNEW+21~, OCPYNEW+23*, OCPYNEW+25, OCPYNEW+27, OCPYNEW+29, OCPYNEW+31, OCPYNEW+50 , OCPYNEW+87 |
| IBETOT | OCPYNEW+58~, OCPYNEW+60*, OCPYNEW+62, OCPYNEW+69 |
| IBEVDT | COPAYCHK+25~, COPAYCHK+42*, COPAYCHK+44*, COPAYCHK+46, COPAYCHK+55, COPAYCHK+62, COPAYCHK+75, COPAYCHK+81, OCPYNEW~, OCPYNEW+18 , OCPYNEW+27, OCPYNEW+29, OCPYNEW+31, OCPYNEW+50, OCPYNEW+87 |
| IBIEN | OCPYNEW+21~, OCPYNEW+42*, OCPYNEW+43*, OCPYNEW+44*, OCPYNEW+46 |
| IBINTACT | COPAYCHK~, COPAYCHK+35*, COPAYCHK+55, COPAYCHK+62, COPAYCHK+75, COPAYCHK+81, OCPYNEW~, OCPYNEW+20*, OCPYNEW+38, OCPYNEW+46 , OCPYNEW+57, OCPYNEW+93 |
| IBLTC | OCPYNEW+21~, OCPYNEW+87*, OCPYNEW+89, OCPYNEW+91, OCPYNEW+96 |
| IBN | COPAYCHK~, COPAYCHK+33, COPAYCHK+39, COPAYCHK+55, COPAYCHK+62, COPAYCHK+75, COPAYCHK+81, OCPYNEW~, OCPYNEW+18, OCPYNEW+23 , OCPYNEW+27, OCPYNEW+29, OCPYNEW+31, OCPYNEW+46, OCPYNEW+50, OCPYNEW+60, OCPYNEW+67, OCPYNEW+82, OCPYNEW+87, OCPYNEW+96 |
| IBRSN | OCPYNEW+21~, OCPYNEW+42*, OCPYNEW+43*, OCPYNEW+44*, OCPYNEW+46, OCPYNEW+66*, OCPYNEW+67, OCPYNEW+81*, OCPYNEW+82, OCPYNEW+95* , OCPYNEW+96 |
| U | COPAYCHK+42, COPAYCHK+44, COPAYCHK+48, OCPYNEW+23, OCPYNEW+60 |
