#10
|
||||
|
||||
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 !!!!
__________________
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|