I am loading classification data for Material into BW.
We have 40 classification characteristics and the applications downstream to BW need to see the code and text for these objects side by side.
We are employing a direct update DSO where we have a ZTEXT_xxx infoobject for each ZCLASSIFICATION_xxx code infoobject.
We populate this via routine in APD. Routine is something like
LOOP AT it_source INTO ls_source.
SELECT SINGLE TXTMD INTO ls_target-ZTEXT_001 from /BIC/TZCLASS_001
where /BIC/ZCLASS_001 = ls_source-/BIC/ZCLASS_001.
SELECT SINGLE TXTMD INTO ls_target-ZTEXT_002 from /BIC/TZCLASS_062
where /BIC/ZCLASS_062 = ls_source-/BIC/ZCLASS_062.
We do this for all 40 objects. Is there a better way to write this code?