IBCNINSC ;AITC/DG/TAZ - GENERAL INSURANCE UTILITIES - INSURANCE COMPANY LOOKUP ;02/01/23
Source file <IBCNINSC.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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 |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | Classic Fileman Calls, RECALL^DILFD |
Name | Line Occurrences |
---|---|
$$FNDSET | SKIPLKUP+13, INSDA+16 |
$$IBESET | SKIPLKUP+12, INSDA+13 |
$$INSD | SKIPLKUP+24, SKIPLKUP+31 |
$$SELECTED | INSOCAS1+18, INSDA+14 |
ARSET | SKIPLKUP+14, INSOP+3 |
DISPADDR | SKIPLKUP+17, SKIPLKUP+25, SKIPLKUP+32, INSDA+5, HLPLSA+9 |
HLPLSA | HLPLST+8 |
INSDA | INSDA+14 |
INSOCAS1 | INSOCAS1+15, INSOCAS1+18, SKIPLKUP+4, SKIPLKUP+11, INSOP+1, INSOP+2, INSOP+7 |
INSOCASX | INSOCAS1+13, INSOCAS1+23, SKIPLKUP+4, SKIPLKUP+11, INSOP+4, INSOP+5 |
INSOP | SKIPLKUP+23 |
SKIPLKUP | INSOCAS1+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRY | INSOCAS~, INSOCAS+33!*, INSOCAS1+3, INSOCAS1+13*, SKIPLKUP+6, SKIPLKUP+7*, INSOP+5, ARSET+5* |
ARRY( | ARSET+5*, SELECTED+2 |
C | INSOCAS+20~ |
DIC | INSOCAS1+18~*, DISPADDR+8~, DISPADDR+11*, HLPLST+2~, HLPLSA+1~ |
DIR | INSOCAS+20~, INSOCAS1+7!, INSOCASX+2!, INSD+6~, INSDA+1!, HLPLST+2~, HLPLST+5!, HLPLSA+1~, HLPLSA+2!, HLPLSA+11! |
DIR("?" | INSOCAS1+10*, INSDA+6* |
DIR("??" | INSOCAS1+11* |
DIR("A" | INSOCAS1+9*, INSDA+7*, INSDA+9*, HLPLST+5* |
DIR(0 | INSOCAS1+8*, INSDA+2*, HLPLST+5*, HLPLSA+11* |
DIROUT | INSOCAS+20~, INSOCAS1+7!, INSOCAS1+13, INSOCASX+2!, INSD+6~ |
DIRUT | INSOCAS+20~, INSOCAS1+7!, INSOCASX+2!, INSD+6~ |
DT | INSOCAS+25* |
DTOUT | INSOCAS+20~, INSOCAS1+7!, INSOCAS1+13, INSOCASX+2!, HLPLST+2~, HLPLSA+1~, HLPLSA+12 |
DUOUT | INSOCAS+20~, INSOCAS1+7!, INSOCAS1+13, INSOCASX+2!, HLPLST+2~, HLPLSA+1~, HLPLSA+12 |
DUZ | IBESET+7 |
IBA | INSOCAS+20~, INSOCAS1+3*, INSOCAS1+9, INSOCAS1+34*, INSOCAS1+43, INSOCASX+2!, IBESET+4~*, IBESET+5*, IBESET+7, IBESET+8 , INSD+6~, INSDA+2*, INSDA+3, INSDA+5, HLPLST+2~, HLPLSA+1~, HLPLSA+2*, HLPLSA+3*, HLPLSA+5, HLPLSA+9 |
IBAA | DISPADDR+8~, DISPADDR+16*, DISPADDR+17* |
IBAB | DISPADDR+8~, DISPADDR+17* |
IBAC | DISPADDR+8~, DISPADDR+16* |
IBARY | INSD~ |
IBARY( | INSDA+2, INSDA+3 |
IBARY(0 | INSD+5 |
IBB | INSOCAS+20~, INSOCAS1+34*, INSOCAS1+35, INSOCASX+2!, INSD+6~, HLPLST+2~, HLPLSA+1~, HLPLSA+5*, HLPLSA+6, HLPLSA+7 , HLPLSA+9 |
IBC | INSOCAS+20~, INSOCAS1+20*, INSOCAS1+21, INSOCAS1+42*, INSOCAS1+43, INSOCAS1+44, INSOCASX+2!, HLPLST+2~, HLPLSA+1~, HLPLSA+2* , HLPLSA+8*, HLPLSA+10 |
IBCT | INSOCAS+20~, SKIPLKUP+21*, SKIPLKUP+23, SKIPLKUP+24, SKIPLKUP+27, SKIPLKUP+29, SKIPLKUP+30, INSOCASX+2! |
IBD | INSOCAS+20~, SKIPLKUP+28*, SKIPLKUP+29, INSD+6~, INSDA+3*, INSDA+4, INSDA+5, HLPLST+2~, HLPLST+4*, HLPLST+5 , HLPLSA+1~ |
IBE | SKIPLKUP+12*, SKIPLKUP+13, SKIPLKUP+16, SKIPLKUP+17, INSD+6~, INSDA+13*, INSDA+14, INSDA+16, SELECTED~, SELECTED+2 |
IBF | FNDSET+4~*, FNDSET+5*, FNDSET+6 |
IBFILTER | INSOCAS+20~, INSOCAS1+6*, INSOCAS1+35, INSOCASX+2! |
IBFND | INSOCAS+20~, INSOCAS1+22*, INSOCAS1+24*, INSOCAS1+32*, SKIPLKUP+4*, SKIPLKUP+13*, SKIPLKUP+14, SKIPLKUP+21*, SKIPLKUP+24*, SKIPLKUP+25 , SKIPLKUP+27, SKIPLKUP+28*, SKIPLKUP+31*, SKIPLKUP+32, INSOP+1, INSOP+2, INSOP+3, INSOCASX+2!, INSDA+11*, INSDA+16* , INSDA+17 |
IBI | INSOCAS+20~, INSOCAS+30*, INSOCAS+31*, SKIPLKUP+27*, INSOCASX+2! |
IBIN | FNDSET~, FNDSET+5 |
IBINDX | INSOCAS+20~, INSOCAS1+32*, INSOCAS1+33, INSOCAS1+36, INSOCAS1+44 |
IBITM | ARSET~, ARSET+4, ARSET+5 |
IBJ | INSOCAS+20~, SKIPLKUP+27*, SKIPLKUP+29, INSOCASX+2! |
IBK | INSOCAS+20~, SKIPLKUP+24*, SKIPLKUP+26*, SKIPLKUP+27*, SKIPLKUP+28, SKIPLKUP+29, SKIPLKUP+30, INSOCASX+2! |
IBL | INSOCAS+20~, SKIPLKUP+29*, SKIPLKUP+30, SKIPLKUP+31, INSOCASX+2! |
IBLIMIT | INSOCAS~, INSOCAS+28*, INSOP+5, INSOP+6 |
IBLKNM | INSOCAS+21~, INSOCAS1+26*, INSOCASX+3! |
IBLKUNM | INSOCAS+21~, INSOCAS1+26*, INSOCAS1+35, INSOCASX+3! |
IBLKX | INSOCAS+21~, INSOCAS+30! |
IBLKX( | INSOCAS+30*, DISPADDR+17 |
IBLM | INSOCAS+21~, SKIPLKUP+30*, SKIPLKUP+31, INSOCASX+3!, INSD~, INSDA+2 |
IBM | INSD+6~, INSDA+4*, INSDA+5 |
IBN | INSOCAS+21~, INSOCAS1+38*, INSOCAS1+39, INSOCAS1+41, INSOCAS1+43, INSOCAS1+44, INSOCAS1+45, INSOCASX+3! |
IBNAME | DISPADDR~, DISPADDR+14 |
IBNE | INSOCAS~, INSOCAS+28*, SKIPLKUP+6, SKIPLKUP+18, INSOP+4 |
IBNMA | INSOCAS+21~, INSOCAS1+32*, INSOCAS1+33*, INSOCAS1+34, INSOCAS1+36, INSOCASX+3! |
IBNMIEN | DISPADDR~, DISPADDR+9, DISPADDR+10, DISPADDR+16 |
IBNML | INSOCAS+21~, INSOCAS1+26*, INSOCASX+3! |
IBNMR | INSOCAS+21~, INSOCAS1+32*, INSOCAS1+36*, INSOCAS1+37, INSOCAS1+38, INSOCASX+3! |
IBNUM | DISPADDR~, DISPADDR+11*, DISPADDR+13 |
IBO | INSD~, INSDA+8, INSDA+9 |
IBOK | INSOCAS+21~, INSOCAS1+30*, INSOCAS1+33*, INSOCAS1+35*, SKIPLKUP+4*, SKIPLKUP+6, SKIPLKUP+7*, SKIPLKUP+11*, SKIPLKUP+18*, INSOCASX+3! , HLPLST+2~, HLPLSA+1~, HLPLSA+3*, HLPLSA+5, HLPLSA+12* |
IBOK1 | INSOCAS+21~, INSOCAS1+39*, INSOCAS1+40, INSOCASX+3! |
IBOK2 | INSOCAS+21~ |
IBPCK | DISPADDR~, DISPADDR+11*, DISPADDR+12 |
IBPROMPT | INSOCAS+21~, INSOCAS+27*, INSOCAS1+3, INSOCASX+3! |
IBR | INSOCAS+21~, SKIPLKUP+21*, SKIPLKUP+22*, SKIPLKUP+27, INSOCASX+3! |
IBRNM | INSOCAS+21~, DISPADDR~, DISPADDR+11*, DISPADDR+15 |
IBSBR | INSOCAS+21~, INSOCAS1+2*, INSOCAS1+19*, SKIPLKUP+16, SELECTED+2 |
IBSCR | INSOCAS~, INSOCAS+28*, INSOCAS1+39 |
IBSTR | IBESET~, IBESET+5 |
IBTIC | INSOCAS+21~, INSOCAS1+15*, INSOCAS1+16*, INSOCAS1+17* |
IBTMPA | INSOCAS+21~, SKIPLKUP+22!, SKIPLKUP+23*, SKIPLKUP+24, SKIPLKUP+27!, SKIPLKUP+31, INSOCASX+3! |
IBTMPA( | SKIPLKUP+28* |
IBTMPA(0 | SKIPLKUP+23! |
IBTMPFIL | INSOCAS+22~, INSOCAS1+4*, INSOCAS1+20, INSOCAS1+21, INSOCAS1+28, INSOCAS1+30, INSOCAS1+42, INSOCAS1+43, INSOCAS1+44, SKIPLKUP+4 , SKIPLKUP+11, SKIPLKUP+12, SKIPLKUP+21, SKIPLKUP+23, SKIPLKUP+28, INSOCASX+1, INSOCASX+3!, INSDA+13 |
IBTMPTRK | INSOCAS+22~, INSOCAS1+5*, INSOCAS1+21, INSOCAS1+29, INSOCAS1+41, INSOCAS1+45 |
IBTN | INSOCAS+22~, SKIPLKUP+21*, SKIPLKUP+22, SKIPLKUP+23*, INSOCASX+3! |
IBTR | INSOCAS1+16~*, INSOCAS1+17 |
IBX | INSOCAS+22~, INSOCAS1+22*, INSOCAS1+25*, SKIPLKUP+16 |
IBXN | INSOCAS+22~, SKIPLKUP+16*, SKIPLKUP+17 |
SEL | SELECTED+1~*, SELECTED+2*, SELECTED+3 |
U | INSOCAS+24*, INSOCAS1+13, INSOCAS1+21, INSOCAS1+35, INSOCAS1+43, INSOCAS1+44, SKIPLKUP+16, SKIPLKUP+17, SKIPLKUP+25, SKIPLKUP+27 , SKIPLKUP+32, INSOP+1, IBESET+5, FNDSET+5, INSDA+4, INSDA+5, INSDA+11, SELECTED+2, HLPLST+4, HLPLST+7 |
X | INSOCAS+22~, INSOCAS1+18~*, INSOCAS1+22, INSOCAS1+25, INSOCAS1+26*, SKIPLKUP+7, INSOCASX+3!, INSD+6~, DISPADDR+8~, HLPLST+2~ , HLPLSA+1~ |
Y | INSOCAS+22~, INSOCAS1+13, INSOCAS1+15, INSOCAS1+16, INSOCAS1+18, INSOCAS1+21, INSOCAS1+23, INSOCAS1+26, INSOCAS1+39*, INSOCASX+3! , INSD+6~, INSDA+11, INSDA+12, INSDA+13, DISPADDR+8~, DISPADDR+16*, HLPLST+2~, HLPLST+7, HLPLSA+1~ |