INTERNAL TABLE

[Former Member]

hi experts,

please check my code:

TYPES: BEGIN OF gs_outtab,

lifnr TYPE lfbw-lifnr,

bukrs TYPE lfbw-bukrs,

witht TYPE lfbw-witht,

wt_withcd TYPE lfbw-wt_withcd,

wt_exnr TYPE lfbw-wt_exnr,

wt_exrt TYPE lfbw-wt_exrt,

wt_exdf TYPE lfbw-wt_exdf,

wt_exdt TYPE lfbw-wt_exdt,

wt_wtexrs TYPE lfbw-wt_wtexrs,

akont TYPE lfb1-akont,

busab TYPE lfb1-busab,

lnrze TYPE lfb1-lnrze,

lnrzb TYPE lfb1-lnrzb,

qsznr TYPE lfb1-qsznr,

qszdt TYPE lfb1-qszdt,

qsskz TYPE lfb1-qsskz,

END OF gs_outtab.

DATA : components LIKE rstrucinfo OCCURS 0 WITH HEADER LINE.

DATA: gt_outtab TYPE TABLE OF gs_outtab.

CALL FUNCTION 'GET_COMPONENT_LIST'

EXPORTING

program = SY-REPID

fieldname = GT_OUTTAB

tables

components = COMPONENTS

i do not get anything in the components.

Y so ? Please guide me.

[Former Member]

Replace your code as below:

data: BEGIN OF gt_outtab OCCURS 0,
lifnr TYPE lfbw-lifnr,
bukrs TYPE lfbw-bukrs,
witht TYPE lfbw-witht,
wt_withcd TYPE lfbw-wt_withcd,
wt_exnr TYPE lfbw-wt_exnr,
wt_exrt TYPE lfbw-wt_exrt,
wt_exdf TYPE lfbw-wt_exdf,
wt_exdt TYPE lfbw-wt_exdt,
wt_wtexrs TYPE lfbw-wt_wtexrs,
akont TYPE lfb1-akont,
busab TYPE lfb1-busab,
lnrze TYPE lfb1-lnrze,
lnrzb TYPE lfb1-lnrzb,
qsznr TYPE lfb1-qsznr,
qszdt TYPE lfb1-qszdt,
qsskz TYPE lfb1-qsskz,
END OF gt_outtab.
DATA : components LIKE rstrucinfo OCCURS 0 WITH HEADER LINE.

CALL FUNCTION 'GET_COMPONENT_LIST'
EXPORTING
program = SY-REPID
fieldname = GT_OUTTAB
tables
components = COMPONENTS

Make sure that you place the internal table definition in the program contained in sy-repid and not in any other include.

Manoj

[Former Member]

hi manoj,

i do not get anything in the components.

[Former Member]

TYPES: BEGIN OF gs_outtab,
lifnr TYPE lfbw-lifnr,
bukrs TYPE lfbw-bukrs,
witht TYPE lfbw-witht,
wt_withcd TYPE lfbw-wt_withcd,
wt_exnr TYPE lfbw-wt_exnr,
wt_exrt TYPE lfbw-wt_exrt,
wt_exdf TYPE lfbw-wt_exdf,
wt_exdt TYPE lfbw-wt_exdt,
wt_wtexrs TYPE lfbw-wt_wtexrs,
akont TYPE lfb1-akont,
busab TYPE lfb1-busab,
lnrze TYPE lfb1-lnrze,
lnrzb TYPE lfb1-lnrzb,
qsznr TYPE lfb1-qsznr,
qszdt TYPE lfb1-qszdt,
qsskz TYPE lfb1-qsskz,
END OF gs_outtab.
DATA : components LIKE rstrucinfo OCCURS 0 WITH HEADER LINE.
DATA: gt_outtab TYPE TABLE OF gs_outtab.

CALL FUNCTION 'GET_COMPONENT_LIST'
EXPORTING
program = SY-REPID
fieldname = 'GT_OUTTAB'
tables
components = COMPONENTS

Refer tehse links

[Former Member]

THANK YOU SHIBA,PAVEL AND JUDITH

POINTS HAVE BEEN AWARDED.

[Former Member]

Hi,

But no points are seen.

Please reward points appropriately.

[Former Member]

place a quote when you are declaring field name.

fieldname = 'GT_OUTTAB'

regards

shiba dutta

[Former Member]

Hi,

are you sure, that you want to send empty table as parameter fieldname? Try quote like this:

CALL FUNCTION 'GET_COMPONENT_LIST'

EXPORTING

program = SY-REPID

fieldname = 'GT_OUTTAB'

tables

components = COMPONENTS

Regards,

Pavel