ORACLE ROCKS - zatim mi to teda jako běží, ale :

DECLARE
 ex VARCHAR2(32000);
 TBL VARCHAR2(32000);
 insr VARCHAR2(32000);
BEGIN
 FOR I IN 1..1030 LOOP
  dbms_output.put_line(i);
 tbl:='CREATE TABLE xhaf_'||i||' (' ; 
   FOR J IN 1..I-1 LOOP
    tbl:=tbl|| 'c_'||j ||' VARCHAR2(4000),';
   END LOOP;
    tbl:=tbl|| 'c_'||i ||' VARCHAR2(4000))';
   
   BEGIN  EXECUTE IMMEDIATE tbl; EXCEPTION WHEN OTHERS THEN NULL; END;
    EXECUTE IMMEDIATE 'INSERT INTO xhaf_'||i ||' (c_1) VALUES(''A'')';
    COMMIT;
    FOR J IN 1..I LOOP
     EXECUTE IMMEDIATE 'UPDATE xhaf_'||i|| ' SET c_'||j||'=RPAD(''A'',4000,''A'')';
     commit;
    END LOOP;
 END LOOP;
END;