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