Android Question How would one Ioad images into a cxCustomView from the internet

DownloadAndSaveFile(f.msFilePSA, "psa.json")
.
.
Sub DownloadAndSaveFile (Link As String, FName As String)
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download(Link)
    Wait For (j) JobDone(j As HttpJob)
    If j.Success Then
        Dim out As OutputStream = File.OpenOutput(File.DirInternal, FName, False)
        File.Copy2(j.GetInputStream, out)
        out.Close '<------ very important
    End If
    j.Release
End Sub

For Each k As String In f.PSAMap.Keys       
        m = f.PSAMap.Get(k)
        If aLang = "EN" Then
            Title = m.Get("psaTitleEN")
        Else
            Title = m.Get("psaTitleID")
        End If       
        Dim p As B4XView = CreateItem(Rnd(0xFF000000, 0xFFFFFFFF), Title, 400dip)
        p.Tag = m.Get("psaUrlEN")
        imgListing.Height = 60dip
        imgListing.Top = 0dip
        imgListing.SetBitmap(LoadBitmap(File.DIRASSETS , "icon_48x48.png"))
        lblItemTitle.Text = Title       
        cvPremium.Add(p, exPand.CreateValue(p, "some value"))
        GetItemImage(m.Get("psaImage"))
        lblItemBody.Text = m.Get("psaMessageEN")
        lblItemBody.Top = imgItem.Top
        lblItemBody.Height = imgItem.Height
        lblItemUrl.Top = imgItem.Top + imgItem.Height
        lblItemUrl.Text = m.Get("psaUrlEN")
        pnlExpanded.Visible = True
        Next

Sub GetItemImage(ImageUrl As String)
    Dim ItemImage As HttpJob
    ItemImage.Initialize("ItemImage", Me)
    ItemImage.Download(ImageUrl)
End Sub

Sub JobDone (Job As HttpJob)
    'Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
    If Job.Success = True Then
        Select Job.JobName
            Case "ItemImage"
                imgItem.SetBitmap(Job.GetBitmapResize(imgItem.Width, imgItem.Height, True))
        End Select
    Else
        Msgbox2Async("Error: " & f.msNoInternet, f.msNetworkProblem, f.msBtnOK, "", "", LoadBitmap(File.DirAssets, f.msInternalImage), False)
        Wait For Msgbox_Result (Result As Int)
        If Result = DialogResponse.POSITIVE Then
            Activity.Finish
            ExitApplication
        End If
    End If
    Job.Release
End Sub