funcion para agregar ceros a izquierda a un char
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 :)
|
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 |
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 |
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! |
Que tal:
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. |
Husos Horarios son GMT. La hora en este momento es 01:46:47. |
www.mundosap.com 2006 - Spain
software crm, crm on demand, software call center, crm act, crm solutions, crm gratis, crm web