First need to sort both files
READ FILE1
READ FILE2
PERFORM UNTIL EOF = 'Y'
IF FILE1-ID > FILE2-ID THEN
READ FILE2 AT END MOVE 'Y' TO EOF
ELSE IF FILE1-ID < FILE2-ID
READ FILE1 AT END MOVE 'Y' TO EOF
ELSE IF FILE1-ID = FILE2-ID
WRITE FILE3
READ FILE1 AT END MOVE 'Y' TO EOF
READ FILE2 AT END MOVE 'Y' TO EOF
END-PERFORM
What does a ROLLBACK do in IDMS?
What is a set in IDMS? What pointers are required, what are possible? How may sets be ordered?
Name and explain the three location modes?
What is the meaning of Copy IDMS Subschema-Binds?
What is a junction record in IDMS?
Explain IMS Software Environment?
What is DL/I?
What are the advantages and disadvantages of a Hierarchical Database?
What do you mean by Hierarchical Database?
What are the objectives of DBMS in IMS?
rendc.org
Whether it is technological solutions or user-oriented innovations, We have put together for you the best sources of HR Interview Questions and Answers, Tech Ideas, and Programming Tutorials."
Get all the latest information on rendc.org
© 2022 | All rights reserved.
RENDC
welcome to www.rendc.org
