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
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 |
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 |
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 |
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 |
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 |
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 |
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 |
what is the use of keep and pass in disp
input:- 12233344445555566666... output:- 1=1,2=4,3=9... Here firstno i.e 1 should be displayed and after that the alikeno.s should be added n displayed.i.e 2+2=4 like tat it goeson.
How many bytes do a s9 (7) comp-3 field occupy?
What is the difference between COMP & COMP-3 ?
What is the utilization of copybook in cobol?
how we separate the cobol cics statements from cobol&cics programming?
What is sqlca and why is it needed in any cobol-db2 program?
if one main program ,n -subprograms are then which call you follow ?why reasonuhg
Write the syntax of a two dimensional array?
How do u write test cases?
Without using move verb how to move one variable to another.
How is sign stored in Packed Decimal fields and Zoned Decimal fields?