How many times the loop runs here
01 a pic 9(2) value 1.
perform para1 until a=10
move 1 to a.
stop run.
para1:
move 10 to a.

Answer Posted / priyanka

Para1 would be executed 1 time. after 1st time the value of
a is 10 and it comes out of loop.

it move 1 to a and stop execution.

Is This Answer Correct ?    23 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.

3718


how to refer the data field?

1812


What is report-item in COBOL?

711


what is the difference between COBOL2 AND COBOL390?

2453


What is the local-storage section?

682






input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.

1783


What do you understand by psb and acb?

665


Why did you choose to work with ibm mainframe cobol programming?

631


Explain what you understand by passing by value.

700


What is the use of intialize verb?

750


There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.

932


What is the difference between a binary search and a sequential search what are the pertinent cobol?

735


I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.

1115


What is the utilization of copybook in cobol? Could we utilize a similar copybook?

720


Can we change the password using ALTER? anyone tried and changed?

1547