IBNCPDP2 ;OAK/ELZ - PROCESSING FOR ECME RESP ;11/15/07 09:43
Source file <IBNCPDP2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ECME(DFN,IBD) | ; function called by STORESP^IBNCPDP
; input - DFN - patient IEN for the prescription ; IBD array passed in by reference ; The IBD array is passed to various subroutines depending ; on the ePharmacy event as evaluated by IBD("STATUS") |
|
| MATCH(BCID,IBS) | ; right bill, right COB payer
|
|
| BILL(DFN,IBD) | ; create bills
|
|
| BILLQ | ||
| SETCT | ; update claims tracking saying bill has been billed
|
|
| LOG(PROC,RESULT) | ;Store the data
|
|
| EPHARM(IBRX,IBREFILL) | ;
|
|
| CHARGES(IBIFN) | ; set up charges on the bill
|
|
| DUP(IBD) | ; Function to determine if processing a duplicate response
; and if a bill should be created ; Input ; IBD array values ; Output ; Function value: [1] "1" if a duplicate response received and a non-cancelled bill already exists ; [2] non-cancelled external bill# if piece [1] =1 ; or ; [1] "0" if not a duplicate response OR no bill exists ; [2] "" |
|
| DUPX | ;
|
|
| ARERR(CODE,COB) | ; retrieve AR error text
; This function is called after calling AR routine PRCASVC6 and that routine indicates ; some AR error has been detected. Variable PRCAERR is passed into this function as ; the CODE parameter. The COB parameter indicates the COB payer sequence. |
|
| ARERRX | ;
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356 - [#356] | Classic Fileman Calls |
| ^DGCR(399 - [#399] | Classic Fileman Calls |
