Im OSS hab ich geschaut, aber nichts hierzu finden können. Ich weiß ja auch nicht, ob das Problem nun vom "SAPLKKBL" kommt oder von meinem ReportInformationen zur Abbruchstelle
Der Abbruch trat im ABAP-Programm "SAPLKKBL" auf, und zwar "DATA_OUT_HS". Das Hauptprogramm war "Z_REPORT".
Im Quelltext befindet sich die Abbruchstelle in Zeile 2155 des (Include-)Programms "LKKBLF98". (bei Anwahl des Editors: 21550) der ABAP-Source "LKKBLF98".
Code: Alles auswählen.
keyinfo-header01 = 'MATNR'.
keyinfo-item01 = 'MATNR'.
keyinfo-header02 = 'EQUNR'.
keyinfo-item02 = 'EQUNR'.
keyinfo-header03 = 'SERNR'.
keyinfo-item03 = 'SERNR'.
Code: Alles auswählen.
LOOP AT fieldcat INTO l_fieldcat.
IF l_fieldcat-fieldname = 'EXPAND' AND
l_fieldcat-tabname = 'HEADER'.
DELETE fieldcat.
ENDIF.
IF l_fieldcat-fieldname = 'MATNR' AND
l_fieldcat-tabname = 'ITEM'.
DELETE fieldcat.
ENDIF.
IF l_fieldcat-fieldname = 'EQUNR' AND
l_fieldcat-tabname = 'ITEM'.
DELETE fieldcat.
ENDIF.
IF l_fieldcat-fieldname = 'SERNR' AND
l_fieldcat-tabname = 'ITEM'.
DELETE fieldcat.
....
ENDLOOP.
Code: Alles auswählen.
LOOP AT fieldcat INTO l_fieldcat.
IF l_fieldcat-fieldname = 'EXPAND' AND
l_fieldcat-tabname = 'HEADER'.
* DELETE fieldcat.
l_fieldcat-tech = 'X'.
ENDIF.
IF l_fieldcat-fieldname = 'MATNR' AND
l_fieldcat-tabname = 'ITEM'.
* DELETE fieldcat
l_fieldcat-tech = 'X'.
ENDIF.
IF l_fieldcat-fieldname = 'EQUNR' AND
l_fieldcat-tabname = 'ITEM'.
* DELETE fieldcat.
l_fieldcat-tech = 'X'.
ENDIF.
IF l_fieldcat-fieldname = 'SERNR' AND
l_fieldcat-tabname = 'ITEM'.
* DELETE fieldcat.
l_fieldcat-tech = 'X'.
ENDIF.
IF l_fieldcat-fieldname = 'ATWRT' AND
l_fieldcat-tabname = 'ITEM'.
l_fieldcat-ddictxt = 'M'.
IF sy-langu = 'D'.
l_fieldcat-seltext_m = 'Merkmalwert'.
ELSE.
l_fieldcat-seltext_m = 'Characteristic value'.
ENDIF.
* MODIFY fieldcat FROM l_fieldcat.
ENDIF.
* FIELD-SYMBOLS: <ls_fcat> LIKE LINE OF fieldcat.
* READ TABLE fieldcat
* ASSIGNING <ls_fcat>
* WITH KEY fieldname = 'REPS'.
* IF sy-subrc EQ 0.
* MOVE 'X' TO <ls_fcat>-icon.
* MOVE 'X' TO <ls_fcat>-hotspot.
* ENDIF.
IF fieldcat-fieldname = 'REPS'.
l_fieldcat-icon = 'X'.
l_fieldcat-hotspot = 'X'.
ENDIF.
MODIFY fieldcat FROM l_fieldcat.
ENDLOOP.
Code: Alles auswählen.
keyinfo-header01 = 'MATNR'.
keyinfo-item01 = 'MATNR'.
keyinfo-header02 = 'EQUNR'.
keyinfo-item02 = 'EQUNR'.
keyinfo-header03 = 'SERNR'.
keyinfo-item03 = 'SERNR'.