HP 3000 Manuals

Directives by Category [ Micro Focus COBOL System Reference, Volume 2 ] MPE/iX 5.0 Documentation


Micro Focus COBOL System Reference, Volume 2

Directives by Category 

The categories of Compiler directives are as follows:

   *   Allowing language features

   *   Choosing run-time behavior

   *   Compiler control

   *   Compiling for debugging

   *   Format of your data files

   *   Object code, size and optimization

   *   Reserved directives

   *   SQL

In the following lists, an asterisk (*) by a directive means you need an
add-on product before you can use it.  If you use it without the
appropriate add-on product, the Compiler does not give an error message,
but the directive does not have the desired effect.

Allowing Language Features 

These directives change which language features your Compiler will
accept.

Add Features.   

CICS *              Allow CICS
CICS-CPY *          Insert COPY "CICS-CPY"
CONSTANT            Define constant
FCDREG              Registers for files
PREPROCESS          Source from preprocessor
REWRITE-LS          REWRITE on LINE SEQ
SEQCHK              Check line numbers
SOURCEFORMAT        Enable free-format code

Dialect.   

ANS85               ANSI'85
COBOL370            IBM COBOL/370
COMS85              ANSI'85 Communications Module
DBCHECK             Check for Double-Byte Characters
DBCS                Double-Byte Characters Support
DG                  Data General
DOSVS               IBM DOS/VS COBOL
FLAG                Flag for dialect
FLAGCD              Flag conflicting directives
FLAGSTD             Flag ANSI'85 level
IBM-MS              IBM COBOL VI, Microsoft COBOL V1.0
JAPANESE            Japanese syntax extensions
MF                  Micro Focus dialect level
MS                  Microsoft V1 or V2
NCHAR               Japanese syntax extensions
OSVS                IBM OS/VS COBOL
PC1                 IBM COBOL VI, Microsoft COBOL V1.0
RM                  Ryan-McFarland
SAA                 IBM Systems Application Architecture
VSC2                IBM VS COBOL II XOPEN \X/Open

Explicit Reserved Word Control.   

ADDRSV              Add reserved word
ADDSYN              Add synonym
MAKESYN             Make synonymous
OVERRIDE            Change meaning
REMOVE              Make unreserved

Features Affecting Speed.   

ALTER               Allow ALTER
FASTLINK            Restricted parameter specification
NESTCALL            Allow nested programs
QUAL                Allow qualification
QUALPROC            Allow qualification
SEG                 Allow Segmentation
TRICKLE             Restricted PERFORM
TRICKLECHECK        Flag "trickling"

Mainframe Compatibility.   

AREACHECK           Area A check
CONVERTPTR          REDEFINEable pointers
DBCSSOSI            DBCS Shift-in, - out characters
LIBRARIAN           Allow - INC
PANVALET            Allow ++INCLUDE
PROGID-COMMENT      Allow Comment in PROG-ID
RDEFPTR             Redefine POINTER
RDW                 Variable-length records

Choosing Run-time Behavior 

These directives change the definition of language features and so change
the logic of your program.  Some directives listed under Dialects in the
section Allowing Language Features also affect behavior.

ACCEPTREFRESH         ACCEPT statement
ARITHMETIC            Control intermediate arithmetic results.
ASSIGN                EXTERNAL or DYNAMIC
ASSIGN-PRINTER        Printer output
BWZSTAR               Blank With Zero and PIC *
CHARSET *             ASCII or EBCDIC
CHECKDIV              Allow divide by zero
CHECKNUM              Check numeric fields
COBFSTATCONV          File handler status codes
CONVERTRET            RETURNING item type
CURRENCY-SIGN         Currency sign
CURRENT-DATE          DDMMYY or MMDDYY
DEFAULTBYTE           Initialize Data Division
DEFAULTCALLS          CALL convention
DETECTLOCK            Detect record locks
EARLY-RELEASE         Enable Early User Syntax
FOLDCOPYNAME          Fold COPY-file names
HOST-NUMCOMPARE       Numeric comparisons
INITCALL              Execute a module
LOCKTYPE              Read locked records
LOGICOPT              Optimize CBL_logic routines
MFSCCS                Search a SCCS for a source file
NATIVE                Collating sequence
NLS                   National Language Support
PRINT-EXT             Printing extension
PROTECT-LINKAGE       Protect linkage items
REPORT-LINE           Report Writer line length
SIGNCOMPARE           EBCDIC numeric comparisons
SPZERO                Space = zero in numeric data items
STICKY-LINKAGE        Keep parameters linked
TERMPAGE              Pad out report page
TRACE                 Turn on READY TRACE
ZEROLENGTHFALSE       Zero length tests
ZWB                   Zero when blank numeric comparisons

Behavior Affecting Speed.   

ALIAS               Allow aliasing of Linkage Section items
ALIGN               Determine data alignment
BOUND               Bound checking of subscripts
BOUNDOPT            Optimize usage display subscripts
LINKCHECK           Check Linkage Section items
PARAMCOUNTCHECK     Allows subprograms parameters to be omitted
TABLESEGCROSS       Allow table subscripts to cross segment boundaries

Compatibility with Other COBOL Dialects.   

ALPHASTART          Numbering in ALPHABET
COMP-6              COMP-6 data items
DBSPACE             DBCS space
FP-ROUNDING         Floating-point items
OPTIONAL-FILE       All files optional
PERFORM-TYPE        Returns from PERFORM
RETRYLOCK           Retry locked record
STICKY-PERFORM      Behavior of PERFORM
SYMBSTART           Numbering in SYMBOLIC
TRUNC               Truncation of binary data items

Compatibility with Older Micro Focus Products.   

AUTOLOCK            Default locking
COMP                Computational subset
COMP-5              COMP-5 behavior
DE-EDIT             Numeric-edited behavior
EXTINDEX            External INDEX
FILESHARE           Default locking
IOCONV              READ...INTO/WRITE...FROM
OLDBLANKLINE        Effect of BLANK LINE
OLDINDEX            Indexes = subscripts
OLDNEXTSENTENCE     Effect of NEXT SENTENCE
OLDREADINTO         Effect of READ INTO
OLDSTRMIX           Allow PIC X and N
OLDSTRSUB           STRING subscripts
WRITELOCK           Default locking

Compatibility with Mainframes.   
APOST               Quotation mark = '
CASE                Case of program-name
DYNAM               Ignore CANCEL
FP-ROUNDING         Floating-point items
HOST-NUMMOVE        IBM MOVE statement
IBMCOMP             Word-storage mode
MAPNAME             IBM program-names
ODOSLIDE            Variable length table
ODOOSVS             ODO like OS/VS
OLDCOPY             ANSI'68 COPY
QUOTE               Quotation mark = "
SIGN                Included signs
SYSIN               SYSIN and SYSOUT maps

Compiler Control 

Error and Flag Messages.   

BRIEF               No message texts
EDITOR              Create error file for an editor
ERRLIST             Print messages only
ERRQ                Pause on error
FLAG                Flag outside the dialect
FLAGAS              Show flags as errors, warnings or information
FLAGCD              Conflicting directives
FLAGMIG             OSVS and VSC2 differences
FLAGQ               Pause on flag
FLAGSINEDIT         Flags in error file
FLAGSTD             Flag above ANSI'85 level
FLAG-CHIP           Flag chip problems
HIDEMESSAGE         Set message to hide
INFORETURN          Informational message return value
QUERY               Pause if COPY-file missing
STDERR              Write messages to STDERR
WARNING             Level of message to output

Listing.   

ASM                 List assembler code
ASMLIST             File for assembly listing
COPYEXT             COPY-file extensions
COPYLIST            List COPY-files
DATE                Date for listings
FORM                Page length
LIST                File for source listing
LISTPATH            Specify the list-file path
LISTWIDTH           Page width
MASM                For Microsoft MASM
MFCOMMENT           Alternate-format comments
PARAS               Paragraphs code addresses
PREPLIST            Preprocessor debug listing
PRINT               File for source listing
RAWLIST             Static listing
REF                 List paragraph's addresses
REFNO               Compiler number in listings
RESEQ               Generate line numbers
SEQCHK              Check line numbers
SETTING             Print directives
SHOW-DIR            Print directives files
SHOWSHUFFLE         Show 01SHUFFLE results
SOURCEASM           Source in assembly listing
TIME                Put time on listings
TRUNCCOPY           Truncate COPY-file names
VERBOSE             Display Compiler messages
XREF                Produce cross-reference listing
ZEROSEQ             Zeros in line numbers

Other Compile/Link Files.   

CANCELLBR *         Close COPY .LBR file
CONVSPACE           Source code spaces
COPYLBR *           COPY-library = .LBR file
DEFFILE             Produce .DEF file
DEFFILETYPE         TARGET for .def
DLL                 DLL or EXE
GNT *               File for object code
INT *               File for intermediate code
INTLEVEL *          Portability level
LINKLIB             Link-libraries
OBJ                 File for object code
OSEXT               Source file-name extension
PREPROCESS          Source from preprocessor

Screen.   

BELL                Bleep when stop
CONFIRM             Display directives
ECHO                Display errors
ECHOALL             Display full listing
SUPFF               No page-headings

Using Directives.   

ASSUME              Modify directives
CONFIRM             Display directives
DIRECTIVES          File of directives
SETTING             Print directives
SHOW-DIR            Print directives files
USE                 File of directives

Compiling for Debugging 

These directives make the Compiler create files containing extra
information about the program, for input to software used for debugging.

ANIM                For Animator
COBIDY              Path for Animator file
EANIM               For CodeView
EDITOR              Error-file for Editor
FLAGSINEDIT         Flags in error file
INCLUDE-FILLER      FILLER information in .idy
PROFILE             Create performance statistics (UNIX)
RNIM                Animate, don't compile
SOURCE-EXT          Source extension for CodeView
TRACE               Turn on READY TRACE
XNIM                Compile and animate

Add-on Products.   

ANALYZE *           For Analyze
BROWSE              Create .SBR file
CSI *               For CSI
GANIM *             For Xilerator
GNTANLZ*            .gnt code analyzer
STRUCT *            For Structure Animator

Format of Your Data Files 

These directives change the format in which data is stored in your data
files.

CALLFH *            External file handler
DATACOMPRESS        Data compression
FILETYPE            Data file format
IDXFORMAT           Indexed file structure
KEYCOMPRESS         Key compression
RECMODE             Fixed or variable length
SEQUENTIAL          Variants of SEQ organization

Object Code, Size and Optimization 

These directives change the object code produced without changing the
logic of your program.

External Handlers.   

CALLADIS *          External ACCEPT/DISPLAY Handler
CALLFH *            External file handler
CALLMAP *           External CALL Handler
CALLMCS *           External MCS Handler
CALLSORT *          External sort handler

File handling.   

CALLFH *            External file handler
CALLSORT *          External sort handler
WRITETHROUGH *      Unbuffered writes

Interprogram Communication.   

LITLINK             Literals public
LITVAL-SIZE         BY VALUE size
REGPARM             Parameter passing
RTNCODE-SIZE        RETURN-CODE size
SEGCROSS            Parameters on segments
SMALLDD             Parameters in segments

Object File Format.   

OMF                 OBJ or GNT
PUBLICENTRY         Public entry points
REALOVL             Overlaying from disk

Size and Speed.   

01SHUFFLE           Segment boundaries
64KPARA             Segment breaking
64KSECT             Segment breaking
BADSIGNS            Illegal sign nibble
CHIP                Chip architecture
CICSOPT *           Optimize BLL cells
DATALIT             Literals in data segment
EXPANDDATA          Program compression
FIXING              Optimizing jumps
LINKCOUNT           Number of linked items
LNKALIGN            Assume linkage items are aligned
MODEL               Model type
OBJLITE             Assembler-like code
OPT                 Optimization level
OPTSIZE             Optimize for size
OPTSPEED            Optimize for speed
PROTMODE            Protect mode only
SEG                 Segmentation
SEGSIZE             Automatic segmentation
TARGET              Chip-specific instructions.

For additional directives affecting optimization, see also Features 
Affecting Speed in the section Allowing Language Features and Behavior 
Affecting Speed in the section Choosing Run-time Behavior.

Reserved Directives 

These directives are reserved or are maintained for compatibility with
earlier products and have no effect.  Do not use them.

ADV                 No effect

Add-on Products.   

SQLECSPP *          HOST compatibility
WB *                Interface to other products

Internal or Future Use.   

ENSUITE *
FASTSORT
FILECASE
LOCALCOUNT
NESTLOCALSTORAGE
OLDFILEIO
WB2 *

SQL 

SQL                 Allow EXEC SQL
SQLACCESS           Name of access plan
SQLBIND             Name of bind file
SQLBLOCK            Record blocking
SQLCTRACE           List precompiler calls
SQLDB               Name of database
SQLDB2              Mainframe compatibility
SQLECSPP *          HOST compatibility
SQLFORMAT           Define date format
SQLINIT             Initialize and log on
SQLPASS             Give password
SQLPRE              Animate SQL programs
SQLPROT             Protect database
SQLRP               Compile on client
SQLSTDLVL           Standards level of DBM



MPE/iX 5.0 Documentation