IBCNHUT1 ;ALB/GEF - HPID/OEID UTILITIES ;11-MAR-14
Source file <IBCNHUT1.m>
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. |
|
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 |
|
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. |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBCNH(367 - [#367] | Classic Fileman Calls |
^IBCNH(367.1 - [#367.1] | Classic Fileman Calls |