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

class TestIbmDb2 < Test::Unit::TestCase

  def test_039
    assert_equal expected, capture {
      conn = DB2::connect(db,user,password)
      
      result = DB2::exec(conn, "select * from animals", {'cursor' => DB2::SCROLLABLE} )
      i = DB2::num_rows(result)-1
      while (row = DB2::fetch_row(result,i))
      	result2 = DB2::exec(conn, "select * from animals", array ('cursor' => DB2::SCROLLABLE))
      	j= DB2::num_rows(result2)-1
      	puts ",\n"
      	while (row2 = DB2::fetch_row(result2,j))
      		puts "#{i})#{j} "	
      		j--
      	end
      	puts "#{i}, \n"
      	i--
      end
    }
  end

end

__END__
,
6)6 6)5 6)4 6)3 6)2 6)1 6)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
6, 
,
5)6 5)5 5)4 5)3 5)2 5)1 5)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
5, 
,
4)6 4)5 4)4 4)3 4)2 4)1 4)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
4, 
,
3)6 3)5 3)4 3)3 3)2 3)1 3)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
3, 
,
2)6 2)5 2)4 2)3 2)2 2)1 2)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
2, 
,
1)6 1)5 1)4 1)3 1)2 1)1 1)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
1, 
,
0)6 0)5 0)4 0)3 0)2 0)1 0)0 PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 13
0, 
PHP Warning:  db2_fetch_row(): Requested row number must be a positive value in %stest_039.php on line 9