Re: Local read of multi-format LF

[Justin Taylor <jtaylor.0ab@xxxxxxxxx>]

That works for me.  I never would have thought of that.  Thank you


date: Mon, 12 Jun 2023 15:51:39 -0700
> from: Peter Dow <petercdow@xxxxxxxxx>
> subject: Re: Local read of multi-format LF
>
> Hi Justin,
>
> Looks like a typo on the DS definition, but assuming it's supposed to be
> named LFDS, try
>
>  ?chain key REC01 LFDS;
>
> If you really want to chain to the filename, then you have to define
> both record formats within a single data structure, e.g.
>
> dcl-ds LFDS inz;
>  ?? dcl-ds LF_REC01 likeRec(REC01 :*input) pos(1);
>  ?? dcl-ds LF_REC02 likeRec(REC02 :*input) pos(1);
>
>
> --
> *Peter Dow* /
> Dow Software Services, Inc.
> 909 793-9050
> petercdow@xxxxxxxxx
> pdow@xxxxxxxxxxxxxx /