Code: Alles auswählen.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = 'XY'
i_client_never_display = ''
CHANGING
ct_fieldcat = ct_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.
LOOP AT lt_fieldcat INTO ls_fieldcat
WHERE fieldname = 'Feld2'.
* --> §1.Set status of column START_NACHARB to editable.
ls_fieldcat-edit = 'X'.
* --> Field 'checktable' is set to avoid shortdumps that are caused
* by inconsistend data in check tables. You may comment this out
* when the test data of the flight model is consistent in your
* system.
ls_fieldcat-checktable = '!'. "do not check foreign keys
MODIFY lt_fieldcat FROM ls_fieldcat.
ENDLOOP.
Code: Alles auswählen.
...
LOOP AT lt_fieldcat INTO ls_fieldcat
WHERE fieldname = 'Feld2'.
CLEAR: ls_fieldcat-edit
, ls_fieldcat-checktable
.
MODIFY lt_fieldcat FROM ls_fieldcat.
ENDLOOP.
Das zellenweise Ein- bzw. Ausschalten der Editierbarkeit kann mittels ALV-Styles realisiert werden.Mrs. Hilflos hat geschrieben: Gibts da eine Möglichkeit?