Rational Developer for System z
COBOL for Windows, Version 7.5, Programming Guide


Options record - X'0010'

The following table shows the contents of the options record.

Table 105. SYSADATA options record
Field Size Description
Option byte 0 XL1
1111 1111
Reserved for future use
Option byte 1 XL1
1... ....
Bit 1 = DECK, Bit 0 = NODECK
.1.. ....
Bit 1 = ADATA, Bit 0 = NOADATA
..1. ....
Bit 1 = COLLSEQ(EBCDIC), Bit 0 = COLLSEQ(LOCALE|BINARY) (Windows and AIX only)
...1 ....
Bit 1 = SEPOBJ, Bit 0 = NOSEPOBJ (Windows and AIX only)
.... 1...
Bit 1 = NAME, Bit 0 = NONAME
.... .1..
Bit 1 = OBJECT, Bit 0 = NOOBJECT
.... ..1.
Bit 1 = SQL, Bit 0 = NOSQL
.... ...1
Bit 1 = CICS, Bit 0 = NOCICS
Option byte 2 XL1
1... ....
Bit 1 = OFFSET, Bit 0 = NOOFFSET (host only)
.1.. ....
Bit 1 = MAP, Bit 0 = NOMAP
..1. ....
Bit 1 = LIST, Bit 0 = NOLIST
...1 ....
Bit 1 = DBCSXREF, Bit 0 = NODBCSXREF
.... 1...
Bit 1 = XREF(SHORT), Bit 0 = not XREF(SHORT). This flag should be used in combination with the flag at bit 7. XREF(FULL) is indicated by this flag being off and the flag at bit 7 being on.
.... .1..
Bit 1 = SOURCE, Bit 0 = NOSOURCE
.... ..1.
Bit 1 = VBREF, Bit 0 = NOVBREF
.... ...1
Bit 1 = XREF, Bit 0 = not XREF. See also flag at bit 4 above.
Option byte 3 XL1
1... ....
Bit 1 = FLAG imbedded diagnostics level specified (a value y is specified as in FLAG(x,y))
.1.. ....
Bit 1 = FLAGSTD, Bit 0 = NOFLAGSTD
..1. ....
Bit 1 = NUM, Bit 0 = NONUM
...1 ....
Bit 1 = SEQUENCE, Bit 0 = NOSEQUENCE
.... 1...
Bit 1 = SOSI, Bit 0 = NOSOSI (Windows and AIX only)
.... .1..
Bit 1 = NSYMBOL(NATIONAL), Bit 0 = NSYMBOL(DBCS)
.... ..1.
Bit 1 = PROFILE, Bit 0 = NOPROFILE (AIX only)
.... ...1
Bit 1 = WORD, Bit 0 = NOWORD
Option byte 4 XL1
1... ....
Bit 1 = ADV, Bit 0 = NOADV
.1.. ....
Bit 1 = APOST, Bit 0 = QUOTE
..1. ....
Bit 1 = DYNAM, Bit 0 = NODYNAM
...1 ....
Bit 1 = AWO, Bit 0 = NOAWO
.... 1...
Bit 1 = RMODE specified, Bit 0 = RMODE(AUTO)
.... .1..
Bit 1 = RENT, Bit 0 = NORENT
.... ..1.
Bit 1 = RES: this flag will always be set on for COBOL.
.... ...1
Bit 1 = RMODE(24), Bit 0 = RMODE(ANY)
Option byte 5 XL1
1... ....
Reserved for compatibility
.1.. ....
Bit 1 = OPT, Bit 0 = NOOPT
..1. ....
Bit 1 = LIB, Bit 0 = NOLIB
...1 ....
Bit 1 = DBCS, Bit 0 = NODBCS
.... 1...
Bit 1 = OPT(FULL), Bit 0 = not OPT(FULL)
.... .1..
Bit 1 = SSRANGE, Bit 0 = NOSSRANGE
.... ..1.
Bit 1 = TEST, Bit 0 = NOTEST
.... ...1
Bit 1 = PROBE, Bit 0 = NOPROBE (Windows only)
Option byte 6 XL1
..1. ....
Bit 1 = NUMPROC(PFD), Bit 0 = NUMPROC(NOPFD)
...1 ....
Bit 1 = NUMCLS(ALT), Bit 0 = NUMCLS(PRIM)
.... .1..
Bit 1 = BINARY(S390), Bit 0 = BINARY(NATIVE) (Windows and AIX only)
.... ..1.
Bit 1 = TRUNC(STD), Bit 0 = TRUNC(OPT)
.... ...1
Bit 1 = ZWB, Bit 0 = NOZWB
11.. 1...
Reserved for future use
Option byte 7 XL1
1... ....
Bit 1 = ALOWCBL, Bit 0 = NOALOWCBL
.1.. ....
Bit 1 = TERM, Bit 0 = NOTERM
..1. ....
Bit 1 = DUMP, Bit 0 = NODUMP
...1 11..
Reserved
.... ..1.
Bit 1 = CURRENCY, Bit 0 = NOCURRENCY
.... ...1
Reserved
Option byte 8 XL1
1111 1111
Reserved for future use
Option byte 9 XL1
1... ....
Bit 1 = DATA(24), Bit 0 = DATA(31)
.1.. ....
Bit 1 = FASTSRT, Bit 0 = NOFASTSRT
..1. ....
Bit 1 = SIZE(MAX), Bit 0 = SIZE(nnnn) or SIZE(nnnnK)
.... .1..
Bit 1 = THREAD, Bit 0 = NOTHREAD
...1 1.11
Reserved for future use
Option byte A XL1
1111 1111
Reserved for future use
Option byte B XL1
1111 1111
Reserved for future use
Option byte C XL1
1... ....
Bit 1 = NCOLLSEQ(LOCALE) (Windows and AIX only)
.1.. ....
Reserved for future use
..1. ....
Bit 1 = INTDATE(LILIAN), Bit 0 = INTDATE(ANSI)
...1 ....
Bit 1 = NCOLLSEQ(BINARY) (Windows and AIX only)
.... 1...
Bit 1 = CHAR(EBCDIC), Bit 0 = CHAR(NATIVE) (Windows and AIX only)
.... .1..
Bit 1 = FLOAT(HEX), Bit 0 = FLOAT(NATIVE) (Windows and AIX only)
.... ..1.
Bit 1 = COLLSEQ(BINARY) (Windows and AIX only)
.... ...1
Bit 1 = COLLSEQ(LOCALE) (Windows and AIX only)
Option byte D XL1
1... ....
Bit 1 = DLL Bit 0 = NODLL (host only)
.1.. ....
Bit 1 = EXPORTALL, Bit 0 = NOEXPORTALL (host only)
..1. ....
Bit 1 = CODEPAGE (host only)
...1 ....
Bit 1 = DATEPROC, Bit 0 = NODATEPROC
.... 1...
Bit 1 = DATEPROC(FLAG), Bit 0 = DATEPROC(NOFLAG)
.... .1..
Bit 1 = YEARWINDOW
.... ..1.
Bit 1 = WSCLEAR, Bit 0 = NOWSCLEAR (Windows and AIX only)
.... ...1
Bit 1 = BEOPT, Bit 0 = NOBEOPT (Windows and AIX only)
Option byte E XL1
1... ....
Bit 1 = DATEPROC(TRIG), Bit 0 = DATEPROC(NOTRIG)
.1.. ....
Bit 1 = DIAGTRUNC, Bit 0 = NODIAGTRUNC
.... .1..
Bit 1 = LSTFILE(UTF-8), Bit 0 = LSTFILE(LOCALE) (Windows and AIX only)
..11 1.11
Reserved for future use
Option byte F XL1
1111 1111
Reserved for future use
Flag level XL1
X'00'
Flag(I)
X'04'
Flag(W)
X'08'
Flag(E)
X'0C'
Flag(S)
X'10'
Flag(U)
X'FF'
Noflag
Imbedded diagnostic level XL1
X'00'
Flag(I)
X'04'
Flag(W)
X'08'
Flag(E)
X'0C'
Flag(S)
X'10'
Flag(U)
X'FF'
Noflag
FLAGSTD (FIPS) specification XL1
1... ....
Minimum
.1.. ....
Intermediate
..1. ....
High
...1 ....
IBM extensions
.... 1...
Level-1 segmentation
.... .1..
Level-2 segmentation
.... ..1.
Debugging
.... ...1
Obsolete
Reserved for flagging XL1
1111 1111
Reserved for future use
Compiler mode XL1
X'00'
Unconditional Nocompile, Nocompile(I)
X'04'
Nocompile(W)
X'08'
Nocompile(E)
X'0C'
Nocompile(S)
X'FF'
Compile
Space value CL1  
Data for 3-valued options XL1
1... ....
NAME(ALIAS) specified
.1.. ....
NUMPROC(MIG) specified
..1. ....
TRUNC(BIN) specified
...1 1111
Reserved for future use
TEST(hook,sym,sep) suboptions (host only) XL1
1... ....
TEST(ALL,x)
.1.. ....
TEST(NONE,x)
..1. ....
TEST(STMT,x)
...1 ....
TEST(PATH,x)
.... 1...
TEST(BLOCK,x)
.... .1..
TEST(x,SYM)
.... ..1.
Bit 1 = SEPARATE, Bit 0 = NOSEPARATE
.... ...1
Reserved for TEST suboptions
OUTDD name length HL2 Length of OUTDD name
RWT ID Length HL2 Length of Reserved Word Table identifier
LVLINFO CL4 User-specified LVLINFO data
PGMNAME suboptions XL1
1... ....
Bit 1 = PGMNAME(COMPAT)
.1.. ....
Bit 1 = PGMNAME(LONGUPPER)
..1. ....
Bit 1 = PGMNAME(LONGMIXED)
...1 1111
Reserved for future use
Entry interface suboptions XL1
1... ....
Bit 1 = EntryInterface(System) (Windows only)
.1.. ....
Bit 1 = EntryInterface(OptLink) (Windows only)
..11 1111
Reserved for future use
CallInterface suboptions XL1
1... ....
Bit 1 = CallInterface(System) (Windows and AIX only)
.1.. ....
Bit 1 = CallInterface(OptLink) (Windows only)
...1 ....
Bit 1 = CallInterface(Cdecl) (Windows only)
.... 1...
Bit 1 = CallInterface(System(Desc)) (Windows and AIX only)
..1. .111
Reserved for future use
ARITH suboption XL1
1... ....
Bit 1 = ARITH(COMPAT)
.1.. ....
Bit 1 = ARITH(EXTEND)
11 1111
Reserved for future use
DBCS Req FL4 DBCS XREF storage requirement
DBCS ORDPGM length HL2 Length of name of DBCS Ordering Program
DBCS ENCTBL length HL2 Length of name of DBCS Encode Table
DBCS ORD TYPE CL2 DBCS Ordering type
Reserved CL6 Reserved for future use
Converted SO CL1 Converted SO hexadecimal value
Converted SI CL1 Converted SI hexadecimal value
Language id CL2 This field holds the two-character abbreviation (one of EN, UE, JA, or JP) from the LANGUAGE option.
Reserved CL8 Reserved for future use
INEXIT name length HL2 Length of SYSIN user-exit name
PRTEXIT name length HL2 Length of SYSPRINT user-exit name
LIBEXIT name length HL2 Length of 'Library' user-exit name
ADEXIT name length HL2 Length of ADATA user-exit name
CURROPT CL5 CURRENCY option value
Reserved CL1 Reserved for future use
YEARWINDOW HL2 YEARWINDOW option value
CODEPAGE HL2 CODEPAGE CCSID option value
Reserved CL50 Reserved for future use
LINECNT HL2 LINECOUNT value
Reserved CL2 Reserved for future use
BUFSIZE FL4 BUFSIZE option value
Size value FL4 SIZE option value
Reserved FL4 Reserved for future use
Phase residence bits byte 1 XL1
1... ....
Bit 1 = IGYCLIBR in user region
.1.. ....
Bit 1 = IGYCSCAN in user region
..1. ....
Bit 1 = IGYCDSCN in user region
...1 ....
Bit 1 = IGYCGROU in user region
.... 1...
Bit 1 = IGYCPSCN in user region
.... .1..
Bit 1 = IGYCPANA in user region
.... ..1.
Bit 1 = IGYCFGEN in user region
.... ...1
Bit 1 = IGYCPGEN in user region
Phase residence bits byte 2 XL1
1... ....
Bit 1 = IGYCOPTM in user region
.1.. ....
Bit 1 = IGYCLSTR in user region
..1. ....
Bit 1 = IGYCXREF in user region
...1 ....
Bit 1 = IGYCDMAP in user region
.... 1...
Bit 1 = IGYCASM1 in user region
.... .1..
Bit 1 = IGYCASM2 in user region
.... ..1.
Bit 1 = IGYCDIAG in user region
.... ...1
Reserved for future use
Phase residence bits bytes 3 and 4 XL2 Reserved
Reserved CL8 Reserved for future use
OUTDD name CL(n) OUTDD name
RWT CL(n) Reserved word table identifier
DBCS ORDPGM CL(n) DBCS Ordering program name
DBCS ENCTBL CL(n) DBCS Encode table name
INEXIT name CL(n) SYSIN user-exit name
PRTEXIT name CL(n) SYSPRINT user-exit name
LIBEXIT name CL(n) 'Library' user-exit name
ADEXIT name CL(n) ADATA user-exit name

Terms of use | Feedback

Copyright IBM Corporation 1996, 2008.
This information center is powered by Eclipse technology. (http://www.eclipse.org)