◄Up► ◄Contents► ◄Index► ◄Back► ──────────────────────────────────────────────────────────────────────────── These directives change the definition of language features and so change the logic of your program. Some directives listed under "Dialects" in ◄Allowing Language Features► also affect behavior. ┌─────────────────────────────────────┐┌──Behavior affecting speed or size┐ │◄ACCEPTREFRESH► ACCEPT statement ││◄ALIAS► Subscripts │ │◄ARITHMETIC► Evaluate expressions││◄ALIGN► Data alignment │ │◄ASSIGN► EXTERNAL or DYNAMIC ││◄BOUND► Bound-check │ │◄ASSIGN-PRINTER► Printer output ││◄BOUNDOPT► Optimize tables│ │◄CHARSET►* ASCII or EBCDIC ││◄LINKCHECK► Check LS items │ │◄CHECKDIV► Allow divide by zero││◄PARAMCOUNTCHECK► Omit params │ │◄CHECKNUM► Check numeric fields││◄TABLESEGCROSS► Segment crossed│ │◄COBFSTATCONV►* EXTFH status codes │└──────────────────────────────────┘ │◄CONVERTRET► RETURNING item type │ │◄CURRENCY-SIGN► Currency sign │┌──Mainframe Compatibility─────────┐ │◄CURRENT-DATE► DDMMYY or MMDDYY ││◄APOST► QUOTE = ' │ │◄DEFAULTBYTE► Initialize Data Divn││◄CASE► Case of program-name │ │◄DEFAULTCALLS► CALL convention ││◄DYNAM► Ignore CANCEL │ │◄DETECTLOCK► Detect record locks ││◄HOST-NUMMOVE► IBM MOVE statements│ │◄EARLY-RELEASE► Early User Syntax ││◄IBMCOMP► Word-storage mode │ │◄FOLDCOPYNAME► Fold COPY file names││◄MAPNAME► IBM prog-names │ │◄HOST-NUMCOMPARE►Numeric comparisons ││◄ODOSLIDE► Variable length table│ │◄INITCALL► Execute a module ││◄OLDCOPY► ANSI'68 COPY │ │◄LOCKTYPE► Read locked records ││◄QUOTE► QUOTE = " │ │◄MFSCCS►* Search SCCS for file││◄SIGN► Included signs │ │◄NATIVE► Collating sequence ││◄SYSIN► SYSIN and SYSOUT maps│ │◄NLS► Nat'l Lang Support │└──────────────────────────────────┘ │◄PRINT-EXT► Printing extension │ │◄SIGNCOMPARE► EBCDIC comparisons │ │◄REPORT-LINE► Report writer lines │┌──Compatibility───────────────────┐ │◄SPZERO► Space = zero in nums││ You may need these for use with │ │◄STICKY-LINKAGE► Keep params linked ││older Micro Focus COBOL products. │ │◄TERMPAGE► Pad out report page ││ │ │◄TRACE► Turn on READY TRACE ││◄AUTOLOCK► Default locking │ │◄ZEROLENGTHFALSE►Zero length tests ││◄COMP► Computational subset│ │◄ZWB► Numeric comparisons ││◄COMP-5► COMP-5 behavior │ └─────────────────────────────────────┘│◄DE-EDIT► Num-edited behavior │ │◄FILESHARE► Default locking │ ┌──Compatibility with other COBOLs────┐│◄OLDBLANKLINE► BLANK LINE │ │ You may need these for use with ││◄IOCONV► READ-INTO/WRITE-FROM│ │ other COBOLs. ││◄OLDNEXTSENTENCE► NEXT SENTENCE │ │ ││◄OLDINDEX► Indexes = s'scripts │ │◄ALPHASTART► Numbering in ALPHABET││◄OLDREADINTO► READ INTO │ │◄COMP-6► COMP-6 items format ││◄OLDSTRMIX► Allow PIC X and N │ │◄DBSPACE► DBCS space ││◄OLDSTRSUB► String subscripts │ │◄FP-ROUNDING► Floating point items ││◄WRITELOCK► Default locking │ │◄OPTIONAL-FILE► All files optional │└──────────────────────────────────┘ │◄PERFORM-TYPE► Returns from PERFORM │ │◄RETRYLOCK► Re-try locked record │ │◄STICKY-PERFORM►Behavior of PERFORM │ │◄SYMBSTART► Numbering in SYMBOLIC│ │◄TRUNC► Truncation of binary │ └─────────────────────────────────────┘ -♦-