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

Embedded-Only SQL/MX Statements
HP NonStop SQL/MX Reference Manual—540440-003
3-8
COBOL Examples of ALLOCATE DESCRIPTOR
COBOL Examples of ALLOCATE DESCRIPTOR
•
This example uses an SQL string literal as the descriptor name:
MOVE 1 TO desc-max.
EXEC SQL ALLOCATE DESCRIPTOR 'in_sqlda'
WITH MAX :desc-max
END-EXEC.
•
This example uses a host variable as the descriptor name:
...
EXEC SQL BEGIN DECLARE SECTION END-EXEC.
01 desc-name PIC X(20).
01 desc-max S9(9) comp.
...
EXEC SQL END DECLARE SECTION END-EXEC.
...
MOVE "in_sqlda" TO desc-name.
MOVE 1 TO desc-max.
EXEC SQL ALLOCATE DESCRIPTOR :desc-name
WITH MAX :desc-max
END-EXEC.
...