How to remove tag lines in COBOL using ISPF commands?

OS/VS COBOL, COBOL II, Enterprise COBOL for z/OS. OpenCOBOL and OOCobol.
Previous topicNext topic

Topic Author
RaOne
Registered Member
Posts: 27
Joined: Fri Aug 16, 2013 11:46 pm
Zodiac: Cancer

How to remove tag lines in COBOL using ISPF commands?

Post by RaOne » Mon Jun 16, 2014 2:40 pm

Hi.

How to remove tag lines in COBOL using ISPF commands?



Tags:


zprogrammer
Global Moderator
Global Moderator
Posts: 604
Joined: Wed Nov 20, 2013 11:53 am
Location: Mars
Zodiac: Libra

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

Post by zprogrammer » Mon Jun 16, 2014 2:54 pm

Tag lines => what do you mean by that?


zprogrammer


ShilpiSRE
Registered Member
Posts: 21
Joined: Sat Aug 17, 2013 12:28 pm
Zodiac: Pisces

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

Post by ShilpiSRE » Mon Jun 16, 2014 3:00 pm

Something of this sort help you:

Code: Select all

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




zprogrammer
Global Moderator
Global Moderator
Posts: 604
Joined: Wed Nov 20, 2013 11:53 am
Location: Mars
Zodiac: Libra

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

Post by zprogrammer » Mon Jun 16, 2014 3:27 pm

Try

Code: Select all

NOM
on command line


zprogrammer


ShilpiSRE
Registered Member
Posts: 21
Joined: Sat Aug 17, 2013 12:28 pm
Zodiac: Pisces

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

Post by ShilpiSRE » 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.




zprogrammer
Global Moderator
Global Moderator
Posts: 604
Joined: Wed Nov 20, 2013 11:53 am
Location: Mars
Zodiac: Libra

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

Post by zprogrammer » Tue Jun 17, 2014 5:49 pm

That is a inhouse macro :oops: :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


zprogrammer


zprogrammer
Global Moderator
Global Moderator
Posts: 604
Joined: Wed Nov 20, 2013 11:53 am
Location: Mars
Zodiac: Libra

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

Post by zprogrammer » Tue Jun 17, 2014 5:54 pm



zprogrammer


Topic Author
RaOne
Registered Member
Posts: 27
Joined: Fri Aug 16, 2013 11:46 pm
Zodiac: Cancer

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

Post by RaOne » Mon Jun 27, 2016 3:21 pm

Pandora-Box wrote:That is a inhouse macro :oops:  :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"




enrico-sorichetti
Global Moderator
Global Moderator
Posts: 881
Joined: Wed Sep 11, 2013 3:57 pm

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

Post by enrico-sorichetti » Mon Jun 27, 2016 6:09 pm

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


cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort 8-)


nicc
Global Moderator
Global Moderator
Posts: 583
Joined: Wed Apr 23, 2014 8:45 pm

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

Post by nicc » 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'.


Regards
Nic


Topic Author
RaOne
Registered Member
Posts: 27
Joined: Fri Aug 16, 2013 11:46 pm
Zodiac: Cancer

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

Post by RaOne » 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.




nicc
Global Moderator
Global Moderator
Posts: 583
Joined: Wed Apr 23, 2014 8:45 pm

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

Post by nicc » 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.


Regards
Nic


Topic Author
RaOne
Registered Member
Posts: 27
Joined: Fri Aug 16, 2013 11:46 pm
Zodiac: Cancer

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

Post by RaOne » 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.




nicc
Global Moderator
Global Moderator
Posts: 583
Joined: Wed Apr 23, 2014 8:45 pm

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

Post by nicc » 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.


Regards
Nic


ossodue
New Member
Posts: 2
Joined: Fri Jul 15, 2016 7:51 pm

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

Post by ossodue » 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




nicc
Global Moderator
Global Moderator
Posts: 583
Joined: Wed Apr 23, 2014 8:45 pm

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

Post by nicc » 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.


Regards
Nic


ShilpiSRE
Registered Member
Posts: 21
Joined: Sat Aug 17, 2013 12:28 pm
Zodiac: Pisces

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

Post by ShilpiSRE » Mon Jul 18, 2016 12:20 pm

Thanks last two options were useful for me.




Topic Author
RaOne
Registered Member
Posts: 27
Joined: Fri Aug 16, 2013 11:46 pm
Zodiac: Cancer

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

Post by RaOne » Thu Nov 16, 2017 9:26 pm

Thanks all.



Previous topicNext topic

Return to “IBM COBOL, GnuCOBOL (OpenCOBOL), OOCobol.”