BPSBUTL ;BHAM ISC/MFR/VA/DLF - IB Communication Utilities ;06/01/2004
Source file <BPSBUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CLOSE(CLAIM,TRNDX,REASON,PAPER,RELCOP,COMMENT,ERROR,BPSCLO) | ; Send IB an update on the CLAIM status for a Closed Claim
|
|
CLOSE2(RXIEN,BFILL,BWHERE) | ;
|
|
CLAIM(RXI,RXR,COB) | ;
|
|
NABP(RXP,BFILL) | ;
|
|
DIVNCPDP(BPSDIV) | ;
|
|
ADDCOMM(BPRX,BPREF,BPRCMNT,BPBKG) | ;
|
|
REOPEN(BP59,BP02,BPREOPDT,BPDUZ,BPCOMM) | ;
|
|
GETDAT(RX,FIL,COB,LDOS,LDSUP) | ;Returns Last Date of Service and Last Days Supply
|
|
NFLDT(RX,FIL,COB) | ;Returns Next Avail Fill Date (B04-BT) from ECME - BPS*1.0*15
|
|
BBILL(RX,RFILL,COB) | ;Return Back Bill Indicator for Pharmacy - BPS*1.0*15
|
|
AMT(RX,FIL,COB) | ; Return Gross Amount Due - BPS*1*15
; RX - rx ien ; FIL - fill#, defaults to original fill if not passed in ; COB - cob payer sequence, defaults to 1 if not passed in |
|
AMTX | ;
|
|
ELIG(RX,FIL,COB) | ; Veteran Eligibility - BPS*1*15
; RX - rx ien ; FIL - fill#, defaults to original fill if not passed in ; COB - cob payer sequence, defaults to 1 if not passed in |
|
GETBAMT(RXIEN,FILL,COB) | ||
RESUBMIT(RX,REFILL,COB) | ; Return Resubmit indicator for Pharmacy - BPS*1*20.
|
|
GETCOB(RXIEN,FILL) | ; Retrieve the COB payer sequence for usage by PSO
; Input: RXIEN and FILL (both are required) ; Output: Function value will be one of the following ; "" (if the prescription fill cannot be found in BPS Transaction) ; -1 (when there are multiple COB's/payers found in BPS Transaction) ; Otherwise, ; COB#^BPS Transaction IEN |
|
GETCOBX | ;
|
|
ADDFLDS(RX,FIL,COB) | ;Returns Additional NCPDP fields from ECME
|
FileNo | Call Tags |
---|---|
^BPSC - [#9002313.02] | Classic Fileman Calls, GET1^DIQ, GETS^DIQ |
9002313.0201 | GET1^DIQ |
9002313.0301 | GET1^DIQ, GETS^DIQ |
^BPS(9002313.56 - [#9002313.56] | GET1^DIQ |
^BPST - [#9002313.59] | GET1^DIQ, GETS^DIQ |