>>>>Is there a way to assign property values to a group of objects if there is not a value already asssigned? I'm looking to set all the HelpContextID properties for objects on a page (form, pageframe, whatever...) to a specific value unless they have previously been assigned in development. I'm trying to think of a way to use the SetAll method to handle this... Thanks!
>>>>
>>>>Regards, Renoir
>>>
>>>Here is a sample assign method that will do what you want.
>>>This code makes two assumptions:
>>>1. If you don't set the HelpContextID it defaults to 0.
>>>2. Sometimes you may want SetAll("helpContextID" ##) to really set them all, and other times just the ones that are still the default value.
>>>
>>>In your base class, create an assign method to HelpContextID and a new property ProtectHelpContextID. The property defaults to .F.
>>>
>>>This code in the new assign method will do the job
>>>

>>>LPARAMETERS vNewVal
>>>*: Change property to new value if permitted or if default value
>>>IF (This.ProtectHelpContextID = .F.) OR (This.HelpContextID = 0)
>>>	THIS.HelpContextID = m.vNewVal
>>>ENDIF
>>>

>>>
>>>And use this code to change defaults to 999
>>>

form.SetAll("ProtectHelpContextID",.T.)
>>>form.SetAll("HelpContextID",999)
>>>form.SetAll("ProtectHelpContextID",.F.)
>>>

>>
>>Hi David,
>>
>>Your example first sets ProtectHelpContextID to .t., then according to the method you wrote, it would not assign 999 to HelpContextID.
>>
>> Actually, this is exactly what I meant, when wrote a message to Renoir. We probably don't need the property ProtectHelpContextID, though it may be a good idea to have it.
>
>Hi Nadya,
>
>The assign method will update HelpContextID if ProtectHelpContextID = .F. OR If HelpContextID = 0. So...
>If ProtectHelpContextID is .F. all objects will update.
>If ProtectHelpContextID = .T. only those with a value of 0 will update.
>ProtectHelpContextID's default value of .F. allows SETALL("HelpCOntextID",###) work normally, setting all the objects to the new value.
>
>Putting the logic in one IF-THEN statement makes it difficult to read. I should have split it into two IF-THEN statements like this.
>
>

IF ProtectHelpContextID = .F.
>   THIS.HelpContextID = m.vNewVal
>ELSE
>   IF HelpContextID = 0
>      THIS.HelpContextID = m.vNewVal
>   ENDIF
>ENDIF
>

Thanks, David. You're right, my bad...