点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

大家好，

请帮助我。

我正在

如果使用附加的"对于itab中的所有条目"，则字段" WERKS"和" ITMARC-WERKS"必须具有相同的类型和相同的长度。 在

报告zmanoj。
 桌子：mara，marc，t001w。
 TYPE-POOLS：slis。
 类型：ty_mara的开头，
           matnr TYPE matnr，
           mtart TYPE mtart，
         结束于ty_mara。
 类型：ty_marc的开头，
           matnr TYPE matnr，
           TYPE怪人，
         ty_marc结束。
 类型：开始于ty_t001w，
           TYPE怪人，
           name1 TYPE name1，
         结束于ty_t001w。
 类型：ty_final的开始，
           matnr TYPE mara-matnr，
           mtart TYPE mara-mtart，
           werks TYPE marc-werks，
           名称1类型t001w-名称1，
         ty_final结束。
 数据：TYPE TABLE OF ty_final，
        wa TYPE ty_final。
 数据：ty_mara的itmara类型表，
        wamara TYPE ty_mara。
 数据：ty_marc的itmarc类型表，
        wamarc TYPE ty_marc。
 数据：ty_t001w的类型表，
        wat001w TYPE ty_t001w。
 DATA repid TYPE sy-repid。
 数据：it_fieldcat类型slis_t_fieldcat_alv，
       wa_fieldcat TYPE slis_fieldcat_alv，
       布局类型slis_layout_alv。

 带有标题标题文本001的b1块的选择屏幕开始。
 选择选项：s_matnr用于mara-matnr。
 块b的选择屏幕结束。

 选择开始。

   选择矩阵
          mtart
     从玛拉到桌子itmara
     s_matnr中的matnr。

   如果itmara不是初始的。
     选择矩阵
            怪癖
       从marc到表itmarc
       对于itmara中的所有条目
       matnr = itmara-matnr。
   万一。

 <---------我在这里遇到错误------->
   如果itmarc不是初始的。
     选择名称1
            怪癖
       从t001w到表itt001w
       对于itmarc中的所有条目
    工作地点= itmarc-werks。  ------在此链接中！！！
   万一。


   在itmarc上环环相扣。
     wa-matnr = wamarc-matnr。
     wa-werks = wamarc-werks。
     使用键matnr = wamarc-matnr将表itmara读入wamara。
     wa-mtart = wamara-mtart。
     使用密钥werks = wamarc-werks将表itt001w读入wat001w。
     wa-name1 = wat001w-name1。
     附加到它。
     清除：wa，wamara，wamarc，wat001w。
   结局。


   wa_fieldcat-fieldname ='MATNR'。
   wa_fieldcat-ref_tabname ='MARA'。
   wa_fieldcat-seltext_m ='会计凭证编号'。
   将wa_fieldcat附加到it_fieldcat。
   清除wa_fieldcat。

   wa_fieldcat-fieldname ='MTART'。
   wa_fieldcat-ref_tabname ='MARA'。
   wa_fieldcat-seltext_m ='会计'。
   将wa_fieldcat附加到it_fieldcat。
   清除wa_fieldcat。

   wa_fieldcat-fieldname ='WERKS'。
   wa_fieldcat-ref_tabname ='MARC'。
   wa_fieldcat-seltext_m ='Accouncument Number'。
   将wa_fieldcat附加到it_fieldcat。
   清除wa_fieldcat。

   wa_fieldcat-fieldname ='NAME1'。
   wa_fieldcat-ref_tabname ='T001W'。
   wa_fieldcat-seltext_m ='Accou'。
   将wa_fieldcat附加到it_fieldcat。
   清除wa_fieldcat。


 呼叫FUNCTION'REUSE_ALV_GRID_DISPLAY'
 出口
 * I_INTERFACE_CHECK =''
 * I_BYPASSING_BUFFER =''
 * I_BUFFER_ACTIVE =''
 i_callback_program =快速
 * I_CALLBACK_PF_STATUS_SET =''
 * I_CALLBACK_USER_COMMAND =''
 * I_CALLBACK_TOP_OF_PAGE =''
 * I_CALLBACK_HTML_TOP_OF_PAGE =''
 * I_CALLBACK_HTML_END_OF_LIST =''
 * I_STRUCTURE_NAME =
 * I_BACKGROUND_ID =''
 i_grid_title ='会计凭证详细信息'
 * I_GRID_SETTINGS =
 * IS_LAYOUT =
 it_fieldcat = it_fieldcat
 * IT_EXCLUDING =
 * IT_SPECIAL_GROUPS =
 * IT_SORT =
 * IT_FILTER =
 * IS_SEL_HIDE =
 * I_DEFAULT ='X'
 * I_SAVE =''
 * IS_VARIANT =
 * IT_EVENTS =
 * IT_EVENT_EXIT =
 * IS_PRINT =
 * IS_REPREP_ID =
 * I_SCREEN_START_COLUMN = 0
 * I_SCREEN_START_LINE = 0
 * I_SCREEN_END_COLUMN = 0
 * I_SCREEN_END_LINE = 0
 * I_HTML_HEIGHT_TOP = 0
 * I_HTML_HEIGHT_END = 0
 * IT_ALV_GRAPHICS =
 * IT_HYPERLINK =
 * IT_ADD_FIELDCAT =
 * IT_EXCEPT_QINFO =
 * IR_SALV_FULLSCREEN_ADAPTER =
 *重要
 * E_EXIT_CAUSED_BY_CALLER =
 * ES_EXIT_CAUSED_BY_USER =
     桌子
       t_outtab =它。
 *例外情况
 * PROGRAM_ERROR = 1
 *其他= 2