GOS TOOLBAR

DATA: lo_manager  TYPE REF TO cl_gos_manager,
      la_obj      TYPE borident.

PARAMETERS: p_kunnr TYPE kna1-kunnr.
*
*
START-OF-SELECTION.
*
* Set object Key

  la_obj-objtype = 'KNA1'.
  la_obj-objkey  = p_kunnr.
*
* GOS toolbar
  CREATE OBJECT lo_manager
    EXPORTING
      is_object    = la_obj
      ip_no_commit = space
    EXCEPTIONS
      OTHERS = 1.
*
* To generate output
  WRITE: 'GOS test for Customer'.