Power Builder - a ver ti te entendi!!!

 
Vista:

a ver ti te entendi!!!

Publicado por Victor //:-) (116 intervenciones) el 20/05/2005 19:23:53

Quieres validar cuando el usuario sale cerrando la ventana a media captura.

Pon en w_tu_ventana, en el evento CLOSEQUERY

integer li_rc

// Acepta lo capturado
if dw_1.AcceptText()<>1 then return 1//no cierre por que hay datos incorrectos en la captura.

//se valida si cambiaste campos-renglones borranado o modificando
IF dw_1.DeletedCount()+dw_1.ModifiedCount() > 0 THEN

li_rc = MessageBox("Precaucion!!!!", "Usted a eliminado o modifcado informacion, ¿Desea Actualizarla?", Question!, YesNoCancel!, 3)


IF li_rc = 1 THEN //SI dese actualizar

Window lw_window
lw_window = w_genapp_frame.GetActiveSheet()
lw_window.TriggerEvent("ue_update")
// o sencillo
Parent.TriggerEvent("cb_aceptar")
// o si mas sencillo
cb_aceptar.TriggerEvent(Clicked!)
RETURN 0 // permite cerrar

ELSEIF li_rc = 2 THEN //cerrar sin grabar
//SI TIENE BOTON DE SALIR PON cb_salir.TriggerEvent(Clicked!)

RETURN 0 //cierra toda la ventana
ELSE // solo continua la captura
RETURN 1 //no cierra
END IF

ELSE //IF dw_1.DeletedCount()+dw_1.ModifiedCount() >0
RETURN 0 // cierra por que no hay datos pendientes
END IF

atte
Victor //:-)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder