Sr. Cristobal, muito obrigado :D function aObjData( obj ) /* */ local n, v, l local aData := AOData( obj ) for n := 1 to Len( aData ) TRY v := OSend( obj, aData[ n ] ) l := .t. CATCH v := '<protected>' l := .f. END aData[ n ] := Lower( Left( aData[ n ], 1 ) ) + ; SubStr( aData[ n ], 2 , ...