PDA

Ver la Versión Completa : funcion para agregar ceros a izquierda a un char


matiaspostay
23/01/08, 17:08:22
Hola, necesito una funcion para agregar ceros a izquierda a un char y otra para quitar ceros a izquierda a un char (MATNR). Espero me puedan ayudar, muchas gracias :)

mysmb2
23/01/08, 18:02:06
hola usa CONVERSION_EXIT_ALPHA_INPUT y CONVERSION_EXIT_ALPHA_OUTPUT.


SALUDOS.

matiaspostay
24/01/08, 10:30:31
hola usa CONVERSION_EXIT_ALPHA_INPUT y CONVERSION_EXIT_ALPHA_OUTPUT.


SALUDOS.

No me sirve ya que es un char y cuando pongo una letra no me quita/agrega los ceros. Ej: 00067U3064

robert_milan
24/01/08, 10:34:12
dale un:

loop at it_File.
SHIFT it_file-matnr RIGHT DELETING TRAILING SPACE.
Do.
replace space with '0 ' into it_file-matnr.
if sy-subrc <> 0.
exit.
endif.
enddo.
endloop.

espero te sirva

smontenegro
27/05/08, 15:43:44
Si por ejemplo tenes una variable de tipo C de longitud 10, haces lo siguiente:

OVERLAY variable WITH '0000000000'.

Esto reemplaza los espacios en blanco con ceros.

Saludos!

larmadovr
27/05/08, 16:32:48
si deseas agregar 0 a la izq, pasa el char a una variable tipo N con la longitud deseada, y de esta manera tendras el matnr con el número relleno de ceros.

Si lo quieres quitar, usa REMPLACE '0' with space y despues el CONDENSE NO-GAPS

Espero te sirva, si quieres un ejemplo avisame para hacer uno.