IBCNEUT3 ;DAOU/AM - eIV MISC. UTILITIES ;12-JUN-2002
Source file <IBCNEUT3.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 |
|---|---|---|
| INSERROR(TYPE,IEN,ERRFLG,ARRAY) | ;
; Formal parameters: ; TYPE: Type of IEN passed in the second parameter. ; Either "B" for "Buffer" or "I" for "Insurance". ; Mandatory, passed by value. ; IEN: IEN to perform a lookup for. Mandatory, passed by value. ; ERRFLG: Error flag. "" or 0 if no extended error information is ; requested, 1 if extended error information is requested. ; Optional (the default is 0), passed by value. ; ARRAY: Array of error messages returned by the function. ; Optional, passed by reference. Whatever is passed in will be ; KILLed by the function. The structure of the return array is ; as follows: ; ARRAY # of error messages passed back ; ARRAY(error#) Data for this error number, including error ; number 1 present in the value returned by the function. ; [1] IEN of the error code in the symbol file ; [2] # of lines in the error message text ; ARRAY(error #,line #) - One line of error message text ; up to 70 characters long |
|
| EXIT | ; Main function exit point
|
|
| MANUAL(IEN) | ; Need to do a manual insurance verification?
|
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | MANUAL+3 |
| $$GET1^DIQ | INSERROR+40, MANUAL+4 |
| $$AMLOOK^IBCNEUT1 | INSERROR+75 |
| $$ACTIVE^IBCNEUT4 | INSERROR+48, INSERROR+61, INSERROR+106 |
| $$PAYER^IBCNEUT4 | INSERROR+40 |
| VALID^IBCNEUT4 | INSERROR+50, INSERROR+71, INSERROR+86, INSERROR+117 |
| $$MBICHK^IBCNEUT7 | INSERROR+40 |
| $$ERROR^IBCNEUT8 | INSERROR+37, INSERROR+38, INSERROR+39, INSERROR+42, INSERROR+49, INSERROR+54, INSERROR+61, INSERROR+65, INSERROR+67, INSERROR+69 , INSERROR+84, INSERROR+93, INSERROR+103, INSERROR+106, INSERROR+111, INSERROR+113, INSERROR+115 |
| FINDPAY^IBCNEUT8 | INSERROR+63, INSERROR+108 |
| INSIEN^IBCNEUT8 | INSERROR+56, INSERROR+79 |
| $$TRIM^XLFSTR | INSERROR+53, INSERROR+79, INSERROR+98 |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| ^IBA(355.33 - [#355.33] | GET1^DIQ |
| ^IBE(365.15 - [#365.15] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | INSERROR+42, INSERROR+90, INSERROR+98 |
| ^IBA(355.33 - [#355.33] | INSERROR+39, INSERROR+53 |
| Name | Line Occurrences |
|---|---|
| $$MANUAL | INSERROR+41 |
| EXIT | INSERROR+37, INSERROR+38, INSERROR+39, INSERROR+41, INSERROR+42, INSERROR+45, INSERROR+54, INSERROR+59, INSERROR+75, INSERROR+93 , INSERROR+102, INSERROR+106, INSERROR+111, INSERROR+113, INSERROR+115 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | INSERROR~, INSERROR+35! |
| ERRFLG | INSERROR~, INSERROR+33* |
| IEN | INSERROR~, INSERROR+38, INSERROR+39, INSERROR+40, INSERROR+41, INSERROR+42, INSERROR+48, INSERROR+50, INSERROR+53, MANUAL~ , MANUAL+4 |
| INSIEN | INSERROR+29~, INSERROR+56, INSERROR+59, INSERROR+63, INSERROR+65, INSERROR+75, INSERROR+79, INSERROR+81, INSERROR+90*, INSERROR+93 , INSERROR+95*, INSERROR+98, INSERROR+108, INSERROR+111 |
| INSIEN( | INSERROR+95 |
| INSIEN("" | INSERROR+61, INSERROR+84, INSERROR+86, INSERROR+106 |
| INSNAME | INSERROR+29~, INSERROR+53*, INSERROR+54, INSERROR+56, INSERROR+61, INSERROR+65, INSERROR+67, INSERROR+69, INSERROR+75, INSERROR+84 , INSERROR+90, INSERROR+93, INSERROR+103, INSERROR+106, INSERROR+111 |
| MANUAL | MANUAL+1~, MANUAL+2*, MANUAL+4*, MANUAL+5 |
| NAME | INSERROR+76~, INSERROR+79*, INSERROR+96~, INSERROR+98*, INSERROR+99 |
| NAMEARR | INSERROR+29~, INSERROR+75, INSERROR+84, INSERROR+103 |
| NAMEARR( | INSERROR+79, INSERROR+99* |
| NAMEARR("" | INSERROR+102, INSERROR+113, INSERROR+115 |
| PAYID | INSERROR+29~, INSERROR+31*, INSERROR+50, INSERROR+63, INSERROR+69*, INSERROR+71, INSERROR+86, INSERROR+108, INSERROR+111*, INSERROR+115* , INSERROR+117, EXIT+1 |
| PAYID( | INSERROR+71, INSERROR+117 |
| PAYID("" | INSERROR+67, INSERROR+69, INSERROR+71, INSERROR+113, INSERROR+115, INSERROR+117 |
| PAYIEN | INSERROR+29~, INSERROR+31*, INSERROR+50, INSERROR+71, INSERROR+86, INSERROR+117, EXIT+1 |
| STIEN | MANUAL+1~, MANUAL+3*, MANUAL+4 |
| SYMIEN | INSERROR+29~, INSERROR+31*, INSERROR+37*, INSERROR+38*, INSERROR+39*, INSERROR+42*, INSERROR+49*, INSERROR+50, INSERROR+54*, INSERROR+61* , INSERROR+65*, INSERROR+67*, INSERROR+69*, INSERROR+71, INSERROR+84*, INSERROR+86, INSERROR+93*, INSERROR+103*, INSERROR+106*, INSERROR+111* , INSERROR+113*, INSERROR+115*, INSERROR+117, EXIT+1, MANUAL+4* |
| TMP | INSERROR+46~, INSERROR+48*, INSERROR+49 |
| TYPE | INSERROR~, INSERROR+37, INSERROR+39, INSERROR+40, INSERROR+41, INSERROR+42, INSERROR+45 |
| U | INSERROR+49, INSERROR+53, INSERROR+98, EXIT+1 |
