17/9/23 - Cambios en mandappendientes y agregamos RepaldoDiario

- Se hicieron cambios en mandaPendeintes porque se estaban enviado SIEMPRE todos los pedidos.
- Se agregó la clase C_RespaldoDiario para implementar el respaldo de las tablas de inventarios, paquetes y pedidos.

B4A/C_Principal.bas

@@ -10,6 +10,7 @@ Sub Class_Globals
 	Private Root As B4XView 'ignore
 	Private xui As XUI 'ignore
 	Dim reqManager As DBRequestManager
+	Dim rd As C_RespaldoDiario
 	Dim conectado As String
 	Dim t1 As Timer
 	Dim sb As StringBuilder
@@ -236,6 +237,8 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 	'load the layout to Root
 	Root.LoadLayout("principal")
 	s.Initialize(Me, "Subs")
+	rd.Initialize 'Inicializamos el respaldo diario.
+	rd.vacuum
 	EJECUTANDO=1
 	Dim ruta As String
 	img2.Visible =False
@@ -305,8 +308,12 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 End Sub
 
 Sub B4XPage_Appear
-	s.reqManagerReInit 'Reiniciamos el DBReqManager por si hay modificacion en el servidor.
+'	s.reqManagerReInit 'Reiniciamos el DBReqManager de C_Subs por si hay modificacion en el servidor.
 	reqManager.Initialize(Me, Starter.server)
+'	B4XPages.MainPage.cliente.mandaPendientes 'Ejecutamos mandaPendientes.
+	rd.respaldaPedido
+	rd.respaldaInventarios
+	rd.respaldaPaquetes
 	nvo_cliente.Enabled = False
 	HORAINGRESO ="000000"
 	Btn_Ubicar.Left = (Root.Width/2) - (Btn_Ubicar.Width/2)