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.
- 6 Answers
- 21353 Views
- Accenture, I also Faced
- E-Mail Answers
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
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What is rmode(24)
What are literals?
Write a program to explain size error.
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
how do you reference the rrds file formats from cobol programs
What is the difference between comp and comp-3 usage?
Why occurs cannot be used in 01 level in COBOL?
How do you get the data to code the BMS macro?
What is amode(31)
What is report-item in COBOL?
Can a Search can be done on a table with or without Index?
How do we get current date from system with century in COBOL?
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.
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
