01 var1 pic x(10)
01 var2 redefines var1 pic 9(10).
then in procedure division
move 'abcde' to var1 then waht is the value of var1 and var2
Answers were Sorted based on User's Feedback
Answer / s.v.venkata sivaprasad
redefines will reuse the memory with irrespective of date
type var1 is abcde and var2 also abcde.
| Is This Answer Correct ? | 22 Yes | 0 No |
Answer / abhishek_ibm
Both will be having the same value but the only difference
is when we use airthmetic operation then it will take hex
value .. I do think I am correct but kindly correct me if i
am mistaken.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / ashok
in x1 & x2 is haveing same value "abcd" and also memory
location also is same. thats why if u chang any values of
these atomatically chang both values.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / soumya santosini patnaik
soc7 abend occurs because according to move rules
alphaneumericfields can be moved to numeric fields only
when alphanumeric field consists of numeric data only.
| Is This Answer Correct ? | 0 Yes | 5 No |
Answer / jaganmohanreddy
var1 will be abcde
var2 will be 0000000000
| Is This Answer Correct ? | 1 Yes | 7 No |
Answer / veena
************************************************************
************************************************************
************************************************************
It will give compilation error.
| Is This Answer Correct ? | 0 Yes | 11 No |
Please let me know how the Eject verb works for page break.. I want to know the code, how it is used.
what is rediffine clause?in what situation it can use?give me real time example?
How to use the same cobol program in Batch and CICS onlines ? Please expalin with an example. Thanks in advance.
What is the difference between static call & Dynamic call?
using redefine can you redefine lower variable size to higher variable size?
What is the significance of the PROGRAM-ID paragraph? If this name doesnt match with the name of the COBOL program, does it make a difference? Is the name specified in the PROGRAM-ID paragraph used as a name for the load module or any such thing?
I have 2 dimensional array with having 100 elements. So how to find the 11th item in an array?
Read filea And file b write the same records in both files? Records in a but not in b record in b but not in a
How many sections are there in data division?.
how can we code index in an array of cobol pgm?
TYPES OF SORTINGS. which is more prefarable.
Consider the following code: 77 A PIC 99V99 VALUE 55.35 77 B PIC 99V999 VALUE 32.754 ADD B TO A ON SIZE ERROR DISPLAY "ERROR!!!" What will be the result ? (a) A=88.10, B=32.754 (b) A=87.00 B=32.754 (c) A=87.10 B=32.754 (d) ERROR!!! will be DISPLAYed on the screen.