Dear list: Follow the results using DFSORT: ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE ICE000I 0 - CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R3 - 06:00 ON SUN SEP 22, 2019 - OPTION COPY OUTFIL FNAMES=SORTOUT,REMOVECC,INCLUDE=(1,1,CH,EQ,C'1'), HEADER1=(C'H',DATENS(4MD),TIMENS,DATENS(4MD)-1), $ ICE007A 1 SYNTAX ERROR TRAILER1=(C'T',COUNT+2=(M11,LENGTH=10)), $ ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED CORRECTLY OUTREC=(C'D', $ ICE007A 1 SYNTAX ERROR C'W', $
The problem is in HEADER1 where it doesn't recognise DATENS(4MD)-1 syntax. The input file has the following: RECFM=FB LRECL=1500 The content is the following: 0000002125201909230000000000000000000000000000000000000000000000 1407000004148423602599940700043203249748000044070004320324974800 1407000086381980020499940700043203286872920034070004320328687292 1407000090365278068099940700040043713848550064070004004371384855 1407000028887336531009940700043203262145410094070004320326214541 1407000085842023864349940700043203267612270024070004320326761227 1407000003667305626689940700043203224981010084070004320322498101 1407000028041106581529940700043203250917610034070004320325091761 The OUTPUT file (SORTOUT) has the following format: RECFM=FB LRECL=1271 The content in the SORTOUT is the following: H2019092106001820190920 DW40700000371144234620994070004320325220398008407000432032522039813 DW40700008902827390507994070004320328121127005407000432032812112714 DW40700002801894591151994070004320325054784000407000432032505478413 DW40700000340219305668994070004320325749122004407000432032574912212 DW40700008504750297550994070004320326695168009407000432032669516812 DW40700008625679686015994070004320328530484005407000432032853048412 DW40700000336669482787994070004320325770420004407000432032577042014 The syntax when using SYNCSORT runs fine. When using DFSORT there is a syntax error and we are researching for an alternative using it. Regards, Gilson ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
