How can I skip 10th record in a file?

blpraveen123 · New User Joined: 26 Apr 2007 Posts: 12 Location: Mysore

Hi,

This was an interview question.How can I skip particular single record from a file and write other records into output file?

What this sort card means?
Sort Fields=Copy
Outrec=(1:10,15,CH)

In one of the topic I found copying range of records using
sort card---
//
Sort Fileds=copy
outfil File=DDN1 Startrec(10) ENDREC(10)

Can I write the Sort JCL Like this?
IF any corrections please suggest me.

murmohk1 · Posted: Wed May 30, 2007 3:04 pm

Praveen,

William Thompson · Posted: Wed May 30, 2007 3:14 pm

Or, in one step, add a sequence number in the input phase and omit the record that has a 10 in the sequence in output phase.

blpraveen123 · New User Joined: 26 Apr 2007 Posts: 12 Location: Mysore

Hi
Is the Sort card using the SEQ NUM is Correct

* Insert the Seq NUM
INREC OVERLAY=(81:SEQNUM,8,ZD)
* Sort on seqnum descending.
SORT FIELDS=(81,8,ZD,A)
* Remove 10th Record
OMIT COND=(81,8,ZD,ZD'00000010')
* OUTPUT TO FILE
OUTREC BUILD=(1,80)

-------?Is the OMIT CONDITION Correct

William Thompson · Posted: Wed May 30, 2007 5:06 pm

Looks good, but if me, I'd verify from the manual (not that good remembering formats...

).
You do not need to sort, just copy, the records are already in the sort sequence.