Re: Json file

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Hi Steve,

You haven't told us how you're going about reading this JSON file.

Since you're showing us a data structure, can we assume you're using 
DATA-INTO?

DATA-INTO requires fields to have the same names.  Your JSON object has 
a field named 'Results' in it, but your DS has a field named 'Stuff' 
instead.  These would need to match for this to work.  Also, your JSON 
'Results' has subfields named PK, Name, and isLocation that aren't in 
your RPG DS, so you'd either need to define these, or use something like 
"allowextra" to avoid getting an error.

But all of that advice is contingent on you using data-into.  If you're 
using some other method, then please explain.

-SK

On 3/22/19 11:56 AM, Steve Jones wrote:
> I am trying to read a json file we are getting from a vendor & I am on the
> struggle bus.
> I get data in Total, but not into my array Stuff.
>
>
> My DS is:
> Dcl-ds Assets Qualified;
>           Dcl-ds Stuff     dim(100);
>             ID             char(50);
>             IsUp           ind;
>           End-ds;
>           Total packed(3:0);
>         End-ds;
>
> The json file looks like below.
>
> Raw data looks like:
>
> {"Results":[{"PK":4,"ID":"MAINFACILITY","Name":"Main
> Facility","IsLocation":true,"IsUp":true}],"Total":64}
>
> Pretty looks like:
> Results
> 0
> PK 4
> ID "MAINFACILITY"
> Name "Main Facility"
> IsLocation  true
> IsUp true
> Total 64--
> Steve Jones
> H-P Products, Inc
> 330-871-2054