|
View previous topic :: View next topic
|
| Author |
Message |
Ban
New User
Joined: 24 May 2005
Posts: 2
|
|
|
|
I want to just use JCL to write a record into a new data set. There is no input file, just an output file. Is there some utility I can use ? " )
Thanks & Best regards,
Ban |
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| IEBGENER, SORT, IDCAMS (REPRO), and others. |
|
| Back to top |
|
|
Ban
New User
Joined: 24 May 2005
Posts: 2
|
|
|
|
Hi superk,
Accturally, I have tried SORT
SYSIN *
SORT FIELD=COPY
OUTREC FIELD=(1:C'GEFT')
END
But the file is empty. So can you give me a example of such a utility?
Thanks a lot. " )
Ban |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
You can do it with DFSORT. For example, if your output file has RECFM=FB and LRECL=100, you can use a DFSORT job like this:
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
data
/*
//SORTOUT DD DSN=... output file (FB/100)
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,80,100:X)
/*
|
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 |
|
|
|
|
