topic Re: Problem with GET REFERENCE statement in Application Development and Automation Discussions

Problem with GET REFERENCE statement

matteo_montalto — Mon, 03 Mar 2014 15:57:12 GMT

Hi gurus,

shortly; I need to populate a table whose elements are made as follows:

CODE TYPE MDM_FIELD_CODE (a string, basically)

VALUE TYPE REF TO DATA.

I need to loop over an item table and populate the above sketched table; so I wrote as follows:

LOOP AT lt_item INTO ls_item.

*** MDMSRM_SHORT_DESCRIPTION ***

CLEAR value_pair.

MOVE 'MDMSRM_SHORT_DESCRIPTION' to value_pair-code.

GET REFERENCE OF ls_item-short_desc INTO value_pair-value.

APPEND value_pair TO lt_value_pair.

....

ENDLOOP.

The problem is: each time the loop is performed, all the VALUE fields already appended have the value of the last iteration.

How can I overcome this problem? Is there a sort of unassignment technique for GET REFERENCE?

Thanks,

Re: Problem with GET REFERENCE statement

RaymondGiuseppi — Mon, 03 Mar 2014 16:11:18 GMT

As you store the reference of the work area field and not of the internal table record field, this is normal behaviour. Look at source sample attached for a solution using ASSIGNING <fs>.

Regards,

Raymond

Re: Problem with GET REFERENCE statement

matteo_montalto — Mon, 03 Mar 2014 16:26:02 GMT

Thanks Raymond,

your solution solved my problem.

One more question... in that LOOP cycle, I have to build up a structure in this way:

LOOP... ASSIGNING <item>.

CLEAR ls_min_qty.

MOVE <item>-min_qty TO ls_min_qty-content.

MOVE '$$$' TO ls_min_qty-unit_code.

GET REFERENCE OF ls_min_qty INTO value_pair-value.

APPEND value_pair TO lt_value_pair.

---

ENDLOOP.

I assume this would lead to the same problem I posted above, as each GET REFERENCE of structure will overwrite previous assignments. How would you overcome this issue?

Thanks again

Re: Problem with GET REFERENCE statement

RaymondGiuseppi — Tue, 04 Mar 2014 07:34:01 GMT

Yes you would always get reference to the work area.

So use similar solution, with a statement APPEND [INITIAL LINE/wa] TO itab ASSIGNING <fs> and use the field symbol in the get reference statement.

Regards,

Raymond

Re: Problem with GET REFERENCE statement

matteo_montalto — Tue, 04 Mar 2014 08:48:20 GMT

Had some difficulties in working with field-symbols as I have to reference to a structure which is partly derived from the workarea and partly fixed...

I did as follows, maybe it's not the best solution, however, seems to work:

FIELD-SYMBOLS <item> TYPE zsrm_cat_files_i.

FIELD-SYMBOLS: <minqty> TYPE mdm_gdt_quantity-content.

FIELD-SYMBOLS: <minqty_unit> TYPE MDM_CDT_MEASURE_UNIT_CODE.

FIELD-SYMBOLS: <minqty_struct> TYPE mdm_gdt_quantity.

DATA minimum_qty TYPE REF TO mdm_gdt_quantity

LOOP ... ASSIGNING <item>.

...

CREATE DATA minimum_qty.

ASSIGN minimum_qty->* TO <minqty_struct>.

ASSIGN COMPONENT 1 OF STRUCTURE <minqty_struct> TO <minqty>.

ASSIGN COMPONENT 2 OF STRUCTURE <minqty_struct> TO <minqty_unit>.

<minqty> = <item>-min_qty.

<minqty_unit> = '$$$'.

GET REFERENCE OF <minqty_struct> INTO value_pair-value.

APPEND value_pair TO lt_value_pair.