根据proj-pspid 找物料

最新推荐文章于 2021-07-22 20:53:16 发布

阿土sap

最新推荐文章于 2021-07-22 20:53:16 发布

阅读量947

点赞数

CC 4.0 BY-SA版权

分类专栏： SAP 文章标签： duplicates join header delete table function

本文链接：https://blog.youkuaiyun.com/chfeijj/article/details/2593241

SAP 专栏收录该内容

181 篇文章

订阅专栏

本文介绍了一种使用ABAP编程语言从特定项目阶段中查找并筛选物料的方法。通过联接多个表，实现根据项目阶段编号（PSPID）获取物料号（MATNR），并对结果进行排序、去重及过滤空白值等操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

根据proj-pspid 找物料

data: begin of st, matnr like mara-matnr, end of st.

data: it_matnr like standard table of st with header line. data: rtn like ddshretval occurs 0 with header line.

data: l_pspnr like proj-pspnr.

ranges: l_matkl for t023t-matkl. l_matkl-sign = 'I'. l_matkl-option = 'BT'. l_matkl-low = 'L0601'. l_matkl-high = 'L0606'. append l_matkl.

select single pspnr into l_pspnr from proj where proj~pspid = proj-pspid.

select o~matnr into corresponding fields of table it_matnr from ebkn as n inner join prps as r on n~ps_psp_pnr = r~pspnr inner join eban as p on n~banfn = p~banfn inner join ekpo as o on p~banfn = o~banfn and o~bnfpo = p~bnfpo where r~psphi eq l_pspnr and p~matkl in l_matkl.

sort it_matnr. delete adjacent duplicates from it_matnr comparing matnr. delete it_matnr where matnr eq space.

call function 'F4IF_INT_TABLE_VALUE_REQUEST' exporting retfield = 'MATNR' dynpprog = sy-cprog dynpnr = sy-dynnr dynprofield = 'MATNR' stepl = sy-stepl window_title = '物料' value_org = 'S' tables value_tab = it_matnr return_tab = rtn exceptions parameter_error = 1 no_values_found = 2 others = 3.