Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCEP8C

Package: Integrated Billing

Routine: IBCEP8C


Information

IBCEP8C ;DSS/SCR - Functions for IB SILENT INTERFACE FROM FB ;03-27-12

Source Information

Source file <IBCEP8C.m>

Entry Points

Name Comments DBIA/ICR reference
EPTRANS()
EPFBAPI(IBSRCREC,IBRETARY)
  • ICR #5806
    • Status: Active
    • Usage: Private
    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)

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^IBA(355.93 - [#355.93] Classic Fileman Calls,  GETS^DIQ
    355.9351 GET1^DIQ
    ^USC(8932.1 - [#8932.1] FIND1^DIC
    Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call