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
- 9714 Views
- IBM, I also Faced
- E-Mail Answers
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 difference between external and global variables in COBOL?
What does MAXCC 3 means? It is used in one my codes.
input:- A 10 20 30 40 B 5 7 10 14 C 8 12 14 16.... output:- A = 100,B=36,C=50. Here spaces are considered between numbers. When we give input as above, the numbers should be added n displayed.So please help me out.
what is the size of W-REC in the following 01 W-REC 05 A PIC 9(4)V99 05 B READLINES A 10 C PIC XX 10 D PIC S9(4) 05 E OCCURS 7 PIC ZZ.ZZ 05 F OCCURS 5 10 G PIC ZZ.ZZZ99 10 H OCCURS 3 15 J PIC 9(3) 15 K PIC V99
how will u code parm parameter and where pls ?
i need a small 3d program using inline and outline.
In my table having 3000 Records. How can I delete the 500th row? (we don't know what is data inside the table)
plz,could any one tell me? what about EBCDIC in cobol?briefly?
Whats the difference between search & search ALL?
Have you used comp and comp-3 in your project? And how?
What is the figurative constant in cobol?
is this below syntax correct? CALL 'subprg' using A,B Please help
COBOL 
