Re: Re: MVT COBOL under MVS3.8j.

On Mon, 16 Sep 2019, Joe Monk [email protected] [H390-MVS] wrote:

> Remember Peppe, this is '68 Cobol, not '74 Cobol.
>
> You use an occurs with the depending on in the data record.
>
> FD BLAH BLAH BLAH
>      DATA RECORD IS DATA-RECORD
>      LABEL RECORDS ARE STANDARD.
>
> 01 DATA-RECORD.
>    02 FIELD-1 PIC 99.
>    02 FIELD-2 PIC X OCCURS 1 TO 99 TIMES
>         DEPENDING ON FIELD-1.
>
> Joe

I understand Joe, I've read the manuals.

But in this way the record length FIELD-1 needs
to be recorded INTO the record.

I would like to use the dataset control words without storing
anything else in the record, beside the app payload.

I guess in pure COBOL '68 that is not possible?

Peppe.