cheveguerra/Mazapa
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mazapa.git synced 2026-04-19 21:59:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

5.07.25

Browse Source
This commit is contained in:
Javier
2025-09-01 14:00:46 -06:00
parent ac403583bb
commit ef238cdc75
18 changed files with 142 additions and 127 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_Subs.bas
View File

@@ -524,7 +524,7 @@ End Sub
Sub traeRuta As String 'ignore
Private c As Cursor
Private r As String
c = db.ExecQuery("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")
c = db.ExecQuery("select CAT_CL_RUTA from kmt_info2 where CAT_CL_CODIGO In (Select cuenta from cuentaa)")
r = "0"
If c.RowCount > 0 Then
c.Position=0