COBOL LEVEL NUMBER - TUTORIAL FOR NEWBIE

Hi.. hi.. hi.. Welcome to my blog, you are on my blog at “We Are Knowledge”. In here you will getting many IT knowledge. I was provided you IT knowledge from dekstop programming until web programming. Moreover I also provided IT knowledge about graphic design using “ADOBE PHOTOSHOP”. You can find it here.

But now.. I want giving you IT knowledge about program language “COBOL”. Previosuly You know about the this program language ? you will know ?? let’s do read my article… you want getting your questions… Ok.. have fun and enjoy to read my article…

COBOL is program language based dekstop programming, likely pascal, C++, VB 6. But there is a very noticeable difference with the programming language pascal, c + +, vb 6, which is the programming language compiler cobol he lacks himself, so he needs help to compile the coding.

My discussion this time is the level number in cobol. level number in cobol is is a number that describes levels of data items in a record. The greater the number (level) level, the lower the level of degree.

There are five levels and this number is the level number in cobol :

Level Number 01

>> This is a description of a record

Level Number 02-49

>> This number level to initiate the description of the data item

Example :

Data Division.

Working-Storage Section.

01   input-of-data.

02   Name Pic A(10).

02   Number.

                        03 hp-numbers Pic 9(6).

          03 house-numbers pic 9(6).

          03 office-numbers pic 9(6).

            02  total-revenue Pic 9(7).

Level Number 66

>> Renames

Example :

01 Input-of-data.

02 Name                     Pic A(10).

02 sex                         Pic A(10).

02 address                   Pic X(20).

02 no_hp                     Pic X(15).

66 Data-Student Renames Name thru address.

Level Number 77

>> This number level to initiate an independent data item

Level Number 88

>> This number level we can use the condition

Example:

Data Division.

Working-Storage Section.

01  Data-Masukkan.

            02 quetions Pic A.

                        88 try_again value is ‘Y’, ‘y’.

                        88 enough    value is ‘T’, ‘t’.

77  Name Pic A(20).

Ok.. just it..
I hope you understand..

See you later..