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
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
Explain the configuration section of a cobol program with examples of syntax.
Write the code to count the sum of n natural numbers.
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
Explain how you can characterize tables in cobol?
i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this
What are different data types in cobol?
What is the problem of ordered sequential files access?
Write a cobol program making use of the redefine clause.
What are the pertinent COBOL commands?
how do you reference the variable block file formats from cobol programs
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
what happens if parmparameter passes zero bytes to the program