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

Procedure division statements for the indexed files, PROCEDURE DIVISION sta...

PROCEDURE DIVISION statements for the indexed files: All the statements which are available for a relative file are also available for an indexed file. READ STTATEMENT :

Numeric literals - cobol program, Numeric -   Literals : The numeri...

Numeric -   Literals : The numeric literal can be created with the help of digits only. It can have a sign (+ or -) and can also have a decimal point. If no sign is specifi

Illustration of perform with varying option, Illustration of Perform with v...

Illustration of Perform with varying option: A) Perform para-3 varying the k from 1 by 1 until k > 10. Here para-3 will be constantly executed 10 times (For k=1,2,3, .....1

Indexed sequential files, INDEXED SEQUENTIAL FILES: In the indexed seq...

INDEXED SEQUENTIAL FILES: In the indexed sequential files which are also known as indexed files, the records are stored in the sequence order generally in ascending order. In

If- else statement - cobol programming, IF ... ELSE STATEMENT: We are ...

IF ... ELSE STATEMENT: We are familiar with an easy form of the IF statement. The common form of the IF statement is as shown below: Each of the statement-1 and statem

Different data types available in cobol, Data types available in COBOL are ...

Data types available in COBOL are given below Alpha-numeric (X), numeric (9), alphabetic (A)

Relative files, RELATIVE FILES: The Files that are stored on a direct ...

RELATIVE FILES: The Files that are stored on a direct access storage medium like magnetic disk are frequently known as direct access files. The COBOL supports three different

Example of file-control, Example of File-control: The assign clause as...

Example of File-control: The assign clause assigns a specific physical peripheral device name to a file. The physical peripheral device are machine-dependent. We use the devic

Rick, How do I move a single QUOTE to a field or set the value clause? "''...

How do I move a single QUOTE to a field or set the value clause? "''" does not work?

Rewrite statement - relative files, REWRITE STATEMENT: The REWRITE st...

REWRITE STATEMENT: The REWRITE statement has the format for a relative file as shown below, REWRITE record-name  [ FORM identifier ]

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