Example of condition names, COBOL Programming

Assignment Help:

Example of condition names:

The illustration below is of the use of the condition names

 77  MARITAL-STATUS     PIC    9

  88  SINGLE    VALUE    IS     ZERO

  88  MARRIED    VALUE    IS    1.

  88  WIDOWED    VALUE    IS    2.

  88  DIVORCED    VALUE    IS    3.

  88  ONCE-MARRIED  VALUE  ARE    1, 2, 3.

  88  VALID-STATUS  VALUE  ARE    0 THRU 3.

It might be noted that 6 condition names have been defined here. All of them are related with the conditional variable MARITAL - STATUS. If at a point of time, the MARITAL STATUS gets the value of 2, then the condition names WIDOWED, ONCE-MARRIED & VALID-STATUS will become true and others will become false.

The condition names can be used as a condition. Therefore in PROCEDURE DIVISION we may have statements, such as:

(a)  IF SINGLE SUBTRACT 125 FROM DEDUCTIONS.

(b)  IF ONCE - MARRIED ADD 32 TO SPECIAL-PAY.

(c)  IF NOT VALID - STATUS GO TO ERROR - IN - STATUS.

In (a) statement SUBTRACT 125 FROM DEDUCTIONS will be executed if the MARITAL-STATUS is equivalent to zero. Likewise, in (b) the ADD statement will be executed only when the MARITAL - STATUS is equivalent to 1, 2 or 3 and in  (c) the control goes to the procedure ERROR-IN - STATUS only when MARITAL-STATUS has a value other than the 0, 1, 2 or 3. As in (c) a condition name can be preceding by NOT to point the negation of the condition.

The format for the condition - name condition is

  [NOT] condition - name

It is very important to note the usefulness of a condition name. Whenever a condition name specifies a single value for the conditional variable, the condition name is equal to the relational condition. For illustration, in (a) above the condition name SINGLE is equal to the relational condition MARITAL-STATUS =0. Even when the condition name identifies more than one value for the conditional variable, then condition name can be replaced by an equivalent compound condition. Therefore it may not be absolutely essential to make use of the condition names. However it may not be absolutely essential to make use of the condition names. The main benefit of a condition name is that it increases the readability of the statement which uses it. Surely, the use of the condition name WIDOWED conveys more information to a reader of the program than the use of the relational condition MARITAL-

STATUS =2. Specifically for this cause, it is suggested that whenever possible, the meaningful condition names must be used in a program.


Related Discussions:- Example of condition names

Program for if -else, PROGRAM FOR IF -ELSE: We have to write a program...

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.

Case study, cobol program for generate a eb bill

cobol program for generate a eb bill

Size - picture clause, Size: The number of characters or digits needed...

Size: The number of characters or digits needed to store the data item in the memory in termed as the Size of the data item. All the 4 general characteristics explained can

Perform with until option, PERFORM WITH UNTIL OPTION: The format is as...

PERFORM WITH UNTIL OPTION: The format is as shown below: Illustration:  A) Perform p-3 until i > 5. Here p-3 will be executed whenever i B)  Perform p-2 thru

Rounded option, ROUNDED OPTION: Let us consider the DATA DIVISION entr...

ROUNDED OPTION: Let us consider the DATA DIVISION entries which are as shown below: Now, subsequent to the execution of the statement ADD A B GIVING C, the C will hold

Format for cobol programs, Format for COBOL Programs: The COBOL is a h...

Format for COBOL Programs: The COBOL is a high-level language. Therefore, a COBOL program can be executed on a computer for which a COBOL compiler exists. The compiler transla

Program of occurs clause, OCCURS CLAUSE - PROGRAM: We have to write a ...

OCCURS CLAUSE - PROGRAM: We have to write a program to elaborate occurs clause. Get names and marks of the students and show them on the screen.   identification division.

File-control paragraph for the relative files, FILE-CONTROL paragraph for t...

FILE-CONTROL paragraph for the relative files: The normal format for the SELECT clause for a relative file is as shown below. SELECT  file-name  ASSIGN  TO  implementor-nam

Introduction to cobol, Introduction to COBOL: In the year 1959, a new ...

Introduction to COBOL: In the year 1959, a new language named the COBOL ( CO mmon B usiness O riented L anguage) was introduced remembering the business purpose application

Programming Assignment, I need help with a COBOL programming assingment. I ...

I need help with a COBOL programming assingment. I have started the program but I need help completing the program. I have 5 errors. Here is the question. 10. Suppose your company

Write Your Message!

Captcha
Free Assignment Quote

Assured A++ Grade

Get guaranteed satisfaction & time on delivery in every assignment order you paid with us! We ensure premium quality solution document along with free turntin report!

All rights reserved! Copyrights ©2019-2020 ExpertsMind IT Educational Pvt Ltd