How to replace the GOTO statement in COBOL without changing
the structure of program. e.g. consider following code...
I.D.
E.D.
D.D.
P.D.
compute C = A + B.
GOTO para 100-display.
compute D = C - D.
GOTO 200-display.
some other logic......
........
GOTO 300-para.
......
......
GOTO 400-para.

Now I want to replacce all GOTO statements without
changing the structure and otput of program.

Answer Posted / vani

is there any exit statement for the goto para
if it's so,it can be replaced with perform statement

Is This Answer Correct ?    3 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Which is not true about evaluate statement

1595


what is the use of outrecord?

1774


What is the difference between goback, stop run and exit program in cobol?

932


What is inspect in cobol ?

806


1.give the details about WHEN OTHER. 2. how many form are available in evaluate.

1616






how can we apply for HSBC exam(Mainframe) in India??? i went to their site and was told to submit my CV ,. etc..( totally confusing...)

1931


) how do u code after getting data?

1582


Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks

2337


What are declaratives and what are their uses in cobol?

714


How do we get current date from system with century in COBOL?

807


What is the usage of comp fields in cobol?

660


Give some examples of command terminators?

759


How do you get the data to code the BMS macro?

1476


Write down the divisions of cobol program?

671


Can a Search can be done on a table with or without Index?

806