Ver Mensaje Individual
  #1  
Viejo 18/05/17, 12:46:08
efranerv efranerv is offline
Junior Member
 
Fecha de Ingreso: feb 2017
Mensajes: 2
Ayuda con do varying

Hola buenas estoy modificando un codigo en unicode para una migracion y tengo que reescribir este codigo:

DO 15 TIMES VARYING up_ziffer FROM int_zahl+0 NEXT int_zahl+1.

up_feldnr = 16 - sy-index.
WRITE up_feldnr TO up_feld+9.
ASSIGN (up_feld) TO <feld>.
PERFORM t015z_lesen USING '0' up_ziffer.
TRANSLATE t015z-wort USING '; '.
IF t015z-wort+4 EQ space AND int_filler NE space.
SHIFT t015z-wort RIGHT.
ENDIF.
TRANSLATE t015z-wort USING int_filler.
<feld> = t015z-wort.

ENDDO.

cambiando el Do Varying por Assign Increment, si alguien me puede ayudar se los agradeceria.
Responder Con Cita