Ver Mensaje Individual
  #4  
Viejo 07/03/13, 19:46:41
beltsoft beltsoft is offline
Member
 
Fecha de Ingreso: sep 2011
Localización: Mexico
Mensajes: 99
Creao que lo que realmente quieres hacer es algo como esto:

DATA: campo1(5) TYPE c VALUE '1234', " Su tamaño es 5
campo2(2) TYPE c VALUE '12', " Su tamaño es 2
campo3(8) TYPE c VALUE '.', " Su tamaño es 8
campo4(5) TYPE c VALUE '1234'. " Su tamaño es 5

DATA: lv_campo(20) TYPE c,
lv_len TYPE i,
lv_offset TYPE i.

* Campo 1
lv_campo = campo1.
DESCRIBE FIELD campo1 LENGTH lv_offset IN CHARACTER MODE.

* Campo 2
WRITE campo2 TO lv_campo+lv_offset.
DESCRIBE FIELD campo2 LENGTH lv_len IN CHARACTER MODE.
lv_offset = lv_offset + lv_len.

* Campo 3
WRITE campo3 TO lv_campo+lv_offset.
DESCRIBE FIELD campo3 LENGTH lv_len IN CHARACTER MODE.
lv_offset = lv_offset + lv_len.

* Campo 4
WRITE campo4 TO lv_campo+lv_offset.
DESCRIBE FIELD campo4 LENGTH lv_len IN CHARACTER MODE.
lv_offset = lv_offset + lv_len.

WRITE lv_campo.


Saludos.
__________________
SSE BeltSoft México
Your Business, our motivation ...
Responder Con Cita