*&---------------------------------------------------------------------*
*& Include          ZAPIDUMMYTESTPROG1TOP
*&---------------------------------------------------------------------*

DATA: ok_code TYPE sy-ucomm.
