otra versión
DATA: g(20),
h(20).
DATA: uno(2),
pos(2) TYPE n.
START-OF-SELECTION.
g = 'a,b,c,d,'.
clear h.
WHILE sy-subrc = 0.
SEARCH g FOR ','.
IF sy-subrc = 0.
pos = sy-fdpos.
pos = pos - 1.
MOVE g+pos(2) TO uno.
REPLACE ',' WITH space INTO g.
CONCATENATE h uno INTO h SEPARATED BY space.
CLEAR uno.
ENDIF.
ENDWHILE.
WRITE:/ h.
Saludos !!!!
__________________
|