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 |
What is the Purpose of POINTER Phrase in STRING command in COBOL?
Can 88 level variable be declared in FD section..?
Following questions were asked in Capegemini on 8th sep,2012 mainframe test 1.)Condition code for dul recors in VSAM- 2.) Is NULL or =NULL in Select statement 3.)max size of CI 4.)What happens after CI is full 5.)Ques on COND parameter 6.)which among following can not be rolled back a)delete table b.)droptable c)Update d.)insert 7.)groupby and orderby sql querries 8.)Max extents in VSAM file 9.)quesn on DPRTY=(1,10) 10.)range of condition codes in COBOL 11.)occurs clase can not be used at which level? 12.)delimiter in jcl 13.)sort card for file in PGM=SORT 14.)PIC(6) value 120056 possible? 15)question on BLKSIZE Is (20,20) and (20,10) possible? 16.)number of bytes in RDF 17.)Can we use index in WS-section or LK-section 18.)Verify command in IDCAMS used for? 19.)question on Alternate Index 20.)Return code of file attribute mismatch 21.)In which format COBOL variables stored? 22.)what is Alternate of HANDLE? 23.)can SUM,AVG,MIN,ROUND used in numeric and char variable data types? 24.)What is the datatype of FILE STATUS codes in WS-section?
In a program, variables are used but no DB2 involved in it. Can you call it as host variables??
How do you reference the fixed block file formats from cobol programs
Can you call an OS VS COBOL pgm from a VS COBOL II pgm ?
What is SSRANGE, NOSSRANGE ?
Read a flat file and write last but one (I have n records in a file I have to write n-1th) record in another flat file. Could you please provide me the code in COBOL?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
BY seeing a program how can we say that it is static call or dynamic call
Can anyone tell me how to handle the array beyond the limit. If we have an array or a table which can handle 5000 records but now we have to compensate 20000 records with the same array? how to handle the situation.
Without using move verb how to move one variable to another.