多层扩展BOM的函数

<!--StartFragment -->相关的多层扩展bom的函数有很多,下面列出的是 三个最常用的物料bom扩展函数和两个文档结构扩展函数。

当然后有其它一些相关的函数,这些函数都是cs_bom开头。

在使用的时候注意这个属性 MEHRS ,如果 MEHRS = 'X' 则会多层扩展,否则,只打开当前bom。

DATA:stbTYPESTANDARDTABLEOFstpoxWITHHEADERLINE.
DATA:matcatTYPESTANDARDTABLEOFcscmatWITHHEADERLINE.
<!--StartFragment --><!--StartFragment -->

p_matTYPErc29l-matnrOBLIGATORY, 物料号
p_werTYPErc29l-werksDEFAULT'2000',"工厂
p_stlTYPErc29l-stlal,"可选择的bom
p_capTYPErc29l-capidOBLIGATORY,"bom应用 PP01 ZDES
p_datTYPErc29l-datuvDEFAULTsy-datum."日期

"扩展物料BOM1

CALLFUNCTION'CS_BOM_EXPL_MAT_V2'
EXPORTING
capid=p_cap
datuv=p_dat
mehrs='X'
mtnrv=p_mat
stlal=p_stl

werks=p_wer

IMPORTING
topmat=topmat
TABLES
stb=stb " 详细列表
matcat=matcat "BOM列表
EXCEPTIONS
alt_not_found=1
call_invalid=2
material_not_found=3
missing_authorization=4
no_bom_found=5
no_plant_data=6
no_suitable_bom_found=7
conversion_error=8
OTHERS=9.
IFsy-subrc<>0.
*MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MSGNO
*WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ENDIF.

"扩展物料BOM2

DATA:stbpTYPESTANDARDTABLEOFCSXGENWITHHEADERLINE.

CALLFUNCTION'CS_BOM_EXPLOSION'
EXPORTING
capid=p_cap
datuv=p_dat
mehrs='X'
mtnrv=p_mat
stlal=p_stl

werks=p_wer

IMPORTING
topmat=topmat
TABLES
stb=stb " 详细列表
matcat=matcat "BOM列表
EXCEPTIONS
ALT_NOT_FOUND=1
CALL_INVALID=2
MISSING_AUTHORIZATION=3
NO_BOM_FOUND=4
NO_PLANT_DATA=5
NO_SUITABLE_BOM_FOUND=6
OBJECT_NOT_FOUND=7
CONVERSION_ERROR=8
OTHERS=9IFsy-subrc<>0.
*MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MSGNO
*WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ENDIF.

"扩展物料BOM3

DATA:stbTYPESTANDARDTABLEOFstpolWITHHEADERLINE.

CALLFUNCTION'CS_BOM_EXPLOSION'
EXPORTING
capid=p_cap
datuv=p_dat
mehrs='X'
mtnrv=p_mat
stlal=p_stl

werks=p_wer

IMPORTING
topmat=topmat
TABLES
stb=stb " 详细列表
<!--StartFragment -->EXCEPTIONS
ALT_NOT_FOUND=1
CALL_INVALID=2
MATERIAL_NOT_FOUND=3
MISSING_AUTHORIZATION=4
NO_BOM_FOUND=5
NO_PLANT_DATA=6
NO_SUITABLE_BOM_FOUND=7
OTHERS=8
IFsy-subrc<>0.
*MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MSGNO
*WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ENDIF.

<!--StartFragment -->
"扩展文档结构1
<!--StartFragment -->

CALLFUNCTION'CS_BOM_EXPL_DOC_V1'
EXPORTING
DATUV=sy-datum
docnr=文档号
docar= 类型
doctl=部分
docvr=版本

IMPORTING
TOPDOC=返回文档结构头的文档信息
tables
stb= 返回详细清单
doccat= 返回文档结构的清单(有几个文档结构)
EXCEPTIONS
CALL_INVALID=1
DOCUMENT_NOT_FOUND=2
MISSING_AUTHORIZATION=3
NO_BOM_FOUND=4
NO_SUITABLE_BOM_FOUND=5
BOM_NOT_ACTIVE=6
BOM_FLAGGED_FOR_DELETION=7
BOM_WITHOUT_POSITIONS=8
OTHERS=9
.
IFsy-subrc<>0.
*MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MSGNO
*WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ENDIF.


"扩展文档结构2

<!--StartFragment -->CALLFUNCTION'CS_BOM_EXPL_GNRL2_V1'
EXPORTING

DATUV=sy-datum
docnr=文档号
docar= 类型
doctl=部分
docvr=版本
MEHRS='X'

<!--StartFragment -->IMPORTING
TOPDOC=
=
tables
stbd=
stbp=
EXCEPTIONS
CALL_INVALID=1
OBJECT_NOT_FOUND=2
MISSING_AUTHORIZATION=3
NO_BOM_FOUND=4
NO_SUITABLE_BOM_FOUND=5
BOM_NOT_ACTIVE=6
BOM_FLAGGED_FOR_DELETION=7
BOM_WITHOUT_POSITIONS=8
OTHERS=9
.
IFsy-subrc<>0.
*MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MSGNO
*WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ENDIF.

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值