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 |
Explain about Redefines cluse?
In a file if a column account number conatain value 0001234.. how can we move the value to another variable without zero. value may contain any type such as 00123405. we need the value 1234 or 12305. how can we do that in cobol. Please help.
what is level 66 means??
What are some examples of command terminators?
I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.
There is a production file which has millions of records in it.The program that uses it ends up with an SOC7 abend.It is sure that the abend is due to some invalid data in the file.Is there any way to debugg the SOC7 abend with out giving displays? I need the record which is cause for the abend.
Should I use STOP RUN in the sub program??why?
can i use multiple when statements in search & search all ? justify ur answer?
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.
How do u initialize an array?
How to find How Many Lines in Sysin DD * Parameter Thru Cobol Coding? If any one knows the Answer Please Reply .....Thanks From Shree
What is report-item in COBOL?