zoukankan      html  css  js  c++  java
  • ABAP 捕获回车键更新值

    
    
    gt_events1 TYPE slis_t_event.



    *
    &---------------------------------------------------------------------* *& Form EVENT_INTIT1 *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* * --> p1 text * <-- p2 text *----------------------------------------------------------------------* FORM event_intit1 . DATA: ls_events TYPE slis_alv_event. ls_events-name = slis_ev_data_changed. ls_events-form = 'FRM_DATA_CHANGED1'. APPEND ls_events TO gt_events1. ENDFORM. " EVENT_INTIT1
    *&---------------------------------------------------------------------*
    *&      Form  frm_data_changed
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    *      -->RR_DATA_CHANGED  text
    *----------------------------------------------------------------------*
    FORM frm_data_changed1 USING rr_data_changed
                TYPE REF TO cl_alv_changed_data_protocol.
      DATA :wa_mod TYPE  LINE OF lvc_t_modi.
    *  MOVE rr_data_changed-mt_mod_cells TO wa_mod.
      DATA:ref_grid TYPE REF TO cl_gui_alv_grid.
      CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
    *   EXPORTING
    *     IR_SALV_FULLSCREEN_ADAPTER       =
      IMPORTING
    *     ET_EXCLUDING                     =
    *     E_REPID                          =
    *     E_CALLBACK_PROGRAM               =
    *     E_CALLBACK_ROUTINE               =
        e_grid                           = ref_grid.
    *     ET_FIELDCAT_LVC                  =
    *     ER_TRACE                         =
    *     E_FLG_NO_HTML                    =
    *     ES_LAYOUT_KKBLO                  =
    *     ES_SEL_HIDE                      =
    *     ET_EVENT_EXIT                    =
    *     ER_FORM_TOL                      =
    *     ER_FORM_EOL                      =
      LOOP AT rr_data_changed->mt_mod_cells INTO wa_mod .
        READ TABLE gt_alv1 INDEX wa_mod-row_id.
        IF sy-subrc EQ 0.
          gt_alv1-jszoj = wa_mod-value * gt_alv1-bstmg.
          gt_alv1-shuij = gt_alv1-jszoj * 17 / 100.
          gt_alv1-yfzhk = gt_alv1-jszoj + gt_alv1-shuij.
          gt_alv1-yfzcy = gt_alv1-yfzhk - ( gt_alv1-wrbtr * 117 / 100 ).
          gt_alv1-shjcy = gt_alv1-shuij - ( gt_alv1-wrbtr * 17 / 100 ).
          gt_alv1-matcy = gt_alv1-yfzcy - gt_alv1-shjcy.
          MODIFY gt_alv1 FROM gt_alv1 INDEX wa_mod-row_id.
        ENDIF.
      ENDLOOP."刷新内表 MODIFY_CELL
      CALL METHOD ref_grid->refresh_table_display.
    ENDFORM.                    "frm_data_changed
  • 相关阅读:
    PMP笔记:行政收尾工作
    PMP 笔记:WBS 词典 (含范例)
    PMP 笔记:WBS 实战 (例子)
    名义小组和德尔菲技术使用与区别
    焦点小组、名义小组和引导式会议的定义与区别
    工作分解结构WBS、组织分解结构OBS、资源分解结构 定义和区别(含例子)
    kettle里的参数和变量
    kettle生成100个随机数,并统计小于等于50和大于50个数
    使用kettle制作拉链表
    MySQL字符串转日期
  • 原文地址:https://www.cnblogs.com/huangjianisgood/p/3042380.html
Copyright © 2011-2022 走看看