>> I am trying to use DFSORT to get part of a dataset.

Jack,

Please use the following untested JCL which will give you the desired results

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=Your.input.FB.121.byte file
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  OPTION COPY
  INREC IFTHEN=(WHEN=GROUP,
               BEGIN=(26,10,CH,EQ,C'2022/10/08'),
                 END=(01,10,CH,EQ,C'A TOTAL OF'),
                PUSH=(122:ID=8))

  OUTFIL BUILD=(001,121),
  INCLUDE=(122,8,CH,GT,C' ')
/*

Thanks,
Kolusu


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to