New help of ICETOOL



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

New help of ICETOOL

Postby pulcinella » Mon Jan 28, 2008 10:23 pm

Hi All,

(problem similar at the post write Mon Dec 10 2007 but I need a modification of process)

i have two PS files have x records with 124 pos order by the same columns.

x records file1:

AAAAAAAA
BBBBBBBB
GGGGGGGG
HHHHHHHH
JJJJJJJJ


X records file2:

11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC
11111111CCCCCCCCIIIIIIIIRRRRRRRUUUUUFF
33333333CCCCCCCCIIIIIIIJRRRRRRRUUUUUFF
44444444CCCCCCCCGUGUGUGGGGGGGUUGUGUGUG
11111111DDDDDDDDTUTUTUTUTUTUTUTUTUTUTT
22222222EEEEEEEEFJHDIEORIWKEJWKDJFFFFF
11111111HHHHHHHHTTTTTIIIIITTITITITITIT
11111111IIIIIIIIHHHHHRHRHRHRHRHRHRHRHR
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG
11111111KKKKKKKKTUTUTUTURURUTUTUTRURUR
11111111LLLLLLLLIIIIIIIIIIIIIIIIIIIIII

in this second file2, I need KEEP ALL duplicate records (AAAAAAAA, BBBBBBBB, GGGGGGGG,HHHHHHHH,JJJJJJJJ)

y record file2:

11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC
11111111HHHHHHHHTTTTTIIIIITTITITITITIT
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG

How could I obtain the two case: Y output all duplicates and Z output all no-duplicates (In the other post dec 10 2007, I can't do obtain a second file)

Thanks
pulcinella
 
Posts: 114
Joined: Mon Dec 10, 2007 10:18 pm
Has thanked: 0 time
Been thanked: 0 time

Re: New help of ICETOOL

 

Re: New help of ICETOOL

Postby Frank Yaeger » Mon Jan 28, 2008 11:20 pm

I don't understand the difference between this "new" request and the "old" request. You show the same "y output file2" output records for both. You need to explain more clearly what it is you want to do this time. Please show an example that makes it clear what's different between this new request and the old request.

In the other post dec 10 2007, I can't do obtain a second file


I don't know what you mean by this. A second file was obtained previously.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times

Re: New help of ICETOOL

Postby pulcinella » Tue Jan 29, 2008 4:54 pm

I try to explain,

In the example of 10 dec 2007, in the solutions, the first file has data set (with no duplicates) but the second file is empty. I need that the second file has all duplicates delete in the process. I need the two files (first all no duplicates, and second file all records duplicates). The solution was

//STEP032 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=inputfile1,DISP=SHR
// DD DSN=inputfile2,DISP=SHR
//T1 DD DSN=outputfile1,
// DISP=(NEW,CATLG,DELETE),RECFM=FB,
// SPACE=(TRK,(xxx,xxx),RLSE)
//T2 DD DSN=outputfile1,
// DISP=(NEW,CATLG,DELETE),RECFM=FB,
// SPACE=(TRK,(xxx,xxx),RLSE)
//TOOLIN DD *
SPLICE FROM(IN1) TO(T1) ON(9,18,CH) KEEPNODUPS KEEPBASE -
WITHALL WITH(1,81) USING(CTL1)
/*
//CTL1CNTL DD * *** CONSTANT CONTROL CARDS ***
INREC IFTHEN=(WHEN=(1,8,CH,EQ,C' '),OVERLAY=(124:C'BB')),
IFTHEN=(WHEN=NONE,OVERLAY=(124:C'VV'))
OUTFIL FNAMES=T1,INCLUDE=(124,2,CH,EQ,C'VV'),BUILD=(1,123)
OUTFIL FNAMES=T2,INCLUDE=(124,2,CH,EQ,C'VB'),BUILD=(1,123)
/*

But the second file is empty. I need that this file isn't empty

Thanks and excuse me. Maybe this post is not correct
pulcinella
 
Posts: 114
Joined: Mon Dec 10, 2007 10:18 pm
Has thanked: 0 time
Been thanked: 0 time

Re: New help of ICETOOL

Postby Frank Yaeger » Tue Jan 29, 2008 9:46 pm

The original job I gave you did not have an empty second output file - it had the output you requested. However, I set up the input files for my job based on what I thought you showed for the input. I assumed your field for the first file started in position 9. The data I showed for my job looked like this:

//CON DD *
        AAAAAAAA
        BBBBBBBB
        GGGGGGGG
        HHHHHHHH
        JJJJJJJJ
/*
//    DD *
11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC
11111111CCCCCCCCIIIIIIIIRRRRRRRUUUUUFF
33333333CCCCCCCCIIIIIIIJRRRRRRRUUUUUFF
44444444CCCCCCCCGUGUGUGGGGGGGUUGUGUGUG
11111111DDDDDDDDTUTUTUTUTUTUTUTUTUTUTT
22222222EEEEEEEEFJHDIEORIWKEJWKDJFFFFF
11111111HHHHHHHHTTTTTIIIIITTITITITITIT
11111111IIIIIIIIHHHHHRHRHRHRHRHRHRHRHR
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG
11111111KKKKKKKKTUTUTUTURURUTUTUTRURUR
11111111LLLLLLLLIIIIIIIIIIIIIIIIIIIIII
/*


Is that what your input files look like, or does the field for the first input file actually start in another position, like position 1?

It would really help if you'd use code tags and/or indicate the starting position, length and format of the relevant input fields.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times

Re: New help of ICETOOL

Postby pulcinella » Tue Jan 29, 2008 10:46 pm

Excuse me Frank,

I treat of explain

In file1,
begin at position 9 (the first 8 position are spaces)
the position 9-26 (18 position) are filled (no blank)
the rest are spaces

        AAAAAAAA
        BBBBBBBB
        GGGGGGGG
        HHHHHHHH
        JJJJJJJJ

in file 2,
begin at position 1
the position 9-26 (18 position) are filled (no blank)
the rest are filled

Position 9-26 will be the same and will be important for icetool
The next position's (the position 1-8 and 27-xxx are not important)


11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC
11111111CCCCCCCCIIIIIIIIRRRRRRRUUUUUFF
33333333CCCCCCCCIIIIIIIJRRRRRRRUUUUUFF
44444444CCCCCCCCGUGUGUGGGGGGGUUGUGUGUG
11111111DDDDDDDDTUTUTUTUTUTUTUTUTUTUTT
22222222EEEEEEEEFJHDIEORIWKEJWKDJFFFFF
11111111HHHHHHHHTTTTTIIIIITTITITITITIT
11111111IIIIIIIIHHHHHRHRHRHRHRHRHRHRHR
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG
11111111KKKKKKKKTUTUTUTURURUTUTUTRURUR
11111111LLLLLLLLIIIIIIIIIIIIIIIIIIIIII

I can outrec the file's if you want but i need two output record's,
the output Y all duplicates and the other output all no duplicates but
in the solution's of 10 dec only I obtained one file (with all no duplicates)

Sorry for my english and if my explain is not very clear

Thanks
pulcinella
 
Posts: 114
Joined: Mon Dec 10, 2007 10:18 pm
Has thanked: 0 time
Been thanked: 0 time

Re: New help of ICETOOL

Postby Frank Yaeger » Wed Jan 30, 2008 2:09 am

You must be doing something different than I am. Here's the job I gave you previously:

//S1    EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG  DD SYSOUT=*
//CON DD *
        AAAAAAAA
        BBBBBBBB
        GGGGGGGG
        HHHHHHHH
        JJJJJJJJ
/*
//    DD *
11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC
11111111CCCCCCCCIIIIIIIIRRRRRRRUUUUUFF
33333333CCCCCCCCIIIIIIIJRRRRRRRUUUUUFF
44444444CCCCCCCCGUGUGUGGGGGGGUUGUGUGUG
11111111DDDDDDDDTUTUTUTUTUTUTUTUTUTUTT
22222222EEEEEEEEFJHDIEORIWKEJWKDJFFFFF
11111111HHHHHHHHTTTTTIIIIITTITITITITIT
11111111IIIIIIIIHHHHHRHRHRHRHRHRHRHRHR
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG
11111111KKKKKKKKTUTUTUTURURUTUTUTRURUR
11111111LLLLLLLLIIIIIIIIIIIIIIIIIIIIII
/*
//OUT1 DD SYSOUT=*
//OUT2 DD SYSOUT=*
//TOOLIN DD *
SPLICE FROM(CON) TO(OUT1) ON(9,8,CH) KEEPNODUPS KEEPBASE -
  WITHALL WITH(1,81) USING(CTL1)
/*
//CTL1CNTL DD *
  INREC IFTHEN=(WHEN=(1,8,CH,EQ,C' '),OVERLAY=(81:C'BB')),
        IFTHEN=(WHEN=NONE,OVERLAY=(81:C'VV'))
  OUTFIL FNAMES=OUT1,INCLUDE=(81,2,CH,EQ,C'VV'),BUILD=(1,80)
  OUTFIL FNAMES=OUT2,INCLUDE=(81,2,CH,EQ,C'VB'),BUILD=(1,80)
/*


When I run that job with DFSORT, I get the following output files:

OUT1

11111111CCCCCCCCIIIIIIIIRRRRRRRUUUUUFF   
33333333CCCCCCCCIIIIIIIJRRRRRRRUUUUUFF   
44444444CCCCCCCCGUGUGUGGGGGGGUUGUGUGUG   
11111111DDDDDDDDTUTUTUTUTUTUTUTUTUTUTT   
22222222EEEEEEEEFJHDIEORIWKEJWKDJFFFFF   
11111111IIIIIIIIHHHHHRHRHRHRHRHRHRHRHR   
11111111KKKKKKKKTUTUTUTURURUTUTUTRURUR   
11111111LLLLLLLLIIIIIIIIIIIIIIIIIIIIII   


OUT2

11111111AAAAAAAATTTTTTTTCCCCCCVVVVVVVV     
22222222AAAAAAAATTTTUUUUUUUUUUTTTTTCCC     
11111111HHHHHHHHTTTTTIIIIITTITITITITIT     
55555555JJJJJJJJTTTTTIIIIITTTIIIGGGGGG     


Send me the following offline (yaeger@us.ibm.com) and I'll see if I can figure out what's different between what you're doing and what I'm doing:

o your JCL and control statements
o your input files
o the TOOLMSG and DFSMSG messages
o your output files

Please put "DFSORT" somewhere in the Subject line of your e-mail to catch my attention
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post