Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Fieldcat For ALV OOPS

Former Member

‎2010 May 28 11:43 AM

0 Likes
791

Dear all,

I have developed ALV Using OOPS Concept . Now how can I append fieldcate Structure in OOPS Programming ?.....

Please , do needful regarding it...........

Dear all,

I have developed ALV Using OOPS Concept . Now how can I append fieldcate Structure in OOPS Programming ?.....

Please , do needful regarding it...........

Reply
6 REPLIES 6
Read only

Clemenss
Active Contributor

‎2010 May 29 8:36 PM

0 Likes
735

Hi tcv,

please post 3 lines of your code and let us know what you try to achieve.

For SALV you need no fieldcat..

Regards,

Clemens

Read only

Former Member
In response to Clemenss

‎2010 May 31 5:22 AM

0 Likes
735

Hi ,

Thanks for reply. I have create custom container. and using class cl_gui_alv_grid . So , now I want to know how can I append Fieldcatelog ? If You have any sample code than please let me know............

Read only

Former Member

‎2010 May 31 9:00 AM

0 Likes
735 
  data ZZ_T_FIELDCAT type LVC_T_FCAT .
  data ZZ_S_FIELDCAT type LVC_S_FCAT .
    CLEAR ZZ_S_FIELDCAT.
    ZZ_S_FIELDCAT-FIELDNAME = 'ZZPOSNR'.
    ZZ_S_FIELDCAT-COLTEXT = 'Item'.
    ZZ_S_FIELDCAT-TOOLTIP = 'Item'.
    ZZ_S_FIELDCAT-SELTEXT = 'Item'.
    ZZ_S_FIELDCAT-OUTPUTLEN = 6.
    APPEND ZZ_S_FIELDCAT TO ZZ_T_FIELDCAT.
Read only

former_member208517
Participant
In response to Former Member

‎2010 May 31 9:12 AM

0 Likes
735

> 

> 
  
IF WT_FIELDCAT IS INITIAL.		
    PERFORM PREPARE_FIELD_CATALOG CHANGING WT_FIELDCAT.		
    PERFORM PERFARE_SORT_FIELD CHANGING WT_SORT.		
  ENDIF.		
		
  IF WA_CUSTOM_CONTAINER IS NOT INITIAL.		
		
*   DISPLAY ALV WITH WITH THE CONTENT OF I_CATEGORY		
    CALL METHOD ALV_GRID->SET_TABLE_FOR_FIRST_DISPLAY		
      EXPORTING		
        IT_TOOLBAR_EXCLUDING = WS_TOOLBAR		
        IS_LAYOUT            = GS_LAYOUT		
      CHANGING		
        IT_OUTTAB            = I_REPORT[]		
        IT_SORT              = WT_SORT[]		
        IT_FIELDCATALOG      = WT_FIELDCAT.		
  ENDIF.		
* WHEN FIRST TIME EXECUTE THE SCREEN		
  IF WA_CUSTOM_CONTAINER IS INITIAL.		
		
    CREATE OBJECT WA_CUSTOM_CONTAINER		
      EXPORTING		
        CONTAINER_NAME = 'CONATINER'.		
    CREATE OBJECT ALV_GRID		
      EXPORTING		
        I_PARENT = WA_CUSTOM_CONTAINER.		
		
		
		
*   DISPLAY ALV WITH WITH THE CONTENT OF I_CATEGORY		
    CALL METHOD ALV_GRID->SET_TABLE_FOR_FIRST_DISPLAY		
      EXPORTING		
        IT_TOOLBAR_EXCLUDING = WS_TOOLBAR		
        IS_LAYOUT            = GS_LAYOUT		
      CHANGING		
        IT_OUTTAB            = I_REPORT[]		
        IT_SORT              = WT_SORT[]		
        IT_FIELDCATALOG      = WT_FIELDCAT.		
  ENDIF.		

FORM PREPARE_FIELD_CATALOG CHANGING PT_FIELDCAT TYPE LVC_T_FCAT.		
		
  DATA LS_FCAT TYPE LVC_S_FCAT.		
		
  CLEAR LS_FCAT.		
  LS_FCAT-NO_OUT = 'X'.		
  LS_FCAT-FIELDNAME = 'SORT'.		
  LS_FCAT-COLTEXT   = 'SORT'.		
  LS_FCAT-SELTEXT   = 'SORT'.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '12'.		
  LS_FCAT-FIELDNAME = 'GROUP'.		
  LS_FCAT-COLTEXT   = TEXT-F01.		
  LS_FCAT-SELTEXT   = TEXT-F01.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '20'.		
  LS_FCAT-FIELDNAME = 'MODEL'.		
  LS_FCAT-COLTEXT   = TEXT-F02.		
  LS_FCAT-SELTEXT   = TEXT-F02.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '18'.		
  LS_FCAT-FIELDNAME = 'TODAY_GI'.		
  LS_FCAT-COLTEXT   = TEXT-F03.		
  LS_FCAT-SELTEXT   = TEXT-F03.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '15'.		
  LS_FCAT-FIELDNAME = 'RETURN_MTD'.		
  LS_FCAT-COLTEXT   = TEXT-F04.		
  LS_FCAT-SELTEXT   = TEXT-F04.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '15'.		
  LS_FCAT-FIELDNAME = 'ACTUAL_MTD'.		
  LS_FCAT-COLTEXT   = TEXT-F05.		
  LS_FCAT-SELTEXT   = TEXT-F05.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '13'.		
  LS_FCAT-FIELDNAME = 'BUDGET'.		
  LS_FCAT-COLTEXT   = TEXT-F06.		
  LS_FCAT-SELTEXT   = TEXT-F06.		
  LS_FCAT-NO_ZERO   = 'X'.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
  LS_FCAT-OUTPUTLEN = '25'.		
  LS_FCAT-FIELDNAME = 'PERCENT'.		
  LS_FCAT-COLTEXT   = TEXT-F07.		
  LS_FCAT-SELTEXT   = TEXT-F07.		
  APPEND LS_FCAT TO PT_FIELDCAT .		
		
  CLEAR LS_FCAT.		
ENDFORM.                    " PREPARE_FIELD_CATALOG

Read only

Clemenss
Active Contributor
In response to Former Member

‎2010 May 31 9:39 AM

0 Likes
735

Wang Kang Bo,

please use the prview button before posting just to make sure the formatting is as intended.

Do you know the 2500 character limit here?

Regards,

Clemens

Read only

former_member208517
Participant

‎2010 May 31 9:08 AM

0 Likes
735

IF WT_FIELDCAT IS INITIAL.

PERFORM PREPARE_FIELD_CATALOG CHANGING WT_FIELDCAT.

PERFORM PERFARE_SORT_FIELD CHANGING WT_SORT.

ENDIF.

IF WA_CUSTOM_CONTAINER IS NOT INITIAL.

  • DISPLAY ALV WITH WITH THE CONTENT OF I_CATEGORY

CALL METHOD ALV_GRID->SET_TABLE_FOR_FIRST_DISPLAY

EXPORTING

IT_TOOLBAR_EXCLUDING = WS_TOOLBAR

IS_LAYOUT = GS_LAYOUT

CHANGING

IT_OUTTAB = I_REPORT[]

IT_SORT = WT_SORT[]

IT_FIELDCATALOG = WT_FIELDCAT.

ENDIF.

  • WHEN FIRST TIME EXECUTE THE SCREEN

IF WA_CUSTOM_CONTAINER IS INITIAL.

CREATE OBJECT WA_CUSTOM_CONTAINER

EXPORTING

CONTAINER_NAME = 'CONATINER'.

CREATE OBJECT ALV_GRID

EXPORTING

I_PARENT = WA_CUSTOM_CONTAINER.

  • DISPLAY ALV WITH WITH THE CONTENT OF I_CATEGORY

CALL METHOD ALV_GRID->SET_TABLE_FOR_FIRST_DISPLAY

EXPORTING

IT_TOOLBAR_EXCLUDING = WS_TOOLBAR

IS_LAYOUT = GS_LAYOUT

CHANGING

IT_OUTTAB = I_REPORT[]

IT_SORT = WT_SORT[]

IT_FIELDCATALOG = WT_FIELDCAT.

ENDIF.

FORM PREPARE_FIELD_CATALOG CHANGING PT_FIELDCAT TYPE LVC_T_FCAT.

DATA LS_FCAT TYPE LVC_S_FCAT.

CLEAR LS_FCAT.

LS_FCAT-NO_OUT = 'X'.

LS_FCAT-FIELDNAME = 'SORT'.

LS_FCAT-COLTEXT = 'SORT'.

LS_FCAT-SELTEXT = 'SORT'.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '12'.

LS_FCAT-FIELDNAME = 'GROUP'.

LS_FCAT-COLTEXT = TEXT-F01.

LS_FCAT-SELTEXT = TEXT-F01.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '20'.

LS_FCAT-FIELDNAME = 'MODEL'.

LS_FCAT-COLTEXT = TEXT-F02.

LS_FCAT-SELTEXT = TEXT-F02.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '18'.

LS_FCAT-FIELDNAME = 'TODAY_GI'.

LS_FCAT-COLTEXT = TEXT-F03.

LS_FCAT-SELTEXT = TEXT-F03.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '15'.

LS_FCAT-FIELDNAME = 'RETURN_MTD'.

LS_FCAT-COLTEXT = TEXT-F04.

LS_FCAT-SELTEXT = TEXT-F04.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '15'.

LS_FCAT-FIELDNAME = 'ACTUAL_MTD'.

LS_FCAT-COLTEXT = TEXT-F05.

LS_FCAT-SELTEXT = TEXT-F05.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '13'.

LS_FCAT-FIELDNAME = 'BUDGET'.

LS_FCAT-COLTEXT = TEXT-F06.

LS_FCAT-SELTEXT = TEXT-F06.

LS_FCAT-NO_ZERO = 'X'.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

LS_FCAT-OUTPUTLEN = '25'.

LS_FCAT-FIELDNAME = 'PERCENT'.

LS_FCAT-COLTEXT = TEXT-F07.

LS_FCAT-SELTEXT = TEXT-F07.

APPEND LS_FCAT TO PT_FIELDCAT .

CLEAR LS_FCAT.

ENDFORM. " PREPARE_FIELD_CATALOG

Edited by: Kangbo Wang on May 31, 2010 10:08 AM