--Setting and Version of the module working in a normal linux region * Micro Focus COBOL V6.0 revision 000 20-Sep-22 09:56 Page 1 * CSOM8025.cbl * Directives File: /projects/cobol.dir * Accepted - SHOW-DIR * Accepted - ADV * Accepted - XOPEN"4" * Accepted - ANS85"SYNTAX" * Accepted - APOST * Accepted - ASSIGN"EXTERNAL" * Accepted - NOBELL * Accepted - NOBOUND * Accepted - CHARSET"ASCII" * Accepted - CHECKDIV"ENTCOBOL" * Accepted - CHECKNUM * Accepted - ENTCOBOL * Accepted - FLAG"ENTCOBOL" * Accepted - FLAGAS"I" * Accepted - IBMCOMP * Accepted - DEFAULTCALLS(4) * Accepted - LIST"" * Accepted - LISTPATH"$DEVSRCE/listing" * Accepted - PERFORM-TYPE"ENTCOBOL" * Accepted - RECMODE"ENTCOBOL" * Accepted - NOTRUNC * Accepted - COMP-5"2" * Accepted - CALLFH"EXTFH" * Accepted - COBFSTATCONV * Accepted - NOOPTIONAL-FILE * Accepted - WARNING(1) * Accepted - NOMAPNAME * Accepted - DATAMAP * Accepted - XREF * Accepted - SPZERO * Accepted - SETTING * Accepted - SSRANGE * End Of Directives File: /projects/cobol.dir * Options: int("CSOM8025.int") verbose reentrant NOBOUND CHECKNUM SPZERO * DIR"/projects/cobol.dir" * Setting: NOACCEPTREFRESH NOACU NOACUCOMMENT NOACUSYNC NOACU-UNDERSCORE ADV * ALIGN"8 OPT" ALPHASTART"1" ALTER NOAMODE ANIM ANS85 APOST * NOAREACHECK ARITH"EXTEND" ARITHMETIC"MF" ASSIGN"EXTERNAL" * NOASSIGN-PRINTER NOAUTOLOCK NOBELL BINLIT"NUMERIC" BOUND NOBRIEF * NOBS2000 BWZSTAR NOBYTEMODEMOVE CALLFH"EXTFH" NOCALLRECOVERY * CALLSORT"EXTSM" CANCEL CANCELLBR NOCHANGEMESSAGE CHARSET"ASCII" * CHECKDIV"ENTCOBOL" NOCHECKREFMOD NOCICS CICS-CPY NOCICSOPTIMIZE * NOCMPR2 COBFSTATCONV NOCOBIDY NOCOBOL370 COBOLDIR * NOCOMMANDLINELINKAGE NOCOLLECTION NOCOMP COMP"BINARY" COMP1"FLOAT" * COMP2"FLOAT" COMP-5"2" COMP-6"2" NOCONFIRM NOCONVERTRET CONVSPACE * COPYEXT",cbl,cpy" NOCOPYLBR COPYLIST COPYLISTCOMMENT"1" COPYSEARCH * "MF" CSI CURRENCY-SIGN"36" CURRENT-DATE"MMDDYY" NODATA DATACOMPRESS * "0" NODATA-CONTEXT DATAMAP"ADDR" DATE DBCHECK DBCS"3" NODBCSSOSI * DBSPACE DE-EDIT"2" DEFAULTBYTE"32" DEFAULTCALLS"4" DETECTLOCK NODG * DIALECT"MF" NODIRECTIVES-IN-COMMENTS DISPLAY"CONSOLE" NODISPLAYAT * DISPSIGN"COMPAT" NODOSVS NODOTNET DPCINDATA"XML" NODPCINSUBSCRIPT * DYNAM NOEARLY-RELEASE EBCCOLSEQ"1" ECHO NOECHOALL ENTCOBOL NOEOF1A * ERRFORMAT"1" ERRLIST"EMBED" NOERRQ FASTINIT FASTSORT FCD3 * NOFCDALIGN NOFCDREG NOFDCLEAR NOFILESHARE FILETYPE"0" FLAG * "ENTCOBOL" FLAGAS"I" NOFLAGEUC NOFLAGMIG NOFLAGQ FLAGSINEDIT * NOFLAGSTD NOFOLDCALLNAME NOFOLDCOPYNAME FORM"60" NOFP-ROUNDING * NOHOSTARITHMETIC NOHOSTCONTZERO NOHOST-NUMCOMPARE NOHOST-NUMMOVE * NOHOSTFD NOHOSTRW NOIBM-MS IBMCOMP IDENTIFIERLEN"30" IDXFORMAT"0" * NOIGNOREEXEC NOIL NOILGEN IMPLICITSCOPE NOINDD NOIDYSRCPATH * INFORETURN"0" NOINITCALL INITPTR NOINITBYTYPE INT"CSOM8025.int" * INTDATE"ANSI" INTLEVEL"8" IOCONV NOISO2002 NOIXNLSKEY NOIXNUMKEY * NOJVMGEN KEYCHECK KEYCOMPRESS"0" NOLIBRARIAN NOLINE-COUNT LIST * "CSOM8025.lst" LISTPATH"$DEVSRCE/listing" LISTWIDTH"80" LITVAL-SIZE * "4" NOLOCALSOURCEFORMAT LOCKTYPE"0" NOMAPNAME * NOMAINFRAMEFLOATINGPOINT NOMAXERROR METHODDEFAULT"REFERENCE" MF"21" * MFCOMMENT NOMFSYNC NOMOVELENCHECK NOMS NOMVS NATIONAL"1" NATIVE * "ASCII" NONATIVEFLOATINGPOINT NONCHAR NONLS NONLSCURRENCYLENGTH * NSYMBOL"DBCS" NULLESCAPE NOODOOSVS NOODOSLIDE NOOLDBLANKLINE * NOOLDCOPY NOOLDINDEX NOOLDNEXTSENTENCE NOOLDREADINTO NOOLDSTRMIX * OOCTRL"-C-E-G+L-P+Q+R-S+W" NOOPTIONAL-FILE NOOS390 OSEXT"" NOOSVS * NOOUTDD P64 NOPANVALET PANVALETIGNORECOMMENT PERFORM-TYPE"ENTCOBOL" * NOPREPLIST NOPREPROCESS PRESERVECASE NOPRINT-EXT NOPROFILE * NOPROGID-COMMENT NOPROGID-INT-NAME NOPROTECT-LINKAGE PROTOTYPE * "RELAXED" QUAL QUALPROC NOQUERY NOQUOTE NORAWLIST NORDW RECMODE * "ENTCOBOL" REENTRANT"1" NOREF NOREFNO REMAINDER"1" REPLACE * "NOKEEPSEQ" REPORT-LINE"256" RESEQ NORETRYLOCK REWRITE-LS NORM * RTNCODE-SIZE"8" RTNCODE-TYPE"COMP" NORWHARDPAGE NOSAA SEG NOSEQCHK * SEQUENTIAL"RECORD" NOSERIAL SETTING"LINE" NOSHAREOUTDD SHOW-DIR * SIGN"ASCII" SIGN"TRAILING" NOSIGNDISCARD NOSIGNFIXUP SORTTYPE * "DFSORT" NOSOURCEENCODING SOURCEFORMAT"FIXED" SOURCETABSTOP"8" * SPZERO SSRANGE"2" STDERR NOSTICKY-LINKAGE NOSTICKY-PERFORM SUPFF * SWITCHTYPE"1" SYMBSTART"1" SYSPUNCH"132" TERMPAGE NOTESTCOVER TIME * NOTRACE NOTRUNC NOTRUNCCALLNAME NOTRUNCCOPY TRUNCINC"10" UNICODE * "NATIVE" VERBOSE NOVISUALSTUDIO NOVSC2 WARNING"1" WEBSERVER"CGI" * NOWRITELOCK NOWRITETHRU NOXMLGEN XMLPARSE"XMLSS" XOPEN"4" XREF * NOZEROLENGTHFALSE NOZEROSEQ NOZWB