Interested to Buy Any Domain ? << Click Here >> for more details...
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??
- 14 Answers
- 26525 Views
- L&T, I also Faced
- E-Mail Answers
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 |
How Can we see all generations of a GDG ?
Can anybody tell what is tool used to generate the list of PROCS used in JCL to generate a PROCTREE
Explain the function of a dd statement?
How to print data of sequential file to Spool..?
how to edit a tape dataset ? asked in wipro
What is DISP= (NEW,PASS,DELETE)?
what is a jcl?
What is the use of DSNDB07 ?
Describe the EXEC statement, its meaning, syntax and keywords?
what is the purpose of coding class parameter in job statement?
I have a Symbolic Parameter which can have a value say 01 or 02 etc. Now consider i have another Symbolic parameters which is used to get 3 digit code of months (JAN, FEB, etc) but for that i need to check the first symbolic parameter's value and provide its corresponding month's name in the second symbolic parameter. Say IF sym1 = 01 then sym2='Jan' ENDIF etc... In JCL, IF condition is used for RC, ABEND purposes of a step etc. When i use Symbolic parameter in IF clause it is showing Error message. Is there a way to get the above result possible in JCL. If you could provide me with an example, i would understand it better.
How do you restart a PROC from a particular step?
COBOL 
