IBCNINSC ;AITC/DG/TAZ - GENERAL INSURANCE UTILITIES - INSURANCE COMPANY LOOKUP ;02/01/23
Source file <IBCNINSC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INSOCAS(ARRY,IBNE,IBLIMIT,IBSCR) | ; lookup for case insensitive
|
|
INSOCAS1 | ; entry point for loop back
|
|
SKIPLKUP | ; Bypass Lookup if spacebar-return used. IB*763/TAZ
|
|
INSOP | ; process return
|
|
INSOCASX | ; insurance lookup exit point
|
|
IBESET(IBSTR) | ; set IBE equal to array item
|
|
FNDSET(IBIN) | ; set string to be saved in the return array
|
|
ARSET(IBITM) | ; set item into ARRY
|
|
INSD(IBARY,IBO,IBLM) | ; display up to 5 insurances for selection at a time.
; IBARY - 5 items to display ; IBO - are there more to display ; IBLM - max number counter |
|
INSDA | ; loop back point
|
|
SELECTED(IBE) | ; Check to see if selected.
|
|
DISPADDR(IBNAME,IBNMIEN,IBNUM,IBPCK,IBRNM) | ; display the item with identifying info
|
|
HLPLST | ; list out Insurance cos. in 'B' index in groups of 20
|
|
HLPLSA | ; to list all without question
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | Classic Fileman Calls, RECALL^DILFD |