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 VIM_SET_GLOBAL_FIELD_VALUE                               *
    3
    *&--------------------------------------------------------------------*
    4
    * set global field value (for external call)                          *
    5
    *&--------------------------------------------------------------------*
    6
    FORM VIM_SET_GLOBAL_FIELD_VALUE USING VALUE(NAME_OF_FIELD_TO_SET) TYPE C
    7
                                          VALUE(TYPE_OF_FIELD_TO_SET) TYPE C
    8
                                          VALUE(VALUE_TO_SET)
    9
                                          VSGFV_RETURN LIKE SY-SUBRC.
    10
    11
      FIELD-SYMBOLS: <FIELD>.
    12
      ASSIGN (NAME_OF_FIELD_TO_SET) TO <FIELD> TYPE TYPE_OF_FIELD_TO_SET.
    13
      IF SY-SUBRC EQ 0.
    14
        <FIELD> = VALUE_TO_SET.
    15
      ENDIF.
    16
      VSGFV_RETURN = SY-SUBRC.
    17
    ENDFORM.                               "vim_set_global_field_value