Methode zum "Gemeinsamen Ausführen" anlegen (SAP-Bibliothek)

Methode zum "Gemeinsamen Ausführen" anlegen

Im Business Workplace besteht die Möglichkeit, Workitems gemeinsam auszuführen. So können beispielsweise mehrere Urlaubsanträge gleichzeitig genehmigt oder abgelehnt werden.

Diese Funktion ist an folgende Voraussetzungen gebunden:

Die Workitems müssen sich auf dieselbe Einzelschrittaufgabe beziehen.

Wenn die Workitems zu einer Einzelschrittaufgabe gehören, deren auszuführende Methode mit Parametern definiert ist, dann können diese Workitems nur dann gemeinsam ausgeführt werden, wenn die Elemente im Methodencontainer und die korrespondierenden Elemente im Aufgabencontainer namensgleich sind.

Die Methode muß synchron ausführbar sein.

Die Methode muß mindestens einen Import-/Exportparameter besitzen, der das Resultat der ersten Methodenausführung enthält.

Als Beispiel dient die Methode Approve des Objekttyps WFTS , die für die Funktion Gemeinsam ausführen benutzt werden kann.

BEGIN_METHOD APPROVE CHANGING CONTAINER.
DATA: PROCSTATE LIKE SWXFORMABS-PROCSTATE.
  SWC_GET_ELEMENT CONTAINER 'ProcState' PROCSTATE.
  IF PROCSTATE IS INITIAL.
    " go into dialog and display absence form for approval
    CALL FUNCTION 'SWX_FORMABS_APPROVE'
        EXPORTING
            FORMNUMBER = OBJECT-KEY-NUMBER
        IMPORTING
            PROC_STATE = PROCSTATE
        EXCEPTIONS
            FORM_NOT_FOUND = 01
            ABORTED = 02
            OTHERS = 03.
    CASE SY-SUBRC.
      WHEN 0. " OK
      WHEN 01. EXIT_OBJECT_NOT_FOUND.
      WHEN 02. EXIT_CANCELLED.
      WHEN OTHERS. " to be implemented
    ENDCASE.
    SWC_SET_ELEMENT CONTAINER 'ProcState' PROCSTATE.
  ELSE. " just change the field in the database
    UPDATE SWXFORMABS SET PROCSTATE = PROCSTATE
                      WHERE FORMNUMBER = OBJECT-KEY-NUMBER.
    IF SY-SUBRC NE 0.
      EXIT_OBJECT_NOT_FOUND.
    ENDIF.
  ENDIF.
END_METHOD.