How do you define a table/array in COBOL?

Answer Posted / sudheer

To define a table use occur clause ..

01 WT-TABLE-DATA.
03 WT-TAB-PARM OCCURS 99 TIMES
INDEXED BY WT-TAB-IDX.
05 WT-TAB-PARMREC.
10 TBL-PARM-UPDT-CD PIC X(02).
10 FILLER PIC X(01).
10 TBL-STATUS-FLAG PIC X(01).
10 FILLER PIC X(76).

Is This Answer Correct ?    10 Yes 2 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How do you define a variable of comp-1 and comp-2?

692


here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?

6794


Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?

806


Write down the divisions of cobol program?

662


Write a cobol program making use of the redefine clause.

721






What is the compute verb? How is it used?

649


IF I mention stop run in CICS what happens?

1886


What is the difference between comp and comp-3 usage?

669


if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need

847


) How do u handle errors in BMS macro?

1418


can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

1831


What is the difference between a binary search and a sequential search what are the pertinent cobol?

725


how do you reference the esds vsam file formats from cobol programs

625


Define static linking and dynamic linking.

655


What are the pertinent COBOL

2035