Pull a list of Functional Location from SAP using BAPI

I have to pull a list of Functional Location from SAP using BAPI. I have written below code however when I run this, it returns an empty table.

Dim sapFunc As New SAPFunctionsOCX.SAPFunctions

    Dim objServer = sapFunc.Connection

    objServer.Client = "101"

    objServer.User = "UserName"

    objServer.Ticket = "MyKey"

    objServer.system = "PEC"

    objServer.MessageServer = "MyMessagerServer"

    objServer.GroupName = "PUBLIC"

    If objServer.logon(0, True) <> True Then

        MsgBox("Rejected")

        Exit Sub

    End If

    Dim objRfcFunc As SAPFunctionsOCX.Function

    objRfcFunc = sapFunc.Add("BAPI_FUNCLOC_GETLIST")

    'System.Console.Write(objRfcFunc.Description)

    If objRfcFunc.Call = False Then

        MsgBox("Error- " & objRfcFunc.Exception)

        Exit Sub

    End If

    Dim tab = objRfcFunc.Tables("FUNCLOC_LIST")

    System.Console.WriteLine("Input start:")

    For I = 1 To tab.RowCount

        For j = 1 To tab.ColumnCount

            System.Console.Write(tab.ColumnName(j) + ":")

            System.Console.WriteLine(tab.Cell(I, j))

        Next

    Next

    System.Console.WriteLine("Input end.")