Suppose a program has the following code. What will be the
output?
MAIN-PARA.
DISPLAY 'MAIN-PARA'
PERFORM SECTION-A.
STOP RUN.
SECTION-A.
PARA-A1.
DISPLAY 'SECTION A PARA A1'.
PARA-A2.
DISPLAY 'SECTION A PARA A2'.
Answers were Sorted based on User's Feedback
Answer / deependra
The output is as follow:-
MAIN-PARA
SECTION A PARA A1
SECTION A PARA A2
| Is This Answer Correct ? | 24 Yes | 1 No |
Answer / wairagade
Output = MAIN-PARA
See the Main-Para. the flow is like , it will display MAIN-
PARA text and then perform SECTION-A in which nothing is
coded, it will give control back to OS.
If PERFORM SECTION-A thru PARA-A2
Then
O/P
MAIN-PARA
SECTION A PARA A1
SECTION A PARA A2
Please correct me if I stated wrong
| Is This Answer Correct ? | 3 Yes | 3 No |
The output is :
---------------
MAIN-PARA
SECTION A PARA A1
SECTION A PARA A2
Because, There is no THRU command in PERFORM statement. So
it will execute still it reaches the 'EXIT' command or it
will perform the full section or until the next section
reaches.
| Is This Answer Correct ? | 0 Yes | 1 No |
How can we increase the size of an existing PDS to include more no. of modules. I tried the answer posted by Jagan(TSO PDS 'pds name') but did not find it working. The answer posted by kamal i know very well. Please suggest me a answer so that we don't need to delete the existing PDS and still we can change the size as well.
should I use Go back in the main program ? Yes we can use Go back in main program as well.
can you declare redefine in level 01?
Please let me know how the Eject verb works for page break.. I want to know the code, how it is used.
created cluster using IDCAMS ..that is empty ..when i write a program for read using Input ..wil it open the cluster or gives any error?
What is the difference between performing a SECTION and a PARAGRAPH?
What is LENGTH in COBOL II?
I have files that contains both duplicates files(occur more than twice) and non-duplicate files.The file is already sorted by a key.I want to determine those records that are duplicate and will be move to a duplicate file and non- duplicate files to be move to a valid file.thank you.help please
What is the Purpose of POINTER Phrase in STRING command
I have a Flat file in which certain records are present in a tabular format. I need to extract some of the records on some basis from it and copy them into a flat file...how it can be done ??
What is link edit in cobol?
for an INITIALIZE and what keyword allows for an override of the default.