search the given PS file for a string

[phaniyelugula]

Hi All..

Is there a way to search the PS file for a string given by use and if the PS file has that string then that complete line has to be written into a PDS member(we have to create it in the program)

If INPUT file(input.ps) content is..

Code: Select all

Select * from Table;
Drop table;
create table;
Select emp from table;
delete from table

Out put should be(Rexx.output(mem1))...

Code: Select all

select * from table
select emp from table

Please help me out


Thanks in advance

[NicC]

Very confusing specification/explanation but how about a macro that does this how you would do it manually in ISPF:

x all
f 'string to find' all
del all x
create pdsnam(membername) .zfirst .zlast
cancel