How many times the loop runs here
01 a pic 9(2) value 10.
perform para1 a times
stop run.
para1:
move 20 to a.
- 3 Answers
- 6233 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / suresh
it performs 10 times only it donot change while looping
| Is This Answer Correct ? | 14 Yes | 3 No |
Answer / shiva
initally a=10
perfrm para1 a(10) times
move 20 to a...so now a=20
now again perform para1 a(20)times
and loop goes on
hence infinite loop
| Is This Answer Correct ? | 3 Yes | 5 No |
what are the paramater we cannot use in procedure?how many instream we can write in single jcl?can we call instream to catalog and ctalog to instream?
Write down the divisions of cobol program?
I have dataset DS1 which has records say 1 2 3 4 5 ... ... etc And also I have second dataset DS2 whcih has records 1 3 4 5 6 8 .. ... Both the files are sorted and now I want to compare these files and write it into the third files if the records are matching.
what are the diferences b/w sub-script and index?
what is the difference b/w level no.01 & level no.77?
COMP?
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 ......
I have a seq file with different fields one field is address with pic x(50) as input in a cobol program. In address there is 'PUNE' at any different positions in the address field ( form 1 t0 50) . My requirement is select the fields with address 'PUNE' by using cobol. Please suggest
Difference between ps, esds
what is meant by binary search?
Explain how to differentiate call by context by comparing it to other calls?
Can we use redefine clause in occurs clause?
COBOL 
