topic Internal table in Perform in Application Development and Automation Discussions

Internal table in Perform

SG141 — Mon, 20 Aug 2007 13:47:45 GMT

How to pass internal tables in Perform.....

Re: Internal table in Perform

Former Member — Mon, 20 Aug 2007 13:51:23 GMT

Hi,

like changing,using we can use tables also

FORM fill_table USING wa TYPE any

CHANGING ptab TYPE INDEX TABLE

TABLES itab.

ENDFORM.

<b>reward if helpful</b>

rgds,

bharat.

Re: Internal table in Perform

Former Member — Mon, 20 Aug 2007 13:54:21 GMT

and there is no need to pass them . you can use them straight away in you're form if you like

Re: Internal table in Perform

Former Member — Mon, 20 Aug 2007 13:54:38 GMT

perform display tables itab.

form display tables itab.

loop at itab.

write :...........

endloop.

endform.

Re: Internal table in Perform

Former Member — Mon, 20 Aug 2007 13:56:28 GMT

Perform get_data tables itab.

form tables itab structure vbak.

endform.

Re: Internal table in Perform

Former Member — Mon, 20 Aug 2007 13:56:40 GMT

TYPES: BEGIN OF T_X.

INCLUDE STRUCTURE SFLIGHT.

TYPES: ADDITION(8) TYPE C,

END OF T_X.

...

DATA: X TYPE STANDARD TABLE OF T_X WITH NON-UNIQUE

DEFAULT KEY INITIAL SIZE 0.

FORM U TABLES X STRUCTURE SFLIGHT.

...

PERFORM U TABLES X.

...

FORM U TABLES X STRUCTURE SFLIGHT.

WRITE: X-FLDATE.

ENDFORM.

Re: Internal table in Perform

Pawan_Kesari — Mon, 20 Aug 2007 13:57:12 GMT

below is one of the method...


REPORT ztable .

TYPES: BEGIN OF ty_mara,
        matnr TYPE mara-matnr,
        ersda TYPE mara-ersda,
        ernam TYPE mara-ernam,
        laeda TYPE mara-laeda,
        aenam TYPE mara-aenam,
      END OF ty_mara.

TYPES : t_mara TYPE TABLE OF ty_mara .

DATA : it_mara TYPE t_mara .

START-OF-SELECTION .

  SELECT matnr
         ersda
         ernam
         laeda
         aenam
    INTO table it_mara
    FROM mara
   WHERE matnr LIKE 'A%' .

    PERFORM print_material USING it_mara .

*---------------------------------------------------------------------*
*       FORM print_material                                           *
*---------------------------------------------------------------------*
*       ........                                                      *
*---------------------------------------------------------------------*
*  -->  PIT_MARA                                                      *
*---------------------------------------------------------------------*
FORM print_material USING pit_mara TYPE t_mara .

  DATA : wa_mara TYPE ty_mara .

  LOOP AT pit_mara INTO wa_mara .
    WRITE : / wa_mara-matnr .
  ENDLOOP.

ENDFORM.                    " print_material