ABAP-反查BOM

举报
Mr_blank 发表于 2026/04/02 10:30:53 2026/04/02
【摘要】 告别忙碌低效!本文提供示例,帮助您用更少时间完成更多高质量工作,重获工作与生活平衡。
DATA: lt_usedcat TYPE TABLE OF stpov,
      lt_equicat TYPE TABLE OF cscequi,
      lt_kndcat  TYPE TABLE OF cscknd,
      lt_matcat  TYPE TABLE OF cscmat,
      lt_stdcat  TYPE TABLE OF cscstd,
      lt_tplcat  TYPE TABLE OF csctpl,
      ls_topmat  TYPE mc29s.

"表stpo stko mast

CALL FUNCTION 'CS_WHERE_USED_MAT'
  EXPORTING
    datub                      = '20240101'      " 有效起始日期
    datuv                      = '20261231'      " 有效截止日期
    matnr                      = '000000000011209766'      " 组件
    werks                      = '1009'      " 工厂
  IMPORTING
    topmat                     = ls_topmat
  TABLES
    wultb                      = lt_usedcat   " 上层物料的详细信息
    equicat                    = lt_equicat
    kndcat                     = lt_kndcat
    matcat                     = lt_matcat    " 上层物料的简要信息
    stdcat                     = lt_stdcat
    tplcat                     = lt_tplcat
  EXCEPTIONS
    call_invalid               = 1
    material_not_found         = 2
    no_where_used_rec_found    = 3
    no_where_used_rec_selected = 4
    no_where_used_rec_valid    = 5
    OTHERS                     = 6.

LOOP AT lt_usedcat INTO DATA(ls_userdcat).
ENDLOOP.
LOOP AT lt_equicat INTO DATA(ls_equicat).
ENDLOOP.
LOOP AT lt_kndcat INTO DATA(ls_kndcat).
ENDLOOP.
LOOP AT lt_matcat INTO DATA(ls_matcat).
ENDLOOP.
LOOP AT lt_stdcat INTO DATA(ls_stdcat).
ENDLOOP.
LOOP AT lt_tplcat INTO DATA(ls_tplcat).
ENDLOOP.
【声明】本内容来自华为云开发者社区博主,不代表华为云及华为云开发者社区的观点和立场。转载时必须标注文章的来源(华为云社区)、文章链接、文章作者等基本信息,否则作者和本社区有权追究责任。如果您发现本社区中有涉嫌抄袭的内容,欢迎发送邮件进行举报,并提供相关证据,一经查实,本社区将立刻删除涉嫌侵权内容,举报邮箱: cloudbbs@huaweicloud.com
  • 点赞
  • 收藏
  • 关注作者

评论(0

0/1000
抱歉,系统识别当前为高风险访问,暂不支持该操作

全部回复

上滑加载中

设置昵称

在此一键设置昵称,即可参与社区互动!

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。

*长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。