Define REDEFINE clause and Is it possible to have the
redefine clause anywhere in the working storage section for
a data name?
- 3 Answers
- 7072 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / selvam a
REDEFINE clause allows the said area to be referred by more
than one data name with different sizes and pictures.
Usage:
level-number data-name1 REDEFINES data-name2
Answer to the question 2:
The REDEFINES clause must immediately follow data-name1
Other Rules:
1. The level number of data-name1 and 2 must be identical.
2. date-name1 and 2 must be of same size.
3. Multiple redefinitions are allowed.
| Is This Answer Correct ? | 10 Yes | 3 No |
Answer / anju
I think redefine cannot be done for a level01 item.
| Is This Answer Correct ? | 1 Yes | 5 No |
WORKING-STORAGE SECTION. 01 A PIC X(3) VALUE 'ABC' 01 B PIC 9(3). PROCEDURE DIVISION. MOVE A TO B. STOP RUN. OUTPUT IS: AB3 WHY AND HOW THIS IS HAPPENING.
can we read in input the file with a variable length ? please , how ..could you help me ?
what is Reentrancy and Quasi-reentrancy?
How to code fscode 10 in cobol program? Where yoy code in your pgm?give ans for the question.
how will u pass dadta to cobol+db2 program...?
What is perform what is varying?
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue
How can you submit a job from COBOL programs?
How can we find out wether to declare the data items like Integer, Char,Comp? If comp types how can we decide wether it is Comp and Comp3.How it is? Please Explain... Cheers.
what is the difference between start and startbr?
consider two data items 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
What is the difference beetween Arrays and Tables in Cobol? please dont give the answer that arrays in cobol terminology is called tables......
COBOL 
