IBNCPEB ;WOIFO/AAT - BULLETINS FOR NCPDP ;05-NOV-04
Source file <IBNCPEB.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BULL(DFN,IBD,IBERR,IBIFN) | ;Process NCPDP Error Messages.
|
|
| ZXMD | ;
|
|
| T(IBTXT) | ; Add text to the message
|
|
| RELBUL(DFN,IBRX,IBFIL,IBADT,IBACT,IBCR,IBCC,IBIFN,IBRETR) | ;
; Input: ; DFN - Patient ; IBRX - Rx IEN ; IBFIL - Refill# ; IBADT - Date of Service ; IBACT ; -1 if ^IBR error - when the charge was sent to AR ; 0 == charge was not found ; IBCR - Close Reason code (.01 of BPS CLOSE REASON) ; IBCC - Close Reason Comment ; IBIFN - 3rd party bill IEN ; IBRETR - attempt # after which a bulletion was sent |
|
| CHRG | ; gets charge data and sets up charge lines
|
|
| PR(STR,LEN) | ; pad right
|
|
| MCDIV(IBRX,IBFIL) | ; Get MC DIVISION name from the Rx/Fill
|
