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 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