那些我学习的SAP-- 修改工单组件

爱是王道

　　接触了SAP也算有些日子，自己一直没做认真的总结，遇到的知识因为都是从网上来的，学的时候不知其所以然，糊涂中就用了，后来自己也忘了，等到在需要的时候又得大费周折的去查，现在自己总结一下，给自己一个机会，要是有人看到其中的错误还请慷慨指，不胜感激。
　　对于工单的组件修改，着实让我头疼了一些日子，因为刚开始的时候不知道怎么定位那个BOM，不过好在今天瞎弄了一下也算弄出来，才发现很简单，
　　先说一下怎么定位吧，在CO02中的组件视图中，有一个过滤器，可以选择-->手工筛选，然后选择-->BOM选项输入 项目号 （我录的时候是输入一个这个就不存在定位的问题了因为只有一个）
　　BDC 生成的代码如下： 其中 *** 为要填入的值



perform bdc_dynpro      using 'SAPLCOKO1' '0110'.
perform bdc_field       using 'BDC_CURSOR'
'CAUFVD-AUFNR'.
perform bdc_field       using 'BDC_OKCODE'
'/00'.
perform bdc_field       using 'CAUFVD-AUFNR'
'1020000075'. "订单号
perform bdc_field       using 'R62CLORD-FLG_OVIEW'
'X'. "*************
perform bdc_dynpro      using 'SAPLCOKO1' '0115'.
perform bdc_field       using 'BDC_OKCODE'
'=KPU2'.
perform bdc_field       using 'BDC_CURSOR'
'CAUFVD-GAMNG'.
perform bdc_field       using 'CAUFVD-GAMNG'
'10'. "
perform bdc_field       using 'CAUFVD-GLTRP'
'20130507'.  "日期
perform bdc_field       using 'CAUFVD-GSTRP'
'20130506'.  "日期
perform bdc_field       using 'CAUFVD-TERKZ'
'2'. "************************
perform bdc_field       using 'CAUFVD-FHORI'
'000'. "*****************

perform bdc_dynpro      using 'SAPLCOMK' '0120'.
perform bdc_field       using 'BDC_CURSOR'
'FILTER_BOX'.
perform bdc_field       using 'BDC_OKCODE'
'=FIBO'.
perform bdc_field       using 'FILTER_BOX'
'MA_FIL'.   " 选择条件
perform bdc_field       using 'SORT_BOX'
'ST_STA'.   " *********
perform bdc_dynpro      using 'SAPLCNFA' '0100'.
perform bdc_field       using 'BDC_OKCODE'
'=SLCT'.
perform bdc_field       using 'BDC_CURSOR'
'ALLE_FELDER-SCRTEXT(01)'.
perform bdc_field       using 'GRUPPEN-TEXT'
'全部'. " ***************
perform bdc_field       using 'ALLE_FELDER-FLG_MARK(01)'
'X'.   "*************

perform bdc_dynpro      using 'SAPLCNFA' '0100'.
perform bdc_field       using 'BDC_OKCODE'
'=ENTR'.
perform bdc_field       using 'BDC_CURSOR'
'RANGE-LOW(01)'.
perform bdc_field       using 'RANGE-LOW(01)'
'0020'."**********************
perform bdc_field       using 'GRUPPEN-TEXT'
'全部'."***********************

perform bdc_dynpro      using 'SAPLCOMK' '0120'.
perform bdc_field       using 'BDC_CURSOR'
'RESBD-POSNR(01)'.
perform bdc_field       using 'BDC_OKCODE'
'=PICK'.
perform bdc_field       using 'FILTER_BOX'
'MA_FIL'."***********************
perform bdc_field       using 'SORT_BOX'
'ST_STA'. "**************

perform bdc_dynpro      using 'SAPLCOMD' '0110'.
perform bdc_field       using 'BDC_OKCODE'
'=BACK'.
perform bdc_field       using 'BDC_CURSOR'
'RESBD-MATNR'.
perform bdc_field       using 'RESBD-MATNR'
'RC2-0409-000'.  "**********************
perform bdc_field       using 'RESBD-POSNR'
'0020'.  "*********************
perform bdc_field       using 'RESBD-WERKS'
'C101'. "*************************
perform bdc_field       using 'RESBD-MENGE'
'1'. "********************************
perform bdc_field       using 'RESBD-EINHEIT'
'PCS'.  "****************************
perform bdc_field       using 'RESBD-SANKA'
'X'.  "*************************

perform bdc_dynpro      using 'SAPLCOMK' '0120'.
perform bdc_field       using 'BDC_CURSOR'
'RESBD-MATNR(01)'.
perform bdc_field       using 'BDC_OKCODE'
'=BU'.
perform bdc_field       using 'FILTER_BOX'
'MA_FIL'.  "*****************
perform bdc_field       using 'SORT_BOX'
'ST_STA'.   "****************

perform bdc_dynpro      using 'SAPLSPO1' '0300'.
perform bdc_field       using 'BDC_OKCODE'
'=YES'.
perform bdc_transaction using 'CO02' .