SORT

This forum provides the support of Dezhi Mainframe systems. Please post your questions about logon, usage of our mainframe environment.

Moderators: sysprog, prino, sfan, steve-myers, Tim001

SORT

Postby CPANTX » Mon 03 Aug 2009, 16:24

I am using this JCL for sort:
Code: Select all
****** ***************************** Top of Data **********************
000001 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,                   
000002 //        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID                 
000003 //STEP1    EXEC PGM=SORT                                       
000004 //SYSOUT   DD SYSOUT=*                                         
000005 //SYSPRINT DD SYSOUT=*                                         
000006 //SORTIN   DD DSN=CPANTX.FILE.LIST,                             
000007 //            DISP=SHR                                         
000008 //SORTOUT  DD DSN=CPANTX.FILE.LISTS,                           
000009 //            DISP=(NEW,CATLG,DELETE),                         
000010 //            UNIT=UNIT1,                                       
000011 //            SPACE=(CYL,(2,1),RLSE),                           
000012 //            DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)               
000013 //SORTWK01 DD UNIT=SYSDA,                                       
000014 //            SPACE=(CYL,(20,20),RLSE)                         
000015 //SORTWK02 DD UNIT=SYSDA,                                       
000016 //            SPACE=(CYL,(20,20),RLSE)                         
000017 //SYSIN    DD *                                                 
000018 SORT FIELDS=(2,4,CH,A)                                         
000019 /*                                                             
000020 //                                                             
****** **************************** Bottom of Data ********************

and I am getting this error msg:
Code: Select all
********************************* TOP OF DATA **********************************
1ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 10:56 ON MON AU
0          SORT FIELDS = (2,4,CH,A)                                             
                $                                                               
 ICE005A 0 STATEMENT DEFINER ERROR                                             
 ICE010A 0 NO SORT OR MERGE CONTROL STATEMENT                                   
 ICE751I 0 C5-BASE   C6-BASE   E7-Q91626                                       
 ICE052I 3 END OF DFSORT                                                       
******************************** BOTTOM OF DATA ********************************

Is there any problem with DFSORT?
Last edited by prino on Mon 03 Aug 2009, 19:13, edited 1 time in total.
Reason: Added code tags
CPANTX
 
Posts: 13
Joined: Mon 29 Jun 2009, 17:43

Re: SORT

Postby prino » Mon 03 Aug 2009, 19:14

SORT processing statements need to start in column 2.
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
Some programming here :mrgreen:
prino
 
Posts: 479
Joined: Sat 06 Jun 2009, 21:41
Location: Vilnius, Lithuania


Return to Dezhi systems: Mainframe

Who is online

Users browsing this forum: No registered users and 0 guests

cron