henry_he01
New User
Joined: 14 May 2009 Posts: 9 Location: China
|
|
|
|
Please refer the codes below:
Code: |
//STEP0010 EXEC PGM=SORT
//SORTIN DD DSN=TSO559B.FC9000.TEST,DISP=SHR
//SYSIN DD *
SORT FIELDS=(01,27,CH,A)
OUTREC FIELDS=(1:1,27)
END
/*
//SORTOUT DD DSN=TSO559B.FC9000.ACCOUNT,
// DISP=(NEW,CATLG,CATLG),
// SPACE=(27,(50,10),RLSE),
// AVGREC=K,LRECL=27
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//
|
The input length is 37, and the job will cut the last 10 digits. So the output length is 27. But the last 6 digits in output file became to sequence number so that I can't modify it unless change the profile parameter.
Please refer the input file and output file below:
Input File:
Code: |
=COLS> ----+----1----+----2----+----3----+--
****** ***************************** Top of
000001 002000000000000001010167508S-6265-5
000002 002000000000000001010168250S-6265-5
000003 002000000000000001010169673S-6265-5
000004 002000000000000001010170298S-6265-5
000005 002000000000000001010170921S-6265-5
|
Output File:
Code: |
=COLS> ----+----1----+----2----+--
****** ***************************
167508 002000000000000001010167508
168250 002000000000000001010168250
169673 002000000000000001010169673
170298 002000000000000001010170298
170921 002000000000000001010170921
|
Is there anyone could tell me why and any help will be appreciated. |
|
henry_he01
New User
Joined: 14 May 2009 Posts: 9 Location: China
|
|
|
|
Thanks, Craq.
I know it, but why the profile of the new output file has been changed to NUMBER ON status. How can I do for keep the profile of output file can be same with input file.
In actually, if I change the length of output file from 27 to 26, the sequence number will not be generated.
Why? |
|