SAP Knowledge Base Article - Preview

2383725 - SPRO | SM30 | The maintenance dialog for xxx is incomplete or not defined

Symptom

Message No. SV037 The maintenance dialog for xxx is incomplete or not defined is raised in transaction SPRO or SM30


Read more...

Environment

This KBA applies to all SAP Products based on NetWeaver and S4H.

Keywords

Der Pflegedialog für & ist unvollständig oder nicht definiert
The called function with the view/table needs a special maintenance dialog which, however, either does not exist at all, or does not exist completely.
The called function cannot be performed.
Generate the required maintenance dialog.
Die aufgerufene Funktion mit der Tabelle bzw. View  benötigt einen speziellen Pflegedialog. Dieser ist jedoch nicht oder nicht vollständig vorhanden.
Die aufgerufene Funktion kann nicht durchgeführt werden.
Erzeugen Sie den benötigten Pflegedialog. *&---------------------------------------------------------------------*
*& Report ZSLA_INSERT_MISSING_TVDIR_11
*&---------------------------------------------------------------------*
*& Insert missing TVDIR
*&---------------------------------------------------------------------*
REPORT ZSLA_INSERT_MISSING_TVDIR_11.
DATA tvdir_table TYPE STANDARD TABLE OF tvdir.
DATA r LIKE tvdir.
DATA ls_message   TYPE hier_mess.
DATA lv_flg_saved TYPE abap_bool.
DATA ls_e071  TYPE ko200.
DATA lt_e071k_row TYPE e071k.
DATA lt_e071k TYPE STANDARD TABLE OF e071k.
DATA devclass LIKE tdevc-devclass.
DATA area LIKE tlibg-area.
DATA tabname LIKE tvdir-tabname.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = '/IWFND/COF'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = '/IWFND/V_DFSYAL'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = '/IWFND/V_DFSYAL'.
    IF sy-subrc <> 0.
      r-tabname = '/IWFND/V_DFSYAL'.
      r-area = '/IWFND/V_DFSYAL'.
      r-devclass = '/IWFND/COF'.
      r-type = '1'.
      r-liste = '1'.
      r-gendate = '20130509'.
      r-gentime = '162316'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = '/IWBEP/BEP_DT'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = '/IWBEP/FG_TABLES'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = '/IWBEP/C_SYSTEM'.
    IF sy-subrc <> 0.
      r-tabname = '/IWBEP/C_SYSTEM'.
      r-area = '/IWBEP/FG_TABLES'.
      r-devclass = '/IWBEP/BEP_DT'.
      r-type = '1'.
      r-liste = '1'.
      r-bastab = 'X'.
      r-gendate = '20120525'.
      r-gentime = '135741'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'FAA_SFWS_1'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'AA_CUS_PARAL_VAL'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'V_T093BSN_PARVAL'.
    IF sy-subrc <> 0.
      r-tabname = 'V_T093BSN_PARVAL'.
      r-area = 'AA_CUS_PARAL_VAL'.
      r-devclass = 'AA_BAS_CUS_SFWS_1'.
      r-type = '2'.
      r-liste = '10'.
      FREE r-bastab.
      r-detail = '11'.
      r-gendate = '20120326'.
      r-gentime = '134523'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'FAA_SFWS_1'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'FAA_CFG_UI_SFWS1'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'V_T095_ACI'.
    IF sy-subrc <> 0.
      r-tabname = 'V_T095_ACI'.
      r-area = 'FAA_CFG_UI_SFWS1'.
      r-devclass = 'FAA_SFWS_1'.
      r-type = '1'.
      r-liste = '110'.
      r-gendate = '20121205'.
      r-gentime = '145434'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'V_T095_ACI_EX'.
    IF sy-subrc <> 0.
      r-tabname = 'V_T095_ACI_EX'.
      r-area = 'FAA_CFG_UI_SFWS1'.
      r-devclass = 'FAA_SFWS_1'.
      r-type = '1'.
      r-liste = '120'.
      r-gendate = '20121205'.
      r-gentime = '151329'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'FINS_ACDOC_CUST'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'FINS_LEDGER_CUST'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'FINSV_VERSN_LD'.
    IF sy-subrc <> 0.
      r-tabname = 'FINSV_VERSN_LD'.
      r-area = 'FINS_LEDGER_CUST'.
      r-devclass = 'FINS_ACDOC_CUST'.
      r-type = '1'.
      r-liste = '555'.
      r-gendate = '20151126'.
      r-gentime = '130952'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'GLO-EDO'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'EDOT'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'T003EDOCV'.
    IF sy-subrc <> 0.
      r-tabname = 'T003EDOCV'.
      r-area = 'EDOT'.
      r-devclass = 'GLO-EDO'.
      r-type = '1'.
      r-liste = '13'.
      r-gendate = '20140804'.
      r-gentime = '102336'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'P_SRA018_ODATA'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'SRA018_FG01'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SRA018_T_CONFIG'.
    IF sy-subrc <> 0.
      r-tabname = 'SRA018_T_CONFIG'.
      r-area = 'SRA018_FG01'.
      r-devclass = 'P_SRA018_ODATA'.
      r-type = '1'.
      r-liste = '20'.
      r-bastab = 'X'.
      r-gendate = '20130418'.
      r-gentime = '214518'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'PB37'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'HRPAYBR_EFD_MSGS'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'V_T7BREFD_MSGS'.
    IF sy-subrc <> 0.
      r-tabname = 'V_T7BREFD_MSGS'.
      r-area = 'HRPAYBR_EFD_MSGS'.
      r-devclass = 'PB37'.
      r-type = '1'.
      r-liste = '1'.
      FREE r-bastab.
      r-gendate = '20151110'.
      r-gentime = '133039'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'PPH_GENERAL'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'SDM_CUST'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_AOR_PROF_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_AOR_PROF_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '1'.
      r-liste = '200'.
      FREE r-detail.
      FREE r-bastab.
      r-gendate = '20131106'.
      r-gentime = '075424'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_DEM_PROF01_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_DEM_PROF01_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '1'.
      r-liste = '100'.
      FREE r-detail.
      FREE r-bastab.
      r-gendate = '20130823'.
      r-gentime = '144520'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_DEM_PROF_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_DEM_PROF_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '2'.
      r-liste = '80'.
      r-detail = '90'.
      FREE r-bastab.
      r-gendate = '20131106'.
      r-gentime = '135754'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_MSH_PROF_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_MSH_PROF_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '2'.
      r-liste = '130'.
      r-detail = '140'.
      FREE r-bastab.
      r-gendate = '20131109'.
      r-gentime = '171543'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_REC_PROF01_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_REC_PROF01_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '1'.
      r-liste = '50'.
      FREE r-detail.
      FREE r-bastab.
      r-gendate = '20130828'.
      r-gentime = '142205'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'SDM_REC_PROF_V'.
    IF sy-subrc <> 0.
      r-tabname = 'SDM_REC_PROF_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '2'.
      r-liste = '30'.
      r-detail = '40'.
      FREE r-bastab.
      r-gendate = '20130828'.
      r-gentime = '141845'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'TTPFK_V'.
    IF sy-subrc <> 0.
      r-tabname = 'TTPFK_V'.
      r-area = 'SDM_CUST'.
      r-devclass = 'PPH_GENERAL'.
      r-type = '2'.
      r-liste = '1'.
      r-detail = '2'.
      FREE r-bastab.
      r-gendate = '20131104'.
      r-gentime = '170637'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = 'GLO-EDO'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = 'EDOT2'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'EDOSHIPMSTATUSV'.
    IF sy-subrc <> 0.
      r-tabname = 'EDOSHIPMSTATUSV'.
      r-area = 'EDOT2'.
      r-devclass = 'GLO-EDO'.
      r-type = '1'.
      r-liste = '21'.
      FREE r-detail.
      FREE r-bastab.
      r-gendate = '20180702'.
      r-gentime = '135716'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = 'EDOTVROV'.
    IF sy-subrc <> 0.
      r-tabname = 'EDOTVROV'.
      r-area = 'EDOT2'.
      r-devclass = 'GLO-EDO'.
      r-type = '1'.
      r-liste = '20'.
      FREE r-detail.
      FREE r-bastab.
      r-gendate = '20180702'.
      r-gentime = '135725'.
      APPEND r TO tvdir_table.
    ENDIF.

  ENDIF.
ENDIF.

SELECT SINGLE devclass FROM tdevc INTO devclass WHERE devclass = '/IWWRK/WF_COMMON'.
IF sy-subrc = 0.
  SELECT SINGLE area FROM tlibg INTO area WHERE area = '/IWWRK/FG_WF_TAB'.
  IF sy-subrc = 0.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = '/IWWRK/V_WFSTEP'.
    IF sy-subrc <> 0.
      r-tabname = '/IWWRK/V_WFSTEP'.
      r-area = '/IWWRK/FG_WF_TAB'.
      r-devclass = '/IWWRK/WF_COMMON'.
      r-type = '1'.
      r-liste = '1'.
      FREE r-bastab.
      r-gendate = '20110714'.
      r-gentime = '063836'.
      APPEND r TO tvdir_table.
    ENDIF.
    SELECT SINGLE tabname FROM tvdir INTO tabname WHERE tabname = '/IWWRK/V_WFDEC'.
    IF sy-subrc <> 0.
      r-tabname = '/IWWRK/V_WFDEC'.
      r-area = '/IWWRK/FG_WF_TAB'.
      r-devclass = '/IWWRK/WF_COMMON'.
      r-type = '1'.
      r-liste = '2'.
      FREE r-bastab.
      r-gendate = '20130101'.
      r-gentime = '131850'.
      APPEND r TO tvdir_table.
    ENDIF.
  ENDIF.
ENDIF.

ls_e071-pgmid = 'R3TR'.
ls_e071-object = 'TABU'.
ls_e071-obj_name = 'TVDIR'.
ls_e071-objfunc = 'K'.

LOOP AT tvdir_table INTO r.
  lt_e071k_row-pgmid = 'R3TR'.
  lt_e071k_row-object = 'TABU'.
  lt_e071k_row-objname = 'TVDIR'.
  lt_e071k_row-mastertype = 'TABU'.
  lt_e071k_row-mastername = 'TVDIR'.
  lt_e071k_row-tabkey = r-tabname.
  APPEND lt_e071k_row TO lt_e071k.
ENDLOOP.

CALL FUNCTION 'TR_OBJECT_CHECK'
  EXPORTING
    wi_ko200                = ls_e071
  TABLES
    wt_e071k                = lt_e071k
  EXCEPTIONS
    cancel_edit_other_error = 1
    show_only_other_error   = 2
    OTHERS                  = 3.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 DISPLAY LIKE sy-msgty.
  RETURN.
ENDIF.

CALL FUNCTION 'TR_OBJECT_INSERT'
  EXPORTING
    wi_ko200                = ls_e071
  TABLES
    wt_e071k                = lt_e071k
  EXCEPTIONS
    cancel_edit_other_error = 1
    show_only_other_error   = 2
    OTHERS                  = 3.

IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 DISPLAY LIKE sy-msgty.
  RETURN.
ENDIF.

INSERT tvdir FROM TABLE tvdir_table ACCEPTING DUPLICATE KEYS.

FREE: tvdir_table, ls_e071, lt_e071k, lt_e071k_row. , KBA , BC-CUS-TOL-TME , View Maintenance Tool , Problem

About this page

This is a preview of a SAP Knowledge Base Article. Click more to access the full version on SAP ONE Support launchpad (Login required).

Search for additional results

Visit SAP Support Portal's SAP Notes and KBA Search.