what is redefines? where it can be effectively use for the
purpose of memory utilization? give an example?
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 write paragraph in area B .....
hi dudes.....can any one help me..... what is SET TO TRUE all about,anyway?
what will be the output when a)pic 9(6)value 000178 is moved to pic ***,***. b)pic 9(5) value 57397 is moved to pic $$,$$9.
What are the pertinent COBOL commands?
What is the difference between PIC 9.99 and 9v99?
What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?
How to concatenation one or more string?
Difference between ps, esds
What are the various section in data division and briefly explain them.
can you declare redefine in level 01?
01 text-data pic x(100). move 'xyzdbfrjjg u' to text-data. how to find the value of last index of text-data?
How can we increase the size of an existing PDS to include more no. of modules.