Query on record count in ICETOOL

[biswa]

Hi,
I'm having 2 files and in a single step I want to count individual records
from both the files and put the individual count in the same output file.

ex:

//STEP1 EXEC PGM=ICETOOL
//SORTIN DD DSN=A.B.C, >>>>> file1 having 2 records
// DISP=(SHR,KEEP,KEEP)
// DD DSN=X.Y.Z,
// DISP=(SHR,KEEP,KEEP) >>>>>> file2 having 4 records


Expected O/P format :

FILE1 2
FILE2 4

I want to do the above in q single step.

Could you please guide me on the same?

Is the same possible in DFSORT?

Thanks & Regards
Biswa.

[Frank Yaeger]

You can use a DFSORT/ICETOOL job like the following:

[Remya]

Frank Yaeger,

hi,

i have a file with the following lay out:
Wms-code Name Add1 Add2 Zip Error code Description

i want the sort card which gives the followin output file (lay out)
Name Add1 Add2 Zip Error code


Could u please help me with this??

Thanks,
Remya

[biswa]

Frank Yaeger,

Thanks for your support.I'm having a another query on the same.

Is there anyway we can avoid writing into O/P files with COUNT of recs as 0 in the below step.(Ex: Suppose file1 contains 0 records)

//CTL1CNTL DD *
OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
TRAILER1=('FILE1',5X,COUNT=(M10,LENGTH=5))
/*

[Frank Yaeger]

Remya,

Please start a new thread for your question since it is NOT related to this thread. In the new thread, give the starting position and length of each input field, and the RECFM and LRECL of the input file and output file.
_________________
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/

[Frank Yaeger]

[biswa]

Frank Yaeger,

1. File1 is having 0 records.
2. File2 is having 2 records.

Below JCL will write the final output file
(//OUT DD DISP=MOD,DSN=... MOD output file) as:

FILE1 0
FILE2 2

//CTL1CNTL DD *
OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
TRAILER1=('FILE1',5X,COUNT=(M10,LENGTH=5))
/*
//CTL2CNTL DD *
OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
TRAILER1=('FILE2',5X,COUNT=(M10,LENGTH=5))
/*

My query is I want to write the final output file
(//OUT DD DISP=MOD,DSN=... MOD output file) as:

FILE2 2

Is there anyway we can check the same in the CTL card,like if FILE1 is having record count 0 don't write to the file (//OUT DD DISP=MOD,DSN=... MOD output file).

If both I/P files are empty I want the final O/P file with no records.

If not how it can be achived.

Thanks & Regards
Biswa.

[Frank Yaeger]

Here's a DFSORT/ICETOOL job that will produce the output you asked for:

[biswa]

Frank Yaeger,

Frank,

Thanks a lot for your support.It's working the way we expected.

Thanks & Regards
Biswa.