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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNHUT1

Package: Integrated Billing

Routine: IBCNHUT1


Information

IBCNHUT1 ;ALB/GEF - HPID/OEID UTILITIES ;11-MAR-14

Source Information

Source file <IBCNHUT1.m>

Entry Points

Name Comments DBIA/ICR reference
HOD(ID,INS,IBHD) ; function to determine if the data is an HPID, an OEID, or an invalid ID
; HPID/OEID is a 10 character string with the 1st digit being 7 for HPID & 6 for OEID
; and the 10th digit being a LUHN Check digit. If the optional INS value is passed, an
; additional validation check will be done, comparing the ID to what is currently on file
; for that insurance company ien.
  • ICR #6061
    • Status: Active
    • Usage: Private
    HPD(INS,V) ; this function returns the HPID/OEID for an insurance company
    ; The user must pass INS = Insurance Company ien in file 36
    ; V = 1 means run validation checks (not required). Will append an '*' to the HPID if it does NOT pass validation checks
  • ICR #6061
    • Status: Active
    • Usage: Private
    INS(ID,TYP,IBID) ; this function finds the ien of the insurance company entry in file 36 using the NIF ID or the HPID/OEID
    ; TYPE=N for NIF or H for HPID/OEID
    ; returns data array: IBID(0)=number of entries with this ID, IBID(n)=IEN^ID^Insurance Company name
    ; TO CALL: $$INS^IBCNHUT1(ID,TYP,.ARRAY NAME)
    ; 11/7/14 - cross-reference format changed with HPID Build 2, now AHOD & ANIF
    NIF(INS) ; this function finds the NIF ID for an insurance company using the ien
    ; INS=Insurance Company ien in file 36
    SHP(INS) ; this function determines if the entry is a CHP or SHP
    ; INS = insurance company ien in file 36. Returns C for CHP (Controlling Health Plan) and S for SHP (Sub-Health Plan)
    PHP(INS) ; this function returns the parent HPID insurance company if applicable
    VID(INS) ; this function gets the VA National ID for the insurance company/payer
    ;
    UID(INS) ; this function creates the Vista Unique Site ID to send to the NIF
    ; returns station#_"."_insurance company ien
    TRG1(IEN,ST) ; this function sets the trigger for the DATE OF FUTURE PURGE (.1) field in file #367.1
    UNSOL(HLID,RTY,ID,DATA) ; this code handles unsolicited responses which only have the NIF ID, no insurance ien
    ; If there are multiple entries in file 36 with the same NIF ID, this code will update all of them.
    STAT(IEN,STAT) ; updates field .05 in file 367 (PROCESSING STATUS)
    CKDGT(ID) ; Function to calculate and return the check digit of an HPID
    ; The check digit is calculated using the Luhn Formula for
    ; Modulus 10 "double-add-double" Check Digit. A value of 24 is
    ; added to the total to account for the implied USA (80840) prefix.
    EXR(INS) ; Purge EXR records if the EDI numbers get updated.
    ; if the insurance company has an EXR response (Exception Report Reject), and the EDI#'s
    ; get updated, purge the EXR response.

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $$HOD^IBCNHUT1(X,INS)
    • Line Location: HOD+7

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^IBCNH(367 - [#367] Classic Fileman Calls
    ^IBCNH(367.1 - [#367.1] Classic Fileman Calls
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call