SAP abaper的一天
回头一看，做abaper已经三个月了，三个月来，也学到了一些东西。但毕竟还处于初级阶段，还要向SAP强人多学习呀看到网络上有很多SAP高人，有的业务非常强，有的abap非常强，都是值得我学习的师父啊。
一直都是遇见问题，然后再遇见问题，解决问题，再解决问题，在这期间，我的同事也给予了我很多帮助，有些东西真是
不发弄啊，自己弄了两天弄不出来的东西，高手过来三几分钟就解决问题了，汗！看来我还真是个小菜鸟啊……
不管怎么样，走了这条道，总得坚持走下去的，毕竟有很多前辈，我能“踩”在他们肩上往前看，肯定能看得更远的。
元旦来了第一天工作，刚开始有点无从着手。后来找到了一点感觉。原来做的一个程序在处理ALV 双击上死活做不对，今天就捣腾了半天，还行，总算在总结前辈的程序的基础上给搞好了，心情那个那啊！
总结原因还是自己面向对象看的不多啊，好多都不理解，只是ctrl C 是不行的。
下面是ALV GRID响应鼠标双击的EVENT及主要代码。
展开代码
* ALV GRID的实例以及参考
DATA gr_alvgrid TYPE REF TO cl_gui_alv_grid .
*定义定制控件以及名称（该名称要与屏幕设计是定义的名称一致）
DATA gc_custom_control_name TYPE scrfname VALUE 'CC_ALV' .
*定制控件的实例
DATA gr_ccontainer TYPE REF TO cl_gui_custom_container .
*字段目录
DATAgt_fieldcat TYPE lvc_t_fcat .
*格式结构（ALV的显示格式）
DATA gs_layout TYPE lvc_s_layo .
DATA :lvc LIKE LINE OFgt_fieldcat .
##############################################################
CLASS lcl_alv_receiver DEFINITION DEFERRED.
CLASS lcl_alv_receiver DEFINITION.
PUBLIC SECTION.
METHODS : double_click_cell
FOR EVENT double_clickOF cl_gui_alv_grid
IMPORTING e_row e_column es_row_no.
ENDCLASS. "lcl_event_receiver DEFINITION
CLASS lcl_alv_receiver IMPLEMENTATION. "handle_data_changed
####################################################################
METHOD double_click_cell.
READ TABLE out_tab INTO output INDEX e_row.
SET PARAMETER ID 'BES' FIELD output-ebeln.
CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
ENDMETHOD. "DOUBLE_CLICK_CELL
ENDCLASS. "lcl_ALV_event_receiver
###############################################################
MODULE display_alv_data OUTPUT.
CALL METHOD gr_alvgrid->set_table_for_first_display
EXPORTING
is_layout = gs_layout
CHANGING
it_outtab = out_tab
it_fieldcatalog = gt_fieldcat
EXCEPTIONS
invalid_parameter_combination = 1
program_error = 2
too_many_lines = 3
OTHERS = 4.
*SET HANDLER g_alv_application->handle_data_changed FOR gr_alvgrid.
*SET HANDLER g_alv_application->modify_outtabFOR gr_alvgrid.
SET HANDLER g_alv_application->double_click_cellFOR gr_alvgrid.
CALL METHOD gr_alvgrid->register_edit_event"注册更新事件
EXPORTING
* i_event_id = cl_gui_alv_grid=>mc_evt_enter
i_event_id = cl_gui_alv_grid=>mc_evt_modified.
SET HANDLER g_alv_application->double_click_cellFOR gr_alvgrid.
ENDMODULE. " DISPLAY_ALV_DATAOUTPUT
FORM creat_alv .
IF gr_alvgrid IS INITIAL .
*如果ALV控件实例不存在，则先创建定制控件，然后创建ALV实例控件
CREATE OBJECT gr_ccontainer
EXPORTING
container_name = gc_custom_control_name
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
create_error = 3
lifetime_error = 4
lifetime_dynpro_dynpro_link = 5
OTHERS = 6 .
*创建ALV控件实例
CREATE OBJECT gr_alvgrid
EXPORTING
i_parent = gr_ccontainer
EXCEPTIONS
error_cntl_create = 1
error_cntl_init = 2
error_cntl_link = 3
error_dp_create = 4
OTHERS = 5 .
CREATEOBJECT g_alv_application. *这句忘了，两个小时找不出来原因,汗啊*
ELSE.
* 如果控件实例已经存在，则刷新
CALL METHOD gr_alvgrid->refresh_table_display
EXCEPTIONS
finished = 1
OTHERS = 2.
ENDIF.
ENDFORM.
希望能慢慢成长吧！
毕竟abaper的路还长,
我抬起头望着远方，
漫长漫长……
页:
[1]