IBCNEUT3 ;DAOU/AM - eIV MISC. UTILITIES ;12-JUN-2002
Source file <IBCNEUT3.m>
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?
|
FileNo | Call Tags |
---|---|
^IBE(350.9 - [#350.9] | GET1^DIQ |
^IBA(355.33 - [#355.33] | GET1^DIQ |
^IBE(365.15 - [#365.15] | FIND1^DIC |