- 1、本文档共16页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
function?ZGA_PU_COMP_PRICE_BOM.
*----------------------------------------------------------------------
**Local?Interface:
*??IMPORTING
*?????VALUE(I_AUFNR)?TYPE??AUFNR
*?????VALUE(I_EBAN)?TYPE??EBAN
*?????VALUE(I_COM2)?TYPE??ZGA_PU_COM2
*?????VALUE(I_WERKS)?TYPE??WERKS_D?OPTIONAL
*??EXPORTING
*?????VALUE(E_PRICE)?TYPE??ZPRICE
*??TABLES
*??????IT_MSG?STRUCTURE??ZGA_PU_COMP_MSG?OPTIONAL
*----------------------------------------------------------------------
clear:g_aufnr,gwa_com1,gwa_com2,gwa_comf,gwa_eban.
refresh:git_com2,git_bom_com2.
refresh:it_msg,git_msg.
g_lifnr?=?i_com2-lifnr.
g_aufnr?=?i_aufnr.
gwa_com2?=?i_com2.
gwa_eban?=?i_eban.
data:
????lit_msg_bom?type?table?of??zga_pu_comp_msg?with?header?line.
data:
????lit_bom_structure?type?table?of?zga_bom_structure?with?header?line.
call?function?ZGA_P_BOM_STRUCTURE
exporting
??i_aufnr???????????????????=?i_aufnr
changing
??c_it_bom_structure????????=?lit_bom_structure[]
exceptions
??no_production_order_found?=?1
??no_reservation_found??????=?2
??others????????????????????=?3.
if?sy-subrc??0.
*?MESSAGE?ID?SY-MSGID?TYPE?SY-MSGTY?NUMBER?SY-MSGNO
*?????????WITH?SY-MSGV1?SY-MSGV2?SY-MSGV3?SY-MSGV4.
exit.
endif.
data:
????begin?of?lit_matnr?occurs?0,
??????matnr?type?matnr,
????end?of?lit_matnr.
loop?at?lit_bom_structure.
lit_matnr-matnr?=?lit_bom_structure-matnr.
collect?lit_matnr.
endloop.
sort?lit_matnr?by?matnr.
data:
????begin?of?lit_fmnum?occurs?0,
??????matnr?type?matnr,
??????fmnum?type?zfmnum,
????end?of?lit_fmnum.
select?*?into?corresponding?fields?of?table?git_bom_com2?from?zga_pu_com2
for?all?entries?in?lit_matnr
where?active?=?X
??and?cal?=?C
??and?matnr?=?lit_matnr-matnr
??and?lifnr?=?i_com2-lifnr
??and?frdate?=?sy-datum
??and?todate?=?sy-datum
??and?werks?=?i_werks.
sort?git_bom_com2?by?matnr.
data:
????lit_bom?like?table?of?git_bom?with?header?line.
data:
????lit_com2_bom?like?table?of?zga_pu_com2?with?header?line,
????lit_com2_bom_i?like?table?of?zga_pu_com2?with?header?line.
data:
????lc_find,
????l
您可能关注的文档
- 测量平面度误差.ppt
- 塔吊施工方案人防.doc
- 电解原理公开课.ppt
- 煤矿安全技术措施.doc
- 制作作息时间表.ppt
- 小说人物形象分析.ppt
- NCV65BOM主辅计量更改手册.docx
- 第二章-打蜡及抛光.ppt
- 新概念第三册lesson36.ppt
- 《地震中的父与子》.ppt
- 浙江金华市公共资源交易中心永康市分中心编外人员招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 浙江宁波慈溪市政协办公室招考聘用编外工作人员笔试历年典型考题及考点研判与答案详解.docx
- 浙江金华永康市西溪镇人民政府招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 福建南平市公安局建阳分局招考聘用辅警笔试历年典型考题及考点研判与答案详解.docx
- 浙江嘉兴海盐县武原街道基层残疾人工作专职委员(公益岗位)招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 浙江宁波知识产权保护中心招考聘用工作人员笔试历年典型考题及考点研判与答案详解.docx
- 浙江杭州建德市面向2024届普通高校毕业生招考聘用教师(第二批)16人笔试历年典型考题及考点研判与答案详解.docx
- 浙江省台州中学面向2024届普通高校毕业生招考聘用教师12人笔试历年典型考题及考点研判与答案详解.docx
- 湖北师范大学体育学院专任教师招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 重庆市南岸区教育事业单位面向2024届高校毕业生招考聘用114人笔试历年典型考题及考点研判与答案详解.docx
文档评论(0)