Mainframe, MVS and zOS Discussion

Posted: **Mon Jun 16, 2014 2:40 pm**

Hi.

How to remove tag lines in COBOL using ISPF commands?

Posted: **Mon Jun 16, 2014 2:54 pm**

Tag lines => what do you mean by that?

Posted: **Mon Jun 16, 2014 3:00 pm**

Something of this sort help you:

C ALL P'========' '' 73

Posted: **Mon Jun 16, 2014 3:27 pm**

Try

Code: Select all

NOM

on command line

Posted: **Tue Jun 17, 2014 2:58 pm**

Pandora-Box wrote:Try
Code: Select all
NOM
on command line

What is this command used for? I searched in TSO command manual and I did not find a reference to it, in the interest of this topic. May be I did not search well, can you please help.

Posted: **Tue Jun 17, 2014 5:49 pm**

That is a inhouse macro

I kept calling that way

Code: Select all

/*REXX*/
"ISREDIT MACRO"
"ISREDIT NUM ON STD COB"
"ISREDIT UNNUM"
"ISREDIT NUM ON COB"
"ISREDIT RENUM"
EXIT

Try this

Posted: **Tue Jun 17, 2014 5:54 pm**

For more details check here

http://www-01.ibm.com/support/knowledge ... %23mnumber

Posted: **Mon Jun 27, 2016 3:21 pm**

Pandora-Box wrote:That is a inhouse macro :oops: I kept calling that way :oops: :oops:
Code: Select all
/*REXX*/
"ISREDIT MACRO"
"ISREDIT NUM ON STD COB"
"ISREDIT UNNUM"
"ISREDIT NUM ON COB"
"ISREDIT RENUM"
EXIT
Try this

What is COB in your macro?

I looked at the link you later provided but it is not working. It shows the error "The requested resource is not found: /support/knowledgecenter/en/SSLTBW_1.1"

Posted: **Mon Jun 27, 2016 6:09 pm**

what a waste of time with useless replies...
looks like nobody knows the ispf RESET command

Posted: **Mon Jun 27, 2016 9:44 pm**

Basically all responses to this topic are invalid except the first. That asked for a definition of "tag lines" but that was not provided. Therefore all later pposts are just a waste of space as they may not refer to what the topic starter meant.

RaOne

You started this topic 2 years ago and your only reponse is to say something did not work. This is not surprising as you have not specified what you meant.

Please specify what you meant by 'tag lines'.

Posted: **Tue Jun 28, 2016 5:24 pm**

Sorry for the confusion. By tag-lines I meant the markers different users has added to identify their codes. For example:

Code: Select all

#PRJ01  PROCEDURE DIVISION.
0#RAM **   Please keep the first part of your program simple
0#RAM **   perform beginning, perform main loop til no more records,
0#RAM **   perform the end
0#AA00     PERFORM INITIALIZATION
008300     PERFORM PROCESS-ALL
0#AA00**       UPPER CASE Y, PLEASE
008500         UNTIL FILE-AT-END = 'Y'
008600     PERFORM TERMINATION
008700     GOBACK.

In above #RAM, #AA etc are tag-lines, I just wanted to remove them.

Posted: **Tue Jun 28, 2016 6:10 pm**

So you want the lines
[ul][li]PROCEDURE DIVISION[/li]
[li]PERFORM INITIALISATION[/li]
[li]UPPER CASE Y, PLEASE[/li][/ul]
to be deleted along with the comment lines leaving you with
[ul][li]PERFORM PROCESS-ALL[/li]
[li]UNTIL FILE-AT-END = 'Y'[/li]
[li]PERFORM TERMINATION[/li]
[li]GOBACK[/li][/ul]
?
That will leave you with a program that does not compile.
Do you mean that you want the tags converted to line numbers? If so, you should not do that - they are part of the audit trail of changes made to the program.

Posted: **Tue Jul 05, 2016 12:23 pm**

No not like that. There is one more column before the colmn which has 'tags' like #RAM etc which has got line number. And I just want to remove the tags not the entire line of code.

they are part of the audit trail of changes made to the program.

Many of them no longer make any sense and some programmers have manually added them which are of audit use. So we want to remove them.

Posted: **Tue Jul 05, 2016 1:40 pm**

Well, as the tags are in the COBOL line numbers columns (1-6) you can change all non-blanks to blanks in those columns. If you now want cobol line numbers in those columns set the profile to do so.

If, for some strange reason, you do not know how to do the first part then I suggest you press (P)F1 and select FIND/CHANGE and read up on picture strings within that section. IF you do not know how to do the second part then use the Help key again and look for NUMBER.

Posted: **Fri Jul 15, 2016 8:09 pm**

To have spaces from 1 to 6 column you have to
1) shift left 6 time with the block command ((6
2) shift right 6 time with the block command ))6

Posted: **Sat Jul 16, 2016 5:35 pm**

Or you can do it with one simple change all command restricted to columns 1-6 and specify the data to be changed using one of the PIC formats and specifying space(s) as the replacement data.

Posted: **Mon Jul 18, 2016 12:20 pm**

Thanks last two options were useful for me.

Posted: **Thu Nov 16, 2017 9:26 pm**

Thanks all.

Mainframe, MVS and zOS Discussion

How to remove tag lines in COBOL using ISPF commands?

How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?

Re: How to remove tag lines in COBOL using ISPF commands?