
(def-view-class car
(standard-db-object standard-kb-object)
((car_no :db-kind :key)
(keeper)
(owner :db-kind :join
:db-info (:home-key :keeper
:foreign-key person_id
:retrieval :deferred
:join-class person))))
 defines a database class car  where the  person  object in the  keeper  slot is retrieved from the  person  table in the database using the value of the  keeper  slot as key, only when queried. In the list of superclasses,   standard-kb-object  should appear after   standard-db-object  .