Android Question B4XTable error

        If Job.Success Then
            Dim parser As JSONParser
            Dim response As String = Job.GetString
            parser.Initialize(response)
            
            Dim R As List = parser.NextArray

            Log(response)
            Dim l As List
            l.Initialize

            For Each colroot As Map In R
                sDuration = colroot.Get("Duration")
                sValue = colroot.Get("Value")
                sWorkType = colroot.Get("WorkType")
                sCompany = colroot.Get("Company")           
                l.Add(Array As String(NumberFormat(sDuration, 0, 2), Formatter.Format(sValue), sWorkType, sCompany))
            Next

        Else
            ToastMessageShow("There has been an error getting data!",True)
        End If
        Job.Release
    Catch
        Log(LastException)
    End Try

Private Sub Button1_Click
    B4XTable1.Clear

    'below lines need to be included:
    B4XTable1.AddColumn("Duration",  B4XTable1.COLUMN_TYPE_NUMBERS)  'or what ever data type you use
    B4XTable1.AddColumn("Value",  B4XTable1.COLUMN_TYPE_NUMBERS)         'or what ever data type you use
    B4XTable1.AddColumn("WorkType",  B4XTable1.COLUMN_TYPE_TEXT)
    B4XTable1.AddColumn("Company",  B4XTable1.COLUMN_TYPE_TEXT)
    'rest of your code to populate the B4XTable from Json
End Sub