poongs Warnings : 1 New User
Joined: 24 Jan 2007 Posts: 28 Location: pune
|
|
|
|
Hi All,
I have a requirement like below:
output expected field is of 9(12)v99.
My input is a report in text format. This report has to be downloaded from the front end application.
The field is represented as below in the report:
I need the output in the below format.
-----> internally stored as 9(12)v99.
please let me know how to achieve this in DFSORT.
Thanks,
Poongs. |
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
You can use a DFSORT job like the following to do what you asked for. I assumed your input field is in positions 1-16 and you want the output field in positions 1-14.
Code: |
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
1179.14
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC BUILD=(1,16,UFF,TO=ZD,LENGTH=14)
/*
|
If you need more specific help, give more details about the input field (starting position and length), converted output field (starting position), RECFM, LRECL and other input and output fields.
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:
www.ibm.com/support/docview.wss?rs=0&uid=isg3T7000080 |
|