Ver Mensaje Individual
  #2  
Viejo 14/11/17, 08:36:55
Raulalsan Raulalsan is offline
Junior Member
 
Fecha de Ingreso: sep 2016
Mensajes: 25
Smile

Acabo de empezar en ABAP y seguro que hay una forma mejor, pero yo haría una lógica propia.
Te dejo una lógica que he implementado y que creo que funcionaría tal como deseas.

CLEAR ls_cliente_aux.
SORT lt_cliente BY cliente date DESCENDING.
DATA(num_rows) = lines( lt_cliente ).
LOOP AT lt_cliente INTO ls_cliente.
IF ls_cliente_aux-cliente NE ls_cliente-cliente AND sy-tabix NE
'1'.
APPEND ls_cliente_aux TO lt_cliente_aux.
ls_cliente_aux-cliente = ls_cliente-cliente.
ls_cliente_aux-date = ls_cliente-date.
ls_cliente_aux-saldo = ls_cliente-saldo.
ELSE.
IF sy-tabix EQ '1'.
ls_cliente_aux-cliente = ls_cliente-cliente.
ls_cliente_aux-date = ls_cliente-date.
ls_cliente_aux-saldo = ls_cliente-saldo.
ELSE.
IF sy-tabix EQ num_rows.
ls_cliente_aux-saldo = ls_cliente-saldo +
ls_cliente_aux-saldo.
APPEND ls_cliente_aux TO lt_cliente_aux.
ELSE.
ls_cliente_aux-saldo = ls_cliente-saldo +
ls_cliente_aux-saldo.
ENDIF.
ENDIF.
ENDIF.

ENDLOOP.

Saludos
Responder Con Cita