I have got a file, FB, LRECL = 4000. The file is something like this:
Code: Select all
HEADERFILE0200
THIS IS DATA AND THE LENGHT IS 200.REGISTER 1
THIS IS DATA AND THE LENGHT IS 200.REGISTER 2
THIS IS DATA AND THE LENGHT IS 200.REGISTER 3
...
...
...
THIS IS DATA AND THE LENGHT IS 200.REGISTER X
HEADERFILE0333
THIS IS DATA AND THE LENGHT IS 333.REGISTER 1
THIS IS DATA AND THE LENGHT IS 333.REGISTER 2
THIS IS DATA AND THE LENGHT IS 333.REGISTER 3
...
...
...
THIS IS DATA AND THE LENGHT IS 333.REGISTER y
I would like to split the file into as many files as 'HEADERFILE' ocurrences in position 1,10.
Each file should content its header and the data till next header; and it would be wonderful if output files have the lrecl as shown in the header record.
In my example i would like to obtain 2 output files (but it could be as many as 50-60, in real life), one of then with lrecl=200 and the other with lrecl=333,
outfile1:
Code: Select all
HEADERFILE0200
THIS IS DATA AND THE LENGHT IS 200.REGISTER 1
THIS IS DATA AND THE LENGHT IS 200.REGISTER 2
THIS IS DATA AND THE LENGHT IS 200.REGISTER 3
...
...
...
THIS IS DATA AND THE LENGHT IS 200.REGISTER X
outfile2:
Code: Select all
HEADERFILE0333
THIS IS DATA AND THE LENGHT IS 333.REGISTER 1
THIS IS DATA AND THE LENGHT IS 333.REGISTER 2
THIS IS DATA AND THE LENGHT IS 333.REGISTER 3
...
...
...
THIS IS DATA AND THE LENGHT IS 333,REGISTER y
PLease, a little bit of help
Thanks in advance.