01 a pic 9(3) value is 123
01 b pic 9(6)
move a to b

wht will be the value ? and

01 a pic x(6) value is abc
01 b pic x(3)
move a to b

wht will be the value ?

Answer Posted / chowdary

after executing this program output will be

b value is 000123
and
b value is abc
there is no blanks after abc in b, because we have taken
its length as 3 in pic clause.

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is the difference between goback, stop run and exit program in cobol?

932


For rewrite, why is it mandatory that file needs to be opened?

623


What are the different types of condition in cobol and write their forms.

660


What kind of error is trapped by on size error option?

746


Hi pls anybody tell me about " ANALYSIS DOCUMENT PREPARATION AND ESTIMATION OF TASK " (in real time project)."I want to update a sequential file in my project" for that purpose i need both structures i mean analysis document and estimation of task.

1703






What is comp-1 and comp-2?

766


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

1951


I have a File that has duplicate records. I need only those records that occur more than thrice.?

8668


EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?

2060


How do define dynamic array in cobol.

675


What rules are followed by the search verb.

638


how do you define single dimensional array and multidimensional array in your cobol?

683


what is amode(24), amode(31), rmode(24) and rmode(any)?

705


Describe the cobol database components?

684


can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

1908