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

class TestIbmDb2 < Test::Unit::TestCase

  def test_014
    assert_equal expected, capture {
      conn = DB2::connect(db, username, password)
      query = 'select * from animals order by name'
      res = DB2::exec( conn, query, {'CURSOR' => DB2::SCROLLABLE} )
      rows = DB2::num_rows(res)
      puts"#{rows}\n"
      rc = DB2::fetch_row(res,-1)
        printf( "\nFetch row -1: %s\n", rc ? "true" : "false" )
      
      DB2::close(conn)
    }
  end

end

__END__
7
PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_014.php on line 10

Fetch row -1: false