Tengo un formulario con varios subformularios que funciona bien (firebird). Pero me he dado cuenta que aunque guarde el registro en el formulario, base me vuelve a pedir que guarde los cambios, cuando cierro la base de datos. De hecho si no guardo los cambios de base, al entrar de nuevo en mi formulario todos los cambios que hice no se han grabado.
He mirado otras bases de datos como la de Gesfactura de RMG y cuando realiza cambios en los formularios, nunca pide guardar cambios en base.
¿Qué estoy haciendo mal?
Una solución rápida puede ser una macro que cierre formulario y base de datos guardando cambios, pero la que pongo a continuación solo me guarda la información del formulario.
Código: Seleccionar todo
Sub CerrarBase()
Dim opcion As integer
opcion = MsgBox ("¿Realmente deseas salir de la BD?",36,"Opcion de salir BD")
If opcion = 6 Then
ThisDatabaseDocument.CurrentController.CloseSubComponents() 'Cierra todos los formularios y pregunta si guarda los datos
Wait(500)
ThisDataBaseDocument.Close(True)
If GetGUIType = 1 Then
Wait(500)
starDesktop.terminate
End If
End if
End Sub