STOP is shown as obselete -- any alternate

Question

Hi all,
I have STOP used in my code which is shown as an obsolete Error during Extended Syntax Check in ECC 6.0.
Can any one tell me if we have an alternate.
Surya Kiran.

Answer 1

Hi,
STOP statement will terminate the execution of the program.
To replace this we can use EXIT but with some conditions.
Example code:
Suppose that we have STOP statement in code as follows:
report ztest.
perform f1000.
FORM f1000.
if x eq 0.
  stop.
else.
write 'Hi'.
endif.
endform.
Here, the stop statement will stop the execution of the program.
replacing with EXIT.
report ztest.
data : flag type c.
perform f1000.
if flag ='X'.
  EXIT.
endif.
FORM f1000.
if x eq 0.
  flag = 'X'.
  EXIT.
else.
write 'Hi'.
endif.
endform.
The EXIT statement in the subroutine gets the control out of the perform statement.But we need to terminate the program. So , after the perform statement we need to check whether the EXIT statement in side subroutine is executed , if so then come out the program using EXIT.
EXIT will come out of the loops , subroutines and program it self if it is not used in any loop or subroutine.
Regards,
Lakshmi.