DATA: STROKAN(500).

CONCATENATE 'tabl as a1 ' INTO STROKAN separated by space.

EXEC SQL.
OPEN   C FOR
     SELECT A1.ZKOD_PLATEL
     FROM (STROKAN)
     WHERE A1.SUMMA <>0
ENDEXEC.

EXEC SQL BEGIN DECLARE SECTION;

int hno;

char name[16];

float price;

char cmd[100];

char *stmt;

EXEC SQL END DECLARE SECTION;

strcpy (cmd, "INSERT (INTO???) hotel VALUES(10, 'Excelsior', \
79000, 'Atlanta', 135.00)");

EXEC SQL PREPARE STMT1 FROM :cmd;

EXEC SQL EXECUTE STMT1;

hno = 10;

strcpy (cmd, "SELECT name, price INTO ?, ? \
FROM hotel WHERE hno=?");

stmt = "STMT2";

EXEC SQL PREPARE :stmt FROM :cmd;

EXEC SQL EXECUTE :stmt USING :name, :price, :hno;