> m <- dbManager("Oracle")
> ...
# Let's look at the status of the manager
> describe(m, verbose = F)   
OraManager id = (7269) 
  Max  connections: 16 
  Conn. processed: 1 
  Default records per fetch: 500 
  Open connections: 1 
> rs <- dbExecStatement(con, query)
> ...
# The following shows that we extracted only one field
# names "Tables in opto" plus its corresponding S class, internal 
# database type, and various other internal attributes.
> getFields(rs)
           name    Sclass              type len precision scale nullOK 
1 Tables in opto character FIELD_TYPE_STRING  64        64     0      F
# A full description of the result set is
> describe(rs, verbose = T)
OraResultSet id = (7269,3,1) 
  Statement: show tables 
  Has completed? no 
  Affected rows: -1 
  Rows fetched: 3 
  Fields:
            name    Sclass              type len precision scale nullOK 
1 Tables in opto character FIELD_TYPE_STRING  64        64     0      FRun the code above in your browser using DataLab