topic Re: Clear from internal table in Application Development and Automation Discussions

Clear from internal table

Former Member — Wed, 23 Apr 2008 10:28:48 GMT

I have one ITAB having following values:

GRN IR Date Price

11249432 6075620 31.07.2007 1082104

11249433 6075620 31.07.2007 1082104

11249436 6075620 31.07.2007 1082104

But i wish to write in this manner tht amt come only once.

GRN IR Date Price

11249432 6075620 31.07.2007 1082104

11249433 6075620 31.07.2007

11249436 6075620 31.07.2007

Please guide

Re: Clear from internal table

Former Member — Wed, 23 Apr 2008 10:32:17 GMT

Hi Abhut,

Refer the Below Example Program :

REPORT  YH1072_TEST.

DATA: wa_maktx LIKE makt-maktx,
      wa_menge TYPE c.

DATA: BEGIN OF t_mara OCCURS 0,
         matnr LIKE mara-matnr,
         werks LIKE marc-werks,
         maktx LIKE makt-maktx,
         menge TYPE c,
      END OF t_mara.

t_mara-matnr = 'A1' .
t_mara-werks = 602.
t_mara-maktx = 'Milk'.
t_mara-menge = '1'.
APPEND t_mara.

t_mara-matnr = 'A1' .
t_mara-werks = 602.
t_mara-maktx = 'Milk'.
t_mara-menge = '1'.
APPEND t_mara.

t_mara-matnr = 'A1' .
t_mara-werks = 602.
t_mara-maktx = 'Milk'.
t_mara-menge = '1'.
APPEND t_mara.

LOOP AT t_mara.
  IF t_mara-maktx = wa_maktx AND
     t_mara-menge = wa_menge.
         WRITE:/ t_mara-matnr,
           t_mara-werks .

  ELSE.
    WRITE:/ t_mara-matnr,
           t_mara-werks ,
           t_mara-maktx,
            t_mara-menge.

  ENDIF.
  MOVE: t_mara-maktx TO wa_maktx,
        t_mara-menge TO wa_menge.
ENDLOOP.

Regards,

Sunil

Re: Clear from internal table

Former Member — Wed, 23 Apr 2008 10:33:26 GMT

HI,

loop at itab.

write: / GRN IR Date.

at new ir.

write: price.

endat.

endloop.

regards

Nicole

Re: Clear from internal table

Former Member — Wed, 23 Apr 2008 10:38:09 GMT

Hi,

1.Take two structures as str1 and str2.

2.First compare as If str1 eq str2.First time it fails,then move the values into the str2.

3.From second time onwards clear the value .

Regards,

Shiva.