Rules for occurs clause, COBOL Programming

Assignment Help:

RULES FOR OCCURS CLAUSE:

The rules apply for the OCCURS clause and the subscripts are as shown below.

(1) The integer in the OCCURS clause should be a positive integer.

(2) The OCCURS clause can be identified for an elementary item or for a group item. The clause causes adjoining fields to be set up internally. Each field is alike to the elementary or group item for which the OCCURS clause has been identified. The number of fields which are set up is equivalent to the integer in the OCCURS clause. The OCCURS clause cannot be identified for an item whose level numbers are 01, 66, 77 or 88.

(3) Whenever a data name is defined with occur clause which the data name as well as any of its subordinate items cannot be referred to in the PROCEDURE DIVISION without a subscript. It may be a positive integer constant, a numeric integral data or an arithmetic expression. For illustration, an element of the above INCOME-TAX-RATE table, can be referred to the PROCEDURE DIVISION as

      TAX-RATE (I)    or as (3*J)

In the initial situation, a data name I has been used as the subscript. If the current value of I is, 5, then the TAX-RATE (I) will refer to the fifth element of the table. In the second situation, an arithmetic expression has been used as the subscript. The value of the expression is used to specify the particular element of the table. Therefore, if the present value of J is 1, TAX-RATE (3*J) will refer to the third element of the table.

(4) The maximum value which a subscript can take is the one specified in the OCCURS clause. For any table, the minimum value of a subscript is implicitly supposed to be 1. By the range of a subscript we mean the range of values from 1 to the maximum possible value of the subscript. In the above illustration, the range of the subscript is 1-10. If during the execution of a program, the value of subscript is found to be outside its range, then an execution error occurs and the program is finished by the system.

(5) The subscripts must be enclosed in a set of parentheses. In common, blank space may not follow the left parenthesis while there should be a space preceding the left parenthesis and following the right one.

(6) When a data name with the OCCURS clause needs any qualification by its higher level, the subscripts to be written after the final qualified name. For illustration, if TAX-RATE must be qualified, it should appear as TAX-RATE OF INCOME-TAX-RATE (I) and not as the TAX-RATE (I) OF INCOME-TAX-RATE.

(7) Whenever an entry is defined with the OCCURS clause, the VALUE clause cannot be identified for that specific item or any item subordinate to it.

(8) The REDEFINES clause cannot appear in similar data description entry that contains an OCCURS clause. Though, the REDEFINES clause can appear for a group item whose subordinate items are defined with occur clause.

(9) The OCCURS clause can appear in the data description entry in any order. 


Related Discussions:- Rules for occurs clause

Program for screen section, PROGRAM FOR SCREEN SECTION:  identificatio...

PROGRAM FOR SCREEN SECTION:  identification division.   program- id.   environment division.   data division.   working-storage section.   01  a pic 9(2) value

Simple sort verb, THE SIMPLE SORT VERB: The process of sequencing the ...

THE SIMPLE SORT VERB: The process of sequencing the records in some preferred manner is termed as sorting. The Sorting is done upon some key data item in the record. For illus

Example of redefines clause, Example of Redefines clause: This illustr...

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

Rules for indexed tables, RULES FOR INDEXED TABLES: The rules of index...

RULES FOR INDEXED TABLES: The rules of indexing a table with an INDEXED phrase are as shown below: (1) If indexing is completed for any one level of a table, then indexing

Cobol program, Write a COBOL IF sentence to use the values of numeric var...

Write a COBOL IF sentence to use the values of numeric variables EXAM and COURSEWORK , both assumed to be with format PIC 999 and in the range 0 to 100 and to move the value:

Perform with times option, PERFORM WITH TIMES OPTION: The format of ...

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

File-control paragraph for the indexed files, FILE-CONTROL paragraph for th...

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

Class condition - cobol programming, CLASS CONDITION:   The class con...

CLASS CONDITION:   The class condition establishes whether or not the value of the operand is numeric or alphabetic. The operand is numeric if it contains only the digits 0 t

Credit and debit sign - edit characters for numeric data, CR and DB (Credit...

CR and DB (Credit and Debit Sign): The two characters that is CR or DB symbol may appear only at the rightmost place of the picture. They are similar to the minus sign edit ch

Redefine clause, Can we declare a redefine clause as below? A Redefines B, ...

Can we declare a redefine clause as below? A Redefines B, PIC X(4)

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