Find and copy the entire line to another member

nike_83 · New User Joined: 16 Jul 2006 Posts: 1 Location: Chennai

Hi guys,
I want to find a particular word in a member of a pds and copy the entire line to another member. is there any command like 'isredit cut .zcsr" which i can use to cut the line and paste it in another member?

Thanks,

UmeySan · Posted: Fri Nov 03, 2006 3:07 pm

Hi Nike !

Have a look at the cut/paste rexx of IBM. Theese are in standard
ISPF-Libs allocatet to your user.

Look at ISREDIT PROCESS RANGE C M

Do
'ISREDIT (CMD) = RANGE_CMD' /* Get the command */
'ISREDIT (LINE1) = LINENUM .ZFRANGE' /* Get first line in range*/
'ISREDIT (LINE2) = LINENUM .ZLRANGE' /* Get last line in range */
linestocut = line2 - line1 + 1
End

This is quiet a nice example for you.
There you could study the handling.

Regards, umeySan