Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Which parameter is specified incorrectly in this ICETOOL pgm

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

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 3:29 pm    Post subject: Which parameter is specified incorrectly in this ICETOOL pgm
Reply with quote

Hi
I have two files: File1 and File2.
File3 is the output where File3 = File1 - File2 that is File 3 will have only those data which are in file 1 and not in file two.
The key on which it will search is of 4 charecters and starts from the 4th byte position.
in my jcl, i have mentioned the parameters as:
* ADD '11' IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(IN1) TO(T1) USING(CTL1)
* ADD '22' IDENTIFIER FOR FILE2 RECORDS.
COPY FROM(IN2) TO(T1) USING(CTL2)
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.
/*
//CTL1CNTL DD *
* MARK FILE1 RECORDS WITH '11'
OUTREC FIELDS=(4,4,6:C'11')
/*

//CTL3CNTL DD *
* WRITE FILE1 ONLY RECORDS TO OUT1 FILE. REMOVE ID.
OUTFIL FNAMES=OUT1,INCLUDE=(6,2,CH,EQ,C'11'),OUTREC=(1,4)

but my output is empty
Can anyone please let me know, which parameter is specified incorrectly?

Thanks in advance
Mahua
Back to top
View user's profile Send private message

krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Jun 19, 2007 3:37 pm    Post subject:
Reply with quote

Mahua Mitra

1. Check the disposition of the file T1 is MOD or not.
2. Show the CTL2
3. Show splice statement.
Back to top
View user's profile Send private message
Mahua Mitra

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 3:46 pm    Post subject:
Reply with quote

sorry for incomplete information. here are the details:
1. both the inpur files are DISP=MOD
2. CTL2 is:
//CTL2CNTL DD *
* MARK FILE2 RECORDS WITH '22'
OUTREC FIELDS=(4,4,6:C'22')

3. Splice statement is:
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.

Do i need to provide some other parameters, or the syntax is incorrect?

Thanks
Mahua
Back to top
View user's profile Send private message
Mahua Mitra

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 3:55 pm    Post subject:
Reply with quote

Sorry
Disp of T1 is MOD and not the input files
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Jun 19, 2007 4:11 pm    Post subject:
Reply with quote

Mahua Mitra

Quote:
3. Splice statement is:
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.

Your Splice should be some what like this
Code:
SPLICE FROM(T1) TO(OUT1) ON(4,4,CH) WITH(7,1) USING(CTL3)


If the above splice didn't work provide the sample i/p and the o/p expected.
Back to top
View user's profile Send private message
Mahua Mitra

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 4:43 pm    Post subject:
Reply with quote

this did not worked.
Input1 is:
1035 67580
0001036 0000000054924
0002003 0000000000000
0002003 0000000046154
0002003 0000000046154
0002003 0000000016693

Input2 is:
0002003 0000000000000
0002003 0000000046154
0002003 0000000046154
0002003 0000000016693
0001036 0000000054924

file3 (output) must be:
035
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Jun 19, 2007 5:12 pm    Post subject:
Reply with quote

Mahua Mitra
In the below code
Code:
SPLICE FROM(T1) TO(OUT1) ON(4,4,CH) WITH(7,1) USING(CTL3)
i had missed KEEPNODUPS, However will check the i/p's provided by you and get back.
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Jun 19, 2007 5:41 pm    Post subject:
Reply with quote

Mahua Mitra
Try this
Code:
//*******************************************************               
//STEP001  EXEC PGM=ICETOOL                                             
//TOOLMSG  DD SYSOUT=*                                                 
//DFSMSG   DD SYSOUT=*                                                 
//IN1      DD *                                                         
1035 67580                                                             
0001036 0000000054924                                                   
0002003 0000000000000                                                   
0002003 0000000046154                                                   
0002003 0000000046154                                                   
0002003 0000000016693                                                   
/*                                                                     
//IN2      DD *                                                         
0002003 0000000000000                                                   
0002003 0000000046154                                                   
0002003 0000000046154                                                   
0002003 0000000016693                                                   
0001036 0000000054924                                                   
/*                                                                     
//TMP1     DD DSN=&&TEMP1,DISP=(MOD,PASS),SPACE=(TRK,(5,5)),UNIT=SYSDA 
//F1ONLY   DD SYSOUT=*                                                 
//TOOLIN   DD *                                                         
 COPY FROM(IN1)  TO(TMP1) USING(CP01)                                   
 COPY FROM(IN2)  TO(TMP1) USING(CP02)                                   
 SPLICE FROM(TMP1) TO(F1ONLY) ON(4,4,CH) WITH(9,1) -                   
                            USING(CP03) KEEPNODUPS                     
/*                                                                     
//CP01CNTL DD   *                                                       
  OUTREC FIELDS=(1,7,8:C'11')                                           
/*                                                                     
//CP02CNTL DD   *                                                       
  OUTREC FIELDS=(1,7,8:C'22')                                           
/*                                                                     
//CP03CNTL DD   *                                                       
  OUTFIL FNAMES=F1ONLY,INCLUDE=(8,2,CH,EQ,C'11'),BUILD=(2,3)           
/*                                                                     
Back to top
View user's profile Send private message
Mahua Mitra

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 6:10 pm    Post subject:
Reply with quote

when I am using the following
SPLICE FROM(TMP1) TO(F1ONLY) ON(4,4,CH) WITH(9,1) -
USING(CP03) KEEPNODUPS

I am getting an error:
SPLICE FROM(T1) TO(OUT1) ON(4,4,CH) WITH(7,1) -
KEEPNODUPS USING(CTL3)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0003"
SYT012E SYNCSORT COMPLETED UNSUCCESSFULLY
SYT030I OPERATION COMPLETED WITH RETURN CODE 16

SYT015I PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE

SYT004I SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 16

Does that mean that it is using SYNSORT SYNTOOL instead od DFSORT's ICETOOL?
Back to top
View user's profile Send private message
Mahua Mitra

New User


Joined: 26 Apr 2007
Posts: 49
Location: Delhi

PostPosted: Tue Jun 19, 2007 6:32 pm    Post subject:
Reply with quote

Thanks a lot!!!!!
I got the results now (by your JCL)

I was going wrong (a special charecter was coming).
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Tue Jun 19, 2007 8:32 pm    Post subject:
Reply with quote

Quote:
Does that mean that it is using SYNCSORT's SYNCTOOL instead of DFSORT's ICETOOL?


Yes.
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 Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts Regarding time parameter shanthi gude JCL & VSAM 7 Mon Sep 04, 2017 2:31 pm
No new posts Multiple VSAM files single output fil... Mohan Kothakota DFSORT/ICETOOL 11 Wed Aug 09, 2017 7:57 pm
No new posts Paasing symbolic parameter to instrea... Robert Sample JCL & VSAM 2 Thu Jul 27, 2017 1:22 pm
No new posts JTS parameter Shashank Chaubey JCL & VSAM 2 Thu Jul 13, 2017 4:15 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us