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

Codigo de Cuestionario

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-02-01 20:16:55 -06:00
parent e6cea606e6
commit 51dccb881d
6 changed files with 149 additions and 73 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
B4A/Subs.bas
View File

@@ -1447,4 +1447,14 @@ Sub revisaRMIs(clienteId As String) As Boolean 'ignore
End If
End If
Return validos
End Sub
'Muestra en el Log los campos y valores que regresan en el JobDone.
Sub logJobDoneResultados(resultado As DBResult)
For Each records() As Object In resultado.Rows
LogColor($"====== ${resultado.Tag} - REGISTROS = ${resultado.Rows.Size}"$, Colors.RGB(215,37,0))
For Each k As String In resultado.Columns.Keys
LogColor(k & " = " & records(resultado.Columns.Get(k)), Colors.RGB(215,37,0))
Next
Next
End Sub