i have 1000 records in input file and i want to sort it and
the first 200 records to be placed in output file. how to
do that??
Answers were Sorted based on User's Feedback
Answer / kavya
Write a sort step to sort the entire file. Write another
sort step with the following sort card
SORT FIELDS=COPY,
STOPAFT=200
END
| Is This Answer Correct ? | 19 Yes | 1 No |
Answer / sudeep
sorry kavya is right.I haven't red the first part.sorting
the file completely at first.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / felix
sorry. my previous answer is wrong.
use the following coding in JCL.
First u should sort the file using sort pgm. enter the
sorted file path in input data set.
//SYSIN DD*
REPRO
INDATASET(WRITE THE INPUT PATH)
OUTDATASET(WRITE THE OUTPUT PATH)
COUNT(200)
| Is This Answer Correct ? | 4 Yes | 2 No |
Answer / chinmay
//job1 job 65493,jena,class=a prty=9
//step1 exec pgm=sort
//sysprint dd sysout=*
//indd dd dsn=file1.cob, disp= shr
//outdd dd dsn=file2.cob, disp=(new,catlg,delete)
// unit=sysda,space=(cyl,4,2),rlse)
//sysin dd *
sort fields=(2,4,ch,a)
/*
//step2 exec pgm=idcams
//sysprint dd sysout=*
//sysin dd *
repro -
infile(indd)
outfile(outdd)
count(200)
/*
//
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / sivakumar sekharannair
Kavya's answer is correct.
i used the following control card
//SYSIN DD *
SORT FIELDS=(1,3,CH,A),
STOPAFT=8
Input file contained the following records
IMSDEVELOPER CSAA
IMSPRODSUPPORTXEROX
IMSTESTER EMDAC
IMSDEVELOPER CSAA
CICPRODSUPPORTXEROX
IMSTESTER EMDAC
The output i got was
CICPRODSUPPORTXEROX
DB2PRODSUPPORTEMDAC
IMSDEVELOPER XEROX
IMSDEVELOPER CSAA
IMSDEVELOPER CSAA
IMSPRODSUPPORTXEROX
IMSTESTER EMDAC
IMSTESTER EMDAC
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sivakumar sekharannair
The input records shown in the above message contained a
few records9total 10 records) also which was misset while
cut/copy
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / satish
hi to all
the example is useful to our requirement,example is i have
some records and i sort it and first 5 records to be placed
in o/p file
//STEP1 EXEC PGM=SORT
//SORTIN DD *
b
c
d
e
f
g
h
i
j
k
l
/*
//OUT DD dsn=output file*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,1,CH,D)
outfil fnames=out,endrec=5
/*
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / msm
//SYSIN DD *
DEBUG ABEND
SORT FIELDS=(8,11,CH,A)
SORT FIELDS=COPY,STOPAFT=200
END
| Is This Answer Correct ? | 0 Yes | 0 No |
When cursor is not closed what is the error?
how many max steps can we use in a job? pls answer to my question
what is the general use of PARM? Give an explanation about the system defined parameters that could be passed through this PARM like XREF,LIST,LET,APOST,RENT etc..
What is the purpose of dd dummy statement?
db2 maintains information about the data... a.in tables. b.in a set of tables known as db2 catalog. c.in db2 database. d.none of the above. 1 What is the maximum number of tables that can be stored on a Partitioned Table Space ? 1 what is contained in the DB2 node lock file? A) data base names B) data base users names C) license keys D) server names Accenture 5 Can a primary key have null values? If we try to insert a null value in a primary key column, will it work or give an error code? 6 When you are working with the project after coding what will u do? Like what type of documents u will prepare? How will u do testing? 2 how to delete perticular row from table for ex. how you will delete 3rd row from table please answer THANKS IN ADVANCE IBM 7 max number of columns in a db2 table? 6 What is package versioning? Please give an example. 1 What is the picture clause of the null indicator variable? 6 How do you filter out the rows retrieved from a Db2 table ? 1 What is DB2 (IBM Database 2)? 3 Can any one tell me about Restart logic in DB2.
I have 5 generations in my GDG. How do I code in the JCL to consider all the 5 versions of the GDG ?
i have job card like this //job ***** //step1 exec pgm=iebgener //sysut1 dd dsn=main.sss,disp=shr // dd dsn=main1.sss,disp=shr // dd dsn=main2.sss,disp=shr //sysut2 dd dsn=out1.mmm ,disp=(new,catlg,delete) dcb=( ) // sysin dd * like this what i have to do to skip dsn=main1.sss please giveme answer asap
I need exexution process for JCL programs
How do you override a specific DDNAME/SYSIN in PROC from a JCL?
COND -> step1 . . step2, Step2, Executes if the CC of step1 is 0. But even if it is NOT 0 and if we dont give COND, will step2 be executed ?
how to eliminate the duplicates in sorting
what if any ,is the syntax error in the following piece of code 01 B PIC A(7) 02 C PIC 9(4) ........ IF(B NUMERIC) ADD 10 TO C a.the condition in the if statement is wrong b.noting is wrong c.because C is initialised.ADD 10 TO C is wrong d.both B and C shoud have same size.