You want to create two frequently-used long texts in SAP R/3 and make them available in a picklist for long texts in CATS notebook. The long texts are each one line long:

• Court appearance
• Personal tax compliance

You want users to be able to select the texts in the picklist using the following labels:

• Court app.
• Personal tax compl.

You have to implement the MYCATS02 customer exit as follows:

*----------------------------------------------------------------------*

* INCLUDE ZXMYCU02 *

*----------------------------------------------------------------------*

DATA reference_to_new_picklist TYPE REF TO data.

FIELD-SYMBOLS: <my_picklist> TYPE ANY TABLE.

DATA: my_picklist_standard_text TYPE my_picklist_standard_text,

wa_standard TYPE LINE OF my_picklist_standard_text.

CREATE DATA reference_to_new_picklist TYPE my_picklist_standard_text.

ASSIGN reference_to_new_picklist->* TO <my_picklist>.

*fill standard text

wa_standard-standard_text_id = 'Text1'.

wa_standard-counter = '000'.

wa_standard-langu = 'E'.

wa_standard-text = 'Court app.'.

APPEND wa_standard TO my_picklist_standard_text.

wa_standard-standard_text_id = 'Text1'.

wa_standard-counter = '001'.

wa_standard-langu = 'E'.

wa_standard-text = 'Court appearance'.

APPEND wa_standard TO my_picklist_standard_text.

wa_standard-standard_text_id = 'Text2'.

wa_standard-counter = '000'.

wa_standard-langu = 'E'.

wa_standard-text = 'Personal tax compl.'.

APPEND wa_standard TO my_picklist_standard_text.

wa_standard-standard_text_id = 'Text2'.

wa_standard-counter = '001'.

wa_standard-langu = 'E'.

wa_standard-text = 'Personal tax compliance'.

APPEND wa_standard TO my_picklist_standard_text.

<my_picklist> = my_picklist_standard_text.

FIELD-SYMBOLS: <field> TYPE ANY.

ASSIGN COMPONENT 1 OF STRUCTURE reference_table TO <field>.

<field> = 'Z_PICKLIST_STND_TXT'.

ASSIGN COMPONENT 2 OF STRUCTURE reference_table TO <field>.

<field> = reference_to_new_picklist.

APPEND reference_table.