Program for add corresponding, COBOL Programming


We have to write a simple program to demonstrate Add Corresponding.

  identification division.

  program- id.

  environment division.

  data division.

  working-storage section.

  01  rec-1.

    02   sno   pic  9(2) value 11.

    02   mark1 pic 9(2) value 1.     

  01  rec-2.

    05   sno   pic  9(2)  value 10.

    05   mark2 pic 9(2) value 2.

  procedure division.


    display(1 1) erase.  

    display(3 5) mark1 of rec-1.

    add corr rec-1 to rec-2.

    display(5 5) mark2 of rec-2.

display (10 5) sno of rec-2.

stop run.

Posted Date: 10/18/2012 2:03:31 AM | Location : United States

Related Discussions:- Program for add corresponding, Assignment Help, Ask Question on Program for add corresponding, Get Answer, Expert's Help, Program for add corresponding Discussions

Write discussion on Program for add corresponding
Your posts are moderated
Related Questions
Figurative Constants: The Figurative constants have several fixed names and the compiler recognizes these names and it sets up the equivalent values in the object program.

Second form of Divide verb: The second form of this verb is as shown below: In this situation the identifier-1 or numeric- literal-1 will be divided by identifier-2 or

What is the difference b/w index and subscript? Subscript indicates to the array occurrence whereas index is the displacement (in no of bytes) from the beginning of the array.

PERFORM WITH VARYING OPTION: The format is as shown below:

Example of Move corresponding: Consider the DATA DIVISION entries shown below. Suppose it is needed that the data stored in the 4 fields of the PAY_REC should be

cobol program for generate a eb bill

PROGRAM FOR PERFORM - VARYING: We have to write a program to elaborate PERFORM ...VARYING Identification division. Program- id. PerfVary. Environment division. Dat

Example of Class condition: Let the BASIC-PAY be a data name in the card record defined with picture 9(5) V99. By reading the card we can test the value of the BASIC-PAY to ma

LEVEL NUMBERS: The COBOL makes use of the level number concept to explain the hierarchical data structure. A level number is a 2 digit number. The permitted level numbers a