View previous topic :: View next topic
|
Author |
Message |
sakrish
New User
Joined: 05 Nov 2008 Posts: 21 Location: chennai
|
|
|
|
hi
I never use any new code..we need that extracted bundles to get processed in server side
can we copy RECFM=U to RECFM=FB ? if so, i can use sort to extract bundles from my file..
thanks,
sai |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
In the Easytrieve code you could change the definition of
Code: |
FILE INFILE3 U 32004 |
to
Code: |
FILE INFILE3 FB 32004 32004 |
and change this:
Code: |
//INFILE3 DD DSN=XCIT.ACH.TEST.OUTPUT1,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(150,1500),RLSE),
// DCB=(DSORG=PS,RECFM=U) |
to this:
Code: |
//INFILE3 DD DSN=XCIT.ACH.TEST.OUTPUT1,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(150,1500),RLSE),
// DCB=(DSORG=PS,RECFM=FB) |
This should produce an FB file (but it will have lots of trailing spaces). I'd suggest a limited test to see if this will do what you want. |
|
Back to top |
|
|
sakrish
New User
Joined: 05 Nov 2008 Posts: 21 Location: chennai
|
|
|
|
hi,
I dont want trailing spaces leaving x'40' where there is nothing in input file.
In another topic which I posted, Arun told about using file-aid to convert Recfm=U to recfm =FB.. but its also leaving x'00' at nothing
which makes both files differ..
using file-aid..we can select records either first n records, last..but we dont have option to select records between specific limit.
Anyways..thanks for all your help..who helped me till now.
Thanks,
sai |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
we can select records either first n records, last.. |
You can do this with the sort. Which sort product is used on your system? You can also do this with IDCAMS. |
|
Back to top |
|
|
|