RE: YAJLDTAGEN

[Greg Wilburn <gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>]

Thank you sir and Happy New Year!

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Scott Klement
Sent: Wednesday, December 29, 2021 9:02 PM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Re: YAJLDTAGEN

DATA-GEN %SUBARR(cust:1:theNumberOfRows)


On 12/29/2021 4:11 PM, Greg Wilburn wrote:
> How to question...
>
> I've used YAJLDTAGEN a bit, but I'm not sure how to tackle this one.
>
> I have a DS defined like this:
>
>    dcl-ds cust         qualified dim(50) inz;
>      name              varchar(40) inz('');
>      addr_line1        varchar(40) inz('');
>      addr_line2        varchar(40) inz('');
>      city              varchar(40) inz('');
>      state             varchar(3) inz('');
>    end-ds;
>
> I'm using an SQL SELECT INTO statement to load up this data structure for up to 50 rows.
>
> Then:
>      DATA-GEN cust %DATA(myStmf: 'doc=file output=clear countprefix=num_')
>                    %GEN('YAJLDTAGEN');
>
>
> Up to this point, my "base" DS has always been DIM(1), and I've prefixed embedded DS with "num_" prior to the embedded DS and specified the "countprefix" option.
> But I'm not sure how to accomplish this with the "base" or "root" DS to get rid of the "empty" rows?