I think USING is a parameter of the SELECT but ICETOOL is seeing it as a
separate statement.  Change the end of your SELECT statement to include a
continuation character.


//TOOLIN    DD *
 SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST -
 USING(CTL1)


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com


IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
06/02/2017 08:17:31 AM:

> From: Ron Thomas <ron5...@gmail.com>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 06/02/2017 08:19 AM
> Subject: DFSORT Error message
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
>
> Hello .
>
> I am trying to extract unique invoice numbers to a file using DFSORT
> ,ICETOOL and below is my control card.n The o/p i want to reformat it.
>
> I am getting the below error messages. could someone let me know
> where the issue is ?
>
> //TOOLIN    DD *
>  SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST
>  USING(CTL1)
> /*
> //CTL1CNTL DD *
>   OUTFIL FNAMES=SORTF1,OUTREC=(06,50)
>   OUTFIL FNAMES=SORTF2,OUTREC=(06,50)
> /*
>
>
> ICE627I 0 DFSORT CALL 0001 FOR SORT FROM SORTIN   TO OUTFIL   COMPLETED
> ICE628I 0 RECORD COUNT:  000000000429362
> ICE638I 0 NUMBER OF RECORDS RESULTING FROM CRITERIA:  000000000097455
> ICE602I 0 OPERATION RETURN CODE:  00
>
>            USING(CTL1)
>            $
> ICE614A 0 INVALID OPERATOR
> ICE602I 0 OPERATION RETURN CODE:  12
>
>
> Thanks
> Ron T
>
> ----------------------------------------------------------------------
> 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

Reply via email to