Tuesday, 9 August 2016

Example for Hashed Internal Table

Steps

  • Go to Transaction Code SE38.
  • Enter the program name which start's with Y or Z < program name > and click on CREATE button.
  • Enter the Title.
  • Select the Attribute Type as Executable Program.
  • Click on SAVE button.

Source Code



TYPES : BEGIN OF TY_MAKT,
        MATNR TYPE MAKT-MATNR,
        SPRAS TYPE MAKT-SPRAS,
        MAKTX TYPE MAKT-MAKTX,
        END OF TY_MAKT.

DATA : WA_MAKT TYPE TY_MAKT,
       IT_MAKT TYPE HASHED TABLE OF TY_MAKT WITH UNIQUE KEY MATNR.


WA_MAKT-MATNR = 122.
WA_MAKT-SPRAS = 'EN'.
WA_MAKT-MAKTX = 'LENOVO'.
INSERT WA_MAKT INTO TABLE IT_MAKT.
CLEAR WA_MAKT.

WA_MAKT-MATNR = 123.
WA_MAKT-SPRAS = 'EN'.
WA_MAKT-MAKTX = 'DELL'.
INSERT WA_MAKT INTO TABLE IT_MAKT.
CLEAR WA_MAKT.


WA_MAKT-MATNR = 124.
WA_MAKT-SPRAS = 'EN'.
WA_MAKT-MAKTX = 'HP'.
INSERT WA_MAKT INTO TABLE IT_MAKT.
CLEAR WA_MAKT.

WA_MAKT-MATNR = 122.
WA_MAKT-SPRAS = 'DE'.
WA_MAKT-MAKTX = 'MICROSOFT'.
INSERT WA_MAKT INTO TABLE IT_MAKT.
CLEAR WA_MAKT.


WA_MAKT-MATNR = 124.
WA_MAKT-SPRAS = 'EN'.
WA_MAKT-MAKTX = 'LENOVO'.
INSERT WA_MAKT INTO TABLE IT_MAKT.
CLEAR WA_MAKT.


LOOP AT IT_MAKT INTO WA_MAKT.

  WRITE : / WA_MAKT-MATNR,
            WA_MAKT-SPRAS,
            WA_MAKT-MAKTX.

ENDLOOP.


  • Save -> Check -> Activate.
  • Execute ( F8 ).

Output




No comments:

Post a Comment