IBM Mainframe Forum

Hi,

Is it possible to split the file after every 3 @ symbol from my below file:
i/p file:
1email: <abc@gmail.com?
sdfgdfgfdgfgfs
shfghsgfhgfhg
sghfgshfghggh
fsgfhghfghfghgffdf

2email:<bcd@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd

3email:<def@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd

4email: <abc@gmail.com?
sdfgdfgfdgfgfs
shfghsgfhgfhg
sghfgshfghggh
fsgfhghfghfghgffdf

5email:<bcd@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd


o/p file1:
1email: <abc@gmail.com?
sdfgdfgfdgfgfs
shfghsgfhgfhg
sghfgshfghggh
fsgfhghfghfghgffdf

2email:<bcd@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd

3email:<def@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd

o/p file2:
4email: <abc@gmail.com?
sdfgdfgfdgfgfs
shfghsgfhgfhg
sghfgshfghggh
fsgfhghfghfghgffdf

5email:<bcd@gmail.com>
ywretwretrt
eefwftwg
wefwtf
ewrwfr
wewyrfwffhd
wwgfhrfghf
wd

Hello,

Not "with jcl". . .

You might do this with some utility or a program of your own.

hi,

can I make use of Cobol program to do this? but I don't the cobol lang could u pls help me on this?

Regards,
Pallavi

What programming language do you know? This may be more easily done using rexx - at least to get the design of the pogram.

Hello,

Yes, this could be done with COBOL (or another language).

How did this requirement originate?

Who involved with getting a solution is a programmer?