SQL/MP Programming Manual for COBOL85

Program Execution
HP NonStop SQL/MP Programming Manual for COBOL85—429326-004
7-3
Using the CREATEPROCESS Routine
Using the CREATEPROCESS Routine
To execute an SQL program file from a COBOL program, use the COBOL
CREATEPROCESS routine. The CREATEPROCESS routine starts a new process by
using the parameters you supply and (optionally) sends process-creation messages
altered by COBOL saved message utility (SMU) routines to the new process.
To call the CREATEPROCESS routine, use the COBOL ENTER statement; however,
do not include the TAL keyword after the ENTER keyword.
Example 7-1 illustrates a CREATEPROCESS routine. The user enters values for
NEW-PROGRAM, NEW-OPTION, and NEW-CPU.
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.
...