Hi,
it seems DFSORT is not accepting DATE operations on HEADER1.
If you've got at least one input record and can "accomodate" the record
itself with one more field, you can try something like this:
//SORTIN DD *
AAA
//SORTOUT DD SYSOUT=*
//SYSIN DD *
INREC IFTHEN=(WHEN=INIT,
BUILD=(1,80,DATE1-1))
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,
REMOVECC,
HEADER1=('H',DATENS(4MD),TIMENS(24),81,8)
/*
the trick is to fix DATE-1 into the record itself (the sample is on a
"dummy" 80 lrecl).
Maybe S.K. could give you better hints.
Regards.
Max
Il giorno lun 23 set 2019 alle ore 17:14 Steve Smith <sasd...@gmail.com> ha
scritto:
> Looks like DATE1,TIME1,DATE1-1 is the DFSORT way. I just found this in the
> " DFSORT Application Programming Guide ", but I haven't tested it.
>
> sas
> ...
>
> > The result is the following in the Header line of the SORTOUT:
> > > H2019092219315220190921
> > > We need the same result in DFSORT but with the syntax in HEADER1 it
> > doesn't
> > > work.
> > >
> > > The question is:
> > >
> > > How to format the HEADER1 in order to have DATE + TIME + (DATE-1)
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
