View previous topic :: View next topic
|
Author |
Message |
LinkinPark Warnings : 1 New User
Joined: 20 Nov 2005 Posts: 44 Location: DALIAN,CHINA
|
|
|
|
how to delete the dataset's content from 4th column to 5 column ?
my dataset like this
Code: |
JPVPJ2.CMS.TAMNA.S5.TEMP.SE ZJP564+ PS FB
JPVPJ2.CMS.TAMNA.S6.TEMP.SE ZJP589+ PS FB
JPVPJ2.CMS.TAMNA.S7.TEMP.SE ZJP737+ PS FB
|
how to change it to
Code: |
JPVPJ2.CMS.TAMNA.S5.TEMP.SE PS FB
JPVPJ2.CMS.TAMNA.S6.TEMP.SE PS FB
JPVPJ2.CMS.TAMNA.S7.TEMP.SE PS FB
|
thanks |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Link,
Your comments don't match your example.
Also you don't tell us if you want to do it in a pgm, ISPF, sort or whatever. |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
You can use a DFSORT job like this one to do what you asked for:
Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file
//SORTOUT DD DSN=... output file
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,49,59,8)
/*
|
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:
Use [URL] BBCode for External Links |
|
Back to top |
|
|
Sandy-is-here
New User
Joined: 16 Mar 2006 Posts: 6 Location: Bangalore
|
|
|
|
Hi Link,
You can try giving BNDS option in front of your first row and set the BNDS pointer '<' to the specific column want to delete. Then shift that many columns to left using ((8 (in your case) on first record and ((8 at the last record. Once that particular column is deleted, set back the BNDS pointer to the first column.
Try this out..might work faster for less number of records, where a file can open in edit mode..
-Sandy |
|
Back to top |
|
|
sathyajes
New User
Joined: 02 Mar 2006 Posts: 35 Location: Chennai
|
|
|
|
Hi Link,
If want your requirement to be accomplished thru an ISPF Command the follwing on the Command line on Edit mode will suffice.
c all p'?' ' ' 30 40
This says - Change all chacters from 30th position to 40th position to space and also move the content towards left
If there is a <space> between the Quotes then it would be replaced by spaces alone and conten will not be moved left
c all p'?' ' ' 30 40
This would be handy if you want to edit a dataset very quickly
Hope it helps you !
With Regds,
Sathya |
|
Back to top |
|
|
|