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