New post
Question
· Mar 2, 2023

Receiving a uncomplete JSON file

#JSON #Ensemble

Hi Guys,

I'm using the below code but I'm getting an uncomplete JSON file, so it seems that the command S obj=Httprequest.HttpResponse.Data.Read(Httprequest.HttpResponse.Data.Size) is not reading the whole file, so maybe the file is too big so is there a max size or can I change something in my call ?

The uncomplete file that I received so far is about 3.5MB 

  

set Httprequest = ##class(%Net.HttpRequest).%New()
  Set Httprequest.SSLConfiguration="RTLS"                              
   Set Httprequest.Server="vibra-api-prod.azurewebsites.net"                 
  Set Httprequest.Https=1
  Set Httprequest.Timeout=30
  set Httprequest.ContentType="application/json"
  Do Httprequest.SetHeader("Accept","*/*")
  Do Httprequest.SetHeader("Accept-Language","en_US")
  Do Httprequest.SetHeader("Authorization","Bearer "_Token)
  set tSc = Httprequest.Post("/api/jobs")
  S StatusCode=Httprequest.HttpResponse.StatusCode
  S obj=Httprequest.HttpResponse.Data.Read(Httprequest.HttpResponse.Data.Size)

 

Thanks
  

Product version: Ensemble 2014.1
Discussion (4)1
Log in or sign up to continue
Vic Sun Mar 2, 2023 to Rochdi Badis

Back of the napkin here, but I'm guessing that Eduard's dynamic object implementation wasn't available in 2014. 3.5mb seems suspicious as a string size limit so I would suggest trying to read the data into a stream explicitly. ex. from the latest IRIS documentation which I believe may still be pertinent to your use case.

set request=##class(%Net.HttpRequest).%New()
 set request.Server="tools.ietf.org"
 set request.Https=1
 set request.SSLConfiguration="TEST"
 set status=request.Get("/html/rfc7158")
 if $$$ISERR(status) {
         do $system.OBJ.DisplayError()
 } else {
         set response=request.HttpResponse
 }
 
 Set file=##class(%FileCharacterStream).%New()
 set file.Filename="c:/temp/rfc7158.html"
 set status=file.CopyFrom(response.Data)
 if $$$ISERR(status) {
         do $system.OBJ.DisplayError()
 }
 do file.%Close()
ObjectScript
ObjectScript
0 0