i have to write a jcl which will create gdg bases in the following way:
1. in step1 i wrote sort program in which SORTIN datasets contains
gdg base names. In SYSIN DD * i wrote
//SYSIN DD *
OUTREC FIELDS=(C' DEFINE GDG(NAME(',1,16,C') LIMIT(3) SCRATCH NOEMPTY)')
2. in step2 i used dataset in SORTOUT of step1 as SYSIN DD * input.
This works fine if data in the SORTOUT is limited to 80 fields.
But when the length of data in the SORTIN (gdg base names) is incresed then step2 will not execute the commnds.
It appears you're trying to use DFSORT to create IDCAMS control statements like this:
DEFINE GDG(NAME(dsname) LIMIT(3) SCRATCH NOEMPTY)
DFSORT has no problem creating such control statements beyond 80 characters, but IDCAMS probably can't read a control statement that long. So you'd need to create continued control statements that IDCAMS can read like this:
My mistake. I should have shown an OUTFIL statement rather than an OUTREC statement since only OUTFIL can use /.
OUTFIL BUILD=(C' DEFINE GDG(NAME(',1,44,C') -',/,
C' LIMIT(3) SCRATCH NOEMPTY)')
However, the WER messages indicate you're using Syncsort, not DFSORT. I'm a DFSORT developer. DFSORT and Syncsort are competitive products. I'm happy to answer questions on DFSORT and DFSORT's ICETOOL, but I don't answer questions on Syncsort.