HOW to open a COPY BOOK LIBRARY When an Enter Key is pressed

pkmurali · Active User Joined: 15 Dec 2005 Posts: 271

Hi all,

In a program(mentioned below in ex), if I press Enter Key placing the cursor in copy book name it should open the corresponding copy book available in respective library. (For example copy book c1 is present in library pxxxxas1.p00.copy it should open that library in browse mode) . The copy book libraries are available in a ps file. Please tell me how to do the above process with clist?

EX

WORKING STORAGE-SECTION.
COPY C1.

ofer71 · Posted: Mon Mar 19, 2007 4:27 pm

You should use Edit-macro commands:
1. Use the LINE command with .ZCSR to get the line.
2. Parse the copybook name.
3. Use the BROWSE/VIEW/EDIT service to open the member.

O.