Program for screen section, COBOL Programming

PROGRAM FOR SCREEN SECTION:

 identification division.

  program- id.

  environment division.

  data division.

  working-storage section.

  01  a pic 9(2) value 0.

  01  b pic 9(2) value 0.

  01  c  pic 9(3) value 123.

screen section.

01   b-screen.

  02  blank screen.

01   screen1.

    02   line 3 column 5  pic 9(2) to a auto bell. 

    02   line 5 column 5 pic 9(2) to b auto bell.

01   screen2.

   02   line 7 column 5  pic 9(2) from a blink reverse-video.

   02   line 9 column 5 pic 9(2) from b highlight blink.

procedure division.

p0.

       display b-screen.

p1.

  display screen1.

  accept screen1.

  display screen2.

  compute c = a + b.

  display " ".

  display " c = " c.

  display "Using exhibit".

  exhibit c.

  stop run.

Posted Date: 10/18/2012 2:02:24 AM | Location : United States







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

Write discussion on Program for screen section
Your posts are moderated
Related Questions
Example of Redefines clause: This illustration describes a sales record that may either contain the total amount of sale or the quantity (QTY) and UNIT-PRICE. The aim of such

Point Location: The position of the decimal point is the other characteristic which can be specified in the case of the numeric data items. If the position is not specified, t

FILE-CONTROL ENTRIES FOR THE SEQUENTIAL FILES: The characteristics of each and every files handled in a program are specified in the ENVIRONMENT DIVISION and DATA DIVISION.

MOVE CORRESPONDING: It is frequently required to move some of the data items of one group to some other data items in the other group. If the names of the equivalent data item

OPEN statement: We know that the processing of a file should start with the execution of an OPEN statement. The file can be opened in any one of the 4 open modes - INPUT, OUTP

ON SIZE ERROR OPTION:   If after an arithmetic expression, the result exceeds the highest value which can be accommodated in the result; this error is termed as size error. T

cobol program for generate a eb bill

TO WRITE A QUADRATIC EQN ROOTS ARE COMPLEX IN COBOL PROGRAM

FILE-CONTROL paragraph for the indexed files: The common format for the SELECT clause for a file is as shown below: SELECT  file-name  ASSIGN   TO  implementor -name

PERFORM WITH TIMES OPTION: The format of a PERFORM TIMES statement is as shown below: Illustration:   A)  Perform the para-2 5 times. In this situation the specifie