PARAMETER: p_name TYPE trdir-name. START-OF-SELECTION. DATA: lv_trdir TYPE trdir. SELECT SINGLE * FROM trdir INTO @lv_trdir WHERE name = @p_name. IF sy-subrc = 0. IF lv_trdir-edtx = 'X'. lv_trdir-edtx = space. CALL FUNCTION 'RS_TRDIR_UPDATE' EXPORTING trdir_row = lv_trdir EXCEPTIONS internal_error = 1 parameter_error = 2 not_found = 3 OTHERS = 4. IF sy-subrc EQ 0. WRITE:/ 'Editor entsperrt.'. ENDIF. ELSE. WRITE:/ 'Editor ist schon entsperrt.'. ENDIF. ENDIF.
Kategorien
-
Neueste Beiträge
- [SAP] Mailversand einrichten
- [SAP EWM] SAP EWM and SAP ERP integration via CIF
- [SAP] Nutzung der ALV-Anzeige im MM-Reporting
- [Raspberry Pi 4] Raspberry Pi als DNS Server
- [Raspberry Pi] SSH aktivieren
- [Raspberry Pi] Bootoptionen in der config.txt
- [Raspberry Pi 4] Bessere Youtube-Videoperformance in Google Chrome
- [Raspberry Pi 4] Direkt von SSD booten (ohne SD-Karte)
- [ABAP] Fixkontentabelle (T030) auslesen
- [SAPUI5] SAPUI5 Entwicklung mit SAP Business Application Studio (BAS)