...

B4A/C_Cliente.bas

@@ -847,7 +847,10 @@ End Sub
 Private Sub B4XPage_CloseRequest As ResumableSub
 	' BACK key pressed
 	'Return True to close, False to cancel
-	If PNL_TOTALES.Visible Then
+	If p_promowhats.Visible Then
+		p_promowhats.Visible = False
+		P_INF_GENERAL.Visible = True
+	ELSE If PNL_TOTALES.Visible Then
 		PNL_TOTALES.Visible = False
 		P_BOLETA.Visible = False
 		P_INF_GENERAL.Visible = True
@@ -874,6 +877,7 @@ Sub DATOS_Click
 End Sub
 
 Sub Guardar_Click
+	B4XPages.MainPage.principal.kh.RD_respaldoBatch
 	Log("GUARDAR")
 	DateTime.DateFormat = "MM/dd/yyyy"
 	sDate=DateTime.Date(DateTime.Now)