class TestIbmDb2 < Test::Unit::TestCase

  def test_065
    assert_expect {
      conn = DB2::connect db,user,password
      create = 'CREATE TABLE t.t1( c1 integer, c2 varchar(40))'
      result = DB2::exec(conn, create) rescue nil
      create = 'CREATE TABLE t.t2( c1 integer, c2 varchar(40))'
      result = DB2::exec(conn, create) rescue nil
      create = 'CREATE TABLE t.t3( c1 integer, c2 varchar(40))'
      result = DB2::exec(conn, create) rescue nil
      create = 'CREATE TABLE t.t4( c1 integer, c2 varchar(40))'
      result = DB2::exec(conn, create) rescue nil
      result = DB2::tables conn, NULL, '%', "T3"
      columns = DB2::num_fields result
      for i in (0 ... columns)
        print "#{DB2::field_name(result, i)}, "
      end
      print "\n\n"
      while (row = DB2::fetch_array(result))
        for i in (0 ... columns)
         print "#{row[i]}, "
        end
        puts ""
      end
      
      DB2::free_result result
    }
  end

end

__END__
TABLE_CAT, TABLE_SCHEM, TABLE_NAME, TABLE_TYPE, REMARKS, 

, T, T3, TABLE, ,