i want to use only first 100 records from a file.plz tell
me how to write JCL for this(for read,copy,write
operations).plz give me details of all posible JCL
utilities?
Answers were Sorted based on User's Feedback
Answer / madhuri tungal
Use IDCAMS program.
//.........JOB........
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
REPRO INDATASET(INPUT FILE) OUTDATASET(OUTPUT FILE)
SKIP(0) COUNT(100)
/*
| Is This Answer Correct ? | 37 Yes | 2 No |
Answer / selva
SORT FIELD=COPY, SKIPREC=200 (OR SOME MORE RECORDS),
STOPAFT=100
will skip first 200 records, the correct option is
SORT FIELD=COPY,STOPAFT=100
| Is This Answer Correct ? | 17 Yes | 0 No |
Answer / khbnaidu
Using SORT you can do this...
SORT FIELD=COPY, SKIPREC=200 (OR SOME MORE RECORDS),
STOPAFT=100
| Is This Answer Correct ? | 15 Yes | 10 No |
Answer / santy
Hi,
U can use only first 100 records from a file by using the
IDCAMS utility.
JCL to perform this operation is as below,
//JOBNAME JOB ,, Notify=User_id
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDATA DD DSNAME=DATA1
//OUTDATA DD DSNAME=DATA2
//SYSIN DD *
REPRO
INFILE(INDATA) OUTFILE(OUTDATA)
START(0) COUNT(100)
/*
COUNT variable in JCL with start counting a record from
start position 0 and count first 100 record.
| Is This Answer Correct ? | 8 Yes | 3 No |
Answer / arul anand.a
SORT FIELD=COPY,
SKIPREC=0 ( skip 0 records)
STOPAFT=100 (stop after 100 records).
so it will copy only first 100 records.
| Is This Answer Correct ? | 6 Yes | 1 No |
Answer / nataraj
copy file to esds file this file only sequance order so copy
only first 100 records
| Is This Answer Correct ? | 4 Yes | 1 No |
Answer / santy
by using IDCAMS utility u can do this.
//JOBNAME JOB ,, Notify=User_id
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDATA DD DSNAME=DATA1
//OUTDATA DD DSNAME=DATA2
//SYSIN DD *
REPRO
INFILE(INDATA) OUTFILE(OUTDATA)
START(0) SKIP(100)
/*
| Is This Answer Correct ? | 7 Yes | 8 No |
Can the OCCURS clause be at the 01 level?
how we can reverse the string in the cobol for example satheesh can be reveresed as hseehtas
What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?
WHAT IS SOC3?HOW IT CAN BE RESOLVED?
how to run sub programs using static and dynamic call ...
I have a field with data type X(10). I want to perform arithmetic operation on this field? I tried doing it by moving the value into a numeric field. but it didn't work out. I am getting a S0C7 abend. Pls let me know if there is any way of getting this done?
If i have a variable A pic 9(2) value 10 Compute A = a - 100 what will be the value of A and will there be any error becoz of the Negative value
how do you reference the variable unblock file formats from cobol programs
how to know that the file has 300 records how to acess it?
What are the steps you go through while creating a COBOL program executable?
What is the meaning of 'TALLING' verb in cobol?
In a program, variables are used but no DB2 involved in it. Can you call it as host variables??