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 |