SQL/MX 2.x Reference Manual (H06.04+)

Embedded-Only SQL/MX Statements
HP NonStop SQL/MX Reference Manual540440-003
3-10
COBOL Examples of BEGIN DECLARE SECTION
COBOL Examples of BEGIN DECLARE SECTION
This example shows a declaration section:
EXEC SQL BEGIN DECLARE SECTION END-EXEC.
01 length pic 9(4)comp.
01 data pic x(10).
EXEC SQL END DECLARE SECTION END-EXEC.
This example shows a declaration section that uses an INVOKE directive to
declare a record description of a table:
EXEC SQL BEGIN DECLARE SECTION END-EXEC.
EXEC SQL INVOKE SALES.PARTS END-EXEC.
EXEC SQL END DECLARE SECTION END-EXEC.