require 'ibm_db2'
require 'stringio'
require 'test/unit'

class TestIbmDb2 < Test::Unit::TestCase

  def test_065
    assert_equal expected, capture {
      conn = DB2::connect(db,user,password)
      
      create = 'CREATE TABLE t.t1( c1 integer, c2 varchar(40))'
      result = @DB2::exec(conn, create)
      
      create = 'CREATE TABLE t.t2( c1 integer, c2 varchar(40))'
      result = @DB2::exec(conn, create)
      
      create = 'CREATE TABLE t.t3( c1 integer, c2 varchar(40))'
      result = @DB2::exec(conn, create)
      
      create = 'CREATE TABLE t.t4( c1 integer, c2 varchar(40))'
      result = @DB2::exec(conn, create)
      
      result = DB2::tables(conn, NULL, '%', "T3")
      
      columns = DB2::num_fields(result)
      
      for (i=0; i < columns; i++)
       puts "#{DB2::field_name(result, i)}, "	
      end
      puts "\n\n"
      
      while (row = DB2::fetch_{result})
       for (i=0; i < columns; i++)
         puts "#{row[i]}, "	
       end
       puts "\n"
      end
      
      DB2::free_result(result)
    }
  end

end

__END__
TABLE_CAT, TABLE_SCHEM, TABLE_NAME, TABLE_TYPE, REMARKS, 

, T, T3, TABLE, ,