Klassifizierungen zu Objekten in einem ALV ausgeben lassen

Hallo,
Um mein Problem besser darzustellen , anbei ein screenshot, ... -> Ich möchte die Einträge der t_objectdata (in dem Fall dann in meiner it_objectdata) statt zeilenweise dann spaltenweise ausgeben lassen!!
Wie geht das? (siehe anbei als Bsp. ..)
Danke!!

lG

Hallo,

O.K., danke für die Antwort!

Die Struktur (so wie du das beschrieben hast), die meinen angezeigten ALV-Spalten entsprechen, die habe ich schon angelegt (84 Spalten).

Den Feldkatalog (inkl. Fkt.baustein) habe ich in meinem report auch schon erstellt und eingebaut.
-> CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
* I_PROGRAM_NAME =
* i_internal_tabname =
i_structure_name = 'ZRPMM_EQUIPMENT_INSPECTION_3'
* I_CLIENT_NEVER_DISPLAY = 'X'
* I_INCLNAME =
i_bypassing_buffer = 'X'
* I_BUFFER_ACTIVE =
CHANGING
ct_fieldcat = it_fieldcat[]
EXCEPTIONS
inconsistent_interface = 1
program_error = 2
OTHERS = 3
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

sowie lasse ich eben auch schon das ALV darstellen:
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
* I_CALLBACK_PROGRAM = ' '
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
i_structure_name = 'ZRPMM_EQUIPMENT_INSPECTION_3'
* I_BACKGROUND_ID = ' '
i_grid_title = 'Equipmentlist Inspection'
* I_GRID_SETTINGS =
is_layout = ls_layout
it_fieldcat = it_fieldcat[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
i_save = 'X'
is_variant = lv_variant
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* I_HTML_HEIGHT_TOP =
* I_HTML_HEIGHT_END =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = it_data
EXCEPTIONS
program_error = 1
OTHERS = 2
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Nur fehlt mir halt jetzt "nur" noch , wie gesagt, die spaltenweise Ausgabe.

Bzw. was meinst du mit dem BAPI-Aufruf? Ich verwende doch in dem Fall kein BAPI? Oder?
Ich verwende ja nur die CLAF_CLASSIFICATION_OF_OBJECTS
->
CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS'
EXPORTING
class = lw_ziappliclass-class
* CLASSTEXT = 'X'
classtype = '002'
* CLINT = 0
* FEATURES = 'X'
language = sy-langu
object = l_object
* OBJECTTABLE = ' '
* KEY_DATE = SY-DATUM
* INITIAL_CHARACT = 'X'
* NO_VALUE_DESCRIPT =
* CHANGE_SERVICE_CLF = 'X'
* INHERITED_CHAR = ' '
* CHANGE_NUMBER = ' '
TABLES
t_class = it_class
t_objectdata = it_objectdata
* I_SEL_CHARACTERISTIC =
* T_NO_AUTH_CHARACT =
EXCEPTIONS
no_classification = 1
no_classtypes = 2
invalid_class_type = 3
OTHERS = 4
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.


O.K., d.h. ich loope nach dem Aufruf d. CLAF_CLASSIFICATION_OF_OBJECTS über meine it_objectdata drüber.
Ist das richtig?
Brauche ich vor'm ASSIGN ein CONCATENATE?

Gibt es da ein ausführlicheres Bsp. dazu, das genau dieses Thema behandelt?

Danke!

lG

Hallo ,

O.K., danke !
.. werd' das mal ausprobieren ...

lG

Ja,

siehst du richtig. Du kannst natürlich auch mit Tabellen mit Kopfzeilen arbeiten aber das mache ich nicht. "ls_objectdata " musst du also mit
data: ls_objectdata type CLOBJDAT.
und "ls_data" mit
data: ls_data type DeineStruktur.
in dem Programm deklarieren.

Grüße

UH