Skip to Content
0
Jul 05, 2016 at 10:14 AM

Help needed adding custom fields to property provider OpenText in Ext. ECM

1497 Views

Hello all.

I'm busy creating a custom property provider for OpenText. It's however totally unclear how I can read the provided data from the business object
(BUS2054) and then add extra fields with data derived from the read info. I extended the original BUS2054 with specific fields that the customer also added tot the PRPS table. Now I have to send also the value from the stored codes. F.i. the field 'ZZPROJECTADMIN' holds the value '86', but we also have to send the name which is stored in table 'TCJ05'.

The property provider looks like this (copy of original):

METHOD get_properties.

DATA:
ls_bor TYPE /otx/rm_wsci_s_bor,
ls_bor_properties TYPE /otx/rm_wsci_s_bor_properties,
lt_attr_defs TYPE /otx/rm_wsci_tt_attr_def,
ls_attr_def TYPE /otx/rm_wsci_s_attr_def,
l_value TYPE string,
ls_prop TYPE LINE OF /otx/rm_wsci_tt_properties.

CLEAR:
pet_bor_properties.

CALL METHOD get_property_defs
IMPORTING
pet_attr_defs = lt_attr_defs.

" Goes through each given BOR.
LOOP AT pit_bor INTO ls_bor.

CLEAR ls_bor_properties.
ls_bor_properties-bor = ls_bor.

" Gets the properties for the current BOR.
LOOP AT lt_attr_defs INTO ls_attr_def.

CLEAR ls_prop.
ls_prop-def = ls_attr_def.

CASE ls_attr_def-key.

WHEN c_attr_name_bor_type.
l_value = ls_bor-type.
APPEND l_value TO ls_prop-values.

WHEN c_attr_name_bor_id.
l_value = ls_bor-id.
APPEND l_value TO ls_prop-values.

WHEN OTHERS.
CONTINUE.

ENDCASE.

APPEND ls_prop TO ls_bor_properties-properties.

ENDLOOP.

APPEND ls_bor_properties TO pet_bor_properties.

ENDLOOP.

ENDMETHOD.


Can anybody tell me how to alter this so I can add custom fields.

Best regards, John