IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Line Number formatting


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
RamsIBM

New User


Joined: 08 Jan 2007
Posts: 53
Location: Chennai

PostPosted: Wed Jul 16, 2008 10:27 pm
Reply with quote

Hi There,

In TSO my coding look like below.

000300 000300 IDENTIFICATION DIVISION. 00030000
000400 000400 PROGRAM-ID. KML534. 00040000
000500 000500 DATE-WRITTEN. SEP 24, 2004.00050000
000600 000500 DATE-COMPILED. 00060000

Right hand side also its showing line number, can you please give me any formatting command to disappear line number which is in right hand side, but I need lefthand side line number as it is.

As well as can you please let me know any more formatting command for line nos like ‘renum cob’
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Jul 16, 2008 10:56 pm
Reply with quote

Assuming you're in ISPF edit mode, NUM ON COB will turn on COBOL line number using columns 1 to 6.

Code:
c 73 80 p'¬' '' all
will get rid of the line numbers in columns 73 to 80, but turn on COBOL line numbers first.
Back to top
View user's profile Send private message
sushmitha.prasad

New User


Joined: 08 Jul 2008
Posts: 2
Location: India

PostPosted: Thu Jul 17, 2008 3:56 pm
Reply with quote

Hi Robert,

Do you mean that the NUM ON should be typed for PROFILE and then is the command -> c all p'=' '' 73 80. How to get the character that you have shown in your command?

Regards
Sushmitha
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Thu Jul 17, 2008 4:24 pm
Reply with quote

After you bring up the file in ISPF edit, use NUM ON COBOL to turn on COBOL line numbering. This changes the profile to use columns 1-6 for line numbers. The character in the command is a shift-6, which usually is a ^ on PC keyboards; most emulators change the ^ to the IBM character. Or, copy the line I posted and paste in your emulator.
Back to top
View user's profile Send private message
ashimer

Active Member


Joined: 13 Feb 2004
Posts: 551
Location: Bangalore

PostPosted: Thu Jul 17, 2008 4:30 pm
Reply with quote

Press shift + 6 .... or it is same as symbol ^ which is the shift option in key 6 ..... use NUM ON COB ....
Back to top
View user's profile Send private message
ashimer

Active Member


Joined: 13 Feb 2004
Posts: 551
Location: Bangalore

PostPosted: Thu Jul 17, 2008 4:36 pm
Reply with quote

Sorry Robert ..didnt see your post ..
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Thu Jul 17, 2008 9:01 pm
Reply with quote

ISPF has a very thorough HELP system. It is your friend.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Pulling a fixed number of records fro... DB2 2
No new posts Substring number between 2 characters... DFSORT/ICETOOL 2
No new posts Generate random number from range of ... COBOL Programming 3
No new posts Increase the number of columns in the... IBM Tools 3
Search our Forums:

Back to Top