Ver Mensaje Individual
  #5  
Viejo 25/03/08, 16:06:49
Avatar de DavidXD_XD
DavidXD_XD DavidXD_XD is offline
Moderator
 
Fecha de Ingreso: ago 2006
Localización: Lima - Perú
Mensajes: 1,251
Creo que no hay, y si le colocas asi:

DATA: cadena LIKE it_fichero-cantxpza.

clear: i, cadena, cont.
i = strlen( it_fichero-cantxpza ).

DO i times.
IF ( it_fichero-cantxpza+cont(1) CA '0123456789' ). "Ojo es CA
CONCATENATE cadena it_fichero-cantxpza+cont(1) INTO cadena.
ENDIF.
cont = cont + 1.
ENDDO.

* Eliminando los ceros a la izquierda para evitar el DUMP
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
INPUT = cadena
IMPORTING
OUTPUT = cadena.

* Al final solo igualamos
it_fichero-cantxpza = cadena.

Espero te sirva ...
__________________
David Carballido Córdova

Úlima edición por DavidXD_XD fecha: 25/03/08 a las 16:31:19.
Responder Con Cita