Abap报告退出详细信息

2020-08-15 07:14发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)任何人都可以用这段代码来帮助我,...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

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


任何人都可以用这段代码来帮助我,我在这里尝试将表pa0000和zempdetl中的两个内部连接。

我这样出错了

转义时,必须使用@转义所有主机变量。 变量L_DAT的逸出方式与前面的宿主变量不同。

这是我的代码。

报告zhr_exitdetails。

表格:pa0000,zempdetl。

类型:ty_struc的开始,
pernr类型pa0000-pernr,
begda类型pa0000-begda,
massn TYPE pa0000-massn,
ty_struc的结尾。
DATA:ty_struc的itab TYPE表,
wa ty_struc的类型。


TYPES:ty_struc1的开头,
部门TYPE zempdetl部门,
emp_plantloc TYPE ZEMPDETL-emp_plantloc,性别TYPE ZEMPDETL-gender,
ty_struc1的结尾。
数据:itab01 ty_struc1的类型表,
wa01 ty_struc1的类型。 br>
TYPES:ty_final的开始,
pernr TYPE pa0000-pernr,
begda TYPE pa0000-begda,
massn TYPE pa0000-massn,
部门类型zempdetl-部门,
emp_plantloc TYPE zempdetl-emp_plantloc,
性别TYPE zempdetl-gender,
ty_final结尾。
DATA:itab02 ty_final类型表,
wa02 TYPE ty_final类型。

DATA:i_layout TYPE slis_layout_alv,
i_events类型slis_t_event,
i_fieldtab TYPE slis_t_fieldcat_alv,
s_fieldtab类似于i_fieldtab的产品线。

S 带有标题标题文本001的块btop的选举屏幕开始。 " ZHR_COP_BDC <选择>选项:l_dat用于pa0000-begda。
选择屏幕结束的块btop。


开始选择。

执行get_data。
PERFORM显示。


FORM get_data。

从pa0000中选择a〜pernr,a〜begda,a〜massn,b〜部门,b〜emp_plantloc,b〜gender 在a_pernr EQ b_empid上作为联接zempdetl AS b进入表@ itab02的对应字段,其中l_dat中a〜massn ='ZJ'和a〜begda。

ENDFORM。

FORM显示。
* ---------------------------------------- -------------------------------------
清除:i_layout。
i_layout-zebra ='X'。
i_layout-colwidth_optimize ='X'。


s_fieldtab-col_pos ='1'。
s_fieldtab-fieldname ='PERNR'。
s_fieldtab-seltext_m ='EMPLOYEE NUMBER'。
将s_fieldtab附加到i_fieldtab。
清除s_fieldtab。

s_fieldtab-col_pos ='2'。
s_fieldtab-fieldname ='BEGDA'。
s_fieldtab- seltext_m ='开始日期'。
附加s_fieldtab到i_fieldtab。
清除s_fieldtab。

s_fieldtab-col _pos ='3'。
s_fieldtab-fieldname ='MASSN'。
s_fieldtab-seltext_m ='ACTION TAKEN'。
将s_fieldtab附加到i_fieldtab。
清除s_fieldtab。

s_fieldtab -col_pos ='4'。
s_fieldtab-fieldname ='DEPARTMENT'。
s_fieldtab-seltext_m ='DEPARTMENT'。
附加s_fieldtab到i_fieldtab。
清除s_fieldtab。

s_fieldtab -col_pos ='5'。
s_fieldtab-fieldname ='EMP_PLANTLOC'。
s_fieldtab-seltext_m ='LOCATION'。
追加s_fieldtab到i_fieldtab。
清除s_fieldtab。

s_fieldtab -col_pos ='6'。
s_fieldtab-fieldname ='GENDER'。
s_fieldtab-seltext_m ='GENDER'。
将s_fieldtab附加到i_fieldtab。
清除s_fieldtab。


调用功能'REUSE_ALV_GRID_DISPLAY'
导出
i_callback_program ='SY-REPID'
is_layout = i_layout
it_fieldcat = i_fieldtab []
i_default ='X'
表格
t_outtab = itab02
例外情况
程序错误= 1
其他=2。
ENDFORM。