Sri,
That's exactly what I needed.
Thank you!

Regards
--
Radoslaw Skorupka
Lodz, Poland







W dniu 2017-05-19 o 23:12, Sri h Kolusu pisze:
Radoslaw,

You can use the DATASORT operator to just sort the data and ignore the
headers/trailers. Here is a sample JCL. I assumed that the lastname starts
at position 15 for a length of 13.

//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//IN       DD *
FIRSTNAME     LASTNAME    YEAR    OTHERDATA
----------    ---------   ----    ---------
JOHN          SMITH       1945    EEEEEEEEE
JOE           ZAWINUL     1932    RRRRRRRRR
GEORGE        ALTMARK     1954    FFFFFFFFF
//OUT       DD SYSOUT=*
//TOOLIN    DD *
   DATASORT FROM(IN) TO(OUT) HEADER(2) USING(CTL1)
//CTL1CNTL  DD *
   SORT FIELDS=(15,13,CH,A)
//*

Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation
IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
05/19/2017 01:54:12 PM:

From: "R.S." <r.skoru...@bremultibank.com.pl>
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 05/19/2017 01:54 PM
Subject: DFOSRT and headers
Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>

How to exclude header lines from being sorter/filtered?

For example, I have the following file:

FIRSTNAME     LASTNAME    YEAR    OTHERDATA
----------    ---------   ----    ---------
JOHN          SMITH       1945    eeeeeeeee
JOE           ZAWINUL     1932    rrrrrrrrr
GEORGE        ALTMARK     1954    fffffffff



I want to sort by lastname:
FIRSTNAME     LASTNAME    YEAR    OTHERDATA
----------    ---------   ----    ---------
GEORGE        ALTMARK     1954    fffffffff
JOHN          SMITH       1945    eeeeeeeee
JOE           ZAWINUL     1932    rrrrrrrrr



======================================================================


       --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 0000025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to