cheveguerra/Intmex_Preventa
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Intmex_Preventa.git synced 2026-04-17 21:06:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

V_FINAL

Browse Source
This commit is contained in:
cvaldes1201
2024-02-02 11:05:17 -06:00
parent 1c6294e542
commit 7d7796748d
9 changed files with 284 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
B4A/Subs.bas
View File

@@ -213,6 +213,18 @@ Sub revisaBD 'ignore
LogColor(LastException, Colors.Red)
End Try
End Try
Try 'Si no existe la columna CAT_CL_DIAS_VISITA la agregamos.
kmt.ExecQuery("select count(CAT_CL_DIAS_VISITA) from kmt_info2")
Catch
Try
kmt.ExecNonQuery("ALTER TABLE kmt_info2 ADD COLUMN CAT_CL_DIAS_VISITA TEXT")
Catch
LogColor("No pudimos agregar la columna CAT_CL_DIAS_VISITA.", Colors.Red)
LogColor(LastException, Colors.Red)
End Try
End Try
Try 'Si no existe la columna PC_ENVIO_OK la agregamos.
kmt.ExecQuery("select count(PC_TIEMPO_TIENDA) from PEDIDO_CLIENTE")
Catch