IBCBB14 ;ALB/WCJ - CONTINUATION OF EDIT CHECK ROUTINE FOR EPHARM ;15 Mar 2018 9:50 PM
Source file <IBCBB14.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 | 1 | IBCBB11 |
Name | Comments | DBIA/ICR reference |
---|---|---|
VALNDC(IBIFN,IBDFN) | ; IB*2*363 - validate NDC# between PRESCRIPTION file (#52)
; and IB BILL/CLAIMS PRESCRIPTION REFILL file (#362.4) ; input - IBIFN = internal entry number of the billing record in the BILL/CLAIMS file (#399) ; IBDFN = internal entry number of patient record in the PATIENT file (#2) |
|
RXNPI(IBIFN) | ; check for multiple pharmacy npi's on the same bill
|
|
ROICHK(IBIFN,IBDFN,IBINS) | ; ROI Check
; Verify that an ROI is on file if the drug is flagged as sensitive. ; No ROI is required if the Date of Service is on or after the ; Mission Act Implementation Date (1/28/2019). ; input - IBIFN = IEN of the Bill/Claims file (#399) ; IBDFN = IEN of the patient ; IBINS = IEN of the payer insurance company (#36) ; OUTPUT - 0 = no error ; 1 = a prescription is sensitive and there is no ROI on file |
|
ROICHKQ | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBA(362.4 - [#362.4] | ROICHK+12, ROICHK+13 |
^TMP($J | ROICHKQ+1! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
IBDFN | VALNDC~, VALNDC+6, ROICHK~, ROICHK+19 |
IBDRUG | ROICHK+10~, ROICHK+14*, ROICHK+15, ROICHK+16, ROICHK+19 |
IBDT | ROICHK+10~, ROICHK+14*, ROICHK+18, ROICHK+19 |
IBIFN | VALNDC~, VALNDC+6, RXNPI~, RXNPI+2, ROICHK~, ROICHK+12 |
IBINS | ROICHK~, ROICHK+19 |
IBORG | RXNPI+1~, RXNPI+2* |
IBORG( | RXNPI+3 |
IBRXCOL | VALNDC+4~, VALNDC+6, VALNDC+7 |
IBRXCOL( | VALNDC+9 |
IBRXIEN | ROICHK+10~, ROICHK+13*, ROICHK+20 |
IBRXNPI | RXNPI+1~ |
IBRXNPI( | RXNPI+3*, RXNPI+4 |
IBX | VALNDC+4~, VALNDC+9*, RXNPI+1~, RXNPI+3*, RXNPI+4*, ROICHK+10~, ROICHK+12*, ROICHK+13 |
IBY | RXNPI+1~, RXNPI+3*, RXNPI+4*, RXNPI+5 |
IBY0 | ROICHK+10~, ROICHK+13*, ROICHK+14 |
ROIQ | ROICHK+10~, ROICHK+11*, ROICHK+21*, ROICHKQ+2 |
U | ROICHK+13, ROICHK+14 |