IBTRC ;ALB/AAS - CLAIMS TRACKING INSURANCE REVIEWS ; 27-JUN-1993
Source file <IBTRC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for IBT COMMUNICATIONS EDITOR from menu's
|
|
| ENQ | ||
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BLD | ; -- Build list of Insurnace contacts
|
|
| SET(X) | ; -- set arrays
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| AUTHN(IBTRC,LNG) | ; -- return autorization number (356.2, 2.02) - length and append *
|
|
| CREFN(IBTRC,LNG) | ; -- return call reference number (356.2, 2.01) - length and append *
|
|
| TYPE(IBTRC) | ; -- compute default type of contact
|
|
| TYPEQ | ||
| TCODE(IBTRC) | ; -- return type code for entry
|
|
| CONTCT(DA,Y) | ; -- screen for type of contact
; -- called by dic(s) on lookup of type of contact field in 356.2 |
|
| CONTQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|