If you set DIALECT"COBOL370", DIALECT"COBOL371" or DIALECT"COBOL372", the following Compiler directives are set:
|
ADV ALIGN"8 OPT" ALPHASTART"1" ALTER ANS85 APOST AREACHECK ARITHMETIC"VSC2" ASSIGN"EXTERNAL" NOBOUND BYTEMODEMOVE CALLFH CALLSORT"EXTSM" CANCELLBR CHARSET"EBCDIC" CHECKDIV"COBOL370" COBOL370"2" (for DIALECT"COBOL370") COBOL370"2" (for DIALECT"COBOL372") COBOL370"1" (for DIALECT"COBOL371") COBSTATCONV COMS85 COPYEXT"CPY,CBL" COPYLBR COPYLISTCOMMENT"7" CURRENT-DATE"MMDDYY" DBCHECK DBCS"3" DBCSSOSI"14""15" DBSPACE DE-EDIT"2" DEFAULTBYTE"00" NODG NODOSVS DPC-IN-SUBSCRIPT NODYNAM ECHO |
NOENTCOBOL ERRLIST"VERBOSE" NOEXTINDEX NOFASTINIT FCDCAT FDCLEAR FLAG"COBOL370" FLAGAS"S" NOFLAGMIG NOFLAGSTD FOLDCALLNAME"UPPER" FOLDCOPYNAME"UPPER" HOSTCONTZERO HOSTFD HOSTNUMCOMPARE"2" HOSTNUMMOVE"2" NOIBM-MS IBMCOMP INDD"SYSIN 80 R" INFORETURN"0" NOLIBRARIAN LISTWIDTH"80" MAPNAME NOMF NOMFCOMMENT NOMS NOODOOSVS ODOSLIDE NOOLDCOPY NOOLDINDEX NOOLDNEXTSENTENCE NOOPTIONAL-FILE NOOS390 NOOSVS |
OUTDD"SYSOUT 121 R" NOPANVALET NOPC1 PERFORM-TYPE"COBOL370" NOPROGID-COMMENT NOPROTECT-LINKAGE QUAL QUALPROC QUOTE RDW RECMODE"COBOL370" REMAINDER"2" RESEQ NORM RTNCODESIZE"2" NOSEG NOSEQCHK SEQUENTIAL"RECORD" SETTINGS"COL" SOURCEFORMAT"FIXED" NOSPZERO STICKY-LINKAGE"1" NOSTICKY-PERFORM SYMBSTART"1" SYSPUNCH"80" NOTRACE NOTRUNC TRUNCCALLNAME"8" TRUNCCOPY"8" WARNING"3" NOXOPEN NOXREF ZEROLENGTHFALSE NOZEROSEQ ZWB |