Properties | SourceCde
Title |  |
Original language | DE | Englisch
Created | 27.10.1998 |  | SAP |
Last changed by | 13.11.2001 |  | SAP |
Status | Active |
Attributes
Type | INCLUDE program |
Status | Test program |
Application | Basis |
Package | SVIM | Basis View Maintenance
| Editor lock
txt
    1
    *&--------------------------------------------------------------------*
    2
    *&      Form  TEMP_DELIM_DETERMINE_ACTION                             *
    3
    *&--------------------------------------------------------------------*
    4
    * determine action flag                                               *
    5
    *&--------------------------------------------------------------------*
    6
    FORM TEMP_DELIM_DETERMINE_ACTION USING VALUE(TDDA_INDEX) TDDA_ACT
    7
                                                             TDDA_ACT_TXT.
    8
      LOCAL: TOTAL.
    9
      READ TABLE TOTAL INDEX TDDA_INDEX.
    10
      IF <ACTION> EQ NEUER_GELOESCHT.
    11
        TDDA_ACT = NEUER_EINTRAG.
    12
      ELSE.
    13
        TDDA_ACT = AENDERN.
    14
      ENDIF.
    15
      IF X_HEADER-BASTAB NE SPACE AND X_HEADER-TEXTTBEXST NE SPACE.
    16
        IF <ACTION_TEXT> EQ NEUER_GELOESCHT.
    17
          TDDA_ACT_TXT = NEUER_EINTRAG.
    18
        ELSE.
    19
          TDDA_ACT_TXT = AENDERN.
    20
        ENDIF.
    21
      ENDIF.
    22
    ENDFORM.                               "temp_delim_determine_action