Compaq COBOL
User Manual

2
2000 A.D.
date change problem
A
a.out file #1
a.out file #2
a.out file #3
ACCEPT/DISPLAY with file input or output
ACCEPT statement
differences
ANSI
extensions to ANSI
EDITING phrase
input, object of
See also Video forms
Access mode
default
dynamic
indexed files, specifying for
random
relative files, specifying for
sequential files, specifying for
specifying
switching
Access mode switching
READ NEXT statement
Access stream
definition
ACMSxp
ADVANCING phrase
-align flag
Compaq COBOL support for
syntax of
-align [padding] flag
-align padding flag
Alignment
along byte boundaries
and SYNCHRONIZED clause
changing with directives #1
changing with directives #2
*DC END-SET ALIGNMENT
*DC SET ALIGNMENT
*DC SET NOALIGNMENT
*DC SET NOPADALIGN
*DC SET PADALIGN
default for source file
directives #1
directives #2
syntax of
for OpenVMS VAX compatibility
for optimal performance
natural
natural (tab.)
OpenVMS VAX compatible
qualifiers
specifying
specifying natural #1
specifying natural #2
specifying OpenVMS VAX compatible #1
specifying OpenVMS VAX compatible #2
/ALIGNMENT
syntax of
Alignment directives
and SYNCHRONIZED clause
comparison
nesting
/ALIGNMENT (Ex.)
Alignment (ex.)
Alignment of data
Quadword boundary #1
Quadword boundary #2
run-time performance
/ALIGNMENT=PADDING #1
/ALIGNMENT=PADDING #2
/ALIGNMENT qualifier #1
/ALIGNMENT qualifier #2
Compaq COBOL support for
operations order of precedence (fig.)
Alignment qualifiers
and SYNCHRONIZED clause
ALLOWING (used with I-O verbs)
Alpha architecture
register set differences
(ex.)
ALPHABET clause
value of numeric literals
compiler implementation specifications
Alternate key
definition
segmented
/ANALYSIS_DATA qualifier
-ansi flag
ANSI format
See Developing programs
ANSI format source line
structure and content of
ANSI-to-terminal
format conversion
APPLY clause #1
APPLY clause #2
APPLY LOCK-HOLDING
APPLY PRINT-CONTROL clause #1
APPLY PRINT-CONTROL clause #2
ar command
-arch
-arch flag
/ARCHITECTURE qualifier
Archive library
creating and maintaining
file name suffix
obtaining information about
specifying using COBOL
Argument list
Argument-passing mechanisms
BY CONTENT
BY DESCRIPTOR
BY OMITTED
BY REFERENCE
BY VALUE
Arguments
optional #1
optional #2
run time command line #1
run time command line #2
-arithmetic flag
Arithmetic, native #1
Arithmetic, native #2
Arithmetic operations
results of rounding off
/ARITHMETIC qualifier #1
/ARITHMETIC qualifier #2
Arithmetic, standard #1
Arithmetic, standard #2
Arithmetic statements #1
Arithmetic statements #2
common errors
temporary work items
with GIVING phrase
with SIZE ERROR phrase
Arrays
large
impact on compile
ASSIGN clause
file description
overriding the file specification
VALUE OF #1
VALUE OF #2
VALUE OF ID clause, using with
ASSIGN DCL command
using logical names
ASSIGN TO clause
ASSIGN TO PRINTER clause #1
ASSIGN TO PRINTER clause #2
ASSIGN TO REEL clause
block size
number of files
number of magnetic tapes
record size
AT END condition
planning for
Attributes
COBOL program
/AUDIT qualifier
number of strings
compiler implementation specifications
B
Backup procedures
files
Behavior differences
between Compaq COBOL on Alpha and VAX
Binary data
alignment
Binary data item
advantages of
See also Data item, binary
Binary search
function and results
requirements for
with AT END statement
with keys
BLOCK CONTAINS clause
disk media
compiler implementation specifications
magtape media
compiler implementation specifications
Bottom margin
Boundaries, data
Bucket size
compiler implementation specifications
Byte boundaries
effects on storage allocation
C
C, calling from Compaq COBOL
-C flag
-c flag #1
-c flag #2
-c flag
example
Call frame
definition
CALL statement
nesting #1
nesting #2
transferring execution control
use of
Calling
sequence examples
Calling C Programs from Compaq COBOL on Tru64 UNIX
Calling COBOL Programs from C on Tru64 UNIX
Calling OpenVMS Alpha shareable images
Calling procedure
Calling routines
Calling subprograms
See Interprogram communication
Calling Tru64 UNIX Shareable Objects
-call_shared flag #1
-call_shared flag #2
Case sensitivity issues
on Tru64 UNIX
cc command
using cobol command instead of
CDD
See Oracle CDD/Repository
CDO
data types supported
source representation
CDO language
Cell
contents
location in the file
numbering
numerical order of
relative record number
size
Century date change
Character attributes for terminal screen
-check all flag
-check decimal flag
/CHECK=DECIMAL qualifier
/CHECK=DUPLICATE_KEYS qualifier
-check [no]bounds flag
-check [no]decimal flag #1
-check [no]decimal flag #2
-check [no]perform flag
-check none flag
CISC architecture
CIT3 data items
cit3 option
CIT4 data items
cit4 option
Class
CLASS-NAME
Class tests
numeric
CMS
See Code Management System
COB$SWITCHES
cobcall
cobcall routine
cobcancel
cobcancel routine
cobfunc
cobfunc routine
COBOL and debugging
COBOL command
cobol command
and ld
and other software components
compiling multiple files
creating shared libraries
COBOL command
driver
cobol command
driver
examples
compiling multiple files #1
compiling multiple files #2
using different suffix characters
files created by
for use with the debugger #1
for use with the debugger #2
format
interpretation of suffix characters
linking
linking objects
messages
output files
processes used by
COBOL command
qualifiers
cobol command
recognized source file name suffixes
sample use with external subprogram #1
sample use with external subprogram #2
specifying directory for temporary files
specifying input files
specifying output file
suffix characters and interaction with flags
temporary files
cobol command flags
list of
cobol flags
-align [padding]
-ansi
-arch
-arithmetic
-C
-c #1
-c #2
-call_shared
-check all
-check [no]bounds
-check [no]decimal #1
-check [no]decimal #2
-check [no]perform
-check none
-conditionals [selector]
-convert [no]leading_blanks
-copy
-copy_list
-cord
-cross_reference
-cross_reference alphabetical
-cross_reference declared
-D num
-display_formatted
-feedback file
-fips 74
-flagger [option]
<foot-tune
-g0
-g1
-g2 or -g
-g3
-granularity byte
-granularity long
-granularity quad
-include
-K
-L
-Ldir
-list
-lstring
-mach
-machine_code
-map
-map alphabetical
-map declared
-math_intermediate
-math_intermediate cit4
-names as_is
-names lower or -names lowercase flag
-names upper or -names uppercase flag
-nolocking
-non_shared
-noobject
-nowarn
-o output
-O0
-O1
-O2
-O3
-O4 or -O
-p0
-p1 or -p
-relax_key_checking or -rkc
-rsv
-rsv [no]200x
-rsv [no]xopen
-seq
-sequence_check
-shared
-show code
-show copy
-show xref
-std
-std 85
-std [no]mia
-std [no]syntax
-std [no]xopen
-std v3
-T num
-taso
-tps #1
-tps #2
-tps #3
-trunc
-V
-v
-w
-warn
-warn all
-warn [no]information
-warn [no]other
-warn none
-xref #1
-xref #2
-xref_stdout #1
-xref_stdout #2
COBOL qualifiers, list of
/ALIGNMENT=[NO]PADDING
/RESERVED_WORDS
/SEPARATE_COMPILATION #1
/SEPARATE_COMPILATION #2
/VFC
COBOL, run-time errors
See Run-time messages
COBOL_SWITCHES
Code Management System
integration with LSE
Coding
based on architectural differences
COLLATING SEQUENCE IS
Phrase, overriding a,
example
Command line
arguments, run time
OpenVMS Alpha
Tru64 UNIX
common Compaq COBOL errors
Command-line argument
accessing
Command-line arguments
accessing at run time
Command-line qualifiers
Compaq COBOL for OpenVMS VAX only (tab.)
Compaq COBOL only (tab.)
shared
shared (tab.)
Comment symbol
COMMON clause
Common language environment
using COBOL in
Communication
contained programs
See Interprogram communication
COMP data item
advantages of
COMP unsigned longword integers
Compaq COBOL
command-line flags
more information
command-line qualifiers
more information
new
new (tab.)
compatibility
ACCEPT statement
arithmetic operations
between Alpha and VAX
calling shareable images
COPY statement
DBMS support
/DEBUG qualifier
DECset/LSE
diagnostic messages
DISPLAY statement
divide-by-zero
extensions and features
file attribute checking
file sharing and record locking
file status values
flags #1
flags #2
indexed files
LINAGE clause
module names
MOVE statement
Multistream Oracle CODASYL DBMS DML
/NATIONALITY=JAPAN
/NATIONALITY=US
on Tru64 UNIX and OpenVMS Alpha
Oracle CODASYL DBMS
program structure
qualifiers #1
qualifiers #2
REPLACE statement
REWRITE
RMS special registers #1
RMS special registers #2
SEARCH statement
sharing common blocks
SHR
/STANDARD=V3
statements, differences in
-std v3
storage of double-precision data
system return codes
VFC file format
/WARNINGS=ALL
debugger support
differences between Alpha and VAX
features
partial list of
source form
file name suffix
Compaq COBOL compiler
function
Compaq COBOL for OpenVMS VAX
command-line qualifiers
more information
new
new (tab.)
features unsupported by Compaq COBOL on Alpha
Compaq COBOL on Alpha
compatibility
machine code listing
Compaq standard file sharing
Compaq standard record locking
Comparing operands
Compatibility
alignment for
case sensitivity
/CHECK=DUPLICATE_KEYS
compiling multiple source files
compiling multiple source files on OpenVMS Alpha
errors on compile
file compatibility
fixed-length records
ORGANIZATION INDEXED file, reading
print-controlled files
reading COBOL indexed files
variable-length records
VFC files
Compilation performance #1
Compilation performance #2
and physical memory
and separate compilation
and virtual memory
Compiled module entry
Compiler
and linker
diagnostic messages issued by
general description #1
general description #2
driver #1
driver #2
error messages
messages
performance
specifying directory for temporary files
Compiler directives
binary data item
See also Alignment directives
Compiler errors
example of
hints to avoid them
Compiler implementation limitations
subscripts
number of levels
Compiler implementation specifications
ALPHABET clause
value of numeric literals
/AUDIT qualifier
number of strings
BLOCK CONTAINS clause
disk media
magtape media
bucket size
contained programs
nesting depth
data items
exceeding size of
EXTENSION option
value of integers
external report file
number of characters
FD record length
file connectors
hexadecimal literals
index name
subscript value
indexed file
number of key data items
intrinsic functions, digits
ISAM keys, digits
MERGE
number of USING files
multiblock count
MULTIPLE FILE TAPE clause
number of files
nested IF statements
static nesting depth
nonnumeric literals
number of literal phrases
numeric literal, digits
numeric SORT/MERGE keys, digits
OCCURS n TIMES clause
value of n
Oracle CDD/Repository pathname specification
number of characters
PERFORM n TIMES clause
value of n
physical block size
picture character string, characters in
PICTURE character-strings
alphanumeric or alphabetic
alphanumeric or numeric edited
PICTURE character strings, digits in fixed-point numeric and numeric-edited items
record definitions
report file
number of lines
RESERVE AREAS clause
value of integers
run-time storage #1
run-time storage #2
SD record length
SORT
number of USING files
subscript name
subscript value
SWITCH clause
value of switch numbers
SYMBOLIC CHARACTERS clause
value of numeric literals
user-words
number of characters
USING phrase
number of operands
WINDOW option
value of integers
Compiler listing files
definition
multiple instances of source line
reading
separate compilation
Compiler messages
format
interpreting
Compiling
and linking for debugging
for debugging
Compiling programs
C language file suffix
C language with cobol
compile command qualifiers
compile command qualifiers (table)
conditional compilation
/DEBUG
debugging
error messages
-g -o
multiple source files on OpenVMS Alpha #1
multiple source files on OpenVMS Alpha #2
multiple source files on OpenVMS Alpha #3
multiple source files on OpenVMS Alpha #4
multiple source files on Tru64 UNIX
on OpenVMS Alpha
Concatenating items
nonnumeric data
Condition handler (ex.)
Condition values
returned
signaled
Conditional compilation lines
-conditionals [selector] flag
Contained program
COMMON clause
communication with
nesting depth
compiler implementation specifications
reading listing files
CONTENT argument-passing mechanism
Continuation symbol (ANSI format)
CONTINUE, DCL command
Control byte sequences
Control footing
Control heading
CONTROL KEY IN phrase
Controlling index #1
Controlling index #2
Conventional report
20-line logical page (fig.)
double-spaced master listing (fig.)
logical page
page advancing
CONVERSION phrase #1
CONVERSION phrase #2
/CONVERT
LEADING_BLANKS option
Compaq COBOL support for
-convert flag
-convert [no]leading_blanks flag
Converting
Compaq COBOL for OpenVMS VAX programs
using the /STANDARD=OPENVMS_AXP qualifier option
reference format
using REFORMAT
-copy flag
COPY FROM DICTIONARY statement
COPY library names, conflicting
COPY REPLACING statement
differences
line numbers in compiler listing files
COPY statement
accessing data definitions
differences
Compaq COBOL for OpenVMS VAX (ex.)
Compaq COBOL on OpenVMS Alpha (ex.)
inserting text midline
Compaq COBOL on OpenVMS Alpha (ex.)
inserting text midline (ex.)
multiple COPY statements
Compaq COBOL on OpenVMS Alpha (ex.)
multiple COPY statments (ex.)
example
/COPY_LIS
/COPY_LIST
in compiler listing files
-copy_list flag
-cord flag
Creating a New Sort Key
example
/CROSS_REFERENCE
in compiler listing files
-cross_reference alphabetical flag
-cross_reference declared flag
-cross_reference flag
CTRL/Z key
use with LSE