Eigenschaften | Quelltext
Titel | SET_STATUS_NOKEYSELCNDS |
Originalsprache | DE | Deutsch
Erstellt | 27.10.1998 |  | SAP |
Letzte Änderung | 13.11.2001 |  | SAP |
Status | aktiv |
Attribute
Typ | Include-Programm |
Status | Testprogramm |
Anwendung | Basis (System) |
Paket | SVIM | Basis Viewmaintenance
| Editorsperre
txt
    1
    *---------------------------------------------------------------------*
    2
    *       FORM SET_STATUS_NOKEYSELCNDS                                  *
    3
    *---------------------------------------------------------------------*
    4
    * ........                                                            *
    5
    *---------------------------------------------------------------------*
    6
    FORM SET_STATUS_NOKEYSELCNDS.
    7
      CLEAR <STATUS>-NOKEYSLCDS.
    8
    * LOOP AT DPL_SELLIST.
    9
      LOOP AT <VIM_CK_SELLIST> INTO DPL_SELLIST.
    10
        READ TABLE X_NAMTAB INDEX DPL_SELLIST-TABIX.
    11
        IF X_NAMTAB-KEYFLAG EQ SPACE.
    12
          <STATUS>-NOKEYSLCDS = 'X'. EXIT.
    13
        ENDIF.
    14
      ENDLOOP.
    15
      <STATUS>-INITIALIZD = 'X'.
    16
    ENDFORM.                               "set_status_nokeyselcnds