TSO Command Remove all the DISPLAY's in the program

ajayvamsi · New User Joined: 21 Jul 2005 Posts: 56 Location: Hyderabad

Hi all,
any one aware that how to remove all the DISPLAY's in the program with a command.

Please do let me know
thanks
ajay

ofer71 · Posted: Thu Aug 23, 2007 1:26 pm

If you are using ISPF editor, you can simply:
X ' DISPLAY ' WORD ALL; DEL X ALL

This will delete all lines where the word DISPLAY is present with a space before and after.

O.

dbzTHEdinosauer · Posted: Thu Aug 23, 2007 1:28 pm

you can write an edit macro, which would find the display command and comment the line. (or delete) the macro would have to be sophisticated enough to recognize multi-line objects.

another way would to be use x all, f all 'display'. The interrogate the non-displayed lines following the display command, looking for multi-line display statements. after insuring that all displayed lines are part of the cobol display statements, delete all nx.

I have always coded a comment preceding and following a display statement, then it was easier for my edit macro to find them.