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 UPDATE_STATUS                                            *
    3
    *---------------------------------------------------------------------*
    4
    FORM UPDATE_STATUS.
    5
      MOVE: STATUS-DATA TO <STATUS>-ST_DATA,
    6
            STATUS-MODE TO <STATUS>-ST_MODE,
    7
            STATUS-DELETE TO <STATUS>-ST_DELETE,
    8
            STATUS-ACTION TO <STATUS>-ST_ACTION,
    9
            TITLE         TO <STATUS>-TITLE,
    10
    *       L             TO <STATUS>-CUR_LINE,
    11
            FIRSTLINE     TO <STATUS>-FIRSTLINE,
    12
            MAXLINES      TO <STATUS>-MAXLINES,
    13
            F             TO <STATUS>-CUR_FIELD,
    14
            O             TO <STATUS>-CUR_OFFSET,
    15
            MARK_EXTRACT  TO <STATUS>-MK_XT,
    16
            MARK_TOTAL    TO <STATUS>-MK_TO,
    17
            FUNCTION      TO <STATUS>-FCODE.
    18
      IF L EQ 0.
    19
        MOVE 1 TO <STATUS>-CUR_LINE.
    20
      ELSE.
    21
        MOVE L TO <STATUS>-CUR_LINE.
    22
      ENDIF.
    23
    ENDFORM.                               "UPDATE_STATUS