IBCEP8C ;DSS/SCR - Functions for IB SILENT INTERFACE FROM FB ;03-27-12
Source file <IBCEP8C.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EPTRANS() | ||
| EPFBAPI(IBSRCREC,IBRETARY) |
|
|
| IBNONVA(IBFBINF) | ||
| ADDFB(IBIEN,IBFBDUZ,IBNOW,IBFBADD) | ||
| ADDNPI(IBIEN,IBNPI,IBFBDUZ,IBNOW) | ;ADD NPI multiple
; INPUTS : IBIEN: IEN OF THE IB NON/OTHER VA PROVIDER FILE being updated with NPI information ; IBNPI : NPI STRING TO BE ADDED if it passes validation rules (we already know this ; npi does not exist as an 'active' npi for a current entry in this file |
|
| CHKTXY(IBIEN,IBPRVTXY) | ||
| ADDTXY(IBIEN,IBTXY,IBPRIM) | ||
| ACTVNPI(IBNPI) | ;RETURNS ien of ACTIVE NPI IN IB NON/OTHER VA BILLING PROVIDER FILE
|
|
| INACTV(IBNPI) | ;RETURNS ien of INACTIVE NPI IN IB NON/OTHER VA BILLING PROVIDER FILE
|
|
| RULES(IBNPI) | ;Verify that the NPI meets all rules for being added
; see NPIUSED^IBCEP81 where the input transform on the NPI field that is being bypassed is defined ; INPUT IBNPI - the NPI about to be added |
|
| FBALLOW(IBIEN) | ||
| STRIP(FBPRVNAM) | ; Strip off leading and trailing spaces
|
|
| SETIBFDA(IBRTRN,IBFBINF,IBFDA,IBIEN) | ||
| LOCK(IBIEN) | ;Locks the #355.93 file or a record in it
; INPUT : IBIEN - the ien of the record to be locked NULL if a new record is being added |
|
| UNLOCK(IBIEN) |
| FileNo | Call Tags |
|---|---|
| ^IBA(355.93 - [#355.93] | Classic Fileman Calls, GETS^DIQ |
| 355.9351 | GET1^DIQ |
| ^USC(8932.1 - [#8932.1] | FIND1^DIC |