#2
|
|||
|
|||
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 |
Herramientas | Buscar en Tema |
Desplegado | |
|
|