cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-18 02:29:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

21/10/23 - Importación de BD en engrane.

Browse Source 
- Se agregó en el engrane, la opción de importar una base de datos, el botón solo aparece cuando en el campo de usuario esta el texto "KMTS1".
This commit is contained in:
Jose Alberto Guerra Ugalde
2023-10-21 15:23:06 -06:00
parent 7fba23f398
commit d4cfc2bf68
12 changed files with 232 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_CheckList.bas
View File

@@ -562,7 +562,7 @@ Sub Bt_GuardarCheck_Click
OK_CheckList = 1
Msgbox("DATOS GUARDADOS CON EXITO ","") 'ignore
'Proyecto gps
Subs.bitacora(B4XPages.MainPage.principal.usuario,Subs.traeAlmacen,B4XPages.MainPage.principal.l_ruta.Text,"Salida almacen", "",Subs.fechanormal(DateTime.Now),Subs.fechanormal(DateTime.Now),Starter.lat_gps,Starter.lon_gps,"2","","")
Subs.bitacora(Subs.fechanormal(DateTime.Now),B4XPages.MainPage.principal.usuario,Subs.traeAlmacen,B4XPages.MainPage.principal.l_ruta.Text,"Salida almacen", "",Subs.fechanormal(DateTime.Now),Subs.fechanormal(DateTime.Now),Starter.lat_gps,Starter.lon_gps,"2","","")
Subs.iniciaActividad("Principal")
' B4XPages.ShowPage("Principal")
End If