Android Question [SOLVED] - Check my version of jRDC2

Private Sub LoadSQLCommands(config As Map)
    Dim newCommands As Map
    newCommands.Initialize
    For Each k As String In config.Keys
        If k.StartsWith("sql.") Then
            newCommands.Put(k, config.Get(k))
        End If
    Next
    commands = newCommands
    commands.Put("sql.current_version", $"SELECT ${Main.VERSION} AS 'Current Version'"$)
    commands.Put("sql.current_date", $"SELECT '${DateTime.Date(DateTime.Now)}' AS 'Current Date'"$)
End Sub

Private Sub LoadSQLCommands(config As Map)
    Dim newCommands As Map
    newCommands.Initialize
    For Each k As String In config.Keys
        If k.StartsWith("sql.") Then
            newCommands.Put(k, config.Get(k))
        End If
    Next
    commands = newCommands
    commands.Put("sql.current_version", $"SELECT ${Main.VerActual} AS 'Version'"$)
End Sub

Sub VersionTest() As ResumableSub
    Dim req As DBRequestManager = CreateRequest
    Dim cmd As DBCommand = CreateCommand("current_version",Array())
    Wait For (req.ExecuteQuery(cmd, 0, Null)) JobDone(j As HttpJob)
    If j.Success Then
        req.HandleJobAsync(j, "req")
        Wait For (req) req_Result(result As DBResult)
        If j.JobName = "DBRequest" Then
            Dim result As DBResult = req.HandleJob(j)
            If result.Rows.Size>0 Then
                For Each records() As Object In result.Rows
                    Dim Version As Long  = records(result.Columns.Get("Version"))
                    ToastMessageShow("Version-->"&Version,True)
                Next
            End If
            
        End If
    End If
    Dim res As DBResult = Null
    Return res
End Sub