topic Re: INTERNAL TABLE in Application Development and Automation Discussions

INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:16:47 GMT

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.

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:20:30 GMT

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

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:22:41 GMT

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

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:25:42 GMT

place a quote when you are declaring field name.

fieldname = 'GT_OUTTAB'

regards

shiba dutta

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:25:57 GMT

hi manoj,

i do not get anything in the components.

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:26:15 GMT

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

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:28:41 GMT

THANK YOU SHIBA,PAVEL AND JUDITH

POINTS HAVE BEEN AWARDED.

Re: INTERNAL TABLE

Former Member — Tue, 23 Jan 2007 09:42:48 GMT

Hi,

But no points are seen.

Please reward points appropriately.