- VERSION 5.03.10

- Se agregó que cuando se carga una ruta de suplencia, se borre el registro en RUTA_SUPLENCIA para luego volverlo a agregar, antes solo se agregaba y si se cargaba dia 2 veces, se generaban dos registros y en resumen dia se duplicaba el monto de la ruta.

B4A/C_Principal.bas

@@ -1095,18 +1095,19 @@ Sub cargar_Click
 	cmd.Name = "selectPromo3055Jul-Sep_Guna"
 	cmd.Parameters = Array As Object(e_ruta.text, ALMACEN)
 	B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "hist_pro3055")
-	
+
 	'SUPLENCIA
 	If E_RUTA2.text <> "" Then
+		Starter.skmt.ExecNonQuery("DELETE from RUTA_SUPLENCIA")
 		B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO RUTA_SUPLENCIA(RS_RUTA) VALUES(?)",Array As String(E_RUTA2.Text))
 		E_RUTA2.Visible = False
 		p_ruta2.Visible = False
-		
+
 		cmd.Initialize
 		cmd.Name = "select_cat_clientes_guna_GV2"
 		cmd.Parameters = Array As Object(E_RUTA2.text, ALMACEN)
 		B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "kmt_datos2")
-	
+
 		cmd.Initialize
 		cmd.Name = "select_hist_datos_GV2_2"
 		cmd.Parameters = Array As Object(E_RUTA2.text, ALMACEN,E_RUTA2.text, ALMACEN,E_RUTA2.text, ALMACEN)