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

Regarding SYNCTOOL Utility


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
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
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
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts REASON 00D70014 in load utility DB2 6
No new posts ISRSUPC search utility - using high l... TSO/ISPF 2
No new posts Synctool-dynamic split job for varyin... JCL & VSAM 7
No new posts Any JCL or VSAM Utility to get number... JCL & VSAM 1
No new posts DATA SET LIST UTILITY screen TSO/ISPF 6
Search our Forums:

Back to Top