测试bapi必须也要找前台能跑通的数据,不然,如果是数据本事问题,再怎么调都不会通
 
 
 
 
(或者在订单修改VA02中创建交货)
 
 
VL01N
 

 

 
 各个页签看看,哪些必输 
 
 
 
我自己更喜欢va02里创建
 
 



然后看看抬头数据啥的
 
 
至于bapi,很简单
 
 
 
 
P_SOD 
   
  
  TYPE CHAR10
  .
  
 
  *---Bapi Data Define
  
 
  DATA
  :DELIVERY  
    
    
    
    
    
    
    
    
    
  
  TYPE BAPISHPDELIVNUMB
  -DELIV_NUMB
  ,
  
  
   
   
   
   
   
  NUM_DELIVERIES  
    
    
    
    
   
  
  TYPE BAPIDLVCREATEHEADER
  -NUM_DELIVERIES
  ,
  
  
   
   
   
   
   
  SALES_ORDER_ITEMS 
   
   
   
   
  
  LIKE BAPIDLVREFTOSALESORDER 
  
  OCCURS 
  0 
  WITH 
  HEADER 
  LINE
  ,
  
  
   
   
   
   
   
  
  RETURN                          
  LIKE BAPIRET2 
   
   
   
   
   
   
   
   
   
   
   
   
   
   
  
  OCCURS 
  0 
  WITH 
  HEADER 
  LINE 
  .
  
 
  START-OF-SELECTION
  .
  
 
  *---Assign Value
  
  
   
  SALES_ORDER_ITEMS
  -REF_DOC  
    
   
  
  = P_SOD
  .                    
  "参考订单号
  
  
   
  SALES_ORDER_ITEMS
  -REF_ITEM  
    
  
  = 
  '000010'
  .                 
  "行项目号
  
  
   
  SALES_ORDER_ITEMS
  -DLV_QTY  
    
   
  
  = 
  18
                              
  "数量
  
  
   
  SALES_ORDER_ITEMS
  -SALES_UNIT 
  
  = 
  'TO'
  .                       
  "单位
  
  
   
  
  APPEND SALES_ORDER_ITEMS
  .
  
 
  *---Call BAPI Function
  
  
   
  
  CALL 
  FUNCTION 
  'BAPI_OUTB_DELIVERY_CREATE_SLS'
  
  
   
   
   
  
  IMPORTING
  
  
   
   
   
   
   
  DELIVERY 
   
   
   
   
   
   
   
   
   
  
  = DELIVERY
  
  
   
   
   
   
   
  NUM_DELIVERIES 
   
   
   
  
  = NUM_DELIVERIES
  
  
   
   
   
  
  TABLES
  
  
   
   
   
   
   
  SALES_ORDER_ITEMS 
  
  = SALES_ORDER_ITEMS
  
  
   
   
   
   
   
  
  RETURN            
  = 
  RETURN
  .
  
  
   
  
  CALL 
  FUNCTION 
  'BAPI_TRANSACTION_COMMIT'
  
  
   
   
   
  
  EXPORTING
  
  
   
   
   
   
   
  
  WAIT 
  = 
  'X'
  . 
  









