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

class TestIbmDb2 < Test::Unit::TestCase

  def test_063
    assert_equal expected, capture {
      conn = DB2::connect(db,user,password)
      
      result = DB2::tables(conn, NULL, "SYSIBM", "", "VIEW")
      
      print_r (result)
      
      while (row=DB2::fetch_{result})
       for (i=0; i<DB2::num_fields(result); i++)
         puts "#{row[i]}, "	
       end
       puts "\n"
      end
      
      DB2::free_result(result)
    }
  end

end

__END__
Resource id #%d