Micro Focus Compiler Options C
The Micro Focus compiler options are listed here alphabetically, you may
browse them, click on the link to go directly to the error code or you may use
the search feature of your browser to search for the information.
- USE
-
USE is used in two ways.
COBOL verb
Compiler directive
- VERBBOSE
-
Sends messages from the Compiler to the screen.
> >-|---|-|----|--VERBOSE------------------- > <
|-/-| |-NO-|
Properties:
Default: VERBOSE (on DOS, Windows and OS/2)
NOVERBOSE (on UNIX)
Phase: Syntax check
Environment: All
$SET: No
Dependencies:
VERBOSE sets CONFIRM immediately.
Remarks:
When VERBOSE is specified, messages concerning accepted directives and the
size of code and data areas are displayed on the screen.
- VSC2
-
Specifies that words reserved in IBM VS COBOL II are to be treated as reserved
words, and enables selected features for compatibility with a given level of
that system.
> >-|---|-|-------VSC2--"integer"-|--------- > <
|-/-| ||----|-VSC2------------|
|-NO-|
Parameters:
integer The level of IBM VS COBOL II to be compatible with.
Properties:
Default: NOVSC2
Phase: Syntax check
Environment: All
$SET: Initial
Dependencies:
If (integer) > 1, VSC2"(integer)" sets DBSPACE and DBCS"2" immediately.
VSC2"3" sets ANS85 at end.
Remarks:
The possible values of (integer) are:
When VSC2 is specified without integer, VSC2"4" is assumed.
ANSI'85 status codes are used when VSC2"3" is selected.
Do not use the NOANS85 directive after VSC2"3"; it turns off some of the
ANSI'85 behavior turned on by VSC2"3".
- WARNING
-
Specifies the lowest severity level of errors to report.
> >-|---|-|----|-WARNING--|-"integer"-|----- > <
|-/-| | |-WARNINGS-| |
|-NO-|-WARNING--|-----------|
|-WARNINGS-|
Parameters:
integer 1, 2, or 3.
Properties:
Default: WARNING"1"
Phase: Syntax check
Environment: All
$SET: Any
Remarks:
The possible values of (integer) are:
- 1 - Only those of level U, S, or E.
- 2 - Only those of level U, S, E, or W.
- 3 - All levels, that is, levels U, S, E, W, and I.
With NOWARNING only those of level U or S are reported.
See also:
FLAGAS Compiler directive
FLAGCD Compiler directive
- WB
-
This directive is used with Micro Focus integrated products to make the
Compiler compatible with the integration. Because it might appear in the list
of settings, it is included for completeness. It is not intended for users'
applications, and its setting should not be changed.
> >-|---|-|----|--WB------------------------ > <
|-/-| |-NO-|
Properties:
Default: NOWB
Phase: Syntax check
Environment: All
$SET: No
Dependencies:
WB sets ANIM immediately.
- WB2
-
This directive is reserved for internal use by the system. Because it might
appear in the list of settings, it is included for completeness. It is not
intended for users' applications, and its setting should not be changed.
> >-|---|-|----|--WB2----------------------- > <
|-/-| |-NO-|
Properties:
Default: NOWB2
Phase: Syntax check
Environment: All
$SET: No
- WB3
-
This directive is reserved for internal use by the system. Because it might
appear in the list of settings, it is included for completeness. It is not
intended for users' applications, and its setting should not be changed.
> >-|---|-|----|--WB3----------------------- > <
|-/-| |-NO-|
Properties:
Default: NOWB3
Phase: Syntax check
Environment: All
$SET: No
- WRITELOCK or WRITE-LOCK
-
Makes the WRITE and REWRITE statements acquire a record lock when the program
is locking multiple records in a shared data file in a multi-user
environment.
> >-|---|-|----|-|-WRITELOCK--|------------- > <
|-/-| |-NO-| |-WRITE-LOCK-|
Properties:
Default: NOWRITELOCK
Phase: Syntax check
Environment: All
$SET: Initial
Remarks:
This directive is included for compatibility with earlier file-sharing
products. When writing new programs you should use the relevant locking syntax
rather than this directive.
- WRITETHROUGH or WRITETHRU
-
Specifies that disk writes are not to be buffered.
> >-|---|-|----|-|-WRITETHROUGH-|----------- > <
|-/-| |-NO-| |-WRITETHRU----|
Properties:
Default: NOWRITETHROUGH
Phase: Syntax check
Environment: All
$SET: Initial
Dependencies:
Requires CALLFH to be set.
Remarks:
This directive is not available in the Micro Focus COBOL system for DOS,
Windows and OS/2 without Toolset, Workbench or similar add-on products from
Micro Focus. Do not change its setting unless you have an appropriate
system.
When WRITETHRU is specified, the system does not buffer disk writes.
Using WRITETHRU helps improve the integrity of data files by ensuring that
every write operation goes to the disk file straight away, reducing the
possibility of losing data if your computer crashes. However, it also bypasses
all cacheing and blocking methods, resulting in poorer performance.
See also:
CALLFH Compiler directive
- XNIM
-
Makes the Compiler compile your program for animation as if ANIM had been
specified, and then invoke Animator.
> >-|---|-|----|--XNIM---------------------- > <
|-/-| |-NO-|
Properties:
Default: NOXNIM
Phase: Syntax check
Environment: All
$SET: No
Remarks:
You can use Animator directives with XNIM.
With XNIM, no object file is produced by default.
When it finishes, Animator does not save the files required for a subsequent
animation.
If the source file contains more than one nonnested program, it is the last
program in the source file that is animated.
- XOPEN
-
Specifies that words reserved under the X/Open definition of COBOL are to be
treated as reserved words.
> >-|---|-|-------XOPEN--"level"-|---------- > <
|-/-| ||----|-XOPEN----------|
|-NO-|
Parameters:
level Must be 3 or 4. The level of X/Open definition COBOL to be
compatible with.
Properties:
Default: NOXOPEN
Phase: Syntax check
Environment: All
$SET: Initial
Dependencies:
XOPEN sets RTNCODE-SIZE"4" immediately.
Remarks:
The possible values of are:
- 3 Compatible with X/Open Portability Guide 1988 (XPG-3)
- 4 Compatible with X/Open CAE Specification (XPG-4)
Specifying XOPEN with no parameter is the same as specifying XOPEN"4". XPG-4
specifies options for several environments. If available, the options
available are as follows:
- Single Byte Internationalization Support is enabled using the NLS
directive
- National Character Support is enabled using the DBCS"3" directive
See also:
DBCS Compiler directive
NLS Compiler directive
RTNCODE-SIZE Compiler directive
- XREF
-
Makes the Compiler produce a cross-reference listing.
> >-|---|-|----|--XREF---------------------- > <
|-/-| |-NO-|
Properties:
Default: NOXREF
Phase: Syntax check
Environment: All
$SET: Initial
Dependencies:
XREF sets RESEQ immediately.
Set to NOXREF at end by NOLIST and RNIM.
On UNIX, to produce the message "*End of cross reference listing" in the cross
reference listing you must also specify the verbose compiler option, -v.
Remarks:
This directive has no effect if the LIST directive is not specified.
To produce the cross-reference listing the Compiler needs extra work space on
the disk. The space needed depends on the number of data items and procedure
names and the number of times they are referenced.
When the XREF directive is specified, extra information is added to the end of
the .lst file produced:
- Name of the data item
- Type of the data item
- Line number where the data item was defined, shown as n#
- Line numbers where the data item was updated, shown as n*
- Line numbers where the data item was tested, shown as n?
- Number of times the data item appeared in the cross-reference listing,
shown as (X n)
- Procedure name
- Type of procedure
Example:
The following is an extract from a .lst file for a simple program:
1 working-storage section.
2 01 a pic 9(2).
3
4 procedure division.
5 main section.
6 move 1 to a
7 if a = 1 display "HELLO" end-if
8 stop run.
...
* A Numeric DISPLAY
* 2# 6* 7? (X 3)
*
* 1 data-names
*
* MAIN Section
* 5# (X 1)
*
*
* 1 procedure-names
* End of cross reference listing
The cross-referencing information shows that there is one data item, A, of
type numeric display, which is defined on line 2, updated on line 6, and
tested on line 7. The (X 3) at the end of the line refers to the number of
times the data item appears in the cross-reference listing. The procedure name
Main also appears in the listing, as a Section which is referenced only
once.
See also:
RESEQ Compiler directive
- ZEROLENGTHFALSE
-
Changes the way that class tests involving zero-length items are carried
out.
> >-|---|-|----|--ZEROLENGTHFALSE----------- > <
|-/-| |-NO-|
Properties:
Default: NOZEROLENGTHFALSE
Phase: Syntax check
Environment: All
$SET: Any
Remarks:
When ZEROLENGTHFALSE is set, all comparisons between zero-length group items,
and between zero-length items and figurative constants, return false; when it
is not set, they all return true.
For conformance to ANSI and SAA you must set ZEROLENGTHFALSE.
- ZEROSEQ
-
Causes leading zeros to appear in the sequence numbers in columns 1 thru
6.
> >-|---|-|----|--ZEROSEQ------------------- > <
|-/-| |-NO-|
Properties:
Default: NOZEROSEQ
Phase: Syntax check
Environment: All
$SET: Any
Remarks:
NOZEROSEQ suppresses these leading zeros.
- ZWB
-
Affects the operation of comparisons between integer numeric data items of
USAGE DISPLAY and alphanumeric literals or figurative constants.
> >-|---|-|----|--ZWB----------------------- > <
|-/-| |-NO-|
Properties:
Default: NOZWB
Phase: Syntax check
Environment: All
$SET: Any
Remarks:
The ZWB directive affects the range of comparisons that HOST-NUMCOMPARE
applies to. With ZWB on, only unsigned comparisons are affected. Otherwise,
all comparisons are affected.
See also:
HOST-NUMCOMPARE Compiler directive
