1. Categories >> Software >> MainFrame >> IBM MainFrame >> JCL
  2. Suggest New Category

Suppose i have a file with 10 recs and i want to skip only the
7 th record and copy the rest into another file. How do i do
it using SORT?

Question Posted / rajiv

Answer Posted / rajiv

Hi,

you can do something like this using inrec & outfil

//STEP010 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
XXXX1 ABCEDFHIJCKLMO
XXXX2 ABCDEFGHIJKLMO
XXXX3 ABCDEFGHIJKLMO
XXXX4 ABCDEFGHIJKLMO
XXXX5 ABCDEFGHIJKLMO
XXXX6 ABCDEFGHIJKLMO
XXXX7 ABCDEFGHIJKLMO
XXXX8 ABCDEFGHIJKLMO
XXXX9 ABCDEFGHIJKLMO
XXX10 ABCDEFGHIJKLMO
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY,EQUALS
INREC IFTHEN=(WHEN=GROUP,RECORDS=10,PUSH=(21:SEQ=1))
OUTFIL INCLUDE=(21,1,CH,NE,C'7'),BUILD=(1,20)

Output:
XXXX1 ABCEDFHIJCKLMO
XXXX2 ABCDEFGHIJKLMO
XXXX3 ABCDEFGHIJKLMO
XXXX4 ABCDEFGHIJKLMO
XXXX5 ABCDEFGHIJKLMO
XXXX6 ABCDEFGHIJKLMO
XXXX8 ABCDEFGHIJKLMO
XXXX9 ABCDEFGHIJKLMO
XXX10 ABCDEFGHIJKLMO

Is This Answer Correct ?    3 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Is condition checking possible in jcl?

725

Explain how can the disposition of sysout datasets be set for an entire jobstream?

643

How do you create a temporary dataset?

670

what is DD statement is used in JCL?

686

what is the difference between JES3 and JES2?

692




Hello Guys, I have 1+ Year Experience in MAINFRAME TESTING. After 1 Week I have an Interview With a Company on Mainframe Testing. Please Could You Guys Please Suggest me What Sections Should I prepare ?? ___Tell Me the Topic Or Appropriate Site & Links. ?? ---------------Thank You

2271

I have 60 steps in the JCL and want to Execute Only First from PROC by overriding in JCL ?

1361

Must tape dataset definitions include vol=ser specifications?

992

How can return codes be tested before execution of a job step?

932

How do you submit a job for execution?

645

In sms datasets, what is the function of the dd avgrec keyword?

659

How to compare two files in SYNCSORT and on the mismatch record should be deleted from second file.

5067

in ways data can be passed to a COBOL program from JCL?

674

Explain the function of a dd statement?

669

Explain the function of the steplib dd statement?

654