Wir verwenden dafür den User-Exit: EXIT_SAPLSABE_010 und eine ZTAbelle.black_adept hat geschrieben:Daher sorge dafür, dass die angeblich nicht benötigten Reports beim Start eine Fehlermeldung erzeugen, dass sie im Überprüfungsstatus sind und von der IT erst wieder freigeschaltet werden müssen.
Code: Alles auswählen.
*&---------------------------------------------------------------------*
*& Include ZXREPU01 *
*&---------------------------------------------------------------------*
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" VALUE(PROGNAME) LIKE TRDIR-NAME
*" VALUE(SECU) LIKE TRDIR-SECU
*" VALUE(SSET) LIKE TRDIR-SSET
*" VALUE(VARIANT) LIKE RALDB-VARIANT DEFAULT SPACE
*" EXCEPTIONS
*" CUSTOMER_EXCEPTION
*"----------------------------------------------------------------------
DATA ls_tab TYPE ztest6.
SELECT SINGLE * FROM ztest6 INTO ls_tab WHERE progname = progname.
IF sy-subrc = 0.
ADD 1 TO ls_tab-counter.
MODIFY ztest6 FROM ls_tab.
ELSE.
ls_tab-progname = progname.
ls_tab-tcode = sy-tcode.
ls_tab-secu = secu.
ls_tab-sset = sset.
ls_tab-xvariant = variant.
ls_tab-erdat = sy-datum.
ls_tab-erzet = sy-uzeit.
ls_tab-benutzer = sy-uname.
CLEAR ls_tab-counter.
MODIFY ztest6 FROM ls_tab.
ENDIF.
Stimmt. Das Benutzfeld in der Tabelle Ztest6 ist optional und kann auch ausgelassen werden (plus coding anpassen).Bei Weitergabe von benutzerbezogenen solltest du jedoch vorsichtig sein....