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

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Describe the cobol database components?

776


What is the difference between Call and a Link?

794


How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?

2128


i need a small 3d program using inline and outline.

1748


What is report-item in COBOL?

796






2 input fles: 2 flat files, with different number of records. both are having unique key for each record and already sorted in ascending order . match these files using unique key and in output only matching key value has to be written. please procide cobol logic

2256


What type of SDLC u followed? Why?

1633


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.

1047


Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

812


INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?

512


Is it possible that the redefines clause has different picture clauses compared to the one it redefined?

768


if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

5895


How do we get current date from system with century in COBOL?

928


Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?

943


Write the code to count the sum of n natural numbers.

789