Sub downloadImage(dataMap As Map)
Dim idRest As Long = dataMap.Get("idRest")
Dim logoUrl As String = dataMap.Get("logoUrl")
Dim mediaType As String = dataMap.Get("mediaType")
Dim job as httpJob
Dim json1 as jsonGenerator
json1.initialize(dataMap)
job.initialize(json1.tostring,Me)
job.download(logoUrl)
waitFor jobDone(job as httpJob)
if job.success then
Dim json2 as jsonParser
Dim mapRet as map
json2.initialize(job.jobname)
mapRet = json2.nextobject
Dim mediaDownloaded as string = mapRet.get("logoUrl")
...
'here doesn't care... record image and other processes running fine
...
else
end if
job.release
end Sub