EXEC SQL [ AT Database ]   FREE Host-Variable END-EXEC  | 
exec sql allocate :cur-hndl end-exec. exec sql execute    begin         open :cur-hndl for select * from emp;    end; end-exec. exec sql fetch :cur-hndl into :empno,:ename end-exec. exec sql free :cur-hndl end-exec.  | 
working-storage section. ... 77 cmd handle. ... procedure division. ...  exec sql      prepare :cmd from          "insert into cust_table values (2010,'Evan Raymond','New York')" end-exec exec sql      execute :cmd end-exec exec sql      free :cmd end-exec  |