Re: D spec to free format question

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

    +        1
    +       11
    +      1 1
+ + + + +    1
    +        1
    +        1
    +      1 1 1



On 2/6/2019 3:49 PM, Dan wrote:
> Personally, if you're not yet accustomed to free format H, F, and D specs,
> I'd recommend downloading Craig Rutledge's free utility library and using
> the JCRHFD command.  See www.jcrcmds.com
>
> Although, I'm not sure how it would translate the inz('0') for an
> indicator.
>
> LIMIT must have been previously defined in the same source as the example
> you found.
>
> - Dan
>
> On Wed, Feb 6, 2019 at 3:34 PM Burrows, Thomas 1001 <
> Burrows.Thomas@xxxxxxxxxxxxxx> wrote:
>
> > How do you turn this into a Free format statement?
> >
> > D @Process        s               n   inz('0')
> >
> > The example I find online shows this.
> >
> > Dcl-s  @Process  num inz(0) LIKE(LIMIT);
> >
> > Not sure what LIMIT is????
> >
> > And this line.
> >
> > D dsPgms        EsDS                  EXTNAME(SYSAPGPF) PREFIX(Gv)