View previous topic :: View next topic
|
Author |
Message |
ajay krishna raj
New User
Joined: 23 Apr 2008 Posts: 2 Location: kolkata
|
|
|
|
How do we count records present in an input ps and then overwrite that COUNT into an output ps present beforehand?
The COUNT should be overwritten on some specific columns only rest of the record of the output ps remains the same. |
|
Back to top |
|
|
saiprasadh
Active User
Joined: 20 Sep 2006 Posts: 154 Location: US
|
|
|
|
Hi Ajay,
Can you provide an example .
Thanks
Sai |
|
Back to top |
|
|
ajay krishna raj
New User
Joined: 23 Apr 2008 Posts: 2 Location: kolkata
|
|
|
|
output ps is like...
2008376366 12345abcdefjkl
now I want to count the number of records in the input ps, and then replace '12345' in the output ps with the count calculated. |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
You can use a DFSORT job like the following to do what you asked for:
Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD * input file
RECORD 01
RECORD 02
RECORD 03
/*
//SORTOUT DD DSN=&&S1,UNIT=SYSDA,SPACE=(TRK,(1,1)),DISP=(,PASS)
//SYSIN DD *
OPTION COPY
OUTFIL REMOVECC,NODETAIL,
BUILD=(80X),
TRAILER1=('TCOUNT,''',COUNT=(M11,LENGTH=5),'''')
/*
//S2 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SYMNAMES DD DSN=&&S1,DISP=(OLD,PASS)
//SORTIN DD * original output file
2008376366 12345abcdefjkl
/*
//SORTOUT DD DSN=... modified output file
//SYSIN DD *
OPTION COPY
INREC OVERLAY=(13:TCOUNT)
/*
|
|
|
Back to top |
|
|
|