IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Syncsort Error: NO KEYWORDS FOUND ON CONTROL STATEMENT


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 6:34 pm
Reply with quote

I have the below SORT JCL. Everything including the sort cards look fine.
But I am getting an error which is also pasted below :-

Code:
//SUPERC  EXEC PGM=ISRSUPC,                                             
//            PARM=(DELTAL,LINECMP,                                     
//            '',                                                       
//            '')                                                       
//NEWDD   DD DSN=CHGMAN.CRSU.#003150.DCU(RLOLKY37),                     
//           DISP=SHR                                                   
//OLDDD   DD DSN=CHGMAN.CRSU.DCU(RLOLKY37),                             
//           DISP=SHR                                                   
//OUTDD   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),               
//           DISP=(MOD,PASS)                                           
//STEP1   EXEC PGM=SORT                                                 
//SORTIN  DD DSN=&&T1                                                   
//SORTOUT DD DSN=PV9793A.OUTPUT.FILE,                                   
//           DISP=SHR                                                   
//SORWK01 DD UNIT=SYSDA,                                               
//           SPACE=(CYL,(1,1),RLSE)                                     
//SORWK02 DD UNIT=SYSDA,                                               
//           SPACE=(CYL,(1,1),RLSE)                                     
//SYSOUT  DD SYSOUT=*                                                   
//SYSIN   DD *         
INCLUDE COND=(1,2,CH,EQ,C'EN')                         
SORT FIELDS=(1,2,A,CH)                                 
/*                                                     
//                                                     
//*   






[ERROR] SYSIN :
INCLUDE COND=(1,2,CH,EQ,C'EN')
*
SORT FIELDS=(1,2,A,CH)
*
WER275A NO KEYWORDS FOUND ON CONTROL STATEMENT
WER275A NO KEYWORDS FOUND ON CONTROL STATEMENT
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
******************************** BOTTOM OF DATA ********************************[/ERROR]
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Jan 30, 2007 6:47 pm
Reply with quote

My guess is that this would work much better:

Code:

//SYSIN   DD *                       
  SORT FIELDS=(1,2,A,CH)                                 
  INCLUDE COND=(1,2,CH,EQ,C'EN')
/* 
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 6:49 pm
Reply with quote

Hi,

I tried that as well. It fails with the same error.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Jan 30, 2007 6:53 pm
Reply with quote

You're leaving at least one blank character in front of your sort parameters, since your post and the messages seem to indicate otherwise?
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 6:55 pm
Reply with quote

Yes
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 7:05 pm
Reply with quote

I changed the sort card to

Code:
  SORT FIELDS=(1,2,CH,A) 


But gives me another error :-

SYNCSORT FOR Z/OS 1.2.1.0R U.S. PATENTS: 4210961, 5117495 (C) 2005 SYNCSO
AMERICAN EXPRESS TRS IPC z/OS 1.7.1
PRODUCT LICENSED FOR CPU SERIAL NUMBER 45F0A, MODEL 2094 705 LICEN
SYSIN :
SORT FIELDS=(1,2,CH,A)
INCLUDE COND=(1,2,CH,EQ,C'EN')
WER276B SYSDIAG= 169057, 1170945, 1170945, 788928
WER164B 15,968K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,020K BYTES USED
WER146B 4K BYTES OF EMERGENCY SPACE ALLOCATED
WER189A SORTIN DCB RECFM REQUIRED
WER108I SORTIN : RECFM= ; LRECL= ; BLKSIZE=
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
******************************* BOTTOM OF DATA ********************************
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Jan 30, 2007 7:22 pm
Reply with quote

You need a disposition on SORTIN, either DISP=(OLD,PASS) or DISP=(OLD,DELETE).
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 7:31 pm
Reply with quote

Sort card doesnt seem to give me any output when i use a temp file. The same JCL when used with a catalogued dataset, works fine.

Code:
  //SUPERC  EXEC PGM=ISRSUPC,                                             
//            PARM=(DELTAL,LINECMP,                                     
//            '',                                                       
//            '')                                                       
//NEWDD   DD DSN=CHGMAN.CRSU.#003150.DCU(RLOLKY37),                     
//           DISP=SHR                                                   
//OLDDD   DD DSN=CHGMAN.CRSU.DCU(RLOLKY37),                             
//           DISP=SHR                                                   
//OUTDD   DD DSN=PV9793A.KEEP,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),       
//           DISP=(MOD,KEEP),                                           
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//STEP1   EXEC PGM=SORT                                                 
//SORTIN  DD DSN=PV9793A.KEEP,DISP=MOD                                 
//*          DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//SORTOUT DD DSN=PV9793A.OUTPUT.FILE,                                   
//           DISP=SHR                                                   
//SORWK01 DD UNIT=SYSDA,                                               
//           SPACE=(CYL,(1,1),RLSE)                                     
//SORWK02 DD UNIT=SYSDA,                                               
//           SPACE=(CYL,(1,1),RLSE)                                     
//SYSOUT  DD SYSOUT=*                                                   
//SYSIN   DD *                                                         
  SORT FIELDS=(1,2,CH,A)           
  INCLUDE COND=(6,2,CH,EQ,C'EN')   
/*                                 
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Tue Jan 30, 2007 7:40 pm
Reply with quote

Except that
Quote:
//SORTIN DD DSN=PV9793A.KEEP,DISP=MOD
has a disp and
Quote:
//SORTIN DD DSN=&&T1
doesn't.
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 7:55 pm
Reply with quote

Even after correcting as William suggested, I get the following error :-

Code:
SYSIN :                                                                       
  SORT FIELDS=(1,2,CH,A)                                                     
  INCLUDE COND=(6,2,CH,EQ,C'EN')                                             
WER276B  SYSDIAG= 291953, 1168213, 1168213, 800066                           
WER164B  1,736K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,           
WER164B     0 BYTES RESERVE REQUESTED, 992K BYTES USED                       
WER146B  4K BYTES OF EMERGENCY SPACE ALLOCATED                               
WER108I  SORTIN   : RECFM=FB   ; LRECL=    80; BLKSIZE=   800                 
WER110I  SORTOUT  : RECFM=FB   ; LRECL=    80; BLKSIZE=   800                 
WER061A  I/O ERR PV9793AA,STEP1   ,989E,D,SORTIN  ,DE- OP,WRNG.LEN.RECORD,0076
WER055I  INSERT          0, DELETE          0                                 
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000                                 
******************************* BOTTOM OF DATA *******************************


Code:
//PV9793AA JOB (UU506505625,NM),'WXX331.GUISE',CLASS=0,MSGCLASS=X,     
//         NOTIFY=PV9793A                                               
//*  SUBMITTED AT BROC6     7.030 AT 14:23:38 BY PV9793A  FROM W9508DAC
//*  SUBMITTED AT BROC6     7.030 AT 14:01:15 BY PV9793A  FROM W9508DAC
/*ROUTE PRINT RMT14                                                     
//*                                                                     
//SUPERC  EXEC PGM=ISRSUPC,                                             
//            PARM=(DELTAL,LINECMP,                                     
//            '',                                                       
//            '')                                                       
//NEWDD   DD DSN=CHGMAN.CRSU.#003150.DCU(RLOLKY37),                     
//           DISP=SHR                                                   
//OLDDD   DD DSN=CHGMAN.CRSU.DCU(RLOLKY37),                             
//           DISP=SHR                                                   
//OUTDD   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),               
//           DISP=(MOD,PASS),                                           
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//STEP1   EXEC PGM=SORT                                                 
//SORTIN  DD DSN=&&T1,DISP=MOD,                                         
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//SORTOUT DD DSN=PV9793A.OUTPUT.FILE,                 
//           DISP=SHR                   
//SORWK01 DD UNIT=SYSDA,                 
//           SPACE=(CYL,(1,1),RLSE)     
//SORWK02 DD UNIT=SYSDA,                 
//           SPACE=(CYL,(1,1),RLSE)     
//SYSOUT  DD SYSOUT=*                   
//SYSIN   DD *                           
  SORT FIELDS=(1,2,CH,A)                 
  INCLUDE COND=(6,2,CH,EQ,C'EN')         
/*                                       
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Tue Jan 30, 2007 7:59 pm
Reply with quote

Code:
WER108I  SORTIN   : RECFM=FB   ; LRECL=    80; BLKSIZE=   800                 
WER110I  SORTOUT  : RECFM=FB   ; LRECL=    80; BLKSIZE=   800                 
WER061A  I/O ERR PV9793AA,STEP1   ,989E,D,SORTIN  ,DE- OP,WRNG.LEN.RECORD,0076
Take a look at the temp file and see if it really is FB/80/800 or actually something else like, say, 76?
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 8:05 pm
Reply with quote

I am able to view it because its temporary. But I too got the same doubt. But how can it be created with 76 ? When I have the JCL looking like :-

Code:
//OUTDD   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE), 
//           DISP=(NEW,PASS),                             
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)         
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Tue Jan 30, 2007 8:10 pm
Reply with quote

Got it !

The problem is because I had it coded like this before (with DCB defined in OUTDD and also SORTIN :-

Code:
//OUTDD   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),               
//           DISP=(MOD,PASS),                                           
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//STEP1   EXEC PGM=SORT                                                 
//SORTIN  DD DSN=&&T1,DISP=MOD,                                         
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800) 


When I removed the DCB defintion in SORTIN it resolved the problem :-


Code:
//OUTDD   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE),               
//           DISP=(MOD,PASS),                                           
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)                       
//STEP1   EXEC PGM=SORT                                                 
//SORTIN  DD DSN=&&T1,DISP=MOD
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Tue Jan 30, 2007 8:11 pm
Reply with quote

Temporaraly give it a real name and rurun the superc....
Back to top
View user's profile Send private message
murali922

New User


Joined: 25 Jul 2005
Posts: 92
Location: India

PostPosted: Wed Jan 31, 2007 8:29 am
Reply with quote

I problem was basically because I had the same DCB definition twice in the jcl. First time when the &&T1 was created, and the other time in SORTIN.

I removed the DCB definition in SORTIN, which made everything work fine...
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts How I Found a Bug in a FORTRAN Compiler All Other Mainframe Topics 4
No new posts Error when install DB2 DB2 2
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
Search our Forums:

Back to Top