How to get quotations in response using ASYRRESTCLI.EXEC_REST_WS

I currently have this piece of code:

Local Char YAPI(250), YURI(250), PCOD(100)(1..10), PVAL(100)(1..10), HCOD(100)(1..10), HVAL(100)(1..10)
Local Clbfile YMTD(250), YREQBODY, YRESBODY, RESHEAD(0)

YREQBODY ='{'+%22+'"SOHNUM:"'+%22+':'+[M]XSOHNUM+',"QTY:":'+num$([M]QTY)+',"ITMSTD:":'+num$([F:ZITM]EANCOD)+'}'
#YREQBODY ='{"SOHNUM":'+[M]XSOHNUM+',"QTY":'+num$([M]QTY)+',"ignore":"ITMREF"}'
HCOD(1)="Accept-Language"
HVAL(1)='"fr, en-gb;q=0.8, en;q=0.7"'
HCOD(2)="Content-Type"
HVAL(2)='"application/json"'
RETVAL = func ASYRRESTCLI.EXEC_REST_WS("FGDisposition", "POST", "/sca/order?"+HCOD, PCOD, PVAL, HCOD, HVAL, YREQBODY, 0, "", RESHEAD, YRESBODY)
Infbox RESHEAD
Infbox YREQBODY
Infbox YRESBODY
Infbox "RESPONSE STATS:"+num$(RETVAL)+"MESSAGE:" + num$(YRESBODY)

The response I get back from this on my web server is:

{SOHNUM:=80005750, QTY:=20, ITMSTD:=70004041156}

But I want it to look like this:

{“SOHNUM":80005750, “QTY":20, “ITMSTD":70004041156}  

Can somebody please let me know if this possible or a way to get it formatted this way? I need it in this format so I can push this data to 3rd party application, but it needs to be formatted this way.