If you set DIALECT"OS390" the following Compiler directives are set:
ADV ALIGN"4 OPT" ALPHASTART"1" ALTER ANS85 APOST AREACHECK ARITHMETIC"OS390" ASSIGN"EXTERNAL" NOBOUND BYTEMODEMOVE CALLFH CALLSORT"EXTSM" CANCELLBR CHARSET"EBCDIC" CHECKDIV"OS390" 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 ECHO NOENTCOBOL ERRLIST"VERBOSE" NOFASTINIT |
FDCLEAR FLAG"OS390" FLAGAS"S" NOFLAGMIG NOFLAGSTD FOLDCALLNAME"UPPER" FOLDCOPYNAME"UPPER" FORM"60" FP-ROUNDING"OS390" HOSTCONTZERO HOSTFD HOSTNUMCOMPARE HOSTNUMMOVE IBMCOMP NOIBM-MS INDD"SYSIN 80 R" INFORETURN"0" NOLIBRARIAN LISTWIDTH"80" MAPNAME NODYNAM NOMF NOMFCOMMENT NOMS NOMVS NOODOOSVS NOOLDCOPY NOOLDINDEX NOOLDNEXTSENTENCE NOOPTIONAL-FILE NOOSVS ODOSLIDE OUTDD"SYSOUT 121 R" |
OS390 NOPANVALET NOPC1 PERFORM-TYPE"OS390" NOPROGID-COMMENT NOPROTECT-LINKAGE QUAL QUALPROC RDW RECMODE"OS390" REMAINDER"2" RESEQ NORM RTNCODESIZE"2" NOSAA NOSEG NOSEQCHK SEQUENTIAL"RECORD" SETTINGS"COL" SOURCEFORMAT"FIXED" NOSPZERO STICKY-LINKAGE"1" NOSTICKY-PERFORM SYMBSTART"1" SYSPUNCH"80" NOTRACE NOTRUNC TRUNCCALLNAME"8" TRUNCCOPY"8" NOVSC2 WARNING"3" NOXOPEN NOXREF NOZEROSEQ ZEROLENGTHFALSE ZWB |