svict4

Keybase proof

I hereby claim:

• I am svict4 on github.
• I am svict4 (https://keybase.io/svict4) on keybase.
• I have a public key whose fingerprint is 4236 339D 4E76 C71F B2DB E419 336D EC3C A7B8 BF10

To claim this, I am signing this object:

svict4

Keybase proof

I hereby claim:

• I am svict4 on github.
• I am svict4 (https://keybase.io/svict4) on keybase.
• I have a public key ASBrm7VPVt__BrF2BKBX7llnnRc-vKmr2ogODlTR1S0H5wo

To claim this, I am signing this object:

svict4

*-- This code is placed within the GET_V of the attribute within the context node
*-- (please note that the GET_P must also specify that it is type picklist in the appropriate WHEN clause).

 DATA: lo_ddlb TYPE REF TO cl_crm_uiu_ddlb,
  lt_dropdown TYPE bsp_wd_dropdown_table.

*-- Create an instance of the class specifying that the source type is a table.
  CREATE OBJECT lo_ddlb
    EXPORTING
      iv_source_type = gr_owner->gc_source_type_table. "This value is 'T' for Table.

svict4

DATA: lv_bol_core TYPE REF TO cl_crm_bol_core,
      lv_query TYPE REF TO cl_crm_bol_query_service,
      lv_collection TYPE REF TO if_bol_entity_col,
      lr_entity TYPE REF TO cl_crm_bol_entity,
      lt_table TYPE TABLE OF bu_partner.
 
*-- Get an instance of the core and fire it up.   
  lv_bol_core = cl_crm_bol_core=>get_instance( ).
  lv_bol_core->start_up( 'BP_APPL' ). "Component Set

svict4

*-- This code is calling the exposed Function Module in the snippet of 'BT Creation'.
*-- Found here: https://gist.github.com/svict4/d64fa12613415ab94afd1ee98a82c881

DATA: lo_proxy TYPE REF TO zsapco_zsrv_XXXXXX,
      ls_service_output TYPE zsapzfm_XXXXXX_servresponse,
      ls_service_input TYPE zsapzfm_XXXXXX_serv.

TRY.
*-- Create an instance of the ABAP Proxy class
  CREATE OBJECT lo_proxy.

svict4

*-- Please note that this is the function module that is called remotely in '(C) Consume WS through ABAP'
*-- Found here https://gist.github.com/svict4/f09e13b02e71c4f81a4e6e5c5c73adfe

FUNCTION XXXXXXXXXX.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     VALUE(IV_DESCRIPTION) TYPE  STRING
*"     VALUE(IV_PROCESS_TYPE) TYPE  CHAR4
*"  EXPORTING

svict4

DATA: lr_entity TYPE REF TO if_bol_bo_property_access,
        lr_context TYPE REF TO if_crm_ui_data_context.

  lr_context = cl_crm_ui_data_context_srv=>get_instance( ).
  IF lr_context IS BOUND.
    lr_entity ?= 
lr_context->get_entity( name = cl_crm_ic_bp_constants=>gc_gdc_currentcustomer ).
  ENDIF.

svict4

DATA: lr_data TYPE REF TO data,
      lo_type TYPE REF TO cl_abap_typedescr,
      lo_struct TYPE REF TO cl_abap_structdescr, 
      lr_entity TYPE REF TO if_bol_bo_property_access.

FIELD-SYMBOLS:  <fs_any> TYPE any,
                <fs_actions> LIKE LINE OF lt_actions.

TRY.
    CHECK lr_entity IS BOUND.

svict4

DATA: lv_attr_str TYPE string,
      lo_root TYPE REF TO zXXXXXX_shared_mem,
      lo_area TYPE REF TO zXXXXXX_shared_mem_area.

TRY.
    lo_area = zXXXXXX_shared_mem_area=>attach_for_read( ).
    lv_attr_str = lo_area->root->get_ttt_mem( ).
    lo_area->detach( ).    
CATCH cx_root.
ENDTRY.

svict4

DATA: lr_entity TYPE REF TO if_bol_bo_property_access.

lr_entity ?= me->typed_context->btadminh->collection_wrapper->get_current( ).

CHECK lr_entity IS BOUND.
IF  lr_entity->get_property_as_string( iv_attr_name = 'PROCESS_TYPE' ) = 'process type here'. "added process type check, can never be too careful
ENDIF.