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