SQL/MX 2.x Reference Manual (G06.24+, H06.03+)

Embedded-Only SQL/MX Statements
HP NonStop SQL/MX Reference Manual523725-004
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.