>>---EXEC SQL---END DECLARE SECTION---------END-EXEC----><
WORKING-STORAGE SECTION. EXEC SQL BEGIN DECLARE SECTION END-EXEC 01 staff-id pic x(4). 01 last-name pic x(30). EXEC SQL END DECLARE SECTION END-EXEC