- VERSION 4.11.13

- El respaldo diario ahora respalda tambien CAT_VARIABLES.
- Al restaurar el respaldo, nos manda un mensaje con la fecha del respaldo que se va a restaurar.

B4A/Subs.bas

@@ -1677,6 +1677,16 @@ Sub fechanormal(fecha As String) As String 'ignore
 	Return nuevaFecha
 End Sub
 
+Sub fechanormal2(fecha As String) As String 'ignore
+'	Log(fecha)
+	Dim OrigFormat As String = DateTime.DateFormat  'save orig date format
+	DateTime.DateFormat = "YYYY/MMM/dd"
+	Dim nuevaFecha As String=DateTime.Date(fecha)
+	DateTime.DateFormat = OrigFormat  'return to orig date format
+'	Log(nuevaFecha)
+	Return nuevaFecha
+End Sub
+
 Sub horaNormal(fecha As String) As String 'ignore
 '	Log(fecha)
 	Dim OrigFormat As String = DateTime.DateFormat  'save orig date format