|
#1
|
|||
|
|||
Puedes probar con este código:
REPORT ZTESTPDO. DATA : X(32) VALUE 'A,B,C,D,E,F', V_LENGTH(6) TYPE N. START-OF-SELECTION. SY-SUBRC = 0. V_LENGTH = STRLEN( X ). WHILE SY-SUBRC EQ 0 AND SY-FDPOS LT V_LENGTH. IF X+SY-FDPOS(2) NE ', '. REPLACE ',' WITH ', ' INTO X+SY-FDPOS. V_LENGTH = V_LENGTH + 1. ENDIF. SY-FDPOS = SY-FDPOS + 2. ENDWHILE. WRITE : / X. |
#2
|
|||
|
|||
Has probado el REPLACE pero con la coletilla ALL OCCURRENCES OF ?
Creo que con esto la instrucción REPLACE te deberia cambiar todas las que encuentra... Pues nada....saludos. Julián |
#3
|
|||
|
|||
al hacer un replace a secas solo lo hace la primera vez. Prueba con un bucl como el que te paso.
REPORT ZC402REPLACE . DATA: CAMPO(50) VALUE 'EN UN LUGAR DE LA DECHA DE CUYO DE DE DE SOY'. DATA: LONGITUD TYPE I. DATA: CONTADOR TYPE I VALUE 0. LONGITUD = STRLEN( CAMPO ). WRITE:/ 'TEXTO INICIAL:' , CAMPO. WRITE:/. WRITE:/ 'LONGITUD DEL TEXTO:' , LONGITUD. WRITE:/. ULINE. WHILE CONTADOR <= LONGITUD. REPLACE 'DE' WITH 'POR' INTO CAMPO. CONTADOR = CONTADOR + 1. ENDWHILE. WRITE:/ 'TEXTO FINAL:' , CAMPO. |
#4
|
||||
|
||||
data: g(20).
data: uno(2), dos(2), tres(2), cuatro(2). g = 'a,b,c,d'. split g at ',' into uno dos tres cuatro. clear g. concatenate uno ',' into uno. concatenate dos ',' into dos. concatenate tres ',' into tres. concatenate cuatro ',' into cuatro. concatenate uno dos tres cuatro into g separated by space. Sencillito. Salud
__________________
Úlima edición por tomasm fecha: 13/06/06 a las 15:11:00. |
#5
|
|||
|
|||
El último funciona bien pero te convendría realizarlo dentro de un loop, do times, o el caso que sea, y concatenas en cada pasada agregándole el espacio.
Espero sirva. |
#6
|
||||
|
||||
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 !!!!
__________________
|
#7
|
|||
|
|||
Problema con cadenas
Hola!
Tengo un problema con cadenas, quiza puedan darme una mano con esto. Mi texto es mas o menos asi. blablabla & blablabla & blabla &. Necesito reemplezar en el primer & con x. El segundo & con y. Y el tercer & con z. Ya probe algunas cosas pero no funciona Espero respuesta. Gracias |
Herramientas | Buscar en Tema |
Desplegado | |
|
|