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