Multi-dimensional tables, COBOL Programming

Assignment Help:

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 table of one dimension, it is known as the two-dimensional table. The illustration of a two-dimensional table is as shown below:

01  SALES-TABLE

             02  BRANCH-FIGURES OCCURS  18  TIMES.

    03  MONTHLY-SALES  PIC  9(6)  V99  OCCURS  12

  TIMES.

The table is supposed to store monthly sales figures for 12 months for each of the 18 branches of an organization. Keep in mind that this is a two-dimensional table as each of the 18 BRANCH-FIGURES is itself a table having 12 elements. It might be further noted that a reference to an element of a two-dimensional table needs two subscripts. We should specify the branch as well as the month so that the preferred element is identified. Therefore, the MONTHLY-SALES (3, 5) means that the sales figure for fifth month of the third branch. Because of the organization identified in the above description of the table, the initial subscript implicitly refers to the branch and the second subscript to the month. The two-dimensional table has been separated first into 18 one-dimensional tables through the entry at level 02. Each of such tables has then been defined by the entry at level 03. This organization can be shown diagrammatically as:

1355_MULTI-DIMENSIONAL TABLES.png

If needed, the tables for the individual branches can be referred to by the name BRANCH-FIGURE with only one subscript specifying the branch. Therefore the BRANCH-FIGURE (4) will show the monthly sales table for the fourth branch. \


Related Discussions:- Multi-dimensional tables

File status clause, FILE STATUS clause: This clause has been involved ...

FILE STATUS clause: This clause has been involved in the above syntax for completeness. The ORGANIZATION, REVERSE, ACCESS and STATUS clause can be specified in any order.

Example of move corresponding, Example of Move corresponding: Consider...

Example of Move corresponding: Consider the DATA DIVISION entries shown below. Suppose it is needed that the data stored in the 4 fields of the PAY_REC should be

Nonstandard clauses, NONSTANDARD CLAUSES: The various clauses explaine...

NONSTANDARD CLAUSES: The various clauses explained above are as per the ANSI standard. Also, most compilers provide for additional nonstandard clauses to meet the specific nec

Cobol words, COBOL Words: The COBOL word can be formed by using the ch...

COBOL Words: The COBOL word can be formed by using the characters as shown below: 0-9 A-Z (a-z) - (hyphen) The rules below should be hold in forming the COBOL words.

Illustration of indexed tables, Illustration of indexed tables: Index ...

Illustration of indexed tables: Index items defined through the INDEXED phrase of the OCCURS clause are one type of indexes. There can be other type of index items that are de

Blank when zero - edit characters for numeric data, BLANK WHEN ZERO: ...

BLANK WHEN ZERO: BLANK WHEN ZERO is an editing clause that may be used along with a picture. This will set the whole data item to blanks of its value is equal to zero. Though,

Nested if statement, NESTED IF STATEMENT:   The then and else stateme...

NESTED IF STATEMENT:   The then and else statement of an IF statement can hold other IF statements. The involved IF statements in their turn may also hold other IF statements

Program for perform - until, PROGRAM FOR PERFORM ...UNTIL We have to w...

PROGRAM FOR PERFORM ...UNTIL We have to write a program to find the sum of "n" natural numbers. Identification division. Program- id. PerfUntil. Environment division.

Program for output file that can be our vsam file, We have input file, reco...

We have input file, record layout is EMP ID (6 char) , EMP NAME (20 char), Designation (3 char),Salary (5 digit) Base Branch (10char) Grade (3 Alphanumeric). This is the input f

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