We know that size of redefine and redefining need not to be same..Then does the

We know that size of redefine and redefining need not to be
same..Then does the below case true

01 ws-date pic 9(6).
01 ws-redf-date REDEFINES ws-date
05 ws-year pic 9(4)
05 ws-mon pic 9(2)
05 ws-day pic 9(2)

Question Posted / rajesh_m13

1 Answers
6405 Views
Cap Gemini, I also Faced
E-Mail Answers

We know that size of redefine and redefining need not to be same..Then does the below case true ..

Answer / bkk

Yes, It is true because the size of the variable which is
redefining can have same or more than the size of the
original variable and it can be a group or an elementary
variable.
thanks for posting
bkk

Is This Answer Correct ?

12 Yes

4 No

Post New Answer

More COBOL Interview Questions

created cluster using IDCAMS ..that is empty ..when i write a program for read using Input ..wil it open the cluster or gives any error?

2 Answers HCL,

what is SYNCHRONIZATION?

3 Answers Syntel,

How many divisions we have in Cobol ?

4 Answers Wipro,

if a dataset is already created with fixed length but after that i want to change fixed length to variable length then how is it possible

3 Answers IBM,

how to submit a jcl by cobol program. clear me with an example.

3 Answers HCL,

01 text-data pic x(100). move 'xyzdbfrjjg u' to text-data. how to find the value of last index of text-data?

3 Answers Mind Tree,

How many types of sorts are there in cobol?

5 Answers Cap Gemini,

How to solve SOC7. I have the cobol coded as below 01 A PIC 9(4). 01 AIN REDEFINES A. 05 AIN1 PIC S9(4) 01 B PIC 9(4)V99. 01 BIN REDEFINES B. 05 BIN1 PIC S9(4)V99. PROCEDURE DIVISION. START-PARA. INITIALIZE A AIN B BIN. ACCEPT A B. DISPLAY 'VALUE OF A=' A. DISPLAY 'VALUE OF B=' B. DISPLAY 'VALUE OF BIN1=' BIN1. DISPLAY 'VALUE OF AIN1=' AIN1. COMPUTE AIN1 = BIN1 - AIN1. DISPLAY 'VALUE OF AIN1=' AIN1. When i'm executing this code i'm getting SOC7 for A = 12 & B=34. Can someone explain SDSF OUTPUT DISPLAY TCOM058R JOB05458 DSID 102 LINE 0 COLUMNS 02- 81 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ********************************** VALUE OF A=12 VALUE OF B=34 VALUE OF BIN1=34 VALUE OF AIN1=12 CEE3207S The system detected a data exception (System Completion Code=0C7). From compile unit PROG1 at entry point PROG1 at statement 29 at compile +000004CE at address 00007ECE. Please address how to solve this issue Thanks in advance.

1 Answers

diffrence between renames and redifnes with examples

3 Answers IBM,

What is amode(31)

0 Answers

What is report-item?

1 Answers IBM,

sample code for read a 2nd record from last in flatfile how can do?

4 Answers iNautix,

For more COBOL Interview Questions Click Here