Copy contents in a file repeatedly, dynamically

VIGNRSH · Posted: Thu Apr 10, 2008 8:41 am

Hi,
I have requiremnt , where i have to copy the File / or its contents, based on the Count obtained from previuos step.

For Ex.
Step1: returns a count of 10,
I have to copy in step2 a FILEA 10 times.

The value returned by step1 can vary at different times.

I have to do it for Testing purposes where my input File will return the number of records it needs . I have a standard file with few records, and once i repeat the contents of it based on count, i can use simple Sort utilities like seq num to vary the data among the records.

Can i use arithemtic operators also for mulitplying with count?
say, count =6 , i want to actually do it also with 6 * 5 times etc ..

Frank Yaeger · Posted: Thu Apr 10, 2008 8:49 pm

It's not clear to me what you want to do. Please show an example of the records in each input file and what you want for output. Explain clearly what you want to do based on the example. Give the RECFM and LRECL of each input file. Give the starting position, length and format of each relevant field.

VIGNRSH · Posted: Fri Apr 11, 2008 7:21 am

HI ,

File 1: contains lrecl =80, recfm=fb it contains only the following
count 0000010
File 2 : Lrecl =80 , Recfm =FB
1xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
2xxxxxxxxxxxxx
3xxxxxxxxxxxxxxxxxxxxxxxxxxxx
4xxxxxxxxxxxxxxxxxxxxx
5xxxxxxxxxxxxxxxxxxxx

Output file should be like...
File3:
1xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
2xxxxxxxxxxxxx
3xxxxxxxxxxxxxxxxxxxxxxxxxxxx
4xxxxxxxxxxxxxxxxxxxxx
5xxxxxxxxxxxxxxxxxxxx
1xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
2xxxxxxxxxxxxx
3xxxxxxxxxxxxxxxxxxxxxxxxxxx
4xxxxxxxxxxxxxxxxxxxx
5xxxxxxxxxxxxxxxxxxx
1xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
2xxxxxxxxxxxxx
3xxxxxxxxxxxxxxxxxxxxxxxxxxxx
4xxxxxxxxxxxxxxxxxxxxx
5xxxxxxxxxxxxxxxxxxxx
.

10 times..(5 records from file 2 will occur in output file3 10 times totally.)

CICS Guy · Posted: Fri Apr 11, 2008 7:11 pm

Seems like it would be easier to REXX generate sort/copy JCL to concatinte the DD those 10 (variable) times and then run the sort copy....

Frank Yaeger · Posted: Fri Apr 11, 2008 10:23 pm

Does file2 always have 5 records or can the number of records it has vary (if so, what is the maximum number of records)?

Does file2 actually have a 1-byte sequence number in position 1 of each record?

VIGNRSH · Posted: Sun Apr 13, 2008 12:24 am

Hi ,
No the records in file2 are not fixed.But i think i can get the record count of FILE2 just by simple sort step before that..
The File2 is not key sequenced.SO even if has data all over and no Key information, I just need it to copied based on the count present in FILE1.

Frank Yaeger · Posted: Sun Apr 13, 2008 10:34 pm

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

Claes Norreen · Posted: Mon Apr 14, 2008 5:11 pm

Hi Frank,

I don't understand the way you specify the REPEAT option? Shouldn't it be specified along with the OUTREC keyword? How does this work?

Frank Yaeger · Posted: Mon Apr 14, 2008 8:22 pm

I'm not sure what you mean. I "generated" the REPEAT=n part of the CTL2CNTL statements based on the count in input file1. For a count of 10 in input file1, the complete CTL2CNTL control statement are as follows:

Claes Norreen · Posted: Mon Apr 14, 2008 9:10 pm

Oops, I got it wrong where to "DD DSN=*.C1,VOL=REF=*.C1,DISP=(OLD,PASS) " was "pointing" - thought is was CNT3CNTL, but infact it hangs on CTL2CNTL...

Thanks...