码迷,mamicode.com
首页 > 其他好文 > 详细

BDC需要注意的

时间:2018-03-12 16:58:06      阅读:237      评论:0      收藏:0      [点我收藏+]

标签:按钮   --   pre   img   upd   head   字段   defs   clear   

 1 FUNCTION ZFM_AUFNR_TECO_E.
 2 *"----------------------------------------------------------------------
 3 *"*"本地接口:
 4 *"  IMPORTING
 5 *"     REFERENCE(AUFNR) TYPE  AFKO-AUFNR
 6 *"     REFERENCE(FLAG) TYPE  CHAR1
 7 *"  EXPORTING
 8 *"     REFERENCE(SUBRC) TYPE  SYST-SUBRC
 9 *"  TABLES
10 *"
11 *"
12 *"    对工单进行技术性完成的处理
13 *"----------------------------------------------------------------------
14 
15 
16 
17   DATA BDCDATA_TAB TYPE TABLE OF BDCDATA.
18 ****该表用于存放BDC操作记录
19   DATA OPT TYPE CTU_PARAMS.
20 
21 *  DATA: X_OPTIONS TYPE CTU_PARAMS..
22 
23   CLEAR OPT.
24      OPT-DISMODE = E.
25      OPT-UPDMODE = S.
26      OPT-CATTMODE =  .
27      OPT-DEFSIZE =  .
28      OPT-RACOMMIT =  .
29      IF FLAG = X.
30      OPT-NOBINPT = X.
31      ELSE.
32      OPT-NOBINPT = ‘‘.
33      ENDIF.
34      OPT-NOBIEND =  .
35 
36 ****用于操作方法记录
37   DATA:OKCODE TYPE  C LENGTH  5.
38 ****可以用于存放操作记录的按钮名称
39   DATA :
40     TRANSACTION  TYPE  C LENGTH  5,
41     DYNPRO       TYPE  C LENGTH  4,
42     ITAB_MESSAGE TYPE  TABLE OF  BDCMSGCOLL WITH HEADER LINE.
43   OPT-DISMODE = N.
44   TRANSACTION  = CO02.
45 **** program 事务码 dynpro 屏幕名称 dynbegin 等于X就可以
46 **** fnam 字段名称 fval字段值
47 
48  IF FLAG = X.
49   BDCDATA_TAB = VALUE #(
50    ( PROGRAM  = SAPLCOKO1   DYNPRO   = 0110 DYNBEGIN = X )
51    ( FNAM = BDC_CURSOR      FVAL = CAUFVD-AUFNR )
52    ( FNAM = BDC_OKCODE      FVAL =  /00 )
53    ( FNAM =  CAUFVD-AUFNR   FVAL = AUFNR )
54    ( FNAM =  R62CLORD-FLG_OVIEW   FVAL = X )
55    ( PROGRAM =  SAPLCOKO1   DYNPRO  = 0115 DYNBEGIN = X)
56    ( FNAM = BDC_OKCODE      FVAL =   =TABS )
57    ( PROGRAM =  SAPLSPO1    DYNPRO  = 0400 DYNBEGIN = X)
58    ( FNAM = BDC_OKCODE      FVAL =   =YES )
59    ( PROGRAM =  SAPLCOKO1   DYNPRO  = 0115 DYNBEGIN = X)
60    ( FNAM = BDC_OKCODE      FVAL =   =BU )
61    ).
62 
63   ELSE.
64     BDCDATA_TAB = VALUE #(
65    ( PROGRAM  = SAPLCOKO1  DYNPRO   = 0110 DYNBEGIN = X )
66    ( FNAM = BDC_CURSOR    FVAL = CAUFVD-AUFNR )
67    ( FNAM = BDC_OKCODE    FVAL =  /00 )
68    ( FNAM =  CAUFVD-AUFNR   FVAL = AUFNR )
69    ( FNAM =  R62CLORD-FLG_OVIEW   FVAL = X )
70    ( PROGRAM =  SAPLCOKO1  DYNPRO  = 0115 DYNBEGIN = X)
71    ( FNAM = BDC_OKCODE    FVAL =   =TABS )
72 *   ( PROGRAM =  ‘SAPLSPO1‘  DYNPRO  = ‘0400‘ DYNBEGIN = ‘X‘)
73 *    ( FNAM = ‘BDC_OKCODE‘    FVAL =   ‘=YES‘ )
74    ( PROGRAM =  SAPLCOKO1  DYNPRO  = 0115 DYNBEGIN = X)
75    ( FNAM = BDC_OKCODE    FVAL =   =BU )
76    ).
77 
78   ENDIF.
79 
80   CALL TRANSACTION TRANSACTION  USING BDCDATA_TAB OPTIONS FROM OPT
81         MESSAGES INTO MESSTAB..
82   LOOP AT ITAB_MESSAGE.
83     IF ITAB_MESSAGE-MSGTYP =  E  .
84       MESSAGE WRONG_EXEC  TYPE  E RAISING WRONG_EXEC.
85       EXIT.
86     ENDIF.
87   ENDLOOP.
99 ENDFUNCTION.

需要注意的是BDC在录屏的时候,有些情境会出现弹出选择框,让你选择是和否。此时这里勾选,并且OPT-NOBINPT = X‘这个值设置为X。

技术分享图片

 

BDC需要注意的

标签:按钮   --   pre   img   upd   head   字段   defs   clear   

原文地址:https://www.cnblogs.com/hdchen/p/8549527.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!