function EExecGT &OOO X Att Sg1 FM =
(

	if (X==undefined) then return false

	if ((X.OB=="P") or (X.OB=="O")) then
	(
		TOUsl_Create &OOO (IsSobstv X) Att
	) else if (Att.Chk==1) then TOEmpty_Create &OOO Att


	return true

) -- EExecGT