What will happen if a variable is declared as below..
Explain with an example?

Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).

Answers were Sorted based on User's Feedback



What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / lalith

Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).

REDEFINES: It is used to save the memory space....

ur declearing like that ws-varn will take the same memory
of ws-varx...

when u used display statement
DISPLAY WS-VARN
it shows the spaces... WS-VARN will take same memory of WS-
VARX irrespective of data type....

Is This Answer Correct ?    6 Yes 0 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / rookie

if you perform any arithmetic operation than comes the
question of any abend

Is This Answer Correct ?    4 Yes 0 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / ezhilenthi

It wont show any Abend, the main purpose of REDEFINES
clause is to use the same storage area with one or more
data item with different sizes and PIC 's. We will face
Abend if we try to MOVE WS-VARN TO WS-VAR.

Is This Answer Correct ?    4 Yes 1 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / neelam saini

WORKING-STORAGE SECTION.
01 WS-VARX PIC X(9) VALUE SPACE.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).
01 I PIC 9(2).
01 J PIC 9(2).
PROCEDURE DIVISION.
MAIN-SECTION.
MAIN-PARA.
MOVE 123456789 TO WS-VARN.
DISPLAY WS-VARN.
STOP RUN.

ON RUN TIME. 123456789
O/P : 123456789

Is This Answer Correct ?    2 Yes 0 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / lalit

I am agreed with Rookie. It will abend if any mathematical
operation like add, subtract will be performed with
variable WS-VARX, but if any mathematical operation is
performed using WS-VARN then it will not abend because it
is numeric in nature.

Is This Answer Correct ?    1 Yes 0 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / ankur

after redefining we can also move alphabetic to numeric or
numeric to alphabetic field . mathematical operation is
different . if we go for that it will give s0c7.

Is This Answer Correct ?    1 Yes 0 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / anna

WORKING-STORAGE SECTION.
01 WS-VARX PIC X(9) VALUE SPACE.
01 WS-VARN REDEFINES WS-VARX PIC 9(9) value zeros.
in this case you can used any data, by using right
field for numeric data ws-varN, for alphabetic /alphanumeric
ws--varX.

Is This Answer Correct ?    0 Yes 2 No

What will happen if a variable is declared as below.. Explain with an example? Working storage ..

Answer / prasanna

Wont it show SOC or ASRA because of the data exception...
(non numeric in a numeric field) ??

Is This Answer Correct ?    2 Yes 5 No

Post New Answer

More COBOL Interview Questions

Consider the following: 77 W-NUM PIC 9 VALUE 0 ------ MOVE 1 TO W-NUM PERFORM PARA-X UNTIL W-NUM > 9. ------ PARA-X ADD 1 TO W-NUM How many times PARA-X is executed ?

14 Answers   Accenture, TCS,


ZEROES and SPACES are _______ constants (a) Figurative (b) Numeric (c) Non-numeric (d) Alphabete

4 Answers   TCS,


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.

5 Answers  


What was removed from COBOL in the COBOL II implementation?

0 Answers  


what is difference between the sysabend and userabend?

2 Answers  






can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move 'xy' to b. display a,b.

10 Answers   IBM,


Please let me know at which Scenarios we will go for STATIC call or DYNAMIC

3 Answers   IBM,


how can you identify wheather the program is using search or search all in the cobol program?

5 Answers   iGate,


What is a scope terminator? Give examples.

2 Answers  


) How do u handle errors in BMS macro

0 Answers   IBM,


Consider the following COBOL entries 05 X PIC 99 VALUE 10. ADD 40 X TO X. COMPUTE X = 3 * X - 40. The result in X is

12 Answers   TCS,


How do you define a table/array in COBOL?

5 Answers   Hexaware,


Categories