Retrieving an Embedded/Value Instance from the Database

An OraObject object can be retrieved using OO4O in the following ways:

Using a Dynaset Object

If a table contains an object type column and a dynaset's query selects against that column, then the Value property of OraField object returns an OraObject.

The following code selects an ADDRESS column from the person table and then an 'Address' object is retrieved from the OraField object

set OO4OSession = CreateObject("OracleInProcServer.XOraSession")

set hrDb = OO4OSession.OpenDatabase("ExampleDb", "scott/tiger", 0)

set Person = hrDb.CreateDynaset("select * from person", 0&)

set Address = Person.Fields("Addr").Value

Using a Parameter Object

If a SQL statement or PL/SQL block has a bind variable of object type, you create a OraParameter object using the OraParameters Add method. The Value property of the OraParameter object for that bind variable returns an OraObject.

The following example uses an object datatype as a bind variable in a PLSQL anonymous block. This block selects an object column from the database.

set OO4OSession = CreateObject("OracleInProcServer.XOraSession")

set hrDb = OO4OSession.OpenDatabase("ExampleDb", "scott/tiger", 0)

hrDb.Parameters.Add "ADDRESS", Null, ORAPARM_OUTPUT, ORATYPE_OBJECT,

"ADDRESS"

'execute the sql statement which selects Address from the person_tab

hrDb.ExecuteSQL ("BEGIN select Addr into :ADDRESS from person where

age = 40; end;")

'retrieve Address object from the OraParameter

set address = hrDb.Parameters("ADDRESS").Value