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
 

 

Regarding SYNCTOOL Utility

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

New User


Joined: 28 Jul 2005
Posts: 58

PostPosted: Tue Aug 23, 2005 12:46 pm    Post subject: Regarding SYNCTOOL Utility
Reply with quote

This is my input file 1:

C00003333344444SE00011111MSGSEQ011004999999999999999000000006
D00001111122222SE00022222MSGSEQ021002777777777777777000000005
B00004444466666SE00033333MSGSEQ031003666666666666666000000004
A00007777788888SE00055555MSGSEQ041001555555555555555000000007
F00009999988888SE00044444MSGSEQ041002888888888888888000000008
H00005555533333SE00066666MSGSEQ051006111111111111111000000001
Q00002222222222SE00022222MSGSEQ091009222222222222222000000002

input file 2:

C00003333344444SE00011111MSGSEQ011004999999999999999000000006
D00001111122222SE00022222MSGSEQ021002777777777777777000000005
B00004444466666SE00033333MSGSEQ031003666666666666666000000004
A00007777788888SE00055555MSGSEQ041001555555555555555000000007
F00009999988888SE00044444MSGSEQ041002888888888888888000000008


In this file 1 to 15,16 to 25,26 to 33 are characters and

34 to 37,38 to 52,53 to 61 are Packed decimal.

All these 6 fields are Unique id's and all are unsorted manner. I have to
check for this 6 fields in sorted manner.

I want to get only one o/p file with the records which are present
in Input file1 not in i/p file2.

I want to get the o/p like:

H00005555533333SE00066666MSGSEQ051006111111111111111000000001
Q00002222222222SE00022222MSGSEQ091009222222222222222000000002



Following error message i am getting.

SYT213E "ON" LENGTH EXCEEDS LIMIT OF 32 FOR "PD" OR "ZD FIELDS
SYT030I OPERATION COMPLETED WITH RETURN CODE 12

Please help me to rectify this.

The Jcl Is:

Code:
     
//     NOTIFY=&SYSUID                                                   
//S1 EXEC PGM=SYNCTOOL
//TOOLMSG DD SYSOUT=*                                                   
//DFSMSG  DD SYSOUT=*                                                   
//IN1     DD DSN=PS9728A.A.PS1,DISP=SHR                             
//IN2     DD DSN=PS9728A.B.PS2,DISP=SHR                             
//OUT1    DD SYSOUT=*                                                   
//T1      DD DSN=&&T1,DISP=(MOD,PASS),UNIT=SYSDA,SPACE=(TRK,(3,3))     
//TOOLIN  DD *                                                         
    COPY FROM(IN1) TO(T1) USING(CTL1)                                   
    COPY FROM(IN2) TO(T1) USING(CTL2)                                   
    SPLICE FROM(T1) TO(OUT1) ON(1,15,CH) ON(16,25,CH) ON(26,33,CH) -   
    ON(34,37,ZD) ON(38,52,ZD) ON(53,61,ZD) WITH(64,1) -                 
    USING(CTL3) KEEPNODUPS                                             
/*                                                                     
//CTL1CNTL DD *                                                         
    OUTREC FIELDS=(1,61,63:C'11')         

//CTL2CNTL DD *   
   OUTREC FIELDS=(1,61,63:C'22') 

/CTL3CNTL DD *                                                 
   OUTFIL FNAMES=OUT1,INCLUDE=(63,2,CH,EQ,C'11'),OUTREC=(1,61)


Thanks and Regards,
Prabha.
Back to top
View user's profile Send private message

Hritam

New User


Joined: 27 Jun 2005
Posts: 36
Location: India

PostPosted: Tue Aug 23, 2005 1:56 pm    Post subject:
Reply with quote

Hi Sugan,
Check yours ON Fields for ZD thst mentioned wrong. The On fields should be
SPLICE FROM(T1) TO(OUT1) ON(1,15,CH) ON(16,10,CH) ON(26,8,CH) -
ON(34,4,PD) ON(38,15,ZD) ON(53,9,ZD) WITH(64,1)


as in ON fields should be (pos,length,format)
Back to top
View user's profile Send private message
suganthyprabha

New User


Joined: 28 Jul 2005
Posts: 58

PostPosted: Tue Aug 23, 2005 4:47 pm    Post subject: Re: Regarding Icetool Utility
Reply with quote

HI,

Thanks for ur Reply.

Regards,

Prabha.
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 TSO or command line utility to genera... kishpra JCL & VSAM 3 Thu Mar 09, 2017 1:11 am
No new posts TAPE VERIFY utility?? MrExtraordinare JCL & VSAM 3 Fri Dec 09, 2016 10:57 pm
No new posts Best IMS DB Unload Utility jjabez10 IMS DB/DC 12 Thu Sep 22, 2016 11:15 pm
No new posts Any docs / links for isub- cobol comp... SRICOBSAS COBOL Programming 4 Fri Aug 26, 2016 2:35 pm
No new posts Comparex utility to Syncsort conversion mistah kurtz SYNCSORT 11 Fri Jul 22, 2016 1:53 pm


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