Selecting from a TABLEVIEW

Question

Hi All..,
Kindly dont give any 'Blog' link...
With all of your helps, I have created a popup to select possible values. My popup screen(its a View, emppop.htm) contains a tableview and showing employee details(empid,name etc.).
Now my requirement is to select a value from this Tableview and bring that value into a field in the view(find.htm).
My tableview code is:
      <htmlb:tableView id             = "pop"
                       table          = "<%= it_emp %>"
                       selectionMode  = "SINGLESELECT"
                       onRowSelection = "handleid('<%= empid %>')" >
      </htmlb:tableView>
<script language="JavaScript">
function handleid(id)
window.opener.document.emppop.empid.value = <%= empid %>;
window.close();
</script>
I am pretty sure that this code is wrong. But I am not able to find a simple example anywhere. Pls help me..
Thanks in advance..
Dev

Answer 1

Here is my code for you all
Controller- <b>emppop.do</b>
Controller class- <b>ZCL_12_POP</b>
METHOD DO_INIT.
SELECT * FROM Z12_EMP_PER INTO TABLE IT_EMP.
create object  iterator.
ENDMETHOD.
METHOD DO_REQUEST.
  DATA: POPVIEW TYPE REF TO IF_BSP_PAGE.
  dispatch_input( ).
  POPVIEW = CREATE_VIEW( VIEW_NAME = 'emppop.htm').
  POPVIEW->set_attribute( name = 'it_emp' value = it_emp ).
  CALL_VIEW( POPVIEW ).
ENDMETHOD.
METHOD DO_HANDLE_EVENT.
  DATA: IND TYPE I.
  DATA: TV TYPE REF TO CL_HTMLB_TABLEVIEW.
  DATA: EVENT1 TYPE REF TO CL_HTMLB_EVENT.
  EVENT1 = CL_HTMLB_MANAGER=>GET_EVENT( RUNTIME->SERVER->REQUEST ).
  TV ?= CL_HTMLB_MANAGER=>GET_DATA(
  REQUEST = RUNTIME->SERVER->REQUEST
  NAME = 'tableView'
  ID = 'pop' ).
  IF TV IS NOT INITIAL.
    DATA: TV_DATA TYPE REF TO CL_HTMLB_EVENT_TABLEVIEW.
    TV_DATA = TV->DATA.
    IF TV_DATA->PREVSELECTEDROWINDEX IS NOT INITIAL.
      FIELD-SYMBOLS: <ROW> LIKE LINE OF IT_EMP.
      READ TABLE IT_EMP INDEX TV_DATA->PREVSELECTEDROWINDEX ASSIGNING
  <ROW>.
      DATA VALUE TYPE STRING.
      EMPID = <ROW>-EMPID.
    ENDIF.
  ENDIF.
ENDMETHOD.
method DO_HANDLE_DATA.
field-symbols: <field> type ihttpnvp.
read table form_fields with table key
           name = 'empid' assigning <field>.
me->empid = <field>-value.
endmethod.
View: <b>emppop.htm</b>
<%@page language="abap" %>
<%@extension name="htmlb" prefix="htmlb" %>
<htmlb:content design="design2003" >
  <htmlb:page title=" " >
    <htmlb:form>
      <%
  data TV_ITERATOR Type Ref To zcl_12_iterator.              "zcl_itr - Iterator Function
  data iterator type ref to IF_HTMLB_TABLEVIEW_ITERATOR.
  create object tv_iterator .                                "exporting appl_cons = application.
      %>
      <htmlb:tableView id              = "pop"
                       width           = "200"
                       headerVisible   = "true"
                       design          = "alternating"
                       visibleRowCount = "10"
                       fillUpEmptyRows = "true"
                       selectionMode   = "SINGLESELECT"
                       showNoMatchText = "true"
                       filter          = "server"
                       sort            = "server"
                       onHeaderClick   = "MyEventHeaderClick"
                       table           = "<%= it_emp %>"
                       iterator        = "<%= iterator %>" >
      </htmlb:tableView>
    </htmlb:form>
  </htmlb:page>
</htmlb:content>