IBCNINSL ;AITC/TAZ/VAD - GENERAL INSURANCE UTILITIES - LOOKUP ;8/20/20 12:46p.m.
Source file <IBCNINSL.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 |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 3 | IBCNAU1 IBCNIUF IBCNIUR1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DIVISION | ;
|
|
CLINIC | ;
|
|
PATIENT | ;
|
|
INST(ARRAY,PROMPT) | ; Institution/Facility Lookup
|
|
INSTS(IEN) | ;Screen for Institution IA #2171
|
|
INSTSQ | ;Exit Screen
|
|
PAYER(APP,ARRAY) | ;Payer Lookup
|
|
LOOKUP(FILE,IBPROMPT,ARRAY,IBALL,IBONE,SCREEN) | ; Perform a lookup on the selected Dictionary
|
|
FIRST | ||
SET | ;Set into or remove from ARRAY
|
|
SETQ | ;
|
|
;Display Help
|
||
ERR | ||
QUIT |
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 |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP($J | LOOKUP+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APP | PAYER~, PAYER+8 |
ARRAY | INST~, INST+8*, INSTS+7~, PAYER~, PAYER+10*, LOOKUP~, LOOKUP+15*, LOOKUP+16*, FIRST+3, SET+4 , SET+6, SET+7, SET+8, SET+9, SET+10, QQ+7, QQ+10 |
DIC | LOOKUP+14~, FIRST+1*, FIRST+4*, FIRST+19*, QQ+1~, QQ+12* |
DIC("S" | FIRST+1*, FIRST+5*, FIRST+20*, QQ+12* |
DIC(0 | FIRST+1*, FIRST+4*, FIRST+19*, QQ+12* |
DIR | LOOKUP+14~, FIRST+2!, FIRST+15! |
DIR("?" | FIRST*, FIRST+14* |
DIR("A" | FIRST*, FIRST+14* |
DIR("B" | FIRST* |
DIR(0 | FIRST*, FIRST+14* |
FAC | INST+5~, INST+8 |
FILE | LOOKUP~, FIRST+1, FIRST+4, FIRST+19, QQ+12 |
IBALL | LOOKUP~, FIRST, FIRST+3, FIRST+9*, QQ+4 |
IBI | LOOKUP+14~, LOOKUP+16*, FIRST+6*, FIRST+12* |
IBJ | QQ+1~, QQ+10* |
IBJ1 | QQ+1~, QQ+10* |
IBONE | LOOKUP~, FIRST+8 |
IBPROMPT | LOOKUP~, LOOKUP+15, FIRST, FIRST+14, SET+7, QQ+2, QQ+5 |
IBUTNI | INST+5~, PAYER+7~, LOOKUP+16*, SET+3, SET+8, SET+9, QQ+10 |
IEN | INSTS~, INSTS+9, INSTS+10, INSTS+11 |
J | SET+1~, SET+3*, SET+4, SET+6 |
OK | INSTS+7~, INSTS+8*, INSTS+13*, INSTSQ+1 |
PAYER | PAYER+7~, PAYER+10 |
PRNT | INSTS+7~, INSTS+12*, INSTS+13 |
PROMPT | INST~, INST+7, QQ+1~, QQ+2*, QQ+4, QQ+6 |
PSTA | INSTS+7~, INSTS+12*, INSTS+13 |
QUIT | LOOKUP+14~, LOOKUP+16*, FIRST+12, FIRST+16* |
REMOVE | LOOKUP+14~, FIRST+13*, FIRST+18*, SET+2 |
SCREEN | INST+6*, INST+7, PAYER+7~, PAYER+8*, PAYER+9, LOOKUP~, FIRST+1, FIRST+5, FIRST+20, QQ+12 |
STA | INSTS+7~, INSTS+10*, INSTS+12, INSTS+13 |
U | INSTS+12, SET+7, SET+8, SET+9, SET+10 |
X | LOOKUP+14~, FIRST+3, FIRST+6*, FIRST+16, FIRST+17, FIRST+18* |
Y | LOOKUP+14~, LOOKUP+16*, FIRST+6, FIRST+21, SET+3, SET+7, SET+8, SET+9, SET+10, ERR* , QUIT* |
Y(0 | SET+3, SET+7, SET+8, SET+9, SET+10 |