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.



WORKING-STORAGE SECTION. 1 GROUP-ITEM. ..

Answer / dimpy19

output - 180

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More JCL Interview Questions

what is the function of iebcompr?....is it compare record length or characteristics of a dataset?...pls explain with examples.......

2 Answers  


hi in one of the interview one asked me how to submit a job from cobol?as well as how to submit a jcl from CICS? can u pls any one tell me..

1 Answers   CTS,


What does the statements: typrun=scan and typrun=hold do in a JCL statement

2 Answers  


How do you submit JCL via a Cobol program?

2 Answers   Cap Gemini,


How to pass values in jcl to cobol?

4 Answers   IBM, Infosys,






What statement marks the beginning of an in-stream or cataloged procedure in jcl and assigns default values to parameters defined in the procedure?

0 Answers  


How to check empty file in jcl?

4 Answers   Infosys,


AM HAVING A FILE WHICH CONTAIN 12 DATS OUT OF WHICH 4 ARE DUPLICATES HOW TO REMOVE THE DUPLICATE FILES IN JCL? CAN I GET THE PROGRAM FOR THIS

3 Answers  


Name some of the JCL statements that are not allowed in procs.?

1 Answers  


Hello Guys, I have 1+ Year Experience in MAINFRAME TESTING. After 1 Week I have an Interview With a Company on Mainframe Testing. Please Could You Guys Please Suggest me What Sections Should I prepare ?? ___Tell Me the Topic Or Appropriate Site & Links. ?? ---------------Thank You

0 Answers   IBM,


IN DFSORT sum fields=none is usec to remove duplicates.how to write the duplicates in another dataset?

2 Answers  


If a (+1) generation dataset is created in the first step of a job, how can it be referenced in later steps of the same job for input?

0 Answers  


Categories