|
View previous topic :: View next topic
|
| Author |
Message |
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
| Code: |
//PS010 EXEC PGM=SYNCTOOL
//IN1 DD DSN=ABC.BCD.SRIDAHR.TEST,DISP=SHR
//OUT1 DD DSN=ABC.TEST.TRIG.SMS.SRTED,
// DISP=(NEW,CATLG),
// SPACE=(CYL,(5,5),RLSE)
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//TOOLIN DD *
DATASORT FROM(IN1) TO(OUT1) HEADER(1) TRAILER(1) USING(SRT1)
/*
//SRT1CNTL DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1,10,ZD,TO=BI,6X)
/*
//
//* |
I am trying to run the above JCL and below error is occuring. Please help.
| Code: |
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
DATASORT FROM(IN1) TO(OUT1) HEADER(1) TRAILER(1) USING(CTL1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
SYNCSORT FOR Z/OS 1.3.2.1RI U.S. PATENTS: 4210961, 5117495 (C) 2007 SYNCSO
z/OS 1.11.0
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 50328, MODEL 2094 705 LICEN
CTL1CNTL :
SORT FIELDS=COPY
OUTREC FIELDS=(1,10,ZD,TO=BI,6X)
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=IN1,SORTDD=CTL1,SORTOUT=OUT1,DYN
LLOC,CMP=CLC,NOVLSHRT,EQUALS
SORT FIELDS=COPY
MODS E15=(SYNC##15,4096,,N),E35=(SYNC##35,4096,,N)
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
******************************** BOTTOM OF DATA ********************************
|
|
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| I don't see any error message in that output you posted. |
|
| Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
But my job is failling with below abend code
| Code: |
15.13.23 JOB34619 $HASP165 ABCSE2AD ENDED AT I003 - ABENDED S000 U0016 CN(INTER
NAL)
***
|
|
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
And so why did you not post this originally. . .?
What other diagnostic information is in the output that you have not posted. . .
Look closely at all of the ddnames and data definitions in the jcl - to make sure they are correct for the files named. |
|
| Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
| Code: |
//TOOLIN DD *
DATASORT FROM(STIN01) TO(STOT01) HEADER(1) TRAILER(1) USING(SRT1)
/*
//SRT1CNTL DD *
SORT FIELDS=(1,10,CH,A)
OUTREC FIELDS=(1,10,ZD,TO=BI,LENGTH=4,6X)
/*
//* |
It seems DATASORT , HEADER, TRAILER concept will not work with OUTREC. When we ran above code, we are getting abend.
And when I tried with below code its working fine (commenting OUTREC)
| Code: |
//TOOLIN DD *
DATASORT FROM(STIN01) TO(STOT01) HEADER(1) TRAILER(1) USING(SRT1)
/*
//SRT1CNTL DD *
SORT FIELDS=(1,10,CH,A)
//* OUTREC FIELDS=(1,10,ZD,TO=BI,LENGTH=4,6X)
/*
//* |
Is there any way to achieve the requierd result.
I want to sort and convert the ZD to BI exclusing Header and trailer by using ICETOOL. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2482
Location: @my desk
|
|
|
|
From your messages it seems like the product you have is NOT ICETOOL, but SYNCTOOL though the alias ICETOOL exists for PGM=SYNCTOOL.
You have NOT posted any of the error messages issued by Syncsort yet. |
|
| Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
when we submit the job, its abending with below code
| Code: |
10.45.40 JOB61570 $HASP165 TCSSE2AD ENDED AT I003 - ABENDED S000 U0016 CN(INTER
NAL)
*** |
See TOOLIN messages
| Code: |
********************************* TOP OF DATA **********************************
SYT000I SYNCTOOL RELEASE 1.6.2 - COPYRIGHT 2007 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
DATASORT FROM(STIN01) TO(STOT01) HEADER(1) TRAILER(1) USING(SRT1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
******************************** BOTTOM OF DATA ******************************** |
and see DFSMSG below
| Code: |
********************************* TOP OF DATA **********************************
SYNCSORT FOR Z/OS 1.3.2.1RI U.S. PATENTS: 4210961, 5117495 (C) 2007 SYNCSO
z/OS 1.11.0
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 50328, MODEL 2094 705 LICEN
SRT1CNTL :
SORT FIELDS=(1,10,CH,A)
OUTREC FIELDS=(1,10,ZD,TO=BI,LENGTH=4,6X)
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=STIN01,SORTDD=SRT1,SORTOUT=STOT0
,DYNALLOC,CMP=CLC,NOVLSHRT,EQUALS
SORT FIELDS=COPY
MODS E15=(SYNC##15,4096,,N),E35=(SYNC##35,4096,,N)
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
******************************** BOTTOM OF DATA ******************************** |
this is the complete messages which we are getting in spool. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6965
Location: porcelain throne
|
|
|
|
| is Step PS010 the only step in the JOB? |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2482
Location: @my desk
|
|
|
|
sant532,
I just ran a test here to get the same results. But I wonder why there is no ERROR code/message issued by Syncsort though the step ends abnormally. May be Syncsort should look into this.
xxxxCNTL in a DATASORT application should NOT contain an OUTREC statement. However you can process the records after the DATASORT processing using an OUTFIL pass. Also it is mandatory to have a SORT FIELDS=(p,l,...) and not a SORT FIELDS=COPY since it is a SORT application.
Inorder to achieve what you're trying you can use an INREC pass instead as shown below so that the header and trailer records are not affected by the numeric conversion.
| Code: |
//TOOLIN DD *
DATASORT FROM(IN1) TO(OUT1) HEADER(1) TRAILER(1) USING(SRT1)
//SRT1CNTL DD *
INREC BUILD=(1,10,ZD,TO=BI,LENGTH=4,6X)
SORT FIELDS=(1,10,CH,A) |
|
|
| Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
Hi Arun,
Thanks for your help 
it is working with INREC, but i am wondering why it is not supporting to outrec.
please any one can find out why it is not supporting.
Thanks.
Santu. |
|
| Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008
Posts: 48
Location: India
|
|
|
|
Hi ,
As part of this i need one more help
in above i have mention as HEADER(1) but i am not sure how many header reacords will come in live file but i am sure data reacords(not header and trailer) will start with 'RD'
So, in the output file, I should get the header(s) and trailer as it is and the remaining data should convert to binary. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2482
Location: @my desk
|
|
|
|
Again the change in requirement. Is it such a difficult task to show the complete requirement in your initial post itself.
As per the initial requirement pos 1-10 had ZD data. But the latest post says data records start with 'RD'. Why dont you start over again and tell us your complete requirement with starting position, length and format of relevant fields in your actual input. |
|
| Back to top |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
