NC.MESSAGE Function

Previous  Top  Next

Description

This routine is used to display an error or general message in various formats and positions on the screen.

Syntax

Uses the common area to pass the required processing information:

Common Variable Description of how the variable is used Ranges Param Type/style of message 0 to 999 EMSG Error message text **

The following type/styles are available:

Style No. Description 0 Message displayed centrally on error line. * 1 Displays the field HEAD on top line after clearing the screen. 2 Displays "System Now " followed by the EMSG content. * 3 Functions as 0 4 Message centralised vertically and horizontally and placed in a box. * 5 Functions as 0 6 Functions as 0 7 Message displayed centrally on the prompt line. 8 Message displayed centrally on the error line. 9 Functions as 7 … All others except the following attach the Style number to the beginning of the error message and then function as 0 50 Functions as 7 99 Defaults to "Record being updated by another port"; functions as 0 100 Functions as 8 150 Functions as 4 151 Functions as 151

Remarks

* These options wait for ENTER to confirm before returning to the calling process.

** MSG can be any text or [nnn] where nnn is a line number within the record MESSAGE in the file _CONTROL that contains the text.

The repetitions and "unused" message styles provide scope for expansion of the error/message handling in the future.

An alternative routine is also supplied that does not use the common area to pass data but fields are defined within the CALL statement. See the next page MV.DISP. The routines are slightly different.