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. The code in the parent is

LOCAL llFormIsPresent

llFormIsPresent = ( TYPE('THISFORM') <> 'U' )

IF llFormIsPresent
*----------------------------
*-- ThisForm.LockScreen = .T.
*----------------------------
=LockScreen(.T.)
*---------------------------------------------
*--- 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