Answer / rajkumar

because that level mention only record name if you are
using occur that is repeated more than one time
so record name not repeated more than one time. field only
repeated more time

Answer / jagveer singh

As you all might already know that an array is known
as 'Repeating Groups' because of there nature, it means
that it is a group of data-items, 01 level is used to
define group level variable only (not the groups directly),
so data-items of group needs to be defined under 01 level
(group level) variable only, we can not declare them on 01
level directly.

Answer / m

we have 2 types of redefines
1. Explicit redefines -- we generally use in our cobol
logic using redefine keyword.

2. Implicit redefines -- system redefines its spaces
accordingly .. eg: the variable/record defined with 01
level are usually redefined by the system.

this is th ereason why we wont define occurs clause @ 01
level

Answer / bhupendraprajapati

Level 01 is used to define record and record cannot be repeated using OCCUR clause.

Answer / som

BECAUSE IF WE DEFINE THE OCCURS CLAUSE AT 01 LEVEL THEN IT
BREAK THE BASIC RULE OF LANGUAGE DECLARTION OF SAME NAME
VARIABLE MORE THEN ONE TIME.E.G
01 NAME PIC XX OCCURS 2 TIMES. MEANS ACTUAL DECLARTION WILL
LIKE THIS
01 NAME PIC XX.
01 NAME PIC XX.
THATS WHY IT IS NOT USED AT 01 LEVEL

Answer / muthu

Level 01 refers to a group item where as occurs clause is
only for elementary items.............i.e other than
01...like 02..03....etc., it should be an independent one.

What is the problem of ordered sequential files access?

0 Answers  

I am sending values a and b with pic x(10) and pic x(10) by using call statement. In linkage section, I am receiving values with pic x(10) and pic x(11). Will my program fail? will it be compile error or run time abend?

3 Answers  

input:-AABBCCDDEFGHIIJ output:- ABCDEFGHIJ Here in input we hav the duplicate characters i.e repeating characters.SO we should eliminate the duplicate characters and should display the output in ascending order.

6 Answers  

How can we increase the size of an existing PDS to include more no. of modules. I tried the answer posted by Jagan(TSO PDS 'pds name') but did not find it working. The answer posted by kamal i know very well. Please suggest me a answer so that we don't need to delete the existing PDS and still we can change the size as well.

10 Answers  

what is the size of W-REC in the following 01 W-REC 05 A PIC 9(4)V99 05 B READLINES A 10 C PIC XX 10 D PIC S9(4) 05 E OCCURS 7 PIC ZZ.ZZ 05 F OCCURS 5 10 G PIC ZZ.ZZZ99 10 H OCCURS 3 15 J PIC 9(3) 15 K PIC V99

2 Answers   TCS,

If i initialize the 01 level variable in array, will it initialize all the array elements (occurs)?

8 Answers   CTS,

How can we pass data from cobol to JCl?

7 Answers   ADP, Amdocs, IBM,

diffrence between z(2) and z9(2)

4 Answers   Cap Gemini,

consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayedafter the PERFORM is over?assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above since there is a syntex error

4 Answers   TCS,

Is It Possible to Update or change in VIEW Mode?

5 Answers   CSC,

What is the maximum size of a 01 level item in COBOL I? in COBOL II?

2 Answers   IBM, RBS,

I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?

0 Answers