IBCNEUT4 ;DAOU/ESG - eIV MISC. UTILITIES ;17-JUN-2002
Source file <IBCNEUT4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ACTIVE(INSDA) | ; Is this insurance company currently active? 1:yes or 0:no
; Insurance company name returned in the second piece. ; Input: INSDA - insurance company ien |
|
ACTIVEX | ;
|
|
EXCLUDE(NAME) | ; This function determines if we should exclude the insurance
; company based on the name. ; This function returns 1 if we should exclude the insurance company. ; This function returns 0 if we should not exclude it (i.e. include it) |
|
EXCLUDX | ;
|
|
CLEAR(DA,EDITED,FORCE) | ; This procedure will clear the eIV status field from an
; Insurance Buffer entry (pass in the internal entry number of the ; buffer entry). If the FORCE variable is not passed then the eIV ; status will only be cleared if the existing status is an error status |
|
CLEARX | ;
|
|
INFO(IBBUFDA) | ; Return original and current buffer data
; This procedure will retrieve the following data from the buffer and ; from the transmission queue file. The buffer holds the current data ; and the TQ file holds the original buffer data. ; Input ; IBBUFDA - buffer internal entry number ; Output ; a pieced string as follows ; [1] Has this buffer entry been transmitted? 1/0 ; [2] Current buffer source of information (external) ; [3] Current buffer source of information (internal) ; [4] Current buffer insurance company name ; [5] Current buffer group number ; [6] Current buffer group name ; [7] Current buffer subscriber ID ; [8] Original buffer insurance company name ; [9] Original buffer group number ; [10] Original buffer group name ; [11] Original buffer subscriber ID |
|
INFOX | ;
|
|
VALID(INSIEN,PAYIEN,PAYID,SYMIEN) | ; Validate an Ins Co IEN
; Input parameter: INSIEN - Ins co IEN, passed by value ; Output parameters: PAYIEN, PAYID, SYMIEN, passed by reference |
|
VALIDX | ;
|
|
PAYER(PAYIEN) | ;
; Entry pt for Most Pop Payer (called by POP^IBCNEDE4) ; IB*2*601/DM comments and adjust return to add PAYIEN ; Additionally, called from INSERROR^IBCNEUT3() for MBI Inquiries ; Returned value consists of the following "^"-delimited pcs: ; [1] The IEN of the IIV SYMBOL File (#365.15) entry for ; the first error condition encountered by the function. ; This is only present if a valid Payer was not found. ; [2] Payer IEN if a Payer was found, "" otherwise ; [3] National ID if a Payer was found |
|
VALPYR(INSNM) | ;
; Payer Val'n - note: PAYIEN (payer IEN) must be set ; If INSNM="" val'n is for Most Pop Payer |
|
MULTNAME(TEXT,LIST) | ; Function to return an error message with a list of multiple names
; Input parameters: ; TEXT - Error text to display ; LIST - List of items, can be either a list of ins co ; names or National ID names ; Output parameter: Function value - Formatted list of items in 1 string |
FileNo | Call Tags |
---|---|
^IBA(355.33 - [#355.33] | EXTERNAL^DILFD |