Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Problem with SYNCSORT using SYNCTOOL program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
hari123

New User


Joined: 28 Apr 2008
Posts: 5
Location: Chennai

PostPosted: Thu May 01, 2008 6:25 pm    Post subject: Problem with SYNCSORT using SYNCTOOL program
Reply with quote

Hi i have few problem with SYNCSORT. Please find my below program.

Code:
                     
//         JCLLIB ORDER=ABCD1234.TEST.JCL                   
//         SET REPORT=VIO                                 
//         SET ICECNTL=ABCD1234.TEST.JCL                   
//RACFICE  EXEC PGM=SYNCTOOL                               
//TOOLMSG  DD SYSOUT=*                                     
//PRINTDTL DD DSN=ABCD1234.VIOL.DETAIL.REPORT,             
//            DISP=(,CATLG,DELETE),                     
//            UNIT=SYSDA,SPACE=(CYL,(2,2),RLSE),           
//            RECFM=FBA
//DFSMSG   DD SYSOUT=*                                     
//ADUDATA  DD DISP=SHR,DSN=ABCD1234.SYA1.SMF.RACF.UNLD     
//DBUDATA  DD DUMMY                                       
//TEMP0001 DD DISP=(,DELETE,DELETE),SPACE=(CYL,(20,5)),
//            UNIT=SYSALLDA                               
//TOOLIN   DD DISP=SHR,DSN=&ICECNTL(&REPORT)               
//RACFCNTL DD DISP=SHR,DSN=&ICECNTL(&REPORT.CNTL)       


below is the sort program for VIO is

Code:

SORT    FROM(ADUDATA) TO(TEMP0001) USING(RACF)             
DISPLAY FROM(TEMP0001) LIST(PRINTDTL) -                   
       PAGE -                                             
       TITLE('VIO2: RACF ACCESS VIOLATIONS DETAIL REPORT')-
       DATE(YMD/) -                                       
       TIME(12:)  -                                       
       BLANK -                                             
       BTITLE('LPAR:') BREAK(43,04,CH) -                   
       ON(43,4,CH) HEADER('LPAR') -                       
       ON(32,10,CH)  HEADER('DATE') -                     
       ON(23,8,CH)   HEADER('TIME') -                     
       ON(14,8,CH)   HEADER('RESULT') -                   
       ON(63,8,CH)   HEADER('USER ID') -                   
       ON(1126,20,CH)  HEADER('USER NAME') -               
       ON(286,48,CH) HEADER('RESOURCE NAME') -             
       ON(578,8,CH)  HEADER('CLASS') -                     
       ON(564,6,CH)  HEADER('VOLUME') -                   
       ON(605,30,CH) HEADER('PROFILE') -                   
       ON(542,8,CH)  HEADER('ACC_REQD') -                 
       ON(551,8,CH)  HEADER('ACCGRANT')               


VIOCNTL program is

Code:

SORT  FIELDS=(43,04,CH,A,63,8,CH,A,32,10,CH,A,23,8,CH,A)
INCLUDE COND=(5,8,CH,EQ,C'ACCESS',AND,                 
              48,3,CH,EQ,C'YES')                       
OPTION VLSHRT             


When I execute the program I'm getting the below error:

Code:

1SYT000I  SYNCTOOL RELEASE 1.5.2 - COPYRIGHT 2004  SYNCSORT INC.               
 SYT001I  INITIAL PROCESSING MODE IS "STOP"                                     
 SYT002I  "TOOLIN" INTERFACE BEING USED                                         
                                                                               
           SORT    FROM(ADUDATA) TO(TEMP0001) USING(RACF)                       
 SYT020I  SYNCSORT CALLED WITH IDENTIFIER "0001"                               
 SYT012E  SYNCSORT COMPLETED UNSUCCESSFULLY                                     
 SYT030I  OPERATION COMPLETED WITH RETURN CODE 16                               
                                                                               
 SYT015I  PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE
                                                                               
           DISPLAY FROM(TEMP0001) LIST(PRINTDTL) -                             
                  PAGE -                                                       
                  TITLE('VIO2: RACF ACCESS VIOLATIONS DETAIL REPORT')-         
                  DATE(YMD/) -                                                 
                  TIME(12:)  -                                                 
                  BLANK -                                                       
                  BTITLE('LPAR:') BREAK(43,04,CH) -                             
                  ON(43,4,CH) HEADER('LPAR') -                                 
                  ON(32,10,CH)  HEADER('DATE') -                               
                  ON(23,8,CH)   HEADER('TIME') -                               
                  ON(14,8,CH)   HEADER('RESULT') -                             
                  ON(63,8,CH)   HEADER('USER ID') -                             
                  ON(1126,20,CH)  HEADER('USER NAME') -                         
                  ON(286,48,CH) HEADER('RESOURCE NAME') -                       
                  ON(578,8,CH)  HEADER('CLASS') -                               
                  ON(564,6,CH)  HEADER('VOLUME') -                             
                  ON(605,30,CH) HEADER('PROFILE') -                             
                  ON(542,8,CH)  HEADER('ACC_REQD') -                           
                 ON(551,8,CH)  HEADER('ACCGRANT')                     
SYT019I  STATEMENT VALID; NOT PROCESSED DUE TO "SCAN" PROCESSING MODE 
                                                                       
SYT004I  SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 16             
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu May 01, 2008 7:22 pm    Post subject:
Reply with quote

Code:
 SYT002I  "TOOLIN" INTERFACE BEING USED                                         
                                                                               
           SORT    FROM(ADUDATA) TO(TEMP0001) USING(RACF)                       
 SYT020I  SYNCSORT CALLED WITH IDENTIFIER "0001"                               
 SYT012E  SYNCSORT COMPLETED UNSUCCESSFULLY                                     
 SYT030I  OPERATION COMPLETED WITH RETURN CODE 16
What does the Synctool manual say about this?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu May 01, 2008 7:26 pm    Post subject:
Reply with quote

Hello Hari and welcome to the forums,

Is it possible that you have not posted all of the sysout info created by this execution? It does not appear to be complete.
Back to top
View user's profile Send private message
hari123

New User


Joined: 28 Apr 2008
Posts: 5
Location: Chennai

PostPosted: Thu May 01, 2008 7:27 pm    Post subject:
Reply with quote

I am pretty new to this SYNCSORT. Not able to track exactly what is the problem... Could you please help on the same...
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu May 01, 2008 7:31 pm    Post subject:
Reply with quote

Hello,

Quote:
Could you please help on the same...
We may be able to help if you post all of the diagnostic info.
Back to top
View user's profile Send private message
hari123

New User


Joined: 28 Apr 2008
Posts: 5
Location: Chennai

PostPosted: Thu May 01, 2008 7:35 pm    Post subject:
Reply with quote

Below is the DFSMS message:

Code:
SORT  FIELDS=(43,04,CH,A,63,8,CH,A,32,10,CH,A,23,8,CH,A)       
*                                                             
INCLUDE COND=(5,8,CH,EQ,C'ACCESS',AND,                         
*                                                             
              48,3,CH,EQ,C'YES')                               
              *                                               
OPTION VLSHRT                                                 
*                                                             
WER428I  CALLER-PROVIDED IDENTIFIER IS "0001"                 
WER001A  COL 1 OR 1-15 NOT BLANK                               
WER001A  COL 1 OR 1-15 NOT BLANK                               
WER275A  NO KEYWORDS FOUND ON CONTROL STATEMENT               
WER001A  COL 1 OR 1-15 NOT BLANK                               
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000                 
WER449I  SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE                 


TOOLMSG :

Code:
1SYT000I  SYNCTOOL RELEASE 1.5.2 - COPYRIGHT 2004  SYNCSORT INC.               
 SYT001I  INITIAL PROCESSING MODE IS "STOP"                                     
 SYT002I  "TOOLIN" INTERFACE BEING USED                                         
                                                                               
           SORT    FROM(ADUDATA) TO(TEMP0001) USING(RACF)                       
 SYT020I  SYNCSORT CALLED WITH IDENTIFIER "0001"                               
 SYT012E  SYNCSORT COMPLETED UNSUCCESSFULLY                                     
 SYT030I  OPERATION COMPLETED WITH RETURN CODE 16                               
                                                                               
 SYT015I  PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE
                                                                               
           DISPLAY FROM(TEMP0001) LIST(PRINTDTL) -                             
                  PAGE -                                                       
                  TITLE('VIO2: RACF ACCESS VIOLATIONS DETAIL REPORT')-         
                  DATE(YMD/) -                                                 
                  TIME(12:)  -                                                 
                  BLANK -                                                       
                  BTITLE('LPAR:') BREAK(43,04,CH) -                             
                  ON(43,4,CH) HEADER('LPAR') -                                 
                  ON(32,10,CH)  HEADER('DATE') -                               
                  ON(23,8,CH)   HEADER('TIME') -                               
                  ON(14,8,CH)   HEADER('RESULT') -                             
                  ON(63,8,CH)   HEADER('USER ID') -                             
                  ON(1126,20,CH)  HEADER('USER NAME') -                         
                  ON(286,48,CH) HEADER('RESOURCE NAME') -                       
                  ON(578,8,CH)  HEADER('CLASS') -                               
                  ON(564,6,CH)  HEADER('VOLUME') -                             
                  ON(605,30,CH) HEADER('PROFILE') -                             
                  ON(542,8,CH)  HEADER('ACC_REQD') -                           
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+---->
                  ON(551,8,CH)  HEADER('ACCGRANT')                             
 SYT019I  STATEMENT VALID; NOT PROCESSED DUE TO "SCAN" PROCESSING MODE         
                                                                               
 SYT004I  SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 16                     
******************************** Bottom of Data ********************************



JESYSMSG:

Code:
ICH70001I ABCD1234  LAST ACCESS AT 08:43:20 ON THURSDAY, MAY 1, 2008             
IEF236I ALLOC. FOR ABCD1234T RACFICE                                             
IEF237I JES3 ALLOCATED TO TOOLMSG                                               
IGD101I SMS ALLOCATED TO DDNAME (PRINTDTL)                                     
        DSN (ABCD1234.VIOL.DETAIL.REPORT                  )                     
        STORCLAS (PRIMARY0) MGMTCLAS (DEFAULT3) DATACLAS (DEFAULT)             
        VOL SER NOS= SMTS34                                                     
IEF237I JES3 ALLOCATED TO DFSMSG                                               
IGD103I SMS ALLOCATED TO DDNAME ADUDATA                                         
IEF237I DMY  ALLOCATED TO DBUDATA                                               
IGD101I SMS ALLOCATED TO DDNAME (TEMP0001)                                     
        DSN (SYS08122.T084320.RA000.ABCD1234T.R0103605    )                     
        STORCLAS (SYSDA) MGMTCLAS (        ) DATACLAS (        )               
        VOL SER NOS= SMTS33                                                     
IGD103I SMS ALLOCATED TO DDNAME TOOLIN                                         
IGD103I SMS ALLOCATED TO DDNAME RACFCNTL                                       
IEF142I ABCD1234T RACFICE - STEP WAS EXECUTED - COND CODE 0016                   
IEF285I   ABCD1234.ABCD1234T.JOB40734.D0000009.?         SYSOUT                   
IGD104I ABCD1234.VIOL.DETAIL.REPORT                   RETAINED,  DDNAME=PRINTDTL
IEF285I   ABCD1234.ABCD1234T.JOB40734.D000000A.?         SYSOUT                   
IGD104I ABCD1234.SYA1.SMF.RACF.UNLD                   RETAINED,  DDNAME=ADUDATA 
IGD105I SYS08122.T084320.RA000.ABCD1234T.R0103605     DELETED,   DDNAME=TEMP0001
IGD104I ABCD1234.TEST.JCL                             RETAINED,  DDNAME=TOOLIN   
IGD104I ABCD1234.TEST.JCL                             RETAINED,  DDNAME=RACFCNTL
IEF373I STEP/RACFICE /START 2008122.0843                                       
IEF374I STEP/RACFICE /STOP  2008122.0843 CPU    0MIN 00.02SEC SRB    0MIN 00.00S
IEF375I  JOB/ABCD1234T/START 2008122.0843                                       
IEF376I  JOB/ABCD1234T/STOP  2008122.0843 CPU    0MIN 00.02SEC SRB    0MIN 00.00S
******************************** Bottom of Data ********************************
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu May 01, 2008 7:42 pm    Post subject:
Reply with quote

I'd go with the "WER001A COL 1 OR 1-15 NOT BLANK " error....
There has to be at least one space before any sort parameter.......
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu May 01, 2008 7:42 pm    Post subject:
Reply with quote

Hello,

Quote:
WER001A COL 1 OR 1-15 NOT BLANK
WER001A COL 1 OR 1-15 NOT BLANK
WER275A NO KEYWORDS FOUND ON CONTROL STATEMENT
WER001A COL 1 OR 1-15 NOT BLANK
I suggest you look at some other sort that works on your system or in the manual for the rules on how control statements must be coded.
Back to top
View user's profile Send private message
hari123

New User


Joined: 28 Apr 2008
Posts: 5
Location: Chennai

PostPosted: Thu May 01, 2008 7:46 pm    Post subject:
Reply with quote

Have coded it as per the manuals... will check it... Thanks...
Back to top
View user's profile Send private message
hari123

New User


Joined: 28 Apr 2008
Posts: 5
Location: Chennai

PostPosted: Thu May 01, 2008 7:53 pm    Post subject:
Reply with quote

Awesome "CICS Guy"

I was not knowing that. Have coded completely, but the space does the matters. Now it is working fine.... Thanks Dude...

Guys who are looking to pull the violation report from SMF using the IRRADU00 as input... you can take the above program as sample and change datasets as per your system information...
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu May 01, 2008 7:58 pm    Post subject:
Reply with quote

hari123 wrote:
I was not knowing that. Have coded completely, but the space does the matters. Now it is working fine....
Great to here....
Sometimes just looking at the error messages is all it takes..... icon_lol.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts SYNCSORT SEQNUM and FI fields. nartcr SYNCSORT 7 Sat Jan 21, 2017 4:02 am
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us