|
View previous topic :: View next topic
|
| Author |
Message |
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
I want to delete data from 10 to 30 column in a PDS member.each line having different data col 10 to 30.
Please help me |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
Until You clarify better what You mean by delete ...
| Code: |
| c p'^' ' ' 10 30 all |
|
|
| Back to top |
|
|
gylbharat
Active Member
.jpg)
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
| Is it only one PDS member or all the members in the PDS? |
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000001 RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) +
000003 RUN PROGRAM(XXXXX0071) +
000004 RUN PROGRAM(XXXXX0072) +
col 16 to 31 having different data... how to delete that one with single command |
|
| Back to top |
|
|
gylbharat
Active Member
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
| enrico-sorichetti wrote: |
Until You clarify better what You mean by delete ...
| Code: |
| c p'^' ' ' 10 30 all |
|
Hi Enrico,
Can you please explain me what the above command does? |
|
| Back to top |
|
|
gylbharat
Active Member
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
| sunilmfs wrote: |
=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000001 RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) +
000003 RUN PROGRAM(XXXXX0071) +
000004 RUN PROGRAM(XXXXX0072) +
col 16 to 31 having different data... how to delete that one with single command |
What does delete mean? Can you please show us the sample output? |
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
| Hi barat. did you get what i am asking... |
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
Input =COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000001 RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) +
000003 RUN PROGRAM(XXXXX0071) +
000004 RUN PROGRAM(XXXXX0072) +
Output
=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000001 RUN PROGRAM +
000002 RUN PROGRAM +
000003 RUN PROGRAM +
000004 RUN PROGRAM + |
|
| Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
It is an editor command (change) to delete all the characters of a PDS member (that is being edited) by changing them all (the characters to be deleted) to a space.
A perfect solution given the wooliness of your specified requirement.
If you don't recognise the command (which seems so) I suggest you use the PF1 key and find out, because you can do lots of useful things with "pictures". |
|
| Back to top |
|
|
GuyC
Senior Member
Joined: 11 Aug 2009
Posts: 1281
Location: Belgium
|
|
|
|
This is how I would do it, but maybe there is an easier way
Display the boundary : bnds on any line & enter
| Code: |
bnds RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) + |
| Code: |
=BNDS> <
000001 RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) + |
set left boundary on pos 10: type < on pos 10 on the bnds line & enter
| Code: |
=BNDS> <
000001 RUN PROGRAM(XXXXX0069) +
000002 RUN PROGRAM(XXXXX0070) + |
shift left 10 pos:
| Code: |
=BNDS> <
((10 RUN PROGRAM(XXXXX0069) +
(( RUN PROGRAM(XXXXX0070) + |
Reset bnds to pos 1 : : type < on pos 1 on the bnds line & enter
| Code: |
=BNDS> <
000001 RUN PROGRAM +
000002 RUN PROGRAM + |
|
|
| Back to top |
|
|
Stefan
Active User
Joined: 12 Jan 2006
Posts: 110
Location: Germany
|
|
|
|
| gylbharat wrote: |
| Can you please explain me what the above command does? |
Use the ISPF tutorial, a great resource of valuable information when manuals are not at your fingertips:
1. Press F1
| Code: |
Tutorial --------------------- Table of Contents -------------------- Tutorial
Option ===>
ISPF Program Development Facility Tutorial
The following topics are presented in sequence, or may be selected by entering
a selection code in the option field:
G General - General information about ISPF
0 Settings - Specify terminal and user parameters
1 View - Display source data or output listings
2 Edit - Create or change source data
3 Utilities - Perform utility functions
4 Foreground - Invoke language processors in foreground
5 Batch - Submit job for language processing
6 Command - Enter TSO command, CLIST, or REXX exec
7 Dialog Test - Perform dialog testing
9 IBM Products - Use additional IBM program development products
10 SCLM - Software Configuration and Library Manager
11 Workplace - ISPF Object/Action Workplace
X Exit - Terminate ISPF using log and list defaults
The following topics will be presented only if selected by number:
A Appendices - Dynamic allocation errors and ISPF listing formats
I Index - Alphabetical index of tutorial topics
|
2. Enter i
| Code: |
TUTORIAL ------------------------- INDEX --------------------------- TUTORIAL
COMMAND ===>
-----------------------------------
! INDEX !
-----------------------------------
Selected topics discussed in the tutorial can be found in this index.
To use the index, enter the first letter of the topic of interest. The
index page containing subjects starting with that letter is displayed.
On an index page, any subject can be selected by entering the two
character option preceding that selection.
When you are on one index page, you can access any other index page by
entering its letter identification. If you are in the tutorial but not
on an index page, you can get to the index by entering INDEX or I in
the command field.
The index pages are presented in sequence if you press the ENTER key. |
3. Enter c
| Code: |
TUTORIAL ---------------------- INDEX - 'C' ------------------------ TUTORIAL
OPTION ===>
To select a topic, enter code (letter and number) in the option field:
C1 - Cancel (breakpoint primary menu)
C2 - CANCEL command
C3 - CANCEL primary command (edit)
C4 - CAPS primary command (edit)
C5 - Catalog data set name
C6 - Changes for this Release
C7 - CHANGE primary command (edit)
C8 - RCHANGE (repeat change) command (edit)
C9 - Client/Server install, ISPF
C10 - CMDE command
C11 - COBOL compile (batch)
C12 - COBOL compile (foreground)
C13 - COBOL interactive debug (batch)
C14 - COBOL interactive debug (foreground)
C15 - COLOR command
C16 - COLUMNS primary command (browse)
(continued on next page) |
4. Enter c7
| Code: |
TUTORIAL ------------------ EDIT - 'CHANGE' COMMAND ------------------ TUTORIAL
OPTION ===>
The CHANGE command is used to find and change the next occurrence of a
character string in the data being edited.
Command ===> change xxx yyy changes the next "xxx" to "yyy".
The cursor is placed at the end of the changed string. Automatic
scrolling will be performed, if necessary, to bring the string into view.
Topics are presented in the following sequence, or may be selected by number:
1 - Specifying the character string
2 - Limiting the search to a specified range of lines
3 - Limiting the search to specified columns
4 - Optional parameters that can be used to indicate the direction and
starting point of the search ( next, prev, first, last, all )
5 - Optional parameters that can be used to limit the strings to be
found ( chars, prefix, suffix, word )
6 - Optional parameters that can be used to limit the lines to be
searched ( x, nx )
7 - Using the RFIND (repeat find) and the RCHANGE (repeat change) commands
8 - Error and information messages
9 - Syntax rules when using optional parameters |
5. Enter 1
| Code: |
TUTORIAL -------------------- 'CHANGE' STRINGS ----------------------- TUTORIAL
OPTION ===>
On every CHANGE command, you must specify a "from" string and a "to"
string. In most cases you simply enter CHANGE or its abbreviations
CHG or C, followed by the two character strings.
Example - ===> change demo test
If you want to use the same string that was used in the previous CHANGE
command, use an * (asterisk).
Example - ===> chg * * 40 60 (change demo to test in cols 40 to 60)
In some cases, you want to change a string of characters that cannot be
entered in the simple format shown above. For these cases, special
strings can be entered. For example, to change the expression "a = b" to
"c = d" you must use delimited strings as the expressions contain blanks.
Example - ===> c 'a = b' 'c = d'
The following topics are presented in sequence, or may be selected by number:
1 - Delimited strings 4 - Text strings
2 - Hex strings 5 - Character strings
3 - Picture strings |
6. Enter 3
| Code: |
TUTORIAL --------------------- 'CHANGE' STRINGS ---------------------- TUTORIAL
COMMAND ===>
A picture string is used to describe the type of string to be changed
instead of the exact characters to be changed.
Example - ===> chg all p'^' 'x' 72 change all non-blanks in column
72 to the character "x"
A picture string is a quoted string that is preceded or followed by the
letter "P". It can contain blanks, alphabetic and numeric characters
which represent themselves, or any of the special characters listed
below, each of which represents a class of characters.
The special characters that can be used in a "from" picture string are:
= - any character . - invalid characters
ยง - alphabetic characters - - non-numeric characters
# - numeric characters < - lower case alphabetics
$ - special characters > - upper case alphabetics
^ - non-blank characters
The special characters that can be used in a "to" picture string are:
= - any character < - lower case alphabetics
> - upper case alphabetics
(continued on next page) |
6. Read the explanations, understand the concepts, be amazed about the power of the ISPF editor, and finally feel ashamed of not having tried to find this information by yourself. |
|
| Back to top |
|
|
gylbharat
Active Member
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
Thanks Stefen...
We can use the below command also to accomplish the above requirement.
| Code: |
c all p'=' c'' 19 29;
|
Positions may vary. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
no,
| Code: |
| c all p'=' ' ' 19 29 |
|
|
| Back to top |
|
|
sunilmfs
New User
Joined: 09 Nov 2010
Posts: 20
Location: hyderabad
|
|
|
|
got the command ....
Thanks |
|
| Back to top |
|
|
gylbharat
Active Member
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
| dbzTHEdinosauer wrote: |
no,
| Code: |
| c all p'=' ' ' 19 29 |
|
Hi,
This will not move the + Sign to the left. While
| Code: |
c all p'=' C'' 19 29
does
|
|
|
| Back to top |
|
|
GuyC
Senior Member
Joined: 11 Aug 2009
Posts: 1281
Location: Belgium
|
|
|
|
| gylbharat wrote: |
This will not move the + Sign to the left. While
| Code: |
c all p'=' C'' 19 29
does
|
|
only when the + is on pos 31, as soon as there are 2 consecutive spaces things won't shift. |
|
| Back to top |
|
|
gylbharat
Active Member
Joined: 31 Jul 2009
Posts: 565
Location: Bangalore
|
|
|
|
| GuyC wrote: |
| gylbharat wrote: |
This will not move the + Sign to the left. While
| Code: |
c all p'=' C'' 19 29
does
|
|
only when the + is on pos 31, as soon as there are 2 consecutive spaces things won't shift. |
Yup... Correct. |
|
| Back to top |
|
|
|
|
