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 Endroutine anlegen. Der Routineneditor öffnet sich.
2. Sie fügen folgende Coding-Zeilen ein:
*----------------------------------------------------------------------*
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 vor Endroutine erkennen Sie, dass eine Endroutine vorhanden ist.