COBOL Manual for TNS and TNS/R Programs

HP COBOL CRE Support
HP COBOL Manual for TNS and TNS/R Programs—522555-006
18-8
COBOLLIB Routines
COBOLLIB Routines
These COBOLLIB routines are affected by CRE support:
•
COBOLASSIGN
•
COBOLFILEINFO
•
COBOLSPOOLOPEN
COBOLASSIGN
In the CRE, the routine COBOL_ASSIGN_ has replaced the non-CRE routine
COBOLASSIGN. If either a TNS HP COBOL program that runs in the CRE or a native
HP COBOL program calls COBOLASSIGN, it actually calls COBOL_ASSIGN_
indirectly. The advantages to calling COBOL_ASSIGN_ directly are:
•
Any of the parameters that you can pass can be loaded in the Extended-Storage
Section or Linkage Section.
•
The system-file-name in the SELECT clause need not be #DYNAMIC.
•
You can specify temporary file names.
•
You can specify two additional parameters, file-code and file-type.
For more information, see COBOLASSIGN and COBOL_ASSIGN_.
COBOLFILEINFO
In the CRE, COBOLFILEINFO always returns a fully-qualified file name (that is, the
first character is backward slash (\) and the second character is the system number,
even if the file is on a local system). In the non-CRE environment, COBOLFILEINFO
does not always return a fully-qualified file name.
The native version of COBOLFILEINFO is in the file ZCRESRL.
For more information, see COBOLFILEINFO.
COBOLSPOOLOPEN
A CRE COBOL program cannot call the routine COBOLSPOOLOPEN. Instead, it can
call the routine COBOL_SPECIAL_OPEN_, which has all the facilities of
COBOLSPOOLOPEN and more.
COBOLSPOOLOPEN is in the COBOLLIB file, the TNS version of
COBOL_SPECIAL_OPEN_ is in the CBL85UTL file, and the native version of
COBOL_SPECIAL_OPEN_ is in the ZCOBSRL file. For more information, see
COBOLSPOOLOPEN and COBOL85^SPECIAL^OPEN and
COBOL_SPECIAL_OPEN_.