- Cambios para que el abordo en Resumen Dia se actualice automaticamente.

- Cambio para ue los botones de Cliente Nuevo y Abordo no aparezcan si no esta cargada la ruta.

B4A/C_Principal.bas

@@ -2353,9 +2353,17 @@ Sub B_OK_RES_Click
 	connecta.Visible=True
 	Resumen.Visible= True
 	P_RESUMEN.Visible=False
+	If l_ruta.Text = "0" Then
+		NUEVO.Visible = False
+		B_PROXIMA.Visible = False
+	Else
+		NUEVO.Visible = True
+		B_PROXIMA.Visible = True
+	End If
 End Sub
 
 Sub Resumen_Click
+	L_ABORDO.Text = "0"
 	P_RESUMEN.Visible = True
 	P_RESUMEN.BringToFront
 	trabajar.Visible = False
@@ -2597,7 +2605,7 @@ Sub horaentrada As Boolean
 	Log(DateUtils.TicksToString(newDate))
 	Dim p2 As Period
 	p2.Hours = 0
-	p2.Minutes = 20
+	p2.Minutes = 0
 	DateTime.DateFormat = "MM/dd/yyyy HH:mm"
 	Dim fecha2 As String = DateTime.Date(DateTime.Now)
 	Dim pr2() As String = Regex.Split(" ",fecha2)