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