SQL/MX 3.x Reference Manual (H06.22+, J06.11+)

Embedded-Only SQL/MX Statements
HP NonStop SQL/MX Reference Manual—640322-001
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.