consider the following piece of code
01 GROUP-ITEM
05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50
05 AMOUNT-2 PIC 9(4)V99 USAGE COMP
MOVE ZERO TO GROUP-ITEM
ADD 50 TO AMOUNT-1
what will be the content of AMOUNT-1?
a.50
b.100
c.0
d.unpredictable

Answer Posted / priyanka

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 GROUP-ITEM.
05 AMOUNT-1 PIC 99V9 COMP USAGE COMP VALUE 50.
05 AMOUNT-2 PIC 9(4)V99 USAGE COMP.

PROCEDURE DIVISION.
A000-FIRST-PARA.
INITIALIZE GROUP-ITEM.
MOVE 0 TO GROUP-ITEM.
ADD 50 TO AMOUNT-1.

DISPLAY AMOUNT-1
.
STOP RUN.

If we don't use " MOVE 0 TO GROUP-ITEM." condition then the answer is 50 else if we are using it then the answer is 32.0. so I think the right answer is unpredictable.
Please correct in email if I am wrong.

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

A table has two indexes defined. Which one will be used by the SEARCH?

1016


Explain how to differentiate call by context by comparing it to other calls?

903


example for sub strings ? and refernce modifications whit output pls

2068


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

1213


Explain how you can characterize tables in cobol?

821


Explain what you understand by passing by value.

913


What is the utilization of copybook in cobol?

882


Discuss about changing dataset name in proc.

957


What is comp-1 and comp-2?

936


how to access the file from prodution from changeman tool and to submit a file to production

7085


What is the difference between Call and a Link?

889


Which mode is used to operate the sequential file?

928


How did the release of cobol/370 version 1.3 improve the performance of release 1.1?

866


What are the rules of the move verb?

945


If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly

2879