Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to remove or Insert Column Number from 1-6

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Tue May 16, 2006 8:59 am    Post subject: How to remove or Insert Column Number from 1-6
Reply with quote

Hi All,

Any one know how to Insert column Number 1-6(Which are in Bold)
=COLS> ----+----1----+----2----+----3----+
000001 000010 IDENTIFICATION DIVISION.
000002 000020 PROGRAM-ID. SEERFN03.
000003 000030 AUTHOR. AUTHOR.
000004 000040 DATE-WRITTEN. OCTOBER 1993.
000005 000050 DATE-COMPILED.
000006 000060
000007 000070 ENVIRONMENT DIVISION.
000008 000080 DATA DIVISION.
Back to top
View user's profile Send private message

guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Tue May 16, 2006 1:42 pm    Post subject:
Reply with quote

Just try giving NUM ON STD COB on command line
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Tue May 16, 2006 4:16 pm    Post subject:
Reply with quote

By this command I can insert the Numbers But if I want to remove it back

how can I

can any one suggest me

If I give NUM OFF STD COB

It will give an error Inconsistent parameters
Back to top
View user's profile Send private message
thanooz

New User


Joined: 28 Jun 2005
Posts: 99

PostPosted: Tue May 16, 2006 5:23 pm    Post subject:
Reply with quote

hi shrivatsa

you can try with this option

num nostd.


Thanks,
thanooz.
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Tue May 16, 2006 6:25 pm    Post subject:
Reply with quote

If I use NUM NOSTD it will only shift to left
If I do again F10 it willshow

Is there any way from I can remove the Numbers
Back to top
View user's profile Send private message
new2cobol

New User


Joined: 04 Jan 2006
Posts: 77
Location: Bangalore

PostPosted: Tue May 16, 2006 8:28 pm    Post subject:
Reply with quote

Well, a crude method...

Do a NUM OFF.

Then manually delete all those numbers. I know this is cumber some, but I have just finished manually deleting them for 1890 lines icon_cry.gif
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed May 17, 2006 5:33 am    Post subject:
Reply with quote

Here's an easy way to change all #s in 1 thru 6 to spaces:

On the cmd line -
Code:
 c all 1 6 p'#' ' ' 


Or to change any chars -
Code:
 c all 1 6 p'=' ' ' 
Back to top
View user's profile Send private message
DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA

PostPosted: Thu May 18, 2006 10:08 pm    Post subject: Re: How to remove or Insert Column Number from 1-6
Reply with quote

Shri,

Do you have to have the requirement of having the COBOL seq numbers in increments of 10? The standard is in increments of 100 and is easy to do.

num on cob
renum

dave,
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1243
Location: Israel

PostPosted: Fri May 19, 2006 12:36 am    Post subject:
Reply with quote

The command is UNNUM
It will remove the numbers on the left or the right, depending on you NUM ON option.
Once removed, use NUM OFF to prevent them from returning.
Back to top
View user's profile Send private message
DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA

PostPosted: Fri May 19, 2006 12:47 am    Post subject: Re: How to remove or Insert Column Number from 1-6
Reply with quote

Marso


Quote:

Any one know how to Insert column Number 1-6(Which are in Bold)



The question is how to Insert column numbers

Dave
Back to top
View user's profile Send private message
Pollyannaish

New User


Joined: 09 Jul 2005
Posts: 31
Location: Pune, India

PostPosted: Fri May 19, 2006 11:18 am    Post subject:
Reply with quote

As ekta mentioed

NUM ON STD COB ; renum on cob

would do all you want ................... for cobol numbers
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1243
Location: Israel

PostPosted: Sun May 21, 2006 11:25 am    Post subject:
Reply with quote

To DavidatK

Sorry, I was refering to the other question:
shrivatsa wrote:
Is there any way from I can remove the Numbers
Back to top
View user's profile Send private message
rakesh.v18

New User


Joined: 14 Feb 2006
Posts: 7
Location: India

PostPosted: Wed May 24, 2006 8:23 am    Post subject: thanks to ibmmainframes.com
Reply with quote

hi,
i got into verizon, hyderabad and i am thanking one and all in this forum for helping me on mainframe related topics. If anybody is working in Verizon please give your mail id or mail to me at ***EMail ID REMOVED... Read Forum Rules***.
Once again thanks to the admin and all the members of this forum for helping me.

thanks,
Rakesh Vasireddy.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to insert a value on specific pos... Poha Eater DFSORT/ICETOOL 9 Sun Oct 01, 2017 3:04 am
No new posts Insert a Row_number into table useit DB2 2 Tue Sep 19, 2017 1:07 pm
No new posts column with count of rows within dist... ronald wouterson DB2 4 Sun Sep 17, 2017 9:48 pm
No new posts Remove leading spaces from numeric field rexx77 SYNCSORT 6 Wed Sep 06, 2017 2:15 am
No new posts Convert rows and column into JSON for... Dinesh Manivannan DB2 2 Sun Sep 03, 2017 6:50 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us