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.

Answers were Sorted based on User's Feedback



can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / dharma

both a and b haveXY

Is This Answer Correct ?    12 Yes 1 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / santhosh vayathuri

redefines will not check whether is numeric data type or
alphanumeric datatype simply it will display the value what
ever there in the memory . so for this question answer is

a = xy

b = xy

Is This Answer Correct ?    8 Yes 0 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / karthik

a=00
b=xy

Is This Answer Correct ?    14 Yes 9 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / lakshmisudha

it display answer is xyxy
first xy for a and second xy for b.
only b will use same memory area it doesn't consider type of
datatype

Is This Answer Correct ?    4 Yes 0 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / ashok kumar

Dharma,
answer is correct , its both have xy only.

i pratically done that prog

Is This Answer Correct ?    3 Yes 0 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / muttaiah

Dharma, can you give some clarification how a, b will hold
xy.
Thanks in advance.

Is This Answer Correct ?    0 Yes 0 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / shyamala a

SCENARIO 1 :
If we move "XY" TO A then the result will be
1. You will get a compilation warning "** Warning 378 ** Expected digit string as sending operand"
2. display will be Both A and B will have 00.

sCENARIO 2:
iF WE MOVE "xy" TO B then the result will be
1. No compilation/run time error.
2. Display will be both A and B = XY

Is This Answer Correct ?    0 Yes 0 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / neha

a=00
b=xy
because redefines only defines the length of the variables ,not the particular value.

Is This Answer Correct ?    0 Yes 2 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / sathasivam

this ia correct

Is This Answer Correct ?    0 Yes 3 No

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move &..

Answer / muttaiah

I think it will give soc7 abend because we are moving
char's to numeric field.
can someone explain more clearly on this.
If you have any link regarding this do share with us.

Thanks in advance.

Is This Answer Correct ?    0 Yes 5 No

Post New Answer

More COBOL Interview Questions

how can we code index in an array of cobol pgm?

1 Answers   Wipro,


input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.

0 Answers  


What is binary search?

3 Answers  


How can I tell if a module is being called DYNAMICALLY or STATICALLY?

3 Answers   CTS,


File status must be checked both while opening and reading the file or only while reading the file?

2 Answers  






Can you REWRITE a record in an ESDS file? Can you DELETE a record from it?

6 Answers   ABC, IBM, Mphasis, Wipro,


plz,could any one tell me? what about EBCDIC in cobol?briefly?

1 Answers  


SIGN TRAILING SEPARATE field occupy ?

3 Answers  


I want ALL ERROR codes in VSAM

3 Answers   American Express, TCS,


When can the USING phrase be included in the call statement ?

2 Answers  


I have a files containing both duplicate and non-duplicate records.The file is already sorted by a key.I want to determine those records that are duplicate and records that are non-duplicate.If duplicate the record is move to a duplicate file and if non-duplicate that will be move to valid file.thank you

1 Answers  


How do u know what version of cobol u are using?

3 Answers  


Categories