MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Help on SYNCTOOL

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
nbdtrjk1
Beginner


Joined: 12 Apr 2007
Posts: 76
Topics: 41

PostPosted: Thu May 22, 2008 7:40 am    Post subject: Help on SYNCTOOL Reply with quote

I have a JCL to Copy from Tape to DASD.

Code:
[//CPYIBNR EXEC PGM=ICETOOL                                             
//TOOLMSG DD SYSOUT=($,,STAN)                                           
//DFSMSG  DD SYSOUT=($,,STAN)                                           
//INDD    DD DSN=FFDT.STR003.AR.BUS.FIND.BKP.G0001V00,DISP=SHR         
//OUTDD   DD DSN=NBDTRJK.IDS.TEST.FILE,                                 
//           DISP=(NEW,CATLG,DELETE),                                   
//           UNIT=SYSDA,SPACE=(CYL,(500,500),RLSE),                     
//           DCB=(RECFM=FB,LRECL=1000)                                 
//TOOLIN DD *                                                           
  COPY FROM(INDD) TO(OUTDD)                                             
/*                                                                     

execution of the above JCL i am getting below error msg

OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=INDD,SORTOUT=OUTDD,COPY
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B SYSDIAG= 0, 1491615, 1491615, 4144001
WER164B 10,840K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER141A INDD RECFM IS U
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE

Help needed
Back to top
View user's profile Send private message
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Thu May 22, 2008 7:44 am    Post subject: Reply with quote

Your INDD dataset has a RECFM of U but you are specifying FB for your output dataset with no control cards to edit the data.

If you want to do a straight copy the leave off the RECFM and LRECL parameters (and you do not need DCB= anyway). Or you could use IEBGENER, same points apply.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
nbdtrjk1
Beginner


Joined: 12 Apr 2007
Posts: 76
Topics: 41

PostPosted: Thu May 22, 2008 7:49 am    Post subject: Reply with quote

I removed DCB Parameter, but result was same.

Is Control card mandatory to copy the data from one file to another file using ICETOOL?
Back to top
View user's profile Send private message
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Thu May 22, 2008 7:54 am    Post subject: Reply with quote

Did you also remove RECFM and LRECL? Did you try IEBGENER? What sort of data is on the tape? What program created the tape? If it was ADRDSSU then you should use that to copy the tape to DASD - IEBGENER may or may not work with a dump tape.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
amargulies
Beginner


Joined: 10 Jan 2007
Posts: 123
Topics: 0

PostPosted: Thu May 22, 2008 10:15 am    Post subject: Reply with quote

Quote:
WER141A INDD RECFM IS U

SyncSort does not support undefined record format for input or output files.
_________________
Alissa Margulies
SyncSort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com
Back to top
View user's profile Send private message Send e-mail
nbdtrjk1
Beginner


Joined: 12 Apr 2007
Posts: 76
Topics: 41

PostPosted: Thu May 22, 2008 11:09 pm    Post subject: Reply with quote

I tried SYNCSORT and IEBGENER but result was same.

Below Error Msg for SYNCSORT

Code:
WER164B     0 BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B  20K BYTES OF EMERGENCY SPACE ALLOCATED         
WER141A  SORTIN   RECFM IS U                             
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000           
WER449I  SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE   


Below Error Msg for IEBGENER

Code:
DATA SET UTILITY - GENERATE             
IEB311I CONFLICTING DCB PARAMETERS     




we got a file from some other system via NDM. we don't know how they created tape entry. This file contains production records.
Back to top
View user's profile Send private message
Terry_Heinze
Supermod


Joined: 31 May 2004
Posts: 391
Topics: 4
Location: Richfield, MN, USA

PostPosted: Thu May 22, 2008 11:13 pm    Post subject: Reply with quote

Did you read Alissa's post?
_________________
....Terry
Back to top
View user's profile Send private message Send e-mail
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Fri May 23, 2008 3:18 am    Post subject: Reply with quote

To get that error in IEBGENER you must be specifying a RECFM on SYSUT2.

Seems you should ask them to re-send the file with the correct LRECL specified. How you do this I do not know as I have not used NDM but the manual should tell you.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group