COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-76
COBOL85^SPECIAL^OPEN and
COBOL_SPECIAL_OPEN_
code-129
is a numeric operand that specifies whether a code 129 file (spooler job file) is to
be created or a regular spooler file is to be created. A nonzero value indicates that
the run-time library is to call SPOOLSTART with file-name reflecting the name
specified in the ASSIGN phrase of the SELECT clause for the file or by an
ASSIGN TACL command. See the description of SPOOLSTART in the Guardian
Procedure Calls Reference Manual for details on spooler job files. The resulting file
must be a disk file and must be a code 129 spooler job file if it exists. The file-
system file name must be a name acceptable in the non-CRE environment. For
example, the volume name cannot exceed seven characters. If the actual file is
incorrect, an error is reported and the program terminates abnormally. If the value
of code-129 is 0, it is assumed that the actual file assigned will be a normal
spooler process. You can use flags to control whether the file is compressed
and whether old data in the file is deleted or new data is appended. If code-129
is specified, these parameters are ignored:
form-feed
is a numeric operand that specifies whether a form feed (CONTROL (file, 1, 0)) is
to be used to position to the top of a new page rather than using spacing when
LINAGE is specified for the file. A value of 0 (the default) indicates that spacing is
to be used; a nonzero value indicates that a form feed is to be used. If form-feed
is nonzero, the sizes of the pages may not conform to that specified in the LINAGE
clause for the file. The size depends on the forms control mechanism of the printer.
return-code
is an identifier of a numeric data item in which an error value will be returned. The
expected values and their respective meanings are:
Parameter Value Used
exclusion Protected
sync-depth 1
level-3 Level 3
location The file specified in the SELECT clause
Value Meaning
0 Successful execution
1 file-name is missing or is invalid, or an extraneous parameter is present.
2 The value of the open-type, exclusion, or sync-depth parameter is
invalid.
3 The value of the owner parameter is invalid.
4The device-type of the file specified is not compatible with the value
specified for open-type.
5 An operation error occurred (for example, the file could not be opened).