angel luis dominguez wrote: >As far as I now, DEBUG ABEND is to instruct DFSORT while called under ICETOOL. >
Yes, that's correct. >As an example, I want to obtain directly an ABEND in the following example instead a RC. > > >//PASO10 EXEC PGM=ICETOOL >//TOOLMSG DD SYSOUT=* >//DFSMSG DD SYSOUT=* >//FICHERO DD DSN=SYS1.PARMLIB(PROG00),DISP=SHR >//TOOLIN DD * > MODE CONTINUE > COUNT FROM(FICHERO) LOWER(10) RC4 >/* No, there's no option to get an ABEND for this case instead of a RC4. (You could get cc=12 by removing RC4, but not an ABEND.) Not sure if this will help, but you could use this job to give you an ABEND when the number of records is less than 10 or a cc=12 otherwise. //PASO10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //FICHERO DD DSN=SYS1.PARMLIB(PROG00),DISP=SHR //TOOLIN DD * MODE STOP COUNT FROM(FICHERO) HIGHER(9) COPY FROM(FICHERO) USING(CTL1) /* //CTL1CNTL DD * DEBUG ABEND /* Frank Yaeger - DFSORT Team (IBM) Specialties: ICETOOL, IFTHEN, OVERLAY, Symbols, Migration => DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/ ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
