what is redefine and its syntax?

Answer Posted / srinivas yadav

-> It is used to reuse the storage space.

example 1:

01 A PIC X(5) VALUE 'SRINU'
01 B PIC X(5).
PROCEDURE DIVISION.
MOVE A TO B.

here we need 10 bytes of memory but in case of redefines
we need only 5 bytes of memory.we can above code by using
redefines like follows
01 A PIC X(5) VALUE 'SRINU'.
01 B REDEFINES A.

-> we can use 01 to 49 level numbers only.
-> in redefines we can use picture clause where as in
renames no need to use picture clause.


-> we have two types of REDEFINES.
1) REDEFINE
2) REDEFINING FIELD.
-> The redefining field can be declared irrespective of
data types.
-> The redefining field length may be is equal,lessthan or
greater than the redefined field.
-> The redefining field should be coded with the same
level number,same group.
-> Immediately followed the redefined or group item.
-> A redefined item cannot redefined.


I think dis is enoug for redefines.

thanking u,
urs srinivas.

Is This Answer Correct ?    14 Yes 4 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Define sort?

581


Explain how to update data area in cobol 400 program?

578


I like to know if possible to use %TRIM or any statement with prefiv "%" like RPG ile programs. thanks

2067


What is comp?

551


What is output procedure?

543






What is perform?

539


Explain the input procedure?

539


Explain the syntax of sort?

561


What is sort?

534


Explain the types of perform?

525


What is input procedure?

578


What is redefine?

555


What is the syntax of redefine?

538


Explain the input procedure and output procedure?

521


Explain what all the conditiones required for using open opcode on a file?

505