Eigenschaften | Quelltext
Titel | COMPLETE_EXPROFIELDS |
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 COMPLETE_EXPROFIELDS                                     *
    3
    *---------------------------------------------------------------------*
    4
    *  fill read only fields of referenced tables (exp ro tables)         *
    5
    *---------------------------------------------------------------------*
    6
    FORM COMPLETE_EXPROFIELDS.
    7
      IF X_HEADER-FRM_RP_CPL NE SPACE.
    8
        PERFORM (X_HEADER-FRM_RP_CPL) IN PROGRAM.
    9
      ELSE.
    10
        PERFORM (COMPL_FORMNAME) IN PROGRAM (SY-REPID) USING <TABLE1>
    11
                                     IF FOUND.
    12
      ENDIF.
    13
      IF VIM_CALLED_BY_CLUSTER NE SPACE.
    14
        CALL FUNCTION 'VIEWCLUSTER_COMPL_SUBSET_VALUE'
    15
             EXPORTING
    16
                  VIEW_NAME = X_HEADER-VIEWNAME
    17
             CHANGING
    18
                  WORKAREA  = <TABLE1>.
    19
      ENDIF.
    20
    ENDFORM.                               "complete_exprofields