Clipper/FiveWin - evento cerrar en grid ???

podrian ayudarme estoy ya metido con lo del fw y me podrian decir cual es el evento cerrar de un grid.me explico mas yo tengo dos controles aceptar y cancelar ,cuando uno hace clic
en ceptar graba y cuando uno hace click en cancelar borra.pero cuando cierra con el control de cerrar ventana del grid no hace ninguno de los dos.
el codigo lo tengo asi :

DEFINE DIALOG oDlg RESOURCE "DOC_ORC" TITLE "ORDENES DE COMPRA"
REDEFINE BUTTON ID 701 OF oDlg ACTION(XX(OdBF1,lAppend,oDlg))
REDEFINE BUTTON ID 702 OF oDlg ACTION(XX2(OdBF1,lAppend,oDlg))

el 701 es aceptar y el 702 cancelar.
bueno espero que me entiendan lo que quiero.
saludos.

Utiliza el VALID del ACTIVATE DIALOG:

ACTIVATE DIALOG .... VALID (pon_aqui_tu_funcion, .T.)

Y listo

Marcella

en el evento de cerrar añade oDlg:end()
te quedaría algo así:
REDEFINE BUTTON ID 702 OF oDlg ACTION(XX2(OdBF1,lAppend,oDlg),oDlg:end())

y listo.
Un saludo.
LORENZO

PD: Aparentemente la función XX y la función XX2 son iguales... te recomiendo eliminar la función XX2 para simplificar código quedando algo así:

REDEFINE BUTTON ID 702 OF oDlg ACTION oDlg:end()

hola escribe marcela.no me unciono.al momento de cerrar la ventana pinchando la x de crerrar el dialogo. no hace nada.
espero que me ayuden.
saludos.

gracias a gabriel y lorenzo.lo solucione.
era tal como decia lorenzo.
activate dialog oDlg center valid (!GetKeyState(VK_ESCAPE),XXxOdBF1,lAppend,oDlg),.t.)
este codigo detecta el escape del dialogo./

muchas gracias de nuevoi.