HTML Checkbox can raise a OnInputProcessing event???

Question

Hello all,
i have a little problem with an application with flow logic page. I have to incorporate a group of html checkbox that raise an event in the OnInputProcessing like an button do. this can be done?? and how can be do it??? . Please help. Thanx in advance

Answer 1

Hi Mariana,
If you want to call the OnInputProcessing Event then you need to use htmlb checkbox.
Here is the sample code....
In Page with flow logic....
In Layout section...
<%@page language="abap" %>
<%@extension name="htmlb" prefix="htmlb" %>
<htmlb:content design="design2003" >
  <htmlb:page title="Tab Strip" >
    <htmlb:form>
      <htmlb:checkboxGroup id="chkboxgrp" >
        <htmlb:checkbox id      = "cb1"
                        text    = "Red"
                        onClick = "myEvent1" />
        <htmlb:checkbox id      = "cb2"
                        text    = "Green"
                        onClick = "myEvent2" />
        <htmlb:checkbox id      = "cb3"
                        text    = "Blue"
                        onClick = "myEvent3" />
      </htmlb:checkboxGroup>
       <br>
      <%= red %>
      <br>
      <%= green %>
      <br>
      <%= blue %>
    </htmlb:form>
  </htmlb:page>
</htmlb:content>
In Page Attributes Section...
blue     TYPE     STRING
green     TYPE     STRING
red     TYPE     STRING
In OnInputProcessing section...
data: chkbox1 type ref to cl_htmlb_checkbox,
      chkbox2 type ref to cl_htmlb_checkbox,
      chkbox3 type ref to cl_htmlb_checkbox.
chkbox1 ?= CL_HTMLB_MANAGER=>GET_DATA(
request = runtime->server->request
name = 'checkbox'
id = 'cb1' ).
chkbox2 ?= CL_HTMLB_MANAGER=>GET_DATA(
request =  runtime->server->request
name = 'checkbox'
id = 'cb2' ).
chkbox3 ?= CL_HTMLB_MANAGER=>GET_DATA(
request =  runtime->server->request
name = 'checkbox'
id = 'cb3' ).
DATA: event TYPE REF TO CL_HTMLB_EVENT.
event = CL_HTMLB_MANAGER=>get_event( runtime->server->request ).
IF event->name = 'checkbox' AND event->event_type = 'click'.
  case event->id.
    when 'cb1'.
      red = chkbox1->checked.
      if red eq ' '.
        red = 'Not Selected'.
      else.
        red = 'Red Selected'.
      endif.
    when 'cb2'.
      chkbox2 ?= CL_HTMLB_MANAGER=>GET_DATA(
      request =  runtime->server->request
      name = 'checkbox'
      id = 'cb2' ).
      green = chkbox2->checked.
      if green eq ' '.
        green = 'Not Selected'.
      else.
        green = 'Green Selected'.
      endif.
    when 'cb3'.
      chkbox3 ?= CL_HTMLB_MANAGER=>GET_DATA(
      request =  runtime->server->request
      name = 'checkbox'
      id = 'cb3' ).
      blue = chkbox3->checked.
      if blue eq ' '.
        blue = 'Not Selected'.
      else.
        blue = 'Blue Selected'.
      endif.
  endcase.
ENDIF.
Hope it solves your problem.
Regards,
Maheswaran.B