COBOL Manual for TNS and TNS/R Programs

Calling Other Programs and Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
23-15
HP COBOL Run-Time Routines
use a compilation command like
RUN MYCOBVOL.COBOL85 /IN XYZ/
or
RUN MYCOBVOL.NMCOBOL /IN XYZ/
where MYCOBVOL is the subvolume you created.
•
Use the system volume for your compilations, but use a CONSULT directive to tell
the compiler to resolve external references from a file other than COBOLEXT or
NMCOBEXT.
HP COBOL Run-Time Routines
Your HP COBOL program calls HP COBOL run-time routines implicitly, not with
ENTER statements. For TNS programs, HP COBOL run-time routines are in the
system library. Their names begin with “C85LIB^” or “C85LIB_.” They execute in the
system library. For native programs, HP COBOL run-time routines are in the shared
run-time library ZCOBSRL. Their names begin with “COBLIB_.” They execute in SRL
code space.
COBOL Utility Routines
HP provides many COBOL utility routines that your COBOL program can call with the
ENTER statement. These routines are described in Section 13, Libraries and Utility
Routines.
ENFORM Programs
ENFORM, a component of the Encompass distributed database management system,
is a powerful nonprocedural language for querying or developing reports on a relational
database.
If your database is described in the Data Definition Language (DDL), you can write an
ENFORM query to specify the records you want from the database and the order in
which you want ENFORM to deliver them. You then compile that ENFORM query into
a disk file and include code in a COBOL program to start ENFORM as a separate
process.
The operating environment procedure ENFORMSTART initiates the query processor.
Each time the ENFORMRECEIVE procedure executes, it accepts either a record that
ENFORM built and transmitted to the program through the interprocess message
system or an error value. The ENFORMFINISH procedure terminates the processing
with the query processor. This mechanism is called the host-language interface and is
documented in the ENFORM User’s Guide. You cannot use this mechanism from a
Pathway server if the ENFORM routines use $RECEIVE.