cheveguerra/Mariana-Reparto-V5
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mariana-Reparto-V5.git synced 2026-04-20 22:29:31 +00:00
Code Issues Packages Projects Releases Wiki Activity

Se agrega el envio de versión al tmp_drop_reparto y lo agrega al campo tmp_dpr_version

Browse Source
This commit is contained in:
jalarakmt
2026-04-08 12:44:50 -06:00
parent 1919f61049
commit 1b7b3bf665
2 changed files with 14 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
B4A/C_Principal.bas
View File

@@ -811,8 +811,13 @@ Sub Subir_Click
' cmd.Name = "select_estatus_MAZAPA"
' cmd.Parameters = Array As Object(ALMACEN,e_ruta.text)
' reqManager.ExecuteQuery(cmd , 0, "estatus")
End Sub
'Sub envioinfo
'
'
@@ -1986,6 +1991,13 @@ Sub connecta_Click
reqManager.ExecuteQuery(cmd , 0, "ruta")
ToastMessageShow("Validando Conexión." , True)
Dim cmd As DBCommand
cmd.Initialize
cmd.Name = "insert_drop_rep_mards"
cmd.Parameters = Array As Object(Subs.dameUsuarioDeDB, l_ruta.Text, ALMACEN, l_ctast.text, Subs.traeEntregados, Subs.traeRechazados, "ENVIO",Application.VersionName)
reqManager.ExecuteCommand(cmd , "inst_drop")
ToastMessageShow("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias "& l_ruta.text , True)
B4XPages.MainPage.rutaPreventa = e_ruta.TEXT
End If
End Sub