A question about icetool

killms · New User Joined: 17 Sep 2003 Posts: 16

there is 3 fiels. file1 is a FB/508 Qsam file. File2 is a FB/132 Qsam file.
file3 is FB/200 Vsam file.

file1 's column 1-3 is same with file2 's column 3-5 and file3 's column 1-3.
file1's column 4-22 is same with file2's column 11-29 and files' column 4-22.

now, i want to create file3 using icetool based on file1 and file2.

can anyone show me a jcl example?

thanks.

killms · New User Joined: 17 Sep 2003 Posts: 16

the files 3 is non-dupilicated.

priyesh.agrawal · Posted: Wed Dec 07, 2005 4:05 pm

killms · New User Joined: 17 Sep 2003 Posts: 16

files3's 1-22 columns should come from : either file1 's 1-22 or file2's 3-5 columns plus 11-29 columns.

for example:

if file1:

killms · New User Joined: 17 Sep 2003 Posts: 16

other bytes of file3 should be spaces.

Frank Yaeger · Posted: Wed Dec 07, 2005 9:29 pm

Here's a DFSORT/ICETOOL job that will do what you asked for:

killms · New User Joined: 17 Sep 2003 Posts: 16

thanks frank.

i TRY code a jcl like this, AND success.

Prabha · New User Joined: 05 Dec 2005 Posts: 79

can u pl explain yr code?

Frank Yaeger · Posted: Thu Dec 08, 2005 9:44 pm

killms,

I'm not sure what you're doing or why you didn't just use the job I supplied, but since you have DISP=SHR for //OUT, you will only get the output records from the second COPY. You'd need DISP=MOD to get the records from both COPYs.

killms · New User Joined: 17 Sep 2003 Posts: 16

hi,framk

I have finished tmy jcl before you post the answer. so, I post my jcl just to show ICETOOL 's plentiful funtions. ^_^

I think your jcl is more concise than mine.