diff --git a/B4A/Mariana Censos.b4a.meta b/B4A/Mariana Censos.b4a.meta index 827b58a..78d4ef3 100644 --- a/B4A/Mariana Censos.b4a.meta +++ b/B4A/Mariana Censos.b4a.meta @@ -46,6 +46,6 @@ ModuleClosedNodes6= ModuleClosedNodes7=5,6,9,11,12,13,14,16,17,18 ModuleClosedNodes8=3 ModuleClosedNodes9= -NavigationStack=C_Clientes,p_clientes_Click,250,0,C_Clientes,CreateListItem,112,6,C_Principal,cargar_Click,509,2,Visual Designer,cliente.bal,-100,5,C_Clientes,B4XPage_Appear,97,6,C_Clientes,clv_clientes_ItemClick,140,5,C_Clientes,BUSCA_TextChanged,219,2,Visual Designer,clientesItem.bal,-100,6,Visual Designer,clientes.bal,-100,6,C_Clientes,Class_Globals,13,0 +NavigationStack=C_Clientes,B4XPage_Appear,97,6,C_Clientes,clv_clientes_ItemClick,140,5,C_Clientes,BUSCA_TextChanged,219,2,Visual Designer,clientesItem.bal,-100,6,Visual Designer,clientes.bal,-100,6,C_Clientes,Class_Globals,18,0,Starter,Service_Create,44,0,Starter,JobDone,115,0,C_Principal,B4XPage_Appear,394,0,Starter,ENVIA_ULTIMA_GPS,81,2 SelectedBuild=0 VisibleModules=2,13,8,4,5,14,7,11,6,10 diff --git a/B4A/Starter.bas b/B4A/Starter.bas index 1838833..8c1a53b 100644 --- a/B4A/Starter.bas +++ b/B4A/Starter.bas @@ -85,8 +85,8 @@ Sub ENVIA_ULTIMA_GPS 'y LUEGO lo insertamos en JobDone Dim cmd As DBCommand cmd.Initialize - cmd.Name = "deleteRutaCensos" - cmd.Parameters = Array As Object(Subs.traeAlmacen, B4XPages.MainPage.principal.l_ruta.text) + cmd.Name = "deleteRutaCensos2" + cmd.Parameters = Array As Object(Subs.traeAlmacen, B4XPages.MainPage.principal.l_ruta.text, Subs.traeUsuarioDeBD) reqManager.ExecuteCommand(cmd , "delCatRutas") End If