View previous topic :: View next topic
|
Author |
Message |
shriya reddy Warnings : 1 New User
Joined: 05 Jun 2004 Posts: 43
|
|
|
|
I have 1000 line code i have written in 6th column instead of 8th column,how can i set it to 8th column with single command |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi shriya,
You mentioned nothing about your environment (lang, OS, editor, etc.)
I'll assume you use ISPF/PDF:
1) Go into edit and call up your pgm code.
2) Enter "bnd 6 80" on the command line.
3) Enter "))2 " as a line command on the 1st line of your pgm.
4) Enter ")) " as a line command on the last line of your pgm.
5) Reset the boundary by entering "bnd" on the command line.
This will shift every line 2 spaces to the right.
If you have seq numbers in cols 73 thru 80 set thebnds to "bnd 6 72".
Be careful; if you have data in cols 71 & 72 the data can get truncated.
So check those cols before you do the shift.
Use "x all;f all p'^' 71 72" If this doesn't work (your keyboard may not be configured foor ^ equal to "not equal") try this:
"x all;f all ' ' 71 72;flip"
Either will display all pgm lines that contain non-blanks in 71 or 72.
HTH, Jack. |
|
Back to top |
|
|
shriya reddy Warnings : 1 New User
Joined: 05 Jun 2004 Posts: 43
|
|
|
|
Hi Jack
thanks for giving reply. |
|
Back to top |
|
|
|