#include <stdio.h>
#include <stdlib.h>
#include <string.h> 



exec sql BEGIN DECLARE SECTION;
static char SQLSTATE[6];
exec sql END DECLARE SECTION;

main()
{
    exec sql BEGIN DECLARE SECTION;
    varchar schema[129], table [129];
    char type  [21];
    exec sql END DECLARE SECTION;
    exec sql DECLARE MYCURSOR CURSOR FOR
         SELECT TABLE_SCHEMA, TABLE_NAME, TABLE_TYPE
         FROM INFORMATION_SCHEMA.TABLES;

 /* Connect to default database */

    exec sql CONNECT TO '' USER 'SYSADM' USING 'SYSADM';
    exec sql OPEN MYCURSOR;

    while (1) {
        exec sql FETCH MYCURSOR INTO :schema, :table, :type;
        if (strcmp(SQLSTATE, "02000") == 0) break; /* No more rows */
        printf("%s\t%s\t%s\n", schema, table, type);
    }

    exec sql CLOSE MYCURSOR;
    exec sql COMMIT;
    exec sql DISCONNECT ALL;
    exit(0);
}