SQL/MP Programming Manual for COBOL

Converting COBOL Programs
HP NonStop SQL/MP Programming Manual for COBOL—529758-003
D-3
Generating a Version 2 SQLDA Structure
1. If necessary, remove the RELEASE2 option from the SQL compiler directive or the
INCLUDE SQLDA directive. The HP COBOL compiler returns an error if you
specify the RELEASE2 option and the INCLUDE STRUCTURES directive.
2. If you specified the RELEASE2 option in an INCLUDE SQLDA directive, remove
any -R2 suffixes you appended to SQLDA field names.
3. If you are converting a version 1 SQLDA structure, initialize the NULL-INFO and
IND-PTR fields. (Your program should already initialize these fields for a version 2
SQLDA structure.)
4. Add an INCLUDE STRUCTURES directive with the ALL VERSION 2 option:
EXEC SQL INCLUDE STRUCTURES ALL VERSION 2 END-EXEC.
Or specify only the SQLDA VERSION 2 option:
EXEC SQL INCLUDE STRUCTURES SQLDA VERSION 2 END-EXEC.
Example D-1 shows a version 2 SQLDA structure.
Table D-2 describes each field in a version 2 SQLDA structure.
Example D-1. Version 2 SQLDA Structure
01 sqlda-name.
05 EYE–CATCHER PIC X(2) VALUE "D1".
05 NUM–ENTRIES PIC S9(4) COMP VALUE sqlvar-count.
05 SQLVAR [ –R2 ] OCCURS sqlvar-count TIMES.
10 DATA–TYPE PIC S9(4) COMP.
10 DATA–LEN NATIVE–2.
10 PRECISION PIC S9(4) COMP.
10 NULL–INFO PIC S9(4) COMP..
10 VAR–PTR PIC S9(9) COMP.
10 IND–PTR PIC S9(9) COMP.
10 RESERVED PIC S9(18) COMP.
01 names-buffer-name PIC X( length ).
Table D-2. Version 2 SQLDA Structure Fields (page 1 of 3)
Field Name Description
EYE-CATCHER An identifying field your program must initialize as D1 for version 1 or DA
for version 2. SQL/MP statements do not return values to EYE-
CATCHER.
NUM-ENTRIES The number of input or output parameters the SQLDA structure can
accommodate.
SQLVAR Group item that describes input parameters or database columns. The
DESCRIBE INPUT and DESCRIBE statements return one SQLVAR entry
for each input parameter or each output variable.
DATA-TYPE The data type of the parameter or output variable.