Languages extraction

[Former Member]

Hi experts,

I have to extract all languages from language table "T002"TABLE.

I want languages into my internal table like say "EN,FR,DE"

but i am getting like unnessary data say"0,1, upto 9 after that i am getting like a,b,c,d,e,f,

like in my itab.

DATA: BEGIN OF gt_text_lang OCCURS 0,

f1 LIKE t002-spras,

f2 LIKE t002-spras,

f3 LIKE t002-spras,

f4 LIKE t002-spras,

f5 LIKE t002-spras,

f6 LIKE t002-spras,

f7 LIKE t002-spras,

END OF gt_text_lang.

DATA:wa_gt_text_lang like line of gt_text_lang.

DATA:BEGIN OF gt_t002 OCCURS 0,

g_spras LIKE t002-spras,

END OF gt_t002.

DATA:wa_gt_t002 like line of gt_t002.

START-OF-SELECTION.

SELECT spras FROM t002 INTO TABLE gt_t002.

LOOP AT gt_t002 into wa_gt_t002.

wa_gt_text_lang-f1 = wa_gt_t002-g_spras.

wa_gt_text_lang-f2 = wa_gt_t002-g_spras.

wa_gt_text_lang-f3 = wa_gt_t002-g_spras.

wa_gt_text_lang-f4 = wa_gt_t002-g_spras.

wa_gt_text_lang-f5 = wa_gt_t002-g_spras.

wa_gt_text_lang-f6 = wa_gt_t002-g_spras.

wa_gt_text_lang-f7 = wa_gt_t002-g_spras.

APPEND wa_gt_text_lang TO gt_text_lang.

CLEAR :wa_gt_t002.

ENDLOOP.

Thanks

Sail

[Former Member]

If u want EN DE....then use LAISO field of T002....instead of SPRAS!!!

[Former Member]

Hi,

Use LAISO field instead of others.

Like that in below code

SELECT LAISO FROM t002

INTO TABLE gt_t002.the data gt_t002 have a data type inside it like LAISO.

Thanks

jayati

[Former Member]

Hello

Use field LAISO instead of field SPRAS

or use FM CONVERSION_EXIT_ISOLA_OUTPUT for convert.

[Former Member]

Hi,

Use the following code to extract languages from t002 into your internal table

types: begin of itab,

spras type t002-spras,

end of itab.

data it_spras type standard table of itab.

data wa_spras type itab.

select spras from t002 into table itab.

loop at it_spras into wa_spras.

write wa_spras-spras.

clear wa_spras.

endloop.

[Mohamed_Mukhtar]

hi,

DATA: BEGIN OF gt_text_lang OCCURS 0,
f1(2),
f2(2),
f3(2),
f4(2),
f5(2),
f6(2),
f7(2),
END OF gt_text_lang.

DATA:wa_gt_text_lang LIKE LINE OF gt_text_lang.


DATA:BEGIN OF gt_t002 OCCURS 0,
g_spras LIKE t002-spras,
END OF gt_t002.

DATA: wa_gt_t002 LIKE LINE OF gt_t002,
      w_lan(2).

START-OF-SELECTION.

  SELECT spras FROM t002 INTO TABLE gt_t002.

  LOOP AT gt_t002 INTO wa_gt_t002.

    CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
      EXPORTING
        input  = wa_gt_t002-g_spras
      IMPORTING
        output = w_lan.
    .

    wa_gt_text_lang-f1 = w_lan.
    wa_gt_text_lang-f2 = w_lan.
    wa_gt_text_lang-f3 = w_lan.
    wa_gt_text_lang-f4 = w_lan.
    wa_gt_text_lang-f5 = w_lan.
    wa_gt_text_lang-f6 = w_lan.
    wa_gt_text_lang-f7 = w_lan.

    APPEND wa_gt_text_lang TO gt_text_lang.
    CLEAR :wa_gt_t002.
  ENDLOOP.
  BREAK-POINT.

Thanks & Regards