Interested to Buy Any Domain ? << Click Here >> for more details...
what is redefines? where it can be effectively use for the
purpose of memory utilization? give an example?
- 4 Answers
- 8711 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / siri
REDEFINES:-REUSE THE SPACE FROM FIRST BYTE ON WORDS....REDEFINES AND REDEFINING FIELDS MUST BE AT SAME LEVEL NOS..REDEFINING THE MEMORY MUST BE SAME OR SORTER...
FOR EXAMPLE 1000 BALLS IS THERE..EACH BALL CAST IS 10 RS/-...BUT I HAVE ONLY 10 RS/-...BUT I USE THE ALL 1000 BALLS HOW MEANS USING THE REDEFINES....
WORKING-STORAGE SECTION.
01 A PIC X(100) VALUES '******************************'
01 B REDEFINES A X(10)
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / yuddam
01 a pic 9(6).
01 b redifine a pic 9(6).
01 c redifine a pic 9(6).
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / suman
Redifine is a clause which reuses the existing storage space
1)redifine must be coded immediate after orginal dataname.
2)level no must be same as orginal data name.
3)level no should be 01-49.
4)data tpye length must be same.
ex:
01 a pic 9(6).
01 b redifine a pic 9(6).
01 c redifine b pic 9(6).
| Is This Answer Correct ? | 4 Yes | 8 No |
can we read records in a file from botom to top. if possible how can we read
Write the code implementing the perform … varying.
What are the cobol coding sheets?
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
why 02 level number can't be use as a separate level number like 01 or 77 ?
How is sign stored in a comp-3 field?
Explain Restart Logic in Cobol?
Difference between ps, esds
what is the purpose of linkage section?
In the JCL, how do you define the files referred to in a subroutine ?
how you read control card into array?
I am getting S00F abend when i try to compare two variable of different pic class,one variable is of 9(09) and another is S9(09) comp-3. First i moved the data from S9(09) comp-3 to 9(09), but no luck. So i tried to move the data from S9(09) comp-3 to X (09) and move to 9(09). I am getting same error message, Please help me to find solution for this ptoblem. ERROR MESSAGE - "The system or user abend S00F R=NULL was issued."
COBOL 
