2018年11月13日星期二

MD81 bapi

 DATAITEM_DATA TYPE VBAPKOM OCCURS WITH HEADER LINE,
       ITEM_DATA_OUT TYPE VBAP OCCURS WITH HEADER LINE,
       ITEM_DATAX TYPE VBAPKOMX OCCURS WITH HEADER LINE,
       PARTNER_DATA TYPE VBPAKOM OCCURS WITH HEADER LINE,
       RETURN_DATA TYPE BAPIRET2 OCCURS WITH HEADER LINE,
       SCHEDULE_DATA TYPE VBEPKOM OCCURS WITH HEADER LINE,
       SCHEDULE_DATAX TYPE VBEPKOMX OCCURS WITH HEADER LINE.
MD81作成:
 *----Header data(追加)   
  
 HEADER_DATA-AUART '01'. 
 HEADER_DATAX-AUART 'X'. 
 HEADER_DATAX-UPDKZ 'I'.  "更新区分 
  
  
  
 *----Item data 
  
 ITEM_DATA-POSNR '000010'. 
 ITEM_DATA-MATNR 'ZTST23'. 
 ITEM_DATA-WERKS 'A501'. 
 ITEM_DATA-ZIEME 'PC'. 
 ITEM_DATA-BEDAE 'KEV'. 
 APPEND ITEM_DATA. 
  
  
 ITEM_DATAX-POSNR '000010'. 
 ITEM_DATAX-UPDKZ 'I'. 
 ITEM_DATAX-MATNR 'X'. 
 ITEM_DATAX-ZIEME 'X'. 
 ITEM_DATAX-WERKS 'X'. 
 ITEM_DATAX-BEDAE 'X'. 
 APPEND ITEM_DATAX. 
  
  
 SCHEDULE_DATA-POSNR '000010'. 
 SCHEDULE_DATA-WMENG 10. 
 APPEND SCHEDULE_DATA. 
  
 SCHEDULE_DATAX-POSNR '000010'. 
 SCHEDULE_DATAX-WMENG 'X'. 
 APPEND SCHEDULE_DATAX.   
MD82:受注数量更新
 HEADER_DATA-AUART '01'.   
 HEADER_DATA-VBELN '0050000133'. 
 HEADER_DATAX-UPDKZ 'U'.  "更新区分 
  
 SCHEDULE_DATA-POSNR '000010'. 
 SCHEDULE_DATA-ETENR '0001'. 
 SCHEDULE_DATA-WMENG 30. 
 APPEND SCHEDULE_DATA. 
  
 SCHEDULE_DATAX-POSNR '000010'. 
 SCHEDULE_DATAX-ETENR '0001'. 
 SCHEDULE_DATAX-UPDKZ 'U'. 
 SCHEDULE_DATAX-WMENG 'X'. 
 APPEND SCHEDULE_DATAX.   
MD82:拒否理由更新
 HEADER_DATA-AUART '01'.   
 HEADER_DATA-VBELN '0050000133'. 
 HEADER_DATAX-UPDKZ 'U'.  "更新区分 
  
 ITEM_DATA-POSNR '000010'. 
 ITEM_DATA-ABGRU '00'. 
 APPEND ITEM_DATA. 
 * 
 * 
 ITEM_DATAX-POSNR '000010'. 
 ITEM_DATAX-UPDKZ 'U'. 
 ITEM_DATAX-ABGRU 'X'. 
 APPEND ITEM_DATAX.    
 CALL FUNCTION 'SD_SALES_DOCU_MAINTAIN'  
   EXPORTING 
     I_VBAKKOM                 HEADER_DATA 
     I_VBAKKOMX                HEADER_DATAX 
     WITH_COMMIT               'X' 
     I_CALL_BAPI               'X' 
     SUPPRESS_AVAILIBILITY_DIA 'X' 
     STATUS_BUFFER_REFRESH     'X' 
   IMPORTING 
     E_VBAK                    HEADER_OUT 
   TABLES 
     IX_VBAPKOM                ITEM_DATA 
     IX_VBAPKOMX               ITEM_DATAX 
     IX_VBEPKOM                SCHEDULE_DATA 
     IX_VBEPKOMX               SCHEDULE_DATAX 
     RETURN                    RETURN_DATA. 

没有评论:

发表评论

Customer Characteristic

  Characteristic Descriptions are stored in the table - CABNT - Language - SPRAS - Characteristic description - ATBEZ Characteristic Values ...