[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: READ-JSON

Status
Not open for further replies.
G

goo

Guest
Better to use i.e :GetInteger(«qt_account») if you know the datatype... Anyway, you know understand the consept :) Sendt fra min iPhone 7. nov. 2019 kl. 07:45 skrev Giancarlo Alberto Somma : Update from Progress Community Giancarlo Alberto Somma Hi guys, thanks for your help. Resolved with this mode: oJsonArray2 = oNestObject1:GetJsonArray('rows'). DO j = 1 TO oJsonArray2:LENGTH: oNestObject2 = OJsonArray2:GetJsonObject(j). CREATE docrig. ASSIGN documento = oNestObject2:GetJsonText('id_invoice') docrig.dr_testo[1] = oNestObject2:GetJsonText('description') docrig.societa = doctst.societa wsequenza = oNestObject2:GetJsonText('ordering') wqty = oNestObject2:GetJsonText('qt_accounting') wtotal = oNestObject2:GetJsonText('total_row') docrig.dr_avere = oNestObject2:GetJsonText('acct_code') docrig.dr_iva = oNestObject2:GetJsonText('iva_row') docrig.dr_regiva = doctst.dt_regiva docrig.dr_anno = doctst.dt_anno docrig.dr_documento = doctst.dt_documento docrig.dr_flagiva = doctst.dt_flagiva. END. many thanks. G. View online You received this notification because you subscribed to the forum. To unsubscribe from only this thread, go here . Flag this post as spam/abuse.

Continue reading...
 
Status
Not open for further replies.
Top