Overview [ Micro Focus COBOL System Reference, Volume 1 ] MPE/iX 5.0 Documentation
Micro Focus COBOL System Reference, Volume 1
Overview
The Adis module can be configured to change behavior in many areas. Full
details on Adis are provided in the chapter Adis. Adis contains an
internal set of defaults which it uses unless the file adisctrl is
present. Configuration changes adisctrl, not the defaults internal to
Adis.
adisctrl is the configuration database for the Adis module. It can hold
up to a maximum of 16 configurations, any of which are available to you.
An entry at the start of adisctrl determines which configuration Adis
uses.
adisctrlcontains all of the machine-independent information required by
Adis. This includes:
* How ACCEPT and DISPLAY statements are to be executed.
* The messages output by Adis in response to errors.
* Which keys are enabled or disabled.
You can alter any of the configurations held in adisctrl using the
configuration utility Adiscf. This program is designed around a
hierarchy of menus. These menus appear at the bottom of your screen and
list the options available to you at any time.
The adisctrl file that is supplied with your COBOL system contains a
number of configurations that are set up to emulate different dialects of
COBOL. Most of the time you do not need to do anything other than use
Adiscf to select which one of these configurations you wish to use (use
the Choose option on the main menu of Adiscf).
The configurations supplied with
your COBOL system include:
* Default Configuration.
This is exactly the same as the configuration built into Adis that
is used at run time if no adisctrl file is found. This provides
the standard mode of operation during execution of ACCEPT and
DISPLAY statements.
* RM Compatibility.
This configuration should be selected if your program was
originally written in RM/COBOL V2.0. This configuration provides
a very close emulation of the action of ACCEPT and DISPLAY
statements in RM COBOL.
* DG ICOBOL Compatibility.
This is provided to emulate the action of ACCEPT and DISPLAY
statements under Data General's ICOBOL.
*
IBM V1.0 Compatibility.
This is provided to emulate IBM COBOL V1.0. It is not a close
emulation, especially in the action of ACCEPT operations into
numeric and numeric-edited fields.
*
Microsoft V2 Compatibility.
This is provided to emulate Microsoft COBOL V2.2. It is not a
close emulation, especially in the action of ACCEPT operations
into numeric and numeric-edited fields. See the Microsoft COBOL
V2.2 Source Compatibility Part in your Compatibility Guide for
further details.
If you do want to create your own configuration, we recommend that you do
not change any of the supplied configurations directly. Instead, you
should save the configuration you want to change under a different name
and make changes to that.
If you create a custom adisctrl file, it must be accessible to your
program (in the current directory or the COBDIR directory) at run time.
If it is not, defaults are used.
MPE/iX 5.0 Documentation