smalltalk
connection := GsSession connectTo: 'gemstone://localhost:9999/databaseName'.
transactionContext := connection beginTransaction.
[
object := MyObject new.
object setName: 'example'.
connection store: object.
ex signal.
transactionContext rollbackTransaction.
].
transactionContext commitTransaction.
connection close.