>I dragged cmdCancelMaint button from the KCustCtl to my form. Now if I press this cancel button instead of the previous one it gave the same message. Are u saying that I need to fix the code in the cmdCancelMaint parent class.

Well, yes, if that's where the error is. IAC, from the code below, it looks like the problem I suggested in my first post. You're calling it as a function instead of method. See the bolded line below to see what I mean.

>The code in the parent is
>
>LOCAL llFormIsPresent
>
>llFormIsPresent = ( TYPE('THISFORM') <> 'U' )
>
>IF llFormIsPresent
> *----------------------------
> *-- ThisForm.LockScreen = .T.
> *----------------------------
> =LockScreen(.T.)
^^^^^^^^^^^^^^^
Either you have a function in some PRG called LockScreen (which wouldn't be wise since it's a reserved word), and you need a SET PROCEDURE TO thePRG, or you need to just set the form's property like so:

THISFORM.LOCKSCREEN

*---------------------------------------------
> *--- Cancel the current Record. Pass .T. so
> *--- that all records in any table-buffered
> *--- cursors are reverted when cancelling.
> *---------------------------------------------
> ThisForm.Cancel(.T.)
>ENDIF
>
>thanks
>bharat