View previous topic :: View next topic
|
Author |
Message |
Ansr
New User
Joined: 13 Jul 2007 Posts: 4 Location: USA
|
|
|
|
My job is abending with following error:
Code: |
SORT FIELDS=COPY
$
ICE005A 0 STATEMENT DEFINER ERROR
OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'11')
$
ICE005A 0 STATEMENT DEFINER ERROR
ICE010A 0 NO SORT OR MERGE CONTROL STATEMENT
ICE751I 0 C5-K26318 C6-K90007 E7-K24705
ICE052I 3 END OF DFSORT
|
The Sort statements I used is given below:
Code: |
//SORTOF05 DD DSN=TT.TMS.INS.FILE(+1),
// DISP=(NEW,CATLG,DELETE),
// DCB=(MODEL.DSCB,BLKSIZE=0,LRECL=300,RECFM=FB),
// UNIT=SYSDA,SPACE=(CYL,(25,5),RLSE)
//*
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'11')
//SORTWK05 DD UNIT=SYSDA,SPACE=(CYL,(100,50),RLSE)
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
|
Anyone please help me in finding the crrect issue.. |
|
Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Ansr,
I think starting your SYSIN control statements at pos-2 or greater should solve your problem. |
|
Back to top |
|
|
Ansr
New User
Joined: 13 Jul 2007 Posts: 4 Location: USA
|
|
|
|
Arun,
I used the parm library for the control statements.
Code: |
//SYSIN DD DSN=XP1.APL.PARMLIB(X1XAPCG1),
// DISP=SHR
----+----1----+----2----+----3----+----4----+--
SORT FIELDS=COPY
OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'55')
|
This is the exact statement. Sorry I am using another system for work and so could not provide exact statements. |
|
Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Ansr,
Leave col-1 as blank and start your control statements from col-2. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
I used the parm library for the control statements.
|
The parm library will have to be changed. If you have permission, you can edit the member and make the change Arun mentioned.
If you do not, someone who has permission will need to edit the library.
If you need to run this now and cannot get the library changed now, override the sysin to use instream control statements rather than the library. |
|
Back to top |
|
|
|
|