output - 180

WORKING-STORAGE SECTION.
1 GROUP-ITEM.
05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50.
05 AMOUNT-2 PIC 9(4)V99 USAGE COMP.
PROCEDURE DIVISION.
MOVE ZERO TO GROUP-ITEM.
ADD 50 TO AMOUNT-1.
DISPLAY AMOUNT-1.
STOP RUN.

Question Posted / dimpy19

1 Answers
2097 Views
I also Faced
E-Mail Answers

Answer Posted / dimpy19

output - 180

Is This Answer Correct ?

0 Yes

0 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

how can a gdg base be created in a jcl. What is the difference between empty and scratch parameter while defining/altering gdg base?

1234

What does it mean by Restart and Checkpoint in JCL ? How are checkpoints being taken and what is their usage ? How to use Checkpoint macro on a JOBSTEP ?

9696

what is use of disp parameter in dd statement?

1048

What are the parameters that are used in creating a gdg?

1151

in order to execute step2 a job after a return code of 8 in step1, what condition you will code in step2?

2644

which utility is used to sort a file in jcl?

1176

what is use of dcb parameter in dd statement?

1241

What is one line to pass PARM from JCL to COBOL?

4905

I want to join to input files and write the matching fields on to an output file but i dont want the output file a sorted one

2389

Explain the jcl exec statement?

1089

what is SOC4 error?

1162

Give the syntax of job specifying jcl statement.

1088

How dummy is used in jcl?

1082

Brief description of inline procedure of jcl.

1184

What are the jcl procedures?

1064