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
Program for Sequential File Creation & Rewriting  We have to write a program to create a Length file with just two fields: l (Length) and l-c (Length-Code). Add a few records.

Illustration of the abbreviation: A few illustration of the abbreviation are given below: Illustration: The compound condition  AMOUNT GREATER THAN 499 AND AMOUNT L

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

SPECIAL-NAMES: This paragraph is used to associate some hardware names to the user-specified mnemonic names. This paragraph is elective in all compilers. The format of this pa

Buffers: The Modern computers are able of handling I-O operations independent of the CPU by means of the hardware termed as data channel. For illustration, if two buffers a

GO TO, STOP RUN: The GO TO verb is used to completely transfer the control to elsewhere in the program. Its form is as shown below: GO TO procedure-name As a result o

Picture Clause: The picture clause explains the general characteristics of an elementary data item. These characteristics are elaborated below: Class: In COBOL the

MULTI-DIMENSIONAL TABLES: The type of table which has been considered above is known as one-dimensional table. Whenever a table is such that each of its elements in turn is a

ON SIZE ERROR OPTION: Whenever a size error occurs, the contents of the result field after the operation is unpredictable.  Though, the processing is not-terminated and the co

PROGRAM FOR IF -ELSE: We have to write a program to check whether the given number is ODD or EVEN. You can use IF..ELSE. Identification division. Program- id. IfElse.