注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

原来为了你

我的人生就是要一次次的超越

 
 
 

日志

 
 
 
 

VK15创建价格(带等级价格)  

2011-10-24 16:52:42|  分类: BDC |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

*---for BDC
datac_update    type c value 'S'.
databdcdata     type table of  bdcdata with header line.
datamesstab     type table of  bdcmsgcoll with header line.
datagt_messtab  type table of  bdcmsgcoll with header line.

*---出厂价
perform bdc_dynpro  using 'SAPMV13A'  '0100'."初始界面
perform bdc_field       using 'BDC_CURSOR'  'RV13A-KOTABNR'.
perform bdc_field       using 'BDC_OKCODE'  '/00'.
perform bdc_field       using 'RV13A-KSCHL'  'ZP00'.
perform bdc_field       using 'RV13A-KOTABNR'  '951'.

perform bdc_dynpro using 'SAPMV13A' '1951'.
perform bdc_field       using 'BDC_CURSOR'  'RV13A-DATBI(01)'.
perform bdc_field       using 'BDC_OKCODE'  '=PSTF'."价格等级按钮
perform bdc_field       using 'KOMG-WERKS'  '1000'.
perform bdc_field       using 'KOMG-SPART'  '01'.
perform bdc_field       using 'KOMG-MATNR(01)'  '000000000006026021'.
perform bdc_field       using 'KONP-KBETR(01)'  '19.9'.
perform bdc_field       using 'KONP-KONWA(01)'  'CNY'.
perform bdc_field       using 'KONP-KMEIN(01)'  'KG'.
perform bdc_field       using 'RV13A-DATAB(01)'  '20110910'.
perform bdc_field       using 'RV13A-DATBI(01)'  '20111001'.

perform bdc_dynpro using 'SAPMV13A'  '0303'.
perform bdc_field       using 'BDC_CURSOR'  'KONM-KBETR(04)'.
perform bdc_field       using 'BDC_OKCODE'  '=SICH'."保存按钮
perform bdc_field       using 'KONM-KSTBM(02)'  '10'.
perform bdc_field       using 'KONM-KBETR(02)'  '19.8'.
perform bdc_field       using 'KONM-KSTBM(03)'  '20'.
perform bdc_field       using 'KONM-KBETR(03)'  '19.7'.
perform bdc_field       using 'KONM-KSTBM(04)'  '30'.
perform bdc_field       using 'KONM-KBETR(04)'  '19.2'.

perform call_transaction_form using 'VK15'.   "实现数据导入

**********************************************************************
form bdc_field using fnam fval.
  
clear bdcdata.
  bdcdata
-fnam fnam.
  bdcdata
-fval fval.
  
condense bdcdata-fval.
  
append bdcdata.
endform.                    "BDC_FIELD
**********************************************************************
form call_transaction_form using tcode.
  
call transaction tcode
       
using   bdcdata
       
mode    'E'
       
update  c_update
       messages 
into messtab.

  
append lines of messtab to gt_messtab.
  
clear messtab.clear messtab[].
  
clear bdcdata.clear bdcdata[].
endform.                    "CALL_TRANSACTION_form
**********************************************************************
form bdc_dynpro using program dynpro.
  
clear bdcdata.
  bdcdata
-program  program.
  bdcdata
-dynpro   dynpro.
  bdcdata
-dynbegin 'X'.
  
append bdcdata.
endform.                    "BDC_DYNPRO

参考表konm,a95x.
vk15
是创建价格,所以每次保存都会生成新的条件记录号,vk17是修改价格,保存时不会生成新的记录号,而会修改对应的条件记录号.

  评论这张
 
阅读(404)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017