Hi Barbara --

>Great idea, John, but I think your EditValue_assign method will have to be a CASE statement with an entry for each value of tNewVal.
>
>This is a good way of combining code that is presently on 'your' Edit, Save, Cancel and Add buttons.
>

Whoops....you are right, of course. The amended code is below:

LPARAMETERS tNewVal
THIS.EditState=tNewVal
DO CASE 
CASE tNewVal=0   && No edit state
   ***--- Code for not editing and not adding
CASE tNewVal=1   && Editing
   THIS.SetAll("Enabled",.T.)
   THIS.Refresh()
CASE tNewVal=2
   INSERT INTO table (field) VALUE (value)
   ***--- More append code
ENDCASE

Thanks for pointing out my ommission!