Test Papers / Previous Question Papers of IGNOU CS03 File Structure and Programming in Cobol June 1996

PGDCA / MCA (I Yr) / BCA
Term-End Examination

June, 1996

CS03 : File Structure and Programming in Cobol

Time: 2 hours
Maximum Marks: 60

Note : Question number 1 is compulsory. Attempt any three questions from the rest.

1. (a) Input-output to a COBOL program is normally performed using a file. Why? What is the of OPEN and CLOSE statements in COBOL? What are the actions performed on execution of READ and WRITE statements respectively?

(b) What is the need of level 77 and level 88 entries? Give two examples of situations where you would like to use these entries.

(c) What is the purpose of synchronized clause in COBOL? In What situations would you like to use this clause? What is a slack byte in this context?

(d) How can you represent a two dimensional matrix in COBOL? How is sorting of elements of one dimensional array performed in COBOL?

(d) How can you represent a two deminsical matrix in COBOL? How is sorting of elements of one dimensional array performed in COBOL?

(e) What are the situations which can be used in COBOL to solve problem having iterations? Is recursion allowed in COBOL? Give reason.

(f) How can a string find and replace operation be implemented in COBOL?

(g) Two stored transation files are to be merged on a specific key. Write the various procedure division and data division entries which are required to do this operation.

(h) Compare and contrast the direct and sequential file organization.

2. What is meant by indexed file organization? What are the advantages / disadvantages of this organization over sequential and relative file organization? What are the environment division and procedure division entries for indexed files? Give examples of these entries.

3. (a) What are the errors in the following statements/segments of COBOL?
(i) DIVIDE 13 INTO J GIVING KL ROUNDED
(ii) FILE SECTION
FD CARD
77 CARD-REC
03 NAME PICTURE IS X (20)
03 EARN PICTURE IS 9 (5) V99.
(iii) ADD A, B GIVING C ROUND ON SIZE
ERROR MAVE ZERO TO C.
(iv) MULTIPLY A BY 300.2 GIVING B ROUNED
ON SIZE ERROR MOVE O TO B.
(v) IF X IS GREATER THAN OR EQUAL TO 30
DISPLAY "X" IS GREATER THAN OR EQUAL TO 30".

(b) A transalation file has the following structure:

 Account number : 8 alphanumeric characters
 Translation code : 2 numeric digits

Write a program (only procedure division and data division )in COBOL which sorts these entries on account number in two files the first contains the entries for which translation code is less than 50. the second file contains the entries for which the translation code in the input was more than 50, but at time of writing into the file has to be converted to zero.

4. (a) Write the data division and procecedure division of a COBOL program which calculates the yearly depreciation as per the following formula

   Cost –scrap value
 Yearly depreciation = ———————————
    Life

The input records to the program consists of item number, cost of item, scrap value and life in years. Please note that program should print "ERROR" if depreciation value is less than equal to zero.

(b) In a COBOL program the following table has been described in the working storage section:

 01 PERSON-TABLE
  02 PERSON-INFOOCCURS 500 TIMES
 03 P_NAME
  04 FIRST PIC X (25)
  04 SECOND PIC X (20)
 03 INCOME PIC 9 (5)

(i) What will be the size of the table in number of bytes? What will be the modified size of the table if we modify it to include a logical information like sex of a person?

(ii) Write procedure statements to find the persons whose last name is "MISHRA" and INCOME > 30,000

(c) Rewrite the COBOL statement given in para P1using PERFORM with VARYING AFTER option.

 SET TO 1
 P1 IF NOT 1> 11 PERFROM P2 THRU P3
 SET 1 UP BY 2 GO TO P1.
 P2 SET J TO 25
 P3 IF NOT J< 1 PERFORM END PARA.
 SET J DOWN BY 4 GO TO P3.

5. Explain the following statement/clause of COBOL giving two examples each:
(i) ACCEPT and DISPLAY verbs
(ii) REDEFINES clause
(iii) CORRESPONDING option with MOVE and ADD verbs
(iv) SEARCH verb
(v) RELEASE and RERURN statements