|
View previous topic :: View next topic
|
| Author |
Message |
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
Hi,
I am using the following JCL to sort the fields in a file that has a Header as the first record. But when i try to execute the JCL I am getting the following error message.
| Code: |
//S030 EXEC PGM=SYNCTOOL
//INDD01 DD DSN=BILLN1.TESTP.S020.ANOUTNO.DATA,DISP=SHR
//OUTDD01 DD DSN=BILLN1.TESTP.S030.ANOUTNO.SORTOUT,
// DISP=(MOD,CATLG,DELETE),
// SPACE=(CYL,(10,5),RLSE)
//LISTOUT DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
DATASORT FROM(INDD01) TO(OUTDD01) HEADER USING(CTL1)
/*
//CTL1CNTL DD *
SORT FIELDS=(1,18,CH,A,20,4,CH,A,25,8,CH,D)
/*
|
The error message that I am getting is
SYT000I SYNCTOOL RELEASE 1.5.3 - COPYRIGHT 2004 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
DATASORT FROM(INDD01) TO(OUTDD01) HEADER USING(CTL1)
SYT048E STATEMENT DOES NOT BEGIN WITH A VALID OPERATOR
SYT030I OPERATION COMPLETED WITH RETURN CODE 12
SYT015I PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE
SYT004I SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 12
Input file
XYD;ABC;CDE;DATE;CURDE;SYPE;AFEE;NCODE;
000000000000000001;0701;20051201;20191231;USD ;DR ;000000;N;
000000000000000001;1632;20071201;20081130;USD ;CR ;000000;N;
000000000000000001;1692;20061101;20071031;USD ;DR ;000000;N; |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
topic move to the JCL forum because
SYT... messages belong to SYNCSORT
DFSORT/ICETOOL messagse start with ICE... |
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
| Sorry the program is ICETOOL and NOT PGM=SYNCTOOL |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
| Quote: |
The error message that I am getting is
SYT000I SYNCTOOL RELEASE 1.5.3 - COPYRIGHT 2004 SYNCSORT INC. |
| Quote: |
| Sorry the program is ICETOOL and NOT PGM=SYNCTOOL |
Talk to somebody at your shop who understands something about reading and comprehension. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
it does not make any difference,
You are still using SYNCSORT family products
to ease conversion from IBM sort, ( not have people change JCL' s )
quite often competitive products define aliases so that
ICETOOL points to SYNCTOOL
ICEMAN points to SYNCSORT
so the name does not really give any hint on the product You are using  |
|
| Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007
Posts: 496
Location: USA
|
|
|
|
| ballaswaroop wrote: |
The error message that I am getting is
SYT000I SYNCTOOL RELEASE 1.5.3 - COPYRIGHT 2004 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
DATASORT FROM(INDD01) TO(OUTDD01) HEADER USING(CTL1)
SYT048E STATEMENT DOES NOT BEGIN WITH A VALID OPERATOR
|
Support for DATASORT was included in SYNCTOOL Release 1.6.2 which was incorporated into SyncSort for z/OS 1.3.2. The reason you are encountering the error is because you are running an earlier release of the product which does not support this feature. |
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
If SYNCTOOL RELEASE 1.5.3 does not support DATASORT is there any possibility to include a header record using ICETOOL ? I would generate a file with out the header; using ICETOOL sort the file after the sorting would like to insert a header record in the sorted file. I have tried using
//CTL3CNTL DD *
OPTION COPY
OUTFIL FNAMES=OUTDD03
HEADER2=('ANO;','SCODE;EDATE;EXDATE;CCODE;', 'STYPE;AFEE;NCODE;') But the ICETOOL is not able to recognize HEADER2.
Please adivce how to insert header record. I would not like to used DISPLAY command. |
|
| Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007
Posts: 496
Location: USA
|
|
|
|
| Please show me some sample input records and your desired output. Be sure to specify the RECFM and LRECL of your input data set as well. |
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
Input Record will be
000000000000000001;0701;20051201;20191231;USD ;DR ;000000;N;
000000000000000001;1632;20071201;20081130;USD ;CR ;000000;N;
000000000000000001;1692;20061101;20071031;USD ;DR ;000000;N;
RECFM=FB,LRECL=80
Output Record should be
XYD;ABC;CDE;DATE;CURDE;SYPE;AFEE;NCODE;
000000000000000001;0701;20051201;20191231;USD ;DR ;000000;N;
000000000000000001;1632;20071201;20081130;USD ;CR ;000000;N;
000000000000000001;1692;20061101;20071031;USD ;DR ;000000;N;
RECFM=FB,LRECL=80
All I need is a ';' delimed file with so that I can download in excel. |
|
| Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007
Posts: 496
Location: USA
|
|
|
|
So if I understand your example, you are simply copying the input file and adding a header record? If this is correct, then you can code the following:
| Code: |
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=input.file
//SORTOUT DD DSN=output.file
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL HEADER2=(1:C'XYD;ABC;CDE;DATE;CURDE;SYPE;AFEE;NCODE;'),
OUTREC=(1,80),REMOVECC
/* |
|
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
| Thanks Alissa, I know there are various work around to get this done. But would like the header to be inserted using ICETOOL. Please suggest if it is possible. |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
| ballaswaroop wrote: |
| Thanks Alissa, I know there are various work around to get this done. But would like the header to be inserted using ICETOOL. Please suggest if it is possible. |
Any particular reason for this request ? |
|
| Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India
|
|
|
|
I'm kind of  , seems the only request of this kind on this board-- s/he wants a solution with XXXXTOOL instead of XXXMAN (SORT). |
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
| Yes.. I have three input files which need to be sorted using various sort cards. And all the O/P files should have the header's after sorting. Using ICETOOL I am able to sort the 3 files but not able insert the header records if there was a way to achive it then I will not be required to code other sort step's. Please advice. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
ballaswaroop,
Why dont you try including the code provided by Alissa in the XXXXCNTL cards of your SYNCTOOL job? |
|
| Back to top |
|
|
ballaswaroop
New User
Joined: 20 Sep 2005
Posts: 25
|
|
|
|
| Thanks a lot to everybod; it did work. Special thanks to Alissa. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
ballaswaroop,
Glad that it's working. Thanks for letting us know.
 |
|
| Back to top |
|
|
|
|
