Can I Redefine An X(100) Field With A Field Of X(200)?

1.	Can I Redefine An X(100) Field With A Field Of X(200)?
Answer» Yes. Redefines just causes both fields to start at the same LOCATION. For example: 01 WS-TOP PIC X(1) 01 WS-TOP-RED REDEFINES WS-TOP PIC X(2). If you MOVE '12' to WS-TOP-RED, DISPLAY WS-TOP will show 1 while DISPLAY WS-TOP-RED will show 12. Yes. Redefines just causes both fields to start at the same location. For example: 01 WS-TOP PIC X(1) 01 WS-TOP-RED REDEFINES WS-TOP PIC X(2). If you MOVE '12' to WS-TOP-RED, DISPLAY WS-TOP will show 1 while DISPLAY WS-TOP-RED will show 12.

Answer»

Yes. Redefines just causes both fields to start at the same LOCATION. For example:
01 WS-TOP PIC X(1)
01 WS-TOP-RED REDEFINES WS-TOP PIC X(2).
If you MOVE '12' to WS-TOP-RED,
DISPLAY WS-TOP will show 1 while
DISPLAY WS-TOP-RED will show 12.

Yes. Redefines just causes both fields to start at the same location. For example:
01 WS-TOP PIC X(1)
01 WS-TOP-RED REDEFINES WS-TOP PIC X(2).
If you MOVE '12' to WS-TOP-RED,
DISPLAY WS-TOP will show 1 while
DISPLAY WS-TOP-RED will show 12.

Discussion

No Comment Found

Related InterviewSolutions

How Do You Define A Variable Of Comp-1 And Comp-2?
What Is The Difference Between Comp And Comp-3?
How Is Sign Stored In A Comp Field?
How Many Bytes Do A S9 (7) Comp-3 Field Occupy?
What Are The Differences Between Cobol And Cobol Ii?
What Is An Explicit Scope Terminator?
What Is An In Line Perform? When Would You Use It? Anything Else You Wish To Say About It?
What Is The Difference Between Next Sentence And Continue?
What Was Removed From Cobol In The Cobol Ii Implementation?
Explain Call By Context By Comparing It To Other Calls?

Can I Redefine An X(100) Field With A Field Of X(200)?

Discussion

No Comment Found

Related InterviewSolutions

Reply to Comment