生產訂單完工確認

1、生產訂單完工確認(CO11N) BAPI :BAPI_PRODORDCONF_CREATE_TT生產完成后，需要對產品進行完工確認（也叫報工確認）；一般情況下，可以通過事務碼（ T-Code ） CO11或CO11N 進行確認。對于一些零配件的生產時，往往需要確認大量的數(shù)量，因而有些用戶就會有批量報工的需求。批量報工可以通過兩種方式實現(xiàn)：錄制BDC或者Call系統(tǒng)標準BAPIo1）錄制BDC這里就不講述了，直接在 CO11N上錄屏即可；Call 系統(tǒng)標準 BAPI : BAPI _PRODORDCONF_CREATE_TT在報工時，當涉及到 倒沖料扣料 的操作時，則需要 Call兩個BAPI來

2、操作：BAPI _PRODORDCONF_GET_TT_PROP獲取生產訂單相關屬性BAPI_PRODORDCONF_CREATE_TT才艮工確認相關操作示例（包括倒沖料操作）：001 *定義數(shù)據內表002 DATA: gt_afko TYPE STANDARD TABLE OF afko.003004* Work Area 定義005DATA: gw_afko TYPE afko,006gw_afpo TYPE afpo,007gw_afvc TYPE afvc,008gw_afvv TYPE afvv.009010DATA: gv_indexTYPE sy-tabix ,011gv_res

3、ult TYPE c.012013DATA:014*BAPI相關定義015proposeLIKE bapi_pp_conf_prop,016timeticketsLIKE bapi_pp_timeticketO017LINE,018goodsmovementsLIKE bapi2017_gm_item_createOCCURS(019link_conf_goodsmovLIKE bapi_link_conf_goodsmovOCCURS 0 W020return_detailLIKE bapi_coru_returnOLINE,021022023024025026027028029030031

4、032033034035036037038039040041042043044045046047048049050051052053054055056057058059060061062063064return更新數(shù)量 更新作業(yè)時間 更新貨物移動LIKE bapiretl0 WITH HEADER LINE.CONSTANTS: cn_flagx TYPE c VALUE X.Get Data.HeaderCLEAR gt_afko.SELECT aufnr rsnum aufplINTO CORRESPONDING FIELDS OF TABLE gt_afkoFROM afkoWHERE

5、aufnr IN so_aufnr 生產工單號Data Proccess.CLEAR gw_afko.LOOP AT gt_afko INTO gw_afko.IF sy-subrc = 0.CLEAR gw_afvc.SELECT SINGLEaufpl訂單工序的工藝路線號aplzl訂單的通用計數(shù)器vornr工序plnfl順序arbidaplfl序列（新）有值INTO CORRESPONDING FIELDS OF gw_afvcFROM afvcWHERE aufpl = gw_afko-aufpl.IF sy-subrc = 0.1.需要更新的數(shù)據設置CLEAR p

6、ose-quantity= cn_pose-date_and_time= cn_pose-goodsmovement= cn_flagx.2.作業(yè)時間CLEAR: timetickets,timetickets.timetickets-orderid timetickets-operation timetickets-yield timetickets-sequence APPEND timetickets. CLEAR timetickets.=gw_print-aufnr.” 工單號=gw_afvc-vornr. 工序號=gw_print-lmnga.”

7、 工單生產數(shù)量=gw_afvc-aplfl. 3.貨物移動屬性第一次賦值，用于獲取相關默認屬性值CLEAR: goodsmovements,goodsmovements.goodsmovements-orderid = gw_print-aufnr.goodsmovements-order_itno = gw_afvc-vornr.APPEND goodsmovements.CLEAR goodsmovements.生產訂單號 工序號4.調用BAPI,獲取默認屬性值CALL FUNCTION BAPI_PRODORDCONF_GET_TT_PROP EXPORTINGpropose IMPOR

8、TING return TABLEStimetickets= propose=return= timeticketsgoodsmovements= goodsmovementslink_conf_goodsmov = link_conf_goodsmov detail_return= return_detail.0650660670680690700710720730740750760770780790800810820830840850860870880890900910920930940950960970980991001011021031041051061071085.輸出異常信息IF

9、return-type =E OR return-type =A.INTO return-message.CONCATENAT蠟誤：return-message gv_result = cn_flagx.ENDIF.LOOP AT return_detail WHERE type IS NOT INITIAL.IF return_detail-type =E OR return_detail-type =A.CONCATENAT躇誤：return_detail-message INTO return-mes gv_result = cn_flagx.ENDIF.1091101111121131

10、14115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152ENDLOOP.6.如若需要更新相關信息，可在此修改- 這里修改作業(yè)時間-IF gv_result NE cn_flagx.CLEAR gv_index.LOOP AT timetickets.gv_index = sy-tabix.索弓 ICLEAR gw_afvv.SELECT SINGLE * FROM afvvINTO CORRESPONDING FIELD

11、S OF gw_afvvWHERE aufpl = gw_afvc-aufplAND aplzl = gw_afvc-aplzl.IF sy-subrc = 0.IF NOT gw_afvv-bmsch = 0.IF timetickets-conf_acti_unit1NE S.timetickets-conf_activity1 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity1 = timetickets-yieldgw_afvv-bmsch.ENDIF.IF timetickets-conf_acti_uni

12、t2NE S.timetickets-conf_activity2 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity2 = timetickets-yieldgw_afvv-bmsch.ENDIF.IF timetickets-conf_acti_unit3NE S.timetickets-conf_activity3 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity3 = timetickets-yieldgw_afvv-bmsch.EN

13、DIF.IF timetickets-confactiunit4NE S.153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196timetickets-conf_activity4 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity4 = timetickets-yieldgw_afvv-bmsch.ENDIF.

14、IF timetickets-conf_acti_unit5NE S.timetickets-conf_activity5 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity5 = timetickets-yieldgw_afvv-bmsch.ENDIF.IF timetickets-conf_acti_unit6NE S.timetickets-conf_activity6 = timetickets-yieldgw_afvv-bmsch.ELSE.timetickets-conf_activity6 = timet

15、ickets-yieldgw_afvv-bmsch.ENDIF.ENDIF.ENDIF.timetickets-yield= 200.待確認的廠里（用戶輸入確認IF gw_afvv IS NOT INITIAL.MODIFY timetickets INDEX gv_index TRANSPORTING yield conf_activity1 conf_acti_unit1 conf_activity2 conf_ conf_activity3 conf_acti_unit3 conf_activity4 conf_ conf_activity5 conf_acti_unit5 conf_a

16、ctivity6 conf_ELSE.MODIFY timetickets INDEX gv_index TRANSPORTING yieldENDIF.CLEAR timetickets.ENDLOOP.197198199200201202 * 7.203204205206207208209210211212213214215216217218219220221222223224225226227228229CLEAR gw_afvv.ENDIF.調用BAPI,報工確認CLEAR: return, return.CLEAR: return_detail, return_detail.CALL

17、 FUNCTION ,BAPI_PRODORDCONF_CREATE_TT, EXPORTINGpost_wrong_entries =1testrun=IMPORTING return= returnTABLES timetickets= timeticketsgoodsmovements= goodsmovementslink_conf_goodsmov = link_conf_goodsmov detail_return= return_detail.CLEAR gv_result.READ TABLE return WITH KEY type = E.IF sy-subrc = 0.CONCATENATE!： return-message INTO return-message. gv_result = cn_flagx.ENDIF.LOOP AT return_detail WHERE type IS NOT