How to insert check box fields in a htmlb: tableview

Question

Hi,
Can anybody tell me how to insert check box fields in a htmlb: tableview in a sequence of rows in a table view. How to generate the sequence no for the checkbox inorder to know the row that is checked.
Thanks in advance,
Aruna.

Answer 1

Here is the code which has the custom "Checkbox" in the tableview & Triggers the event. <b>You can identify the checkbox based on cell ID (p_cell_id)</b> in the method "IF_HTMLB_TABLEVIEW_ITERATOR~RENDER_CELL_START" & Based on the event name + Cell ID. Look at the code & let me know if you any issue.
<b>Layout:</b>
<%@page language="abap" %>
<%@extension name="htmlb" prefix="htmlb" %>
<htmlb:content id               = "content"
               design           = "design2002+design2003"
               controlRendering = "SAP"
               rtlAutoSwitch    = "true"
               forceEncode      = "ENABLED" >
  <htmlb:page title="Test " >
    <htmlb:form>
      <%
  data TV_ITERATOR Type Ref To zcl_itr.
  data iterator type ref to IF_HTMLB_TABLEVIEW_ITERATOR.
  create object tv_iterator exporting appl_cons = application.
  iterator = tv_iterator.
      %>
      <htmlb:tableView id              = "fligts"
                       headerText      = "Flight"
                       width           = "100"
                       headerVisible   = "true"
                       design          = "alternating"
                       visibleRowCount = "10"
                       fillUpEmptyRows = "true"
                       showNoMatchText = "true"
                       filter          = "server"
                       sort            = "server"
                       onHeaderClick   = "MyEventHeaderClick"
                       table           = "<%= APPLICATION->itab %>"
                       iterator        = "<%= ITERATOR %>" />
    </htmlb:form>
  </htmlb:page>
</htmlb:content>
<b>Event Handling:</b>
DATA: EVENT_ID1 TYPE REF TO IF_HTMLB_DATA.
EVENT_ID1 = CL_HTMLB_MANAGER=>GET_EVENT_EX( REQUEST ).
CASE EVENT_ID1->EVENT_SERVER_NAME.
IF NOT event_id1 IS INITIAL.
   if event_id1->server_event+0(9) = 'chkevent'.
  SPLIT event_id1->server_event AT '-' INTO v_event v_dummy v_row v_col.
  endif.
endif.
method IF_HTMLB_TABLEVIEW_ITERATOR~GET_COLUMN_DEFINITIONS.
     CLEAR p_column_definitions.
    CLEAR p_overwrites.
    DATA: tv_column  TYPE TABLEVIEWCONTROL.
    tv_column-COLUMNNAME  = 'FLDATE'.
    tv_column-edit        = 'X'.
    tv_column-sort        = 'X'.
    tv_column-TITLE               = 'Flight Date'.
    tv_column-WIDTH  = '100'.
    APPEND tv_column TO p_column_definitions.
    CLEAR tv_column.
    tv_column-edit        = 'X'.
    tv_column-COLUMNNAME          = 'CONNID'.
    tv_column-TITLE               = 'Conn.ID'.
    tv_column-WIDTH  = '70'.
    tv_column-HORIZONTALALIGNMENT = 'center'.
    APPEND tv_column TO p_column_definitions.
    CLEAR tv_column.
    tv_column-edit        = 'X'.
    tv_column-COLUMNNAME          = 'CHECKBOX1'.
    tv_column-TITLE               = 'Check Box'.
    tv_column-WIDTH  = '30'.
    tv_column-HORIZONTALALIGNMENT = 'center'.
    APPEND tv_column TO p_column_definitions.
endmethod.
METHOD IF_HTMLB_TABLEVIEW_ITERATOR~RENDER_CELL_START.
       DATA: L_EVENT TYPE STRING.
  CASE P_TABLEVIEW_ID.
    WHEN 'fligts'.
      CASE P_COLUMN_KEY.
        WHEN 'CHECKBOX1'.
*          CONCATENATE 'chk_event' '123' '2323' INTO L_EVENT SEPARATED BY '-' .
CONCATENATE 'chkevent' p_cell_id INTO l_event SEPARATED BY '-'.
          P_REPLACEMENT_BEE = CL_HTMLB_CHECKBOX=>FACTORY( ID = P_CELL_ID
        ONCLICK = L_EVENT CHECKED = 'false' ).
      ENDCASE.
  ENDCASE.
ENDMETHOD.
Hope this will solve your problem.
<b><i>* Reward each helpful answer.</i></b>
Raja T
Message was edited by:
        Raja T