Problema al Salir de Form.

[Angel Dario Rodriguez]

Buenas mis estimados foxeros.

Les adjunto un problema que he estado confrontando con ciertos cursores al salir del form, al ejecutar con Thisformset.release.

A ver si me dan algun tip acerca de la causa y como evitarlo.

Gracias anticipadas.

[Gregori Arjona Toledo]

Buenos dias.

Si nos muestras el codigo que utilizas en tu formulario quizas podamos ayudarte.

Saludos.

[Angel Dario Rodriguez]

[Alberto Mancuso]

En el codigo que mandaste veo que falta la condicion else,

y es como que se ejecuta dos veces las ultimas lineas de codigo,

chequea esa parte y avisanos.

alberto.

[Angel Dario Rodriguez]

gnResp_elim=MESSAGEBOX("Esta seguro que desea Salir del Programa, s/n ?",4)

IF gnResp_elim = 6

   thisformset.Cerrar_cursores()

*    

   THISFORMSET.gcConcepto_auditoria = "Saliendo del sistema"

   THISFORMSET.gcUsuario_operacion = THISFORMSET.gcUsuario

   THISFORMSET.gcNombre_Usuario_operacion = THISFORMSET.gcNombre_abr   

   SQLDISCONNECT(THISFORMSET.nCon)

   CLOSE DATABASES ALL

*    

   thisform.release

   thisformset.release

   QUIT

   CANCEL

   CLOSE ALL

   CLEAR ALL

   

   CANCEL

   CLOSE all

   CLEAR ALL

*   THISFORMSET.Registrar_auditoria()   

*   THISFORMSET.Unload()

ENDIF

[Antonio Meza]

Por lo que veo estas usando FormSet, te lo digo así textualmente "No se lo recomendaría ni a mi peor enemigo" es decir NO USE FORMSET!!!!!

saludos

Antonio Meza

[Euro Nava]

Hola Antonio ¿Por qué recomienda el no utilizar FormSet?

 

 

Saludos

 

 

 

El presente correo y sus anexos son exclusivamente para el uso de los destinatarios indicados en el encabezado del mismo, pueden contener información confidencial y/o privilegiada. Si usted por error ha recibido la presente correspondencia agradezco hacer omisión de esta y hacerme del conocimiento por esta misma vía    

 

Bendito el Hombre que ha sido llamado por Cristo para ser el soldado del ejército en cuya mano empuñe como arma la palabra de Dios

[Antonio Meza]

uff la lista seria como ir a comprar para la cena de navidad al supermercado jajajajajajajaj en su momento cuando estaba aprendiendo VFP los trate de usar, y no pude, busque en internet y todo mundo se quejaba mas que decir que servia, y por eso lo descarte completamente y soy de los que no se rinde tan fácil jajajaja

Mas bien la pregunta seria por que usar FormSet!!! pues aprendiendo a manejar los formularios no serian necesarios, el saber pasar y devolver parámetros entre formularios, cuando usar formularios modales, etc.

Seria bueno conocer quien los haya usado y que le haya sido fácil y que realizar mantenimiento al programa sea fácil también, porque una cosa es lograr que funcione y otra muy diferente que funcione como debe ser.

saludos

Antonio Meza

[Carlos Miguel FARIAS]

Coincido con Antonio. OTRA VEZ, esto se está degenerando.

Los formset son una herencia del fox para DOS y p/Windows.

En esas versiones, lo máximo que se podía tener abierto eran 255 tablas (no había sesiones de datos), y además forzaba a hacer configuraciones en el S.O. para que pudiese fox abrir tantas tablas (había que fijar canales de IO más buffers + LPMQLP).

Entonces el formset permitía gestionar en forma conjunta un grupo de formularios visualmente independientes, pero que estaban accediendo por lo bajo a las mismas tablas. además no era simple pasar parámetros entre formularios, no había variables locales, para evitar problemas había que declarar las private y dale que va.

En vfp con los pageframe te dan la misma funcionalidad (o mas) del formset (al menos desde el punto de vista lógico) con menos inconvenientes que los frameset.

Por eso, lo recomendable, antes de estar renegando con frameset, deberìa reemplantear tu GUI y ver como distribuyes cada uno de los forms (del formset) en pages del framepage..

Como es importante documentar lo que se dice.

Fíjate en la ayuda que te da VFP 9 (SP2), poco y nada, porque, porque la misma ayuda que se índica que el equivalente a los screen sets anteriores.

La pregunta no es porque se recomienda no utilizar formset, la pregunta es porque utilizarías formset, que le viste que pueda servirte a lo que quieres hacer?

O para poder ayudarte mejor. Que quieres hacer que crees que un formset te puede solucionar.

Saludos: Miguel

 

[Angel Dario Rodriguez]

Gracias Antonio, tomare en cuenta tu recomendacion.

[Enrique]

Hola: Puedes hacer lo siguiente, como otra alternativa.

Graba este (prg) código como “salir”

PROCEDURE sales

 CLEAR EVENTS

 ON ShutDown

 QUIT

RETURN

 

En el botón comando de salida del sistema, agrega esto en el evento clic del botón Salir

 

#DEFINE vfpYesNo                         4

 #DEFINE vfpYes                              6

 #DEFINE vfpQuestion     32

 

    IF MESSAGEBOX ("¿Desea Salir de la Aplicación?",  vfpQuestion + vfpYesNo, ("El Sistema Pregunta"))=vfpYes then

     

           =cursorsetprop("buffering",5)

           =tableupdate(.t.)

            FLUSH

                                    SET AUTOSAVE ON

                Do sales                                                             && El programa (prg) que te indique.

                                   THISFORM.RELEASE

                                   RELEASE ALL

                                   NoDefault

                  ELSE

                     * *WAIT WINDOWS "Existe un problema..Consulte al Administrador del Sistema..."

   ENDIF

Saludos cordiales.

[Angel Dario Rodriguez]

Gracias Enrique por tu amabilidad.