 |
» |
|
|
|
Compiles an HP COBOL II/iX program using the 1985 ANSI standard
entry point and creates an object file. HP COBOL II/iX is not part
of the HP 3000 Series 900 Computer System Fundamental Operating
Software and must be purchased separately. This command is recognized
only if HP COBOL II/iX is installed on your system. (Native Mode) Syntax | |
[ ,[ progfile] [ ,[ listfile] [ ,[ masterfile] [ ,newfile] ] ] ] |
[ ;INFO=quotedstring] [ ;WKSP=workspacename] |
| | | |  | NOTE: This command follows the optional MPE/iX command line
syntax. Refer to "Optional Format for MPE/iX Commands" at the beginning
of this chapter. | | | | |
Parameters | |
- textfile
The name of the file that contains the source code
that is to be compiled. This can be any ASCII or toolset access
method (TSAM) file. The formal file designator is COBTEXT. If you are running HP COBOL II/iX from your terminal, you
will probably specify a disk textfile.
If you do not specify textfile, the default
file is $STDIN.
$STDIN is the
current input device, usually your terminal. - objectfile
Actual file designator of the object file, which
is the output of the compiler. This file is stored in binary form
and has a file code of either NMOBJ
(1461) or NMRL
(1033). Its formal
file designator is COBOBJ.
If the objectfile parameter is omitted,
the object code is saved to the temporary file $OLDPASS
if it exists, or to $NEWPASS
which then becomes $OLDPASS. If you specify objectfile, the
compiler stores the object file in a permanent file of the correct
size, type, and name you specified. If either a file of the same name or the default file $OLDPASS
already exists, the new object code overwrites the old if the file
code is NMOBJ
or is appended to the old if the file code is NMRL.
If the file code is NMRL,
any existing version of the code module is first purged. Refer to the HP COBOL/XL Programmer's Guide
(31500-90002) for information on the RLINIT
and RLFILE commands
that cause creation of an NMRL
by default or initialization. The compiler may issue an error message telling you that a
new or existing object file is too small to contain the compiler's
output or number of modules. In that case you must build a larger
file or use the Link Editor to clean the NMRL.
You may then recompile to the new file. You may use the MPE/iX SAVE
command to store $OLDPASS
as a permanent file under another name. - listfile
The name of the file to which the compiler writes
the program listing. This can be any ASCII file. The formal file
designator is COBLIST.
If you do not specify listfile, the default
is $STDLIST.
$STDLIST is usually
the terminal in a session or the printer in a batch job. - masterfile
Actual file designator of the master file with which
textfile is merged to produce a composite
source. This can be any ASCII input file. The formal designator
is COBMAST. Default
is that the master file is not read; input is read from textfile,
or from $STDIN
if textfile is not specified. - newfile
Actual file designator of the merged textfile
and masterfile. This can be any ASCII
output file. Formal file designator is COBNEW.
Default is that no file is written. - quotedstring
A quoted string of no more than 255 characters,
including the single or double quotation marks that enclose it,
that specifies compile time options. The quotedstring string may be
used to pass dollar sign ($)
commands to the compiler: "$command1$command2$command3...".
The $ must be
the first character in the string, and it must be used to separate
multiple commands. To extend the quotedstring
string over more than one physical line make an ampersand (&)
the last character of one line and continue the quotedstring
string onto the next physical line. Each $
command is limited in length to the same size as in the source file: COB85XL SALARIES,SALOBJ;INFO="$CONTROL &
BOUNDS,MAP,VERBS$SET &$X9=ON" &
COB85XL ACCOUNTS;INFO="$DEFINE %A=5#" |
- workspacename
This parameter is the actual file designator of
an HPToolset workspace. The formal file designator is COBWKSP. - xdbfilename
Actual file designator for the file to be used by
the symbolic debugger (XDB). This is a permanent file created by
the compiler that contains the listing of the source files. The
formal file designator is COBXDB. If this file exists, then it must be in a special format created
by a previous compile using this option. In this case it is first
purged. If the file is of the wrong type, the compile is not attempted.
The user must either use a different name or purge the file. Once the file is created, XDB expects the fully qualified
name of the file to be unchanged. A FILE
equation could be used if the file is renamed.
Operation Notes | |
The COB85XL
command compiles an HP COBOL II/iX program into an object file on
disk. If you do not specify textfile,
HP COBOL II/iX expects the source text to be entered from your standard
input device. If you do not specify listfile,
HP COBOL II/iX sends the program listing to the current list device. You cannot backreference the formal file designators used
in this command (COBTEXT,
COBOBJ, COBLIST,
COBMAST, COBNEW,
COBWKSP, and
COBXDB) as actual
file designators in the command parameter list. For further information,
refer to the "Implicit FILE Commands for Subsystems" discussion
of the FILE command. | | | | | NOTE: This command is implemented as a command file. If you
set the HPPATH
variable to null (SETVAR HPPATH ""),
the command file is not executed, and the command fails. | | | | |
Use | |
This command may be issued from a session, job, or program
but not in BREAK. Pressing Break
suspends the execution of this command. Entering the RESUME
command continues the execution. Examples | |
To compile an HP COBOL II/iX program stored in the file SOURCE
into an object file called OBJECT,
and send the listing to the disk file LISTFL,
enter: COB85XL SOURCE,OBJECT,LISTFL |
Program development in native mode uses the MPE/iX LINK
command not the MPE V/E PREP
command. This produces a significant change in the method of compiling
code. For example, if you have created a program called MAIN
and a subprogram called SUB,
each contained in a separate file, you might append the code from
SUB to SOMEUSL
in MPE V/E, like this: COBOLII MAIN, SOMEUSL
COBOLII SUB, SOMEUSL
PREP SOMEUSL, SOMEPROG
RUN SOMEPROG |
When using NMOBJ,
however, the COB85XL
command (in MPE/iX native mode) does not append SUB.
MPE/iX compiles the source files into separate object files and
then uses the Link Editor to link the two object files into the
program file, as in this example: COB85XL MAIN, OBJMAIN
COB85XL SUB, OBJSUB
LINK FROM=OBJMAIN,OBJSUB;TP=SOMEPROG
RUN SOMEPROG |
On the other hand, if an NMRL
is used instead of an NMOBJ,
the above can be simplified to the following: BUILD RLFILE;DISC=10000;CODE=NMRL
COB85XL MAIN, RLFILE
COB85XL SUB, RLFILE
LINK RLFILE, SOMEPROG
RUN SOMEPROG |
Related Information | |
- Commands
COB85XLG,
COB85XLK, LINK,
RUN, XEQ,
LINKEDIT Utility - Manuals
HP COBOL II/XL Reference Manual HP COBOL II/XL Programmer's Guide HP Link Editor/iX Reference Manual
|
