[Zope] Simpler way to change ZCataloged ZClass property?

[Milos Prudek]

To change a property of a ZClass, where the ZClass instance must be 
located using ZCatalog, I'm using this Python Script:

for i in context.Catalog_Org(userid=666):
   rid=i.data_record_id_
   obj=context.Catalog_Org.getobject(rid)
   obj.propertysheets.data.manage_changeProperties(userid="777")

It works well. But is this the "right" way? It feels rather convoluted 
to me...

I'd like to know if the above can be done in fewer lines, or in a less 
computationally expensive way.

-- 
Milos Prudek