Re: External Returned JSON with double array

Lol...

I remember the day when JSON was going to solve all the issues of non
conforming data layouts... and it just made it worse.  But still better han
XML any day of the week.  :)

Probably outsourced development.  Even AI would do better than that. :)

On Wed, Dec 10, 2025 at 10:27 AM Jerry Forss <[email protected]> wrote:

> Sorry
>
> Because they wrote it so it is right.
>
> -----Original Message-----
> From: Jerry Forss
> Sent: Wednesday, December 10, 2025 10:26 AM
> To: RPG programming on IBM i <[email protected]>
> Subject: RE: External Returned JSON with double array
>
> I have.
>
> Because
>
> -----Original Message-----
> From: RPG400-L <[email protected]> On Behalf Of Brad
> Stone
> Sent: Wednesday, December 10, 2025 10:00 AM
> To: RPG programming on IBM i <[email protected]>
> Subject: Re: External Returned JSON with double array
>
> Scary that this is valid JSON.  Have you contacted the people responsible
> to ask WF* is this all about?  lol I would certainly be asking them about
> the structure of that
>
> On Wed, Dec 10, 2025 at 9:25 AM Jerry Forss <[email protected]> wrote:
>
> > I suppose I could open the json, remove the extra [ ], save it and
> > then use the data-into.
> > This seems like a silly way to do it but just not figuring out how to
> > define it correctly.
> >
> > YAJLGEN doesn't seem to know what to do with it either.
> >
> > -----Original Message-----
> > From: RPG400-L <[email protected]> On Behalf Of
> > Jerry Forss
> > Sent: Wednesday, December 10, 2025 7:17 AM
> > To: RPG programming on IBM i <[email protected]>
> > Subject: External Returned JSON with double array
> >
> > CAUTION: This email originated from outside of the organization. Do
> > not click links or open attachments unless you recognize the sender
> > and know the content is safe.
> >
> > One of our carriers has a replacement service that returns a json
> response.
> >
> > In the response it has a double array defined and I am having trouble
> > defining it in my rpg.
> > How do I define this correctly?
> >
> > Section of returned json.
> >
> >                "revenueDetails": [
> >                               [
> >                                              {
> >                                                             "name": "D
> > LIFTGATE",
> >
>  "description":
> > "DELIVERY LIFTGATE",
> >                                                             "calc_rate":
> > 55,
> >
> > "revenue_amount": 55,
> >
> > "freight_class_code": "92.5",
> >                                                             "id": 26
> >                                              },
> >                                              {
> >                                                             "name":
> > "Minimum B",
> >
>  "description":
> > "MINIMUM CHARGE",
> >                                                             "calc_rate":
> > 97,
> >
> > "revenue_amount": 97,
> >
> > "freight_class_code": "92.5",
> >                                                             "id": 170
> >                                              },
> >                                              {
> >                                                             "name":
> > "Fuel Surc",
> >
>  "description":
> > "Fuel Surcharge",
> >                                                             "calc_rate":
> > 0.33,
> >
> > "revenue_amount": 32.01,
> >
> > "freight_class_code": "92.5",
> >                                                             "id": 68
> >                                              }
> >                               ]
> >                ],
> >
> > From yajlgen
> >
> > num_REVENUEDETAILS int(10) inz(0);
> > REVENUEDETAILS varchar(1) dim(1); // empty;
> >
> > From my code
> >
> >     cnt_revenueDetails            Int(5);
> >     Dcl-ds revenueDetails         Dim(25);
> >       name                        Char(50);
> >       description                 Char(100);
> >       calc_rate                   Packed(7 : 3);
> >       revenue_amount              Packed(7 : 2);
> >       freight_class_code          Char(5);
> >       id                          Char(5);
> >     End-Ds;
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list To post a
> > message email: [email protected] To subscribe, unsubscribe,
> > or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: [email protected]
> > Before posting, please take a moment to review the archives at
> > https://archive.midrange.com/rpg400-l.
> >
> > Please contact [email protected] for any subscription
> > related questions.
> >
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list To post a
> > message email: [email protected] To subscribe, unsubscribe,
> > or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: [email protected]
> > Before posting, please take a moment to review the archives at
> > https://archive.midrange.com/rpg400-l.
> >
> > Please contact [email protected] for any subscription
> > related questions.
> >
> >
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list To post a
> message email: [email protected] To subscribe, unsubscribe, or
> change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: [email protected]
> Before posting, please take a moment to review the archives at
> https://archive.midrange.com/rpg400-l.
>
> Please contact [email protected] for any subscription related
> questions.
>
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: [email protected]
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: [email protected]
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact [email protected] for any subscription related
> questions.
>
>
-- 
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact [email protected] for any subscription related questions.