IF I AM INCORRECT,CORRECT ME
(1) How should an elementary item subscript be declared to be more efficient?
a) s9(8)comp
b) s9(16)comp
c) S9(4)comp
d) s9(2)comp
(2) A word in the Computer memory is identified by_________
a) word length
b) word size
c) word address
d) None of the above
(3) In an EVALUATE statement, can I give a complex condition on a when clause?
a) Yes
b) No
c) Compilation error
d) Syntax error
(4) What is the other verb for RELEASE and WRITE ?
a) READ and WRITE
b) Rewrite and Read
c) Write and Read
d) Write and Open
(5) How could you write a program in a structured format?
a) Bottom-up approach
b) Each module serving different function
c) Program is divded into many exit point
d) No go to's
(6) Which is more efficient, level 77 OR 01?
a) 77
b) 01
c) Both
d) Neither
(7) Execution of a subordinate module is caused by the use of the COBOL verbs ------------in the superior module
a) Perfrom
b) Search
c) Evaluate
d) None of the above
(8) Which of the following is true about the file which is referenced in a delete statement?
a) Opened in INPUT mode
b) Opened in OUTPUT mode
c) Opened I/O mode
d) None of the above
(9) Can the OCCURS clause be at the 01 level?
a) Yes
b) No
c) only in 77 level number
d) All of the above
(10) The following are Data division entries
01 A PIC 9(2) VALUE IS 50
01 B PIC 9(3) VALUE IS 950
The following is the procedure Division statement
ADD A TO B ON SIZE ERROR DISPLAY 'ON SIZE ERROR'
DISPLAY 'B' B
What is the value of B when it is displayed?
a) 950
b) 1000
c) 100
d) None of the above
(11) How many sections are there in data division?.
a) 6
b) 3
c) 4
d) None of the above
(12) An index can be modified only by a
a) Add
b) Evaluate
c) Perform
d) If
(13) How is sign stored in a COMP field ?
a) in last nibble
b) in Least significant bit
c) In the most significant bit. Bit is ON if -ve, OFF if +ve
d) None of the above
(14) Indicate which one of the following is not true about the SET verb.
a) The verb can be used to set one or more indexes to a particular value
b) The verb can be used to move the current value of an index to one or more identifiers
c) The verb can be used to increment one or more identifiers by a positive integral value.
d) The verb can be used to decrement one or more indexes by a positive integral value.
(15) How many bytes are allocated for a data item PIC S9(10) binary .
a) 5
b) 6
c) 8
d) 10
(16) Consider the below code
01 WS-COUNT PIC 9 VALUE 5.
PROCEDURE DIVISION.
PERFORM NEW-SECTION THRU NEW-SECTION-EXIT WS-COUNT TIMES
STOP RUN.
NEW-SECTION.
-----------------------------
MOVE 10 TO WS-COUNT. -------- --------.
NEW-SECTION-EXIT.
EXIT.
How many times will NEW-SECTION be performed
a) 5 times
b) 10 times
c) 50 times
d) will go in loop
(17)
01 ws-n pic 9(2) value zero.
a-para.
move 5 to ws-n.
perform b-para ws-n times.
b-para.
move 10 to ws-n.
how many will b-para will execute?
a) 10 times
b) 0 times
c) 5 times
d) 50 times
(18) ACCEPT WS-DATE FROM DATE WILL RETURN THE CURRENT DATE
a) IN DDMMYY FORMAT
b) IN YYYYMMDD FORMAT
c) IN YYMMDD FORMAT
d) IN MMDDYY FORMAT
(19) Can you REWRITE a record in an ESDS file? Can you DELETE a record from it?
a) Can rewrite (record length must be same), but not delete.
b) Both rewrite and delete is possible
c) Can delete ,but can not rewrite
d) Can not do both
(20) PERFORM RTN-1 VARYING I FROM 1 by 2 UNTIL I > 2 AFTER J FROM 1 BY 1 UNTIL J > 2 AFTER K FROM 2 BY -1 UNTIL K < 1 .
HOW MANY TIMES RTN-1 WILL BE EXECUTED ?
a) 4 times
b) 5 times
c) 6 times
d) 8 times
COBOL TEST-2 WITH ANSWERS
Moderator: Moderator Group
-
- Member
- Posts: 16
- Joined: Fri Jun 25, 2010 10:50 am
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page