How do you evaluate in Cobol?


  1. EVALUATE statement is used for conditional processing in COBOL.
  2. It performs the various set of tasks- If multiple conditions need to be checked then EVALUATE is a better than IF-ELSE. …
  3. EVALUATE {cond-for-evaluate} [ALSO] {cond-for-evaluate} [ALSO] … …

How does evaluate work in COBOL?

EVALUATE have the boolean expression and WHEN phrases have the logical expressions. If EVALUATE specified with TRUE, the statements under WHEN phrase with logical expression is TRUE gets executed. If none of the WHEN logical-expression satisfies, then WHEN OTHER phrase gets executed.

What is a Evaluate verb in COBOL?

Evaluate verb is a replacement of series of IF-ELSE statement. It can be used to evaluate more than one condition. EVALUATE statement in COBOL is similar to Case or Switch statements of other languages. EVALUATE can do multiple IF conditions task.

How do you evaluate a statement?

General Rules

  1. The EVALUATE statement operates as if each subject and object were evaluated and assigned a value or range of values. …
  2. The EVALUATE statement then proceeds as if the values assigned to the subjects and objects were compared to determine if any WHEN phrase satisfies the subject set.

Can we use Evaluate inside evaluate in COBOL?

You can use Nested Evaluate in COBOL instead of nested If-ELSE statements.

What is 88 level used for in COBOL?

88 level number in COBOL is one of the most used declarations in mainframes development and it is considered as a special level number which is used to improve the readability of COBOL programs. As it gives a name to a condition, it is also called as ‘Condition Names’.

Can we use if in evaluate?

EVALUATE We can use EVALUATE instead of set of nested IF statements to test several conditions. We can use EVALUATE to implement case structure or decision table.

How do you perform varying in COBOL?

PERFORM VARYING used to execute the statements-block/procedures by increasing or decreasing the values of one or more identifiers for the iterations. The literal used in the condition initialized or incremented in the PERFORM itself. PERFORM VARYING is both in-line and out-of-line.

What is the level number used for evaluate?

88 LEVEL in COBOL can be used with IF, Evaluate statement or perform until statement. 88 LEVEL in COBOL FORMAT. 88 condition-name VALUE IS {literal-1[{THROUGH, THRU} literal-2]. It is coded with level number 88 and has only a VALUE clause associated with it.

How do I test multiple conditions in COBOL?


  1. If multiple conditions need to be checked then EVALUATE is a better than IF-ELSE.
  2. Using a single EVALUATE condition, we can check multiple conditions.
  3. Nesting of ‘IF-ELSE’ statements can be messy hence instead of using IF-ELSE, we can code a single EVALUATE which is much more powerful than IF-ELSE.

How do you check if a value is negative in COBOL?

You use a numeric-edited PICture, and specify at least on “-” (minus sign) in an appropriate place. The “-” position will appear as that character for a negative value, but space will appear instead if positive.

What is nested IF statement in COBOL?

IF statement coded within another IF statement called as NESTED IF statement. Nested IF statements are considered to be matched IF, ELSE and END-IF combinations proceeding from left to right. Any IF statement that matches with ELSE at the same level has been implicitly or explicitly terminated.

Is end-if mandatory in COBOL?

If a condition is true, the IF block is executed; and if the condition is false, the ELSE block is executed. END-IF is used to end the IF block. To end the IF block, a period can be used instead of END-IF. But it is always preferable to use END-IF for multiple IF blocks.

What is inline perform in COBOL?

In-Line PERFORM is used to perform the repetitive tasks within a paragraph or section itself. In other words, In-Line Perform does not call another paragraph/s or section/s.

What is the purpose of inspect statement?

The INSPECT statement can be used to tally the number of occurrences of specific character strings, to replace characters by other characters, or to convert from one set of characters to another.

What is scope terminator in COBOL?

A scope terminator ends a verb or statement. Scope terminators can be explicit or implicit. Explicit scope terminators: Explicit scope terminators end a verb without ending a sentence. They consist of END followed by a hyphen and the name of the verb being terminated, such as END-IF.

Can I declare occurs in 01 level?

Why occurs clause cannot be declared at 01 level? according to the manual, a table is defined within a group item with an occurs clause. if the occurs clause were to be declared at the 01 level, there would be no group item, thus no beginning of table resolution.

Which statement is used to evaluate multiple conditions?

You can use the EVALUATE statement instead of a series of nested IF statements to test several conditions and specify a different action for each.

What is the linkage section used for in COBOL?

LINKAGE SECTION declares the data items to make the data available from another program or to access the data external to the program. LINKAGE SECTION mainly used in subprograms where the data receive/send from main program/calling program by declaring the group/individual data items.

What is 77 level used for in COBOL?

77 Level Number Uses, significance:77 is a special Level number in COBOL which is used to declare the Individual Elementary data items. Of course, Individual elementary data items can be declared using 01 level but 77 declared fields does not allow any sub ordinate data field declarations.

What are the 4 divisions in COBOL?

, the statements, entires, paragraphs and sections of a COBOL source program are grouped into four divisions that are sequenced in the following order:

  • The Identification Division.
  • The Environment Division.
  • The Data Division.
  • The Procedure Division.

What is difference between subscript and index in COBOL?

In this topic, we described about the Difference between Index & Subscript with detailed example.
Summary –

Subscript Index
Subscript can increase by using ADD statement and decrease by using SUBTRACT statement. Index can increase by using SET UP BY statement and decrease by using SET DOWN BY statement.

What is 66 level used for in COBOL?

Renames clause is used to give different names to existing data items. It is used to re-group the data names and give a new name to them. The new data names can rename across groups or elementary items. Level number 66 is reserved for renames.

What is the difference between rename and redefine in COBOL?


RENAMES clause is used for regrouping elementary data items and gives one name to it. REDEFINES clause allows you to use different data descriptions entries to describe the same memory area.

Why index is faster than subscript in COBOL?

Indexes are more efficient than subscripts since they represent an offset into the array directly rather than having to be converted from an occurrence number to an offset.

How do you declare a subscript in COBOL?

Use the data-name of the table element, along with its occurrence number (called a subscript) in parentheses. This technique is called subscripting. Table individual elements can be accessed by using subscript. Subscript values can range from 1 to the number of times the table occurs.

What is the picture clause for index in COBOL?

PICTURE Clause – Format

The PICTURE clause must be specified for every elementary item except an index data item, the subject of a LIKE, RENAMES, or TYPE clause. The PICTURE character-string may contain a maximum of 90 characters. It consists of certain COBOL characters used as symbols.

© 2022 SharTec - In primo piano in Tecnologia