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

SYNCTOOL report had "STEP WAS EXECUTED - COND CODE 0020


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

New User


Joined: 28 Jan 2011
Posts: 2
Location: springfield,virginia

PostPosted: Tue Feb 01, 2011 7:37 pm
Reply with quote

I am using SYNCTOOL to Read in sorted file then put data to heading report foramt.
[2]Sorted input file: (DSN=TEST.DVL.USER.S01)
col 1-9 col 10-24 col 25-34
001111111AAAAAAA FFFFFFF A00111BBBx
002222222BBBBBBBBBB GGGGG B00222BBBB
003333333CCCCCCCC HHHHHH C00333BBBx
004444444DDDDDDDDDD IIIII D00444BBBx
005555555EEEEEEEE JJJJJJ E00555 BBBx
006666666FFFFFF LLLLLLLL C11166CCCO

col 1-9 ID-number x(9)
col10-24 Last name x(15)
col25--34 First name x(10)
col35-38 loc-id x(4)
col39-40 code x(2)
col41-44 office x(4)

[2]Ideally, I'd like to extract the first 3 byte of col41-43 office which has "BBB" type of records. I put all required records to heading format as below:
DATE: current date official use only TIME:current time
User report page 1

User Last name First name Loc-id code office
------------- ------------ ------------ ------- ----- -------
001111111 AAAAAAA FFFFFFF A001 11 BBBx
002222222 BBBBBBBBBB GGGGG B002 22 BBBB
003333333 CCCCCCCC HHHHHH C003 33 BBBx
004444444 DDDDDDDDDD IIIII D004 44 BBBx
005555555 EEEEEEEE JJJJJ E005 55 BBBx

[3] Please see my codes below:
Code:

//S1 EXEC PGM=SYNCTOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//INDD     DD DSN=TEST.DVL.USER.S01,DISP=SHR
//PRINT  DD SYSOUT=*
//USER     DD DSN=TEST.DVL.OUTPUT.S02,
//            DISP=(,CATLG,DELETE),
//            UNIT=SYSDA,SPACE=...
//TOOLIN   DD *
          SORT FROM(INDD) TO(USER) USING(AAA1)
          DISPLAY FROM(USER) LIST(PRINT) -
              TITLE ('USER REPORT                ') -
                  PAGE -
                  DATE(4MD/) -
                  TIME(24:) -
                  BLANK -
                   ON(1,9,CH)   HEADER ('USER-ID') -
                   ON(10,15,CH) HEADER ('LAST NAME') -
                   ON(25,10,CH) HEADER ('FIRST NAME') -
                   ON(35,4,CH)  HEADER ('LOC-ID') -
                   ON(39,2,CH)  HEADER ('CODE') -
                   ON(41,4,CH)  HEADER ('OFFICE')
/*
//AAA1CNTL DD *
          SORT FIELDS=(1,9,CH,A)
           INCLUDE COND=(41,3,CH,EQ,C'BBB')
/*
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 Feb 01, 2011 9:12 pm
Reply with quote

Andy, it would probably be helpful if you would double-check your job to make sure you've accounted for all of the necessary DD statements (I updated your code to be syntactically correct) and then posted the output of your TOOLMSG and DFSMSG DD statements.
Back to top
View user's profile Send private message
andy chang

New User


Joined: 28 Jan 2011
Posts: 2
Location: springfield,virginia

PostPosted: Tue Feb 01, 2011 10:56 pm
Reply with quote

Kevin:
Thank you for issue solutions.
I read SYNCTOOL DD statement menu. It seems I only need INDD/TOOLMSG/DFSMSG or PRINT/ USER DD statements for my query report. However, after job ran, I got below message "code 12".

SYT004I SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 12
[2]
//S1 EXEC PGM=SYNCTOOL
//INDD DD DSN=TEST.DVL.USER.S01,DISP=SHR
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//PRINT DD SYSOUT=*
//CBPREC DD DSN=TEST.DVL.OUTPUT.S02,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,(9900,9900),RLSE)
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Tue Feb 01, 2011 10:58 pm
Reply with quote

Hello,

There is more specific diagnostic information presented. You need to post this. . .
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Tue Feb 01, 2011 11:18 pm
Reply with quote

This is SYNCSORT and NOT DFSORT

Topic moved to the correct forum
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 RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts PuTTY - "User is not a surrogate... IBM Tools 5
Search our Forums:

Back to Top