SQL/MP Programming Manual for COBOL

Program Execution
HP NonStop SQL/MP Programming Manual for COBOL—529758-003
7-4
Using the CLU_PROCESS_CREATE_ Routine
For more information about the CREATEPROCESS routine, see the COBOL85 for
NonStop Systems Manual.
Using the CLU_PROCESS_CREATE_ Routine
To execute an SQL program from a COBOL program on a TNS/R system, use the
CLU_PROCESS_CREATE_ routine. Use this routine for programs that run in the CRE
or in a COBOL run-time environment on a TNS/R system. The
CLU_PROCESS_CREATE_ routine calls the system procedure,
PROCESS_CREATE_, and starts a new high-pin process by using the parameters that
you supply. For more information, see the CRE Programmer’s Guide.
Example 7-1. COBOL CREATEPROCESS Routine
IDENTIFICATION DIVISION
PROGRAM-ID. RUNSQL.
...
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
...
SPECIAL-NAMES.
FILE $SYSTEM.SYSTEM.COBOLLIB IS COBOL-LIBRARY.
...
DATA DIVISION.
WORKING-STORAGE SECTION.
01 SQL-PROGRAM-FILE PIC X(36).
01 CREATE-OPTION PIC 9999 COMP.
01 PRIMARY-CPU PIC S9999 COMP.
01 RETURN-STATUS PIC S9999 COMP.
...
PROCEDURE DIVISION.
...
* User enters values for NEW-PROGRAM, NEW-OPTION, and NEW-CPU.
MOVE NEW-PROGRAM TO SQL-PROGRAM-FILE.
MOVE NEW-OPTION TO CREATE-OPTION.
MOVE NEW-CPU TO PRIMARY-CPU.
ENTER "CREATEPROCESS" OF COBOL-LIBRARY
USING SQL-PROGRAM-FILE,
OMITTED,
CREATE-OPTION,
OMITTED,
PRIMARY-CPU,
OMITTED,
OMITTED
GIVING RETURN-STATUS.
IF RETURN-STATUS IS NOT EQUAL TO ZERO
PERFORM 1000-ERROR-ROUTINE.
...