整车行业 SAP APO 开发备忘(刘欣)
生活随笔
收集整理的這篇文章主要介紹了
整车行业 SAP APO 开发备忘(刘欣)
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
一、計劃訂單:
/SAPAPO/ORDKEY:計劃訂單
/SAPAPO/ORDMAP: ORDID?mapping ORDNO
PVCMPD: 超級BOM表,一個車型平臺代表一種SBOM
二、訂單物料反沖
PPC_HEAD:計劃訂單反沖表頭,里面有計劃訂單號,報工點,報工數量,車間。
代碼示例:
select SINGLE ORDERIDFROM PPC_ORD_INFWHERE ORDERNR = @lt_shop-ordnoINTO @DATA(gv_ORDERID).SELECT a~REPPOINT,c~REPPOINT_EXT, a~FLG_REVERSAL,a~CONFQUANTFROM PPC_HEAD as aINNER JOIN PPC_RP as c ON a~REPPOINT = c~REPPOINTWHERE ORDERID = @GV_ORDERIDINTO TABLE @GT_head.LOOP AT GT_head ASSIGNING FIELD-SYMBOL(<fs>).IF <fs>-FLG_REVERSAL = 'X' and <fs>-CONFQUANT = 1.<fs>-CONFQUANT = -1.ENDIF.IF <fs>-REPPOINT_EXT CS '2999'. <fs>-REPPOINT_EXT = 'BS'. ENDIF.IF <fs>-REPPOINT_EXT CS '4999'. <fs>-REPPOINT_EXT = 'PS'. ENDIF.IF <fs>-REPPOINT_EXT CS '6999'. <fs>-REPPOINT_EXT = 'GA'. ENDIF.COLLECT <fs> INTO GT_head_COLLECT.ENDLOOP.三、物料:
/SAPAPO/PEGKEY:? ?Planning object? ?(?物料ID、位置ID、計劃版本)
/SAPAPO/MATKEY:? ? 物料表? ? (物料ID、物料號、物料描述)
/SAPAPO/LOC:? ? ?????????位置表? ? (位置ID、位置編號)
/SAPAPO/MATLOC:? ? 物料位置? ? (物料ID、位置ID、生產計劃員、采購組)
/SAPAPO/MATTXT:? ? 物料描述? ? (物料ID、物料文本)
/sapapo/acckey:? ? ?賬號分配? ? (賬號ID、庫存標識)
示例代碼:
FORM frm_get_peg_info .SELECT DISTINCTa~pegida~locidc~locnoa~matidb~matnrb~meinsb~matkld~planner_ppsd~ekgrpe~maktxf~sskeyFROM /sapapo/pegkey AS aJOIN /sapapo/matkey AS bON a~matid = b~matidJOIN /sapapo/loc AS cON a~locid = c~locidJOIN /sapapo/matloc AS dON a~matid = d~matidAND a~locid = d~locidLEFT JOIN /sapapo/mattxt AS eON a~matid = e~matidAND e~langu = sy-languLEFT JOIN /sapapo/acckey AS fON a~accid = f~accidINTO TABLE gt_pegkeyWHERE c~locno = p_werks.IF sy-subrc <> 0.MESSAGE s003 DISPLAY LIKE 'E'.gv_error_flg = 'X'.RETURN. "==============================>ENDIF.ENDFORM.四、獲取計劃訂單的BOM組件:
CALL FUNCTION '/SAPAPO/OM_ORDER_GET_DATA'EXPORTINGis_gen_params = gs_gen_paramsiv_simsession = spaceit_order = table_ordidIMPORTINGet_ordkeys = tmp_ordkeyset_activities = tmp_activitieset_inputs = tmp_inputset_outputs = tmp_outputsEXCEPTIONSlc_connect_failed = 1lc_com_error = 2lc_appl_error = 3OTHERS = 4.五、已知訂單ID,獲取整車物料:
"---------------得到成品物料,再通過PEGID得到后續(xù)數據-------------CALL FUNCTION '/SAPAPO/OM_ORDER_GET_DATA'EXPORTINGis_gen_params = gs_gen_paramsiv_simsession = spaceit_order = lt_ordidIMPORTINGet_ext_outputs = gt_outputs" ET_ACTIVITIES = gt_ACTIVITIESEXCEPTIONSlc_connect_failed = 1lc_com_error = 2lc_appl_error = 3OTHERS = 4.SELECT * INTO TABLE gt_pegkey FROM /SAPAPO/PEGKEY. SELECT * INTO TABLE gt_MATKEY FROM /SAPAPO/MATKEY. SELECT * INTO TABLE gt_ACCKEY FROM /SAPAPO/ACCKEY. SELECT * INTO TABLE gt_CAWN FROM CAWN. SELECT * INTO TABLE gt_CAWNT FROM CAWNT."填充物料READ TABLE gt_outputs WITH KEY orderid = <gs_act>-orderid INTO DATA(gs).IF sy-subrc = 0.<gs_act>-PEGID = gs-PEGID. "填充ordnoREAD TABLE gt_pegkey WITH KEY pegid = <gs_act>-pegid INTO DATA(tmp).IF sy-subrc = 0.<gs_act>-matid = tmp-matid.<gs_act>-accid = tmp-accid.READ TABLE gt_matkey WITH KEY matid = <gs_act>-matid INTO DATA(oth).IF sy-subrc = 0.<gs_act>-matnr = oth-matnr.ENDIF.ENDIF.ENDIF.未完。。。
總結
以上是生活随笔為你收集整理的整车行业 SAP APO 开发备忘(刘欣)的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 对待新技术的看法
- 下一篇: 防拍照防截屏,360企业安全云推“屏幕水