Interested to Buy Any Domain ? << Click Here >> for more details...
i have a sequencial file contains multiple records, i want
to extract one row which contains various fields like order
number,date,warehouse,.ect.. in to the another file by
accepting the order number from jcl. how can i do it. pls
help me..
- 4 Answers
- 11766 Views
- CGI, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / abhijit18in2002
Input file: ABCD.UTIL.SAMP has following records
Order Warehouse Place Date
10012,COMPUTER,INDIA,20090805
10013,COMPUTER,INDIA,20090805
10014,COMPUTER,INDIA,20090805
10015,COMPUTER,INDIA,20090805
10016,COMPUTER,INDIA,20090805
10017,COMPUTER,INDIA,20090805
//COUNTREC JOB ,'COUNT RECORDS',
// MSGCLASS=Q,CLASS=D,
// NOTIFY=&SYSUID
//STEP010 EXEC PGM=SORT,REGION=4096K
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=ABCD.UTIL.SAMP,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(1,5,CH,EQ,C'10015')
/*
SORTOUT :- Ouput in SPool
10015,COMPUTER,INDIA,20090805
| Is This Answer Correct ? | 12 Yes | 2 No |
Answer / sowjanya
let say ur input file is like below.
FD input-file.
01 input-record.
05 order-number pic x(5).
05 order-date pic x(10). etc.
the order number passed by the JCl willbe received in cobol
thru linkage section .let say that is LS-ORDER-NUMBER.
code like below in procedure division.
Procedure division.
Read input-file until EOF
at end move 'Y' to EOF.
if order-number = ls-order-number
write out-rec from input-record.
Here the out-rec contains only one record that has order
number equals to the order number received from JCL.
| Is This Answer Correct ? | 7 Yes | 0 No |
Answer / nandigam
your question was not clear,the above two answer was
correct.
if have any doubt again post same question and with example
| Is This Answer Correct ? | 3 Yes | 0 No |
What is difference between static and dynamic call in cobol?
hi is there any means of deletin a record from a ps usin cobol not using jcl?eg if i am reading a record and if some condition is matched tat particular record must be deletd fom the ps
hi dudes.....can any one help me..... what is SET TO TRUE all about,anyway?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
what is the minimum number of lines a Cobol program should have to successfully compile and run
what do you mean by copybook? and what is the difference between the copybook which we are using in working storage and procedure division.
Q:what is the difference between the variable length and fixed lenght.how it varies in the cobol.
How many sections are there in data division?.
What is the difference between Global and External Variables?
How to delete the records of a dataset through cobol programme?We should not use jcl utilitities like IDCAMS.
Hai friends why we need to read a file before re-write a record?
Can we call a CICS program from a batch program or viceversa?If so, how?
COBOL 
