class TestIbmDb2 < Test::Unit::TestCase

  def test_300
    assert_expectf do
      conn = DB2::connect database, user, password
      
      server = DB2::server_info conn
      
      if server
        print "DBMS_NAME: ";         var_dump( server.DBMS_NAME );     
        print "DBMS_VER: ";             var_dump( server.DBMS_VER );     
        print "DB_CODEPAGE: ";         var_dump( server.DB_CODEPAGE );     
        print "DB_NAME: ";             var_dump( server.DB_NAME );     
        print "INST_NAME: ";         var_dump( server.INST_NAME );     
        print "SPECIAL_CHARS: ";         var_dump( server.SPECIAL_CHARS );     
        print "KEYWORDS: ";             var_dump( server.KEYWORDS.size );     
        print "DFT_ISOLATION: ";         var_dump( server.DFT_ISOLATION );     
        print "ISOLATION_OPTION: ";         
        il = ''
        for opt in server.ISOLATION_OPTION
          il += opt + " "
        end
        var_dump( il );     
        print "SQL_CONFORMANCE: ";         var_dump( server.SQL_CONFORMANCE );     
        print "PROCEDURES: ";         var_dump( server.PROCEDURES );     
        print "IDENTIFIER_QUOTE_CHAR: ";    var_dump( server.IDENTIFIER_QUOTE_CHAR );     
        print "LIKE_ESCAPE_CLAUSE: ";     var_dump( server.LIKE_ESCAPE_CLAUSE );     
        print "MAX_COL_NAME_LEN: ";         var_dump( server.MAX_COL_NAME_LEN );     
        print "MAX_ROW_SIZE: ";         var_dump( server.MAX_ROW_SIZE );     
        print "MAX_IDENTIFIER_LEN: ";     var_dump( server.MAX_IDENTIFIER_LEN );     
        print "MAX_INDEX_SIZE: ";         var_dump( server.MAX_INDEX_SIZE );     
        print "MAX_PROC_NAME_LEN: ";     var_dump( server.MAX_PROC_NAME_LEN );     
        print "MAX_SCHEMA_NAME_LEN: ";     var_dump( server.MAX_SCHEMA_NAME_LEN );     
        print "MAX_STATEMENT_LEN: ";     var_dump( server.MAX_STATEMENT_LEN );     
        print "MAX_TABLE_NAME_LEN: ";     var_dump( server.MAX_TABLE_NAME_LEN );     
        print "NON_NULLABLE_COLUMNS: ";     var_dump( server.NON_NULLABLE_COLUMNS );     
      
        DB2::close conn
      else
        print "Error."
      end
    end
  end

end

__END__
DBMS_NAME: string(%d) %s
DBMS_VER: string(%d) %s
DB_CODEPAGE: int(%d)
DB_NAME: string(%d) %s
INST_NAME: string(%d) %s
SPECIAL_CHARS: string(%d) %s
KEYWORDS: int(%d)
DFT_ISOLATION: string(%d) %s
ISOLATION_OPTION: string(%d) %s
SQL_CONFORMANCE: string(%d) %s
PROCEDURES: bool(%s)
IDENTIFIER_QUOTE_CHAR: string(%d) %s
LIKE_ESCAPE_CLAUSE: bool(%s)
MAX_COL_NAME_LEN: int(%d)
MAX_ROW_SIZE: int(%d)
MAX_IDENTIFIER_LEN: int(%d)
MAX_INDEX_SIZE: int(%d)
MAX_PROC_NAME_LEN: int(%d)
MAX_SCHEMA_NAME_LEN: int(%d)
MAX_STATEMENT_LEN: int(%d)
MAX_TABLE_NAME_LEN: int(%d)
NON_NULLABLE_COLUMNS: bool(%s)