Example of how to call a BadI from an Abap and use the NEW OO ALV Grid

Question

Very easy to do.
<b>REPORT  Z_BADI_TEST.
test call Badi from standard abap.
*Only from rel 6.40
do the following
1) define the Badi  (SE18).
For Abap call test uncheck multiple use
and filter boxes
2) Implement the badi (SE19).
Add any methods here in the implementation
3) activate
4)  define the standard class exithandler to the
Abap. This class is the "Badi caller
5)  define an exit variable referring to your Badi
Implementation interface
this interface  will normally be
called something like 
ZIF_EX***************
  You will see the actual name in SE18/SE19.
6)  Instantiate your instance of the badi
via  method call get_instance
7)  Now call any method(s) in the Badi.
*****************start of abap code **************
Define the Badi calling class (standard sap class)
  class cl_exithandler definition load.   "Declaration
*Interface reference  
  data exit type ref to zif_ex__jimbotest.    
     data yes type c.
Used in Fmod call in Badi methods
    data: v_knvv type knvv.
    start-of-selection.
    yes = ' '.
  selection-screen  begin of block b1.
  parameters: r1  radiobutton  group rad1,
              r2  radiobutton group rad1,
              r3  radiobutton group rad1.
  selection-screen end of block b1.
    parameters: p_kunnr type knvv-kunnr.
    select  single * into v_knvv
    from knvv
     where kunnr eq p_kunnr.
     export v_knvv to memory id 'CUST6A'.
*Save customer data for the function module call
call method cl_exithandler=>get_instance 
       exporting 
       exit_name    = 'Z_JIMBOTEST' "Your Badi Name
       null_instance_accepted = yes
          changing instance = exit.
   if not exit is initial.
       if r1 = 'X'.
     call method exit->dispord .  "Badi call
      endif.
if r2 = 'X'.
call method exit->dispfakt.     "Badi Call
endif.
if r3 = 'X'.
call method exit->dispmat.      "Badi call
endif.
end of calling abap******** </b>
In the badi   methods code as shown
1)
method ZIF_EX__JIMBOTEST~DISPORD.
CALL FUNCTION 'Z_DISPLAY_CUST'.
endmethod.
2)
method ZIF_EX__JIMBOTEST~DISPFAKT.
CALL FUNCTION 'Z_DISPLAY_FAKT'.
endmethod
3)
method ZIF_EX__JIMBOTEST~DISPMAT.
CALL FUNCTION 'Z_DISPLAY_CUST'.
endmethod.
Copy via SE 41 the status SALV_STANDARD from  standard SAP program SALV_DEMO_METADATA into the main program where you've created the 3 function modules below (SAP______TOP)
Global Data for the three function modules I'm calling
FUNCTION-POOL Z_BADI_KNVV.                  "MESSAGE-ID ..
include <color>.
include <icon>.
include <symbol>.
tables: zknvv.
data: v_zzkvgr6  TYPE KNVV-ZZKVGR6.
data: choice1  type c.
data: choice2 type c.
data: choice3 type c.
data: choice4 Type c.
data: ok-code(5) type c.
data: answer type string.
data: value1 type SPOP-VARVALUE1.
data: answer1  type string.
tables:  vbak, vbap,  vakpa, vbrk, vrkpa.
data: lr_functions type ref to cl_salv_functions_list.
constants: gc_true  type sap_bool value 'X',
           gc_false type sap_bool value space.
add for colour displays
   data: ls_color type lvc_s_colo.
   DATA : LV_SALV_COLUMNS_TABLE TYPE REF TO CL_SALV_COLUMNS_TABLE.
  data: lr_columns type ref to cl_salv_columns_table,
        lr_column  type ref to cl_salv_column_table.
Data:
        gr_table TYPE REF TO cl_salv_table.
data: z_datum type sy-datum.
data: v_knvv type knvv.
data : begin of s_vbak,
          vkorg   type vakpa-vkorg,
          vkgrp   type vakpa-vkgrp,
          vtweg   type vakpa-vtweg,
          spart   type vakpa-spart,
          auart   type vakpa-auart,
          vbeln   type vakpa-vbeln,
          bstnk   type vakpa-bstnk,
          audat   type vakpa-audat,
          netwr   type vbak-netwr,
       end of s_vbak.
data : begin of s_vbrk,
          vbeln   type vrkpa-vbeln,
          vkorg   type vrkpa-vkorg,
          fkart   type vrkpa-fkart,
          fkdat   type vrkpa-fkdat,
          netwr   type vbrk-netwr,
       end of s_vbrk.
  data: begin of s_vbap,
         matnr   type vbap-matnr,
         arktx   type vbap-arktx,
         netwr   type vbap-netwr,
         kwmeng  type vbap-kwmeng,
      end of s_vbap.
data: t_vbap like table of s_vbap.
data:   t_vbak
        like table of s_vbak.
  data:   t_vbrk
        like table of s_vbrk.
data:   s_name  type tabname.
data: gr_selections type ref to cl_salv_selections.
data: gr_events type ref to cl_salv_events_table.
Source code of the function modules.
Function modules themselves
FUNCTION Z_DISPLAY_CUST.
s_name = 'S_VBAK'.
orders in last 6 months
z_datum = sy-datum - 180.
import v_knvv from memory id 'CUST6A'.
get data
   select avkorg aaudat avkgrp avtweg aspart aauart abstnk avbeln b~netwr
      into corresponding fields of  table t_vbak
      up to 100 rows
         from (  vakpa as a
          inner join vbak as b
           on avbeln eq bvbeln )
        where a~kunde eq v_knvv-kunnr
        and a~parvw eq 'AG'
       and a~vkorg eq 'EN01'
        and a~trvog eq '0'
        and a~audat gt z_datum.
sort t_vbak by audat descending.
*data: gt_hyperlink type standard table of g_type_s_hyperlink.
Instead of if_salv_c_bool_sap=>false, you can pass the
value if_salv_c_bool_sap=>true to this method to
see your ALV as a list.
display data in Grid / List
  TRY.
      CALL METHOD cl_salv_table=>factory
        EXPORTING
          list_display   = if_salv_c_bool_sap=>false
        IMPORTING
          r_salv_table   = gr_table
        CHANGING
          t_table    = t_vbak.
    CATCH cx_salv_msg.
  ENDTRY.
try.
LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
      ls_color-col = col_negative.
      ls_color-int = 0.
      ls_color-inv = 0.
      lr_column->set_color( ls_color ).
  catch cx_salv_not_found.
endtry.
try.
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'VBELN' ).
ls_color-col = col_negative.
      ls_color-int = 1.
      ls_color-inv = 1.
      lr_column->set_color( ls_color ).
catch cx_salv_not_found.
endtry.
try.
*LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
lr_column->set_short_text( 'Short' ).
lr_column->set_medium_text( 'Medium' ).
lr_column->set_long_text( 'Net Value' ).
*lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'URL' ).
catch cx_salv_not_found.
endtry.
gr_table->set_screen_status( pfstatus = 'SALV_STANDARD'
report = sy-repid
set_functions = gr_table->c_functions_all ).
this statement actually does the display.
  gr_table->display( ).
ENDFUNCTION.
FUNCTION Z_DISPLAY_FAKT.
s_name = 'S_VBRK'.
invoices in last 6 months
z_datum = sy-datum - 180.
import v_knvv from memory id 'CUST6A'.
get data
   select avbeln afkart avkorg afkdat
     b~netwr
      into corresponding fields of  table t_vbrk
      up to 100 rows
         from (  vrkpa as a
          inner join vbrk as b
           on avbeln eq bvbeln )
        where a~kunde eq v_knvv-kunnr
        and a~parvw eq 'RG'
       and a~vkorg eq 'EN01'
        and a~vbtyp eq 'M'
        and a~fkdat gt z_datum.
sort t_vbrk by fkdat descending.
*data: gt_hyperlink type standard table of g_type_s_hyperlink.
Instead of if_salv_c_bool_sap=>false, you can pass the
value if_salv_c_bool_sap=>true to this method to
see your ALV as a list.
display data in Grid / List
  TRY.
      CALL METHOD cl_salv_table=>factory
        EXPORTING
          list_display   = if_salv_c_bool_sap=>false
        IMPORTING
          r_salv_table   = gr_table
        CHANGING
          t_table    = t_vbrk.
    CATCH cx_salv_msg.
  ENDTRY.
try.
LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
      ls_color-col = col_negative.
      ls_color-int = 0.
      ls_color-inv = 0.
      lr_column->set_color( ls_color ).
      catch cx_salv_not_found.
endtry.
try.
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'VBELN' ).
ls_color-col = col_negative.
      ls_color-int = 1.
      ls_color-inv = 1.
      lr_column->set_color( ls_color ).
catch cx_salv_not_found.
endtry.
try.
*LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
lr_column->set_short_text( 'Short' ).
lr_column->set_medium_text( 'Medium' ).
lr_column->set_long_text( 'Net Value' ).
*lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'URL' ).
catch cx_salv_not_found.
endtry.
gr_table->set_screen_status( pfstatus = 'SALV_STANDARD'
report = sy-repid
set_functions = gr_table->c_functions_all ).
this statement actually does the display.
  gr_table->display( ).
ENDFUNCTION.
FUNCTION Z_DISPLAY_MATERIAL.
s_name = 'S_VBAP'.
invoicesrs in last 6 months
z_datum = sy-datum - 180.
import v_knvv from memory id 'CUST6A'.
get data
select avbeln bmatnr barktx bnetwr b~kwmeng
into corresponding fields of  table t_vbap
      up to 100 rows
from (  vakpa as a
          inner join vbap as b
           on avbeln eq bvbeln )
        where a~kunde eq v_knvv-kunnr
        and a~parvw eq 'AG'
       and a~vkorg eq 'EN01'
        and a~trvog eq '0'
        and a~audat gt z_datum.
TRY.
      CALL METHOD cl_salv_table=>factory
        EXPORTING
          list_display   = if_salv_c_bool_sap=>false
        IMPORTING
          r_salv_table   = gr_table
        CHANGING
          t_table    = t_vbap.
    CATCH cx_salv_msg.
  ENDTRY.
try.
LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
      ls_color-col = col_negative.
      ls_color-int = 0.
      ls_color-inv = 0.
      lr_column->set_color( ls_color ).
  catch cx_salv_not_found.
endtry.
try.
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'ARKTX' ).
ls_color-col = col_negative.
      ls_color-int = 1.
      ls_color-inv = 1.
      lr_column->set_color( ls_color ).
catch cx_salv_not_found.
endtry.
try.
*LV_SALV_COLUMNS_TABLE = gr_table->get_columns( ).
lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'NETWR' ).
lr_column->set_short_text( 'Short' ).
lr_column->set_medium_text( 'Medium' ).
lr_column->set_long_text( 'Net Value' ).
*lr_column ?= LV_SALV_COLUMNS_TABLE->get_column( 'URL' ).
catch cx_salv_not_found.
endtry.
gr_table->set_screen_status( pfstatus = 'SALV_STANDARD'
report = sy-repid
set_functions = gr_table->c_functions_all ).
this statement actually does the display.
  gr_table->display( ).
ENDFUNCTION.
You can extend this as far as you like -- it's really easy and MUCH MUCH easier than the old way with fieldcatalogs etc etc.

Answer 1

If the pagecontainer_mc holds another movieclip that contains the button you are trying to target, then you need to include that loaded movieclip in the targeting.  And if contacts is that movieclip, then you should be able to target it directly using...
var contacts:contatti = new contatti;
contacts.contacts_btn.addEventListener(MouseEvent.CLICK,showContacts);