Ver Mensaje Individual
  #1  
Viejo 21/04/08, 19:42:57
Avatar de vsuarezo
vsuarezo vsuarezo is offline
Member
 
Fecha de Ingreso: abr 2006
Localización: Bogotá - Colombia
Mensajes: 47
Espacios a la derecha archivo TXT

Buenas tardes,

Tengo definida una ta bla interna REC de la siguiente forma:

DATA: BEGIN OF REG OCCURS 100,
CAMPO(100) TYPE C,
END OF REG.

y otra ADIC así:

DATA: BEGIN OF ADIC OCCURS 100,
TIPO_REG(1) TYPE N VALUE 3,
NUM_FAC(10) TYPE C,
REFER(10) TYPE C,
SIG_BRU(1) TYPE C,
VAL_BRU(10) TYPE N,
SIG_AJUS(1) TYPE C,
VAL_AJUS(10) TYPE N,
SIG_NET(1) TYPE C,
VAL_NET(10) TYPE N,
FILLER(41) TYPE C VALUE SPACE,
END OF ADIC.

Con el siguiente código, paso el contenido de ADIC a REG:

CLEAR REG.
REG = ADIC.
APPEND REG.

El conenido de FILLER son espacioes en blanco.
¿Que debo hacer para que cuando pase el contenido de ADIC a REG se conserven los espacios en blanco del campo FILLER?.

Muchas Gracias
Responder Con Cita