201507考核材料杨通用技术

1、Search help 总结文档范玲上项目已经有 4了，这是第一个项目，虽然跟培训的时候相比，并没有接触的新技术，但是感觉收获还挺大的。培训的时候是什么都想了解，但也就浅尝辄止，而现在每天都有大量工作，反而没有那么浮躁，我觉得只要用心，即使写报表也可以收获很多。下面就简单总结一下我在 search help 方面的一点心得吧。实现 search help 的方法有很多种，现在总结下我知道的几种。一、通过 se11 定义的 search help：其中：1、基于固定值的 search help，需要定义域的固定值：2、基于数据类型的search help，比如，对于dats 类型的屏幕元素，系统

2、会自动调用日期类型的search help。3、而对于上图中搜索帮助列的 H_T134 和 MAT1 等则都是在 se11 里定义的搜索帮助效果：而如果 IMP 复选框没有勾上，效果图：其中一个基本搜索帮助有一个页签，而复合搜索帮助里可以嵌套多个基本搜索帮助。上面的就是一个基本搜索帮助，复合搜索帮助效果如下：建好搜索帮助后，就可以把它挂到表上去了。对于检查表实现输入帮助、字段的外部搜索帮助附件、数据元素的明确搜索帮助附件，它们之间的区别，目前我也不太清楚。二、在代码里实现 search help1、实现屏幕元素的搜索帮助时，当要参考的字段系统中已经定义有搜索帮助时，无须做其他操作，系统会自动调

3、用该字段的搜索帮助。2、实现屏幕元素的搜索帮助时，当要参考的字段系统中没有定义搜索帮助时，我们可以到 se11 里定义搜索帮助，然后代码里只需要加 matchcode object 选项（zjhbc 为在 se11 里定义的搜索帮助）：我们还可以通过 at selection-screen onvalue-request 用代码实现 search help。value-requestfor( 屏幕元素)或OO的processon另外：OO 还可以在屏幕绘制器里实现 search help。3、要实现 alv 字段的搜索帮助：代码：三、物料主数据 search help 增强需求：步骤：1、 进

4、T-CODE：mm03，找到该字段的 search help2、 双击该字段，找到搜索帮助 MAT1双击进 MAT1 里：增强 zen001 是复合搜索帮助里面可以嵌套基本搜索帮助，ZTEST 是一个基本搜索帮助。一个基本搜索帮助一个页附加：如果不是对数据库或数据视图的基本筛选，需要写 exit（比如选出的值不是数据表的键值，需要去除重复项的情况）。该 exit（f4if_shlp_exit_bc）在 se37 定义，从标准 Function：f4if_shlp_exit_example而来。该 exit 的名字要以 f4ut 为前缀(以 f4if_shlp_exit_为前缀也可以创建)下面是

5、一个去重的出口例子（右图为左图中 Function 执行时的结果）：（下面为上图代码）IF*CALLCONTROL-STEP = 'SELECT'.PERFORM STEP_SELECT TABLES RECORD_TABSHLP_TABCHANGING SHLP CALLCONTROL RC.CALL FUNCTION 'DD_SHLP_GET_HELPVALUES'EXPORTING*MAXROWS= 0*SORT IMPORTINGRCTABLESoutput_valuesOUTPUT_DESCRCHANGINGshlpCURSOR EXCEPTIONSC

6、URSOR_SELECTION_IMPOSSIBLE OTHERS.IF sy-subrc <> 0.Implement suitable error handlingENDIF.=' '=record_tab*=shlp*=12*hereloop at record_tab into gw_record. SEARCH GW_RECORD-STRING FOR '1Z'.IF SY-SUBRC <> 0."GW_RECORD-STRING+SY-FDPOS(1)<>'Z'."DELETE

7、RECORD_TAB.CONTINUE. ENDIF.GV_FDPOS = SY-FDPOS. GV_FDPOS = GV_FDPOS + 3.LOOP AT GT_RECORD INTO GW_RECORD1." WHERE STRING+GV_FDPOS(2) = GW_RECORD-STRING+GV_FDPOS(2).IF GW_RECORD1-STRING+GV_FDPOS(2) = GW_RECORD-STRI NG+GV_FDPOS(2).GV_FLAG = 'X'. EXIT.ENDIF. ENDLOOP.IF GV_FLAG = 'X'.GV_FLAG = ''. CONTINUE.ENDIF.*loop at record_tab where string = gw_record-string. delete record_tab.endloop.append gw_record to gt_record.ENDLOOP.refresh record_tab.move gt_record to record_tab.IF SY-SUBRC = 0.CALLCONTROL-STEP = 'DISP&