I HAVE FOLLOWING DECLARATION.
02. A PIC X(10) VALUE 'XXXXXXXXXX'.
02. B REDEFINES A.
05. C PIC X(3).
05. D PIC X(3).
05. E PIC 9(3).
IN MY PROG, I HAVE
MOVE 1 TO E.
DISPLAY A.
WHAT WILL BE DISPLAYED AS A RESULT OF THIS?
PLEASE EXPLAIN THE ANSWER. THANKS.
Answer Posted / smiley
Can anybody explain...How C and D are having values as "XXX"
in answer ,though not initialized. Purpose of redefines
clause is to use the same storage space for different data.
I think answer posted by PRANAY2X is correct.
| Is This Answer Correct ? | 2 Yes | 2 No |
Post New Answer View All Answers
Write a program to explain size error.
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
Describe the cobol database components?
What is the default value(s) for an initialize? What keyword will allow for an override of the default?
Discuss about changing dataset name in proc.
what happens if parmparameter passes zero bytes to the program
What is the use of intialize verb?
What rules are to be followed while using the corresponding options?
) How do u handle errors in BMS macro
Write a cobol program making use of the redefine clause.
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What is Pic 9v99 Indicates in COBOL?
Can we redefine the field of x(200) to less than 200?
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.