Interested to Buy Any Domain ? << Click Here >> for more details...
copy 100 records without using ibm utilities
- 3 Answers
- 8860 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / swapnil
USING AN OCCURS CLAUSE WE MOVE RECORD FROM ONE PS FILE TO
ANOTHER PS
| Is This Answer Correct ? | 5 Yes | 0 No |
MOVE 0 TO WS-COUNTER
MOVE N TO END-OF-FILE
PERFORM 1000-COPY-PARAGRAPH UNTILL (WS-COUNTER = 100 OR END-
OF-FILE = 'Y'.
100-COPY-PARAGRAPH.
READ INPUT FILE
AT END MOVE Y TO END-OF-FILE
NOT AT END MOVE IN-REC TO OUT-REC
ADD +001 TO WS-COUNTER.
1000-EXIT.
EXI.
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / mahendra.ch
1st way to copy records to an other ps.
open input in-file
output out-file.
perform until end-of-file = 'y'
read in-file
at at end move 'y' to end-of-file
not at end
move in-rec to out-rec
write out-rec
end-read
end-perform.
close in-file.
close out-file.
2st way to copy records to an other ps.
we can copy the records by using file-aid tool also.
| Is This Answer Correct ? | 1 Yes | 0 No |
why do u need inspect verb?
What are the different types of condition in cobol and write their forms.
How does IDMS communicate with CICS?
what happens when a copybook variables are declared using include statement ?
can internal sort be applied to sort ksds files?
how can i see junk values in dclgen or in hostvariable of comp ?
I have a sequential file. How do I access a record in this sequential file randomly in my program ?
how do you reference the rrds file formats from cobol programs
What is the difference between a binary search and a sequential search what are the pertinent cobol?
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..
how to convert the recors form vsam file to db2 table tru file aid
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?
COBOL 
