Show TOC Anfang des Inhaltsbereichs

Diese Grafik wird im zugehörigen Text erklärt Beispiel für Endroutine  Dokument im Navigationsbaum lokalisieren

Sie laden Daten über die DataSource Hauptbuch: Verkehrszahlen (0FI_GL_1) im SAP ERP-System in das DataStore-Objekt FIGL: Verkehrszahlen (0FIGL_O06).

Sie möchten eine Endroutine anlegen, durch die das zusätzliche InfoObject Plan-/Ist-Kennzeichen (ZPLACTUAL) gefüllt wird. Die Routine soll dazu das Feld Werttyp lesen. Wenn der Wert 10 (Ist) beträgt, dann wird der Wert A in das InfoObject Plan-/Ist-Kennzeichen geschrieben, wenn der Wert 20 (Plan) beträgt, dann wird der Wert P in das InfoObject Plan-/Ist-Kennzeichen geschrieben.

...

       1.      Sie befinden sich in der Pflege der Transformation. Sie wählen Diese Grafik wird im zugehörigen Text erklärt Endroutine anlegen. Der Routineneditor öffnet sich.

       2.      Sie fügen folgende Coding-Zeilen ein:

Syntax

*----------------------------------------------------------------------*
  
METHOD end_routine.
*=== Segments ===

    
FIELD-SYMBOLS:
      <RESULT_FIELDS>    TYPE _ty_s_TG_1.

*$*$ begin of routine - insert your code only below this line        *-*
 
    loop at RESULT_PACKAGE assigning <RESULT_FIELDS>
      where vtype eq '010' or vtype eq '020'.
      case <RESULT_FIELDS>-vtype.
        when '010'.
          <RESULT_FIELDS>-/bic/zplactual = 'A'. "Actual
        when '020'.
          <RESULT_FIELDS>-/bic/zplactual = 'P'. "Plan
      endcase.
    endloop.
*$*$ end of routine - insert your code only before this line         *-*
  
ENDMETHOD.                    "end_routine
*----------------------------------------------------------------------*

Das Coding macht einen Loop über das result_package und sucht nach Werten, die den Werttyp 10 oder 20 haben. Für diese Werte wird dann der entsprechende Wert an das InfoObject Plan-/Ist-Kennzeichen (ZPLACTUAL) weitergegeben.

       3.      Sie verlassen den Routineneditor.

       4.      Sie sichern die Transformation. An der Bleistift-Ikone Diese Grafik wird im zugehörigen Text erklärt vor Endroutine erkennen Sie, dass eine Endroutine vorhanden ist.

Ende des Inhaltsbereichs