Interested to Buy Any Domain ? << Click Here >> for more details...
Define REDEFINE clause and Is it possible to have the
redefine clause anywhere in the working storage section for
a data name?
- 3 Answers
- 7842 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 |
What are the divisions in a cobol program?
How to recover a deleted source physical file from library?
what is the difference between PA & PF keys?
What is Control Break processing ?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
How to pass return codes from cobol to jcl?
How to read records in reverse order in flat file? I know we can do it by reading all records into an array.... Then read records in reverse order by using subscript or index but can any body give me the exact code.
how many bytes does s9(7)COMP-3 field occupies?
in cobol perform stmt whether it first checks the condition or not
If A>B next sentence end-if display 1 display 2. display 3. If a>b, it will display only 3.(the next sentence, ie., after fullstop/period) ____________________________________ if a>b continue end-if display 1 display 2. display 3. If a>b, it Will display 1 2 3 (the next statement) ____________________________________ if a>b continue display 1 end-if display 2 display 3. display 4. If a>b, Will it display 2 3 4 (or) 1 2 3 4 ?
consider the following FD FILE-1 01 REC-1 PIC X(80) ...... WORKING-STORAGE SECTION 01 W-REC PIC X(90) ........ PROCEDURE DIVISION FIRST-PARA ....... READ FILE-1 INTO W-REC AT END MOVE 1 TO EOF-FLAG which of the following is true with respect to the above? a.REC-1 will contain nothing and W-REC will contain the contains of the record read b.REC-1 and W-REC contain the same data c.syntex is invalid and error will occur d.REC-1 and W-REC must be of same size
consider the following two statements MOVE 10 TO N PERFORM PARA-X N TIMES STOP RUN PARA-X MOVE 5 TO N how many times PARA-X willbe exicuted? a.10 b.5 c.infinate d.execution error
COBOL 
