View previous topic :: View next topic |
Author |
Message |
shekar123 Advanced
Joined: 22 Jul 2005 Posts: 528 Topics: 90 Location: Bangalore India
|
Posted: Fri Nov 10, 2006 2:53 pm Post subject: Remove unnecessary code from positions in a program |
|
|
Hai All,
I have a program code which looks like this:
Code: |
000100 IDENTIFICATION DIVISION. 00000100
000200 PROGRAM-ID. TESTPGM. 00000200
000300 AUTHOR. ABC. 00000300
000400 DATE-WRITTEN. 11/11. 00000400
000500***************************************************************** 00000500
|
I want to eliminate the starting numbers 000100 respectively in the columns 1- 6 as well as 00000100 from the columns 73 - 80.Is there any command to do it or do i need to use a REXX code to eliminate the unnecessary code.Please help me in this regard. _________________ Shekar
Grow Technically |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Fri Nov 10, 2006 4:05 pm Post subject: |
|
|
shekar123,
You can use the TSO edit commands to remove the numbers
[code:1:5506e33ba9]
C ALL 1 6 P' _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
 |
|
|