topic Re: Retrieve fieldname in Application Development and Automation Discussions

Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:08:06 GMT

Hi all,

Hw can i retrieve all the fieldname of a table? Any fm to do that? If have, how to define the internal table to hold all the fieldname? Any code to share.

Thks

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:12:09 GMT

check the std table DD03L and pass the table name in TABNAME field (like MARA).

regards

shib dautta

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:12:38 GMT

i hope that u want 2 retrieve the fieldname of standard sap tables and not internal table

use this function module FMRE_GET_TABLEFIELDS_LONGNAMES

and pass the table name of which u want the fields and u will get the fieldnames

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:12:53 GMT

hi,

try in DD03L table

data itab type standard table of dd03l with header line.

select TABNAME

fieldname

into table itab

where tabname = 'VBAK'.

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:13:03 GMT

Hi,

you can use the fm CEV3_TABLE_READ to get all fields of a table.

To get all tables, read table DD02L.

Regards

Nicole

Re: Retrieve fieldname

abdulazeez12 — Tue, 09 Oct 2007 06:13:13 GMT

Use the function module F4_DD_TABLE_FIELDS

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:13:51 GMT

Hi,

While creating a internal table

u include that table in the definition.

IF u won't get these things.

only copy and paste.

Assign points if useful.

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:15:18 GMT

How to declare the internal table to hold this fieldname.?

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:16:17 GMT

Hi Gary,

The given code is a sample program.

You can also go to transaction code ABAPDOCU where you can find n no. of sample programs.

&----

*& Report ZCLASSICAL_REP2 *

*& *

&----

*& *

&----

REPORT ZCLASSICAL_REP2 MESSAGE-ID ZHAR LINE-COUNT 60(3).

TABLES SFLIGHT.

DATA: ITAB LIKE SFLIGHT OCCURS 0 WITH HEADER LINE.

PARAMETERS: H_CARRID LIKE SFLIGHT-CARRID.

************************************************************************

INITIALIZATION.

************************************************************************

INITIALIZATION.

H_CARRID = 'AA'.

************************************************************************

AT SELECTION-SCREEN.

************************************************************************

AT SELECTION-SCREEN.

IF H_CARRID <> 'AA'.

MESSAGE E000.

ENDIF.

************************************************************************

START-OF-SELECTION.

************************************************************************

START-OF-SELECTION.

SELECT * FROM SFLIGHT INTO TABLE ITAB.

************************************************************************

TOP-OF-PAGE.

************************************************************************

WRITE:/10 'DATE:' , SY-DATUM COLOR 3,

30 'PAGE NO:', SY-PAGNO COLOR 3,

45 'TIME:' , SY-UZEIT COLOR 3,

60 'USERNAME:',SY-UNAME COLOR 3.

ULINE.

WRITE:/10 'CARRID', 20 'CONNID', 35 'FLDATE'.

ULINE.

************************************************************************

END-OF-PAGE.

************************************************************************

WRITE:/ SY-PAGNO.

************************************************************************

END-OF-SELECTION.

************************************************************************

END-OF-SELECTION.

LOOP AT ITAB.

WRITE:/10 ITAB-CARRID COLOR 4,

20 ITAB-CONNID COLOR 4,

35 ITAB-FLDATE COLOR 4.

ENDLOOP.

WRITE:/ 'THIS REPORT IS CONFIDENTIAL' COLOR 3.

Reward if helpful.

Regards,

Harini.S

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:23:42 GMT

Hi Gary,

Use the function module

DDIF_FIELDINFO_GET

To declare the the internal table with the desired fields.

let us suppose take table T549A. if you want all fields of that table.

declare it as shown below.

<b>Method1:</b>

DATA: Begin of itab occurs 0.

include structure T549A.

DATA: End of itab.

<b>Method2:</b>

data: itab like t549a occurs 0 with header line.

if you want only specific fields from that table

declare it as shown below.

DATA: Begin of itab occurs 0,

abkrs like t549a-abkrs,

permo like t549a-permo,

end of itab.

Hope you understand.

Re: Retrieve fieldname

Former Member — Tue, 09 Oct 2007 06:29:51 GMT

Below are my code, see whether is there any error. How to display the value out in list form to show my code is working?

REPORT ZGARY_TEST.

DATA: Begin of itab occurs 0.

include structure spfli.

DATA: End of itab.

CALL FUNCTION 'DDIF_FIELDINFO_GET'

EXPORTING

tabname = itab

FIELDNAME = ' '
LANGU = SY-LANGU
LFIELDNAME = ' '
ALL_TYPES = ' '
GROUP_NAMES = ' '
IMPORTING
X030L_WA =
DDOBJTYPE =
DFIES_WA =
LINES_DESCR =
TABLES
DFIES_TAB =
FIXED_VALUES =
EXCEPTIONS
NOT_FOUND = 1
INTERNAL_ERROR = 2
OTHERS = 3

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.