IBCNINSU ;AITC/TAZ - GENERAL INSURANCE UTILITIES ;8/20/20 12:46p.m.
Source file <IBCNINSU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PAYER(PIEN,APP,FLDS,FLGS,ARRAY) | ;Payer Data Retrieval
|
|
PAYERX | ; Exit subroutine
|
|
PYRDEACT(PIEN) | ;Check if payer is deactivated
|
|
STOP() | ; Determine if user wants to exit out of the whole option
; Init vars |
|
STOPX | ; STOP exit pt
|
|
FOREIGN(VALUE,PIECES,BLANK) | ; check for ASCII chars outside (32-126 inclusive)
|
|
FILTER(STR,FLT) | ; Filter Insurance Name, Group Name or Number
|
|
FILTERX | ; Exit
|
|
VALIDDT(X) | ; Check for validate date (internal form of the date) ;IB*737/CKB
; Input: X - internal date, FM format ; Returns: Y - if date if NOT valid, returns -1 ; if the date is "" (null), returns a "" (null) ; if valid date, returns the internal date |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBE(365.12 - [#365.12] | GETS^DIQ |
365.121 | GETS^DIQ |
^IBE(365.13 - [#365.13] | FIND1^DIC |