njames

METHOD copy_structure .
* parameters
* i_new type any
* i_old type any
* final - changing type any

*  copy by component only if the new value is populated else take
*  the existing component
  DATA: _componentno TYPE i   VALUE 0
      .

njames

  TYPES: BEGIN OF line,
    date_from           TYPE d,
    time_from           TYPE t,
    date_to             TYPE d,
    time_to             TYPE t.
    INCLUDE TYPE crmst_date_btil.
  TYPES: END OF line.

  CREATE DATA rv_sample TYPE line.

njames

METHOD ENABLE_OCA_BUTTONS.

  DATA: lv_status TYPE j_estat
      , lo_current TYPE REF TO if_bol_bo_property_access
      , table_rows TYPE i
      .

  FIELD-SYMBOLS: <status> type RSDSSELOPT.

* default condition to false and change if in correct status

njames

REPORT  z_hello_datetime.

  data:
        dt type REF TO zcl_datetime
      , fs type string
      , ts type timestamp
      .

  get time STAMP FIELD ts.

njames

* the last two buttons are displayed only if there is data in the table
  lv_btn_enabled  = abap_true.
  lv_col_wrapper = typed_context->builactivity->collection_wrapper.
  IF lv_col_wrapper->size( ) > 0.
    lv_btn_enabled  = abap_false.
  ENDIF. 

njames

<?php  
    /** 
     * @author Nigel James 
     * @email  nigel.james@sapinsidetrack.org 
     * @date   15 Apr 2013 
     *  
     * Create an image for SAP Inside Track events with Year and City 
     */  
      
    function LoadPNG($pngName)  

njames

  DATA:
      lr_core           TYPE REF TO cl_crm_bol_core
    , lr_entity         TYPE REF TO cl_crm_bol_entity
    , lv_partner_guid   TYPE bu_partner_guid
    , lv_object_guid    TYPE crmt_object_guid
    .


**      get guid and navigate to the partner and get Description_name
            current->get_property_as_value( EXPORTING iv_attr_name = 'CRM_GUID'