Hola ALNICO:
declara tu tabla interna asi:
TYPES: BEGIN OF REG,
fili like PA0001-bukrs,
anom like PA0001-abkrs,
nper1 like PA9111-pernr,
ced like Pa0185-icnum,
nom like PA0001-ename,
perf like PA9111-perfil,
freg1 like PA9111-finimedemb,
mtot like PA9111-mtunico,
ptot like PA9111-porsmn,
int like ZINT_EVAL-intereses,
mot like Z9HRMOTEMB-dsmotemb,
stat like Z9HRTSTEMB-tstatus,
cedb like PA9111-nbbenfr,
nomb like PA9111-cibenfr,
trib1 like PA9111-tribunal,
nofic1 like PA9111-numofic,
fofc like PA9111-fofc,
numfs like PA9111-numofcsup,
statu like PA9111-status,
FC like PA9111-begda,
FF like PA9111-ENDDA,
CM like PA9111-CODMOTIVO,
END OF REG.
****declara otra con la estructura de la anterior asi, en esta tabla guardas tus datos:
DATA: ZTEP TYPE TABLE OF REG .
***hace la logica para llenar tu tabla interna
***elimina los registros que quieras sin utilizar la palabra from
DELETE ZTEP WHERE (condición).
****o si quieres eliminar los duplicados
DELETE ADJACENT DUPLICATES FROM ZTEP COMPARING nom.
espero te sirva,
Saludos,
|