CALL FUNCTION 'CLAF_OBJECTS_OF_CLASS'
EXPORTING
class = 'M_0218'
classes = ' '
classtext = ' '
classtype = '001'
* FEATURES = 'X'
language = sy-langu
* OBJECT_HIGH = ' '
* OBJECT_LOW = ' '
* UPDATE_MODE = ' '
* KEY_DATE = SY-DATUM
* INITIAL_CHARACT = 'X'
* NO_VALUE_DESCRIPT =
* CHANGE_SERVICE_CLF = 'X'
* INHERITED_CHAR = ' '
* OBJECTTABLE = ' '
* CHANGE_NUMBER = ' '
TABLES
t_class = tclass
t_objectdata = tobjectdata
t_objects = tobjects
* I_SEL_CHARACTERISTIC =
* T_NO_AUTH_CHARACT =
EXCEPTIONS
no_classification = 1
invalid_class_type = 2
OTHERS = 3.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.