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
Showing results for 
Search instead for 
Did you mean: 
Read only

alv report

Former Member
0 Likes
670

hi

below is my alv report , now i dont want 'REUSE_ALV_FIELDCATALOG_MERGE' but i directly want to update my fieldcatalogue and to print only with REUSE_ALV_GRID_DISPLAY'.

guide me

DATA: BEGIN OF w_result OCCURS 0 ,

lifnr LIKE lfa1-lifnr ,

fname LIKE cdpos-fname ,

username LIKE cdhdr-username ,

ddtext LIKE dd04t-ddtext ,

udate LIKE cdhdr-udate ,

value_new LIKE cdpos-value_new ,

value_old LIKE cdpos-value_old ,

END OF w_result .

....

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

i_program_name = i_repid

i_internal_tabname = 'W_RESULT'

i_inclname = i_repid

CHANGING

ct_fieldcat = int_fcat

EXCEPTIONS

inconsistent_interface = 1

program_error = 2

OTHERS = 3.

IF sy-subrc EQ 0

AND int_fcat[] IS NOT INITIAL .

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = i_repid

i_callback_user_command = 'DOUBLE_CLIC'

it_fieldcat = int_fcat

i_save = 'A'

TABLES

t_outtab = w_result

EXCEPTIONS

program_error = 1

OTHERS = 2.

IF sy-subrc <> 0 .

WRITE: / 'Returncode',

sy-subrc,

'from FUNCTION REUSE_ALV_LIST_DISPLAY'.

ENDIF .

ENDIF .

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
649

hi

DATA: X_FIELDCAT TYPE SLIS_FIELDCAT_ALV,

IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,

X_FIELDCAT-FIELDNAME = 'VBELN'.

X_FIELDCAT-SELTEXT_L = 'VBELN'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 1.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'POSNR'.

X_FIELDCAT-SELTEXT_L = 'POSNR'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 2.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'MALE'.

X_FIELDCAT-SELTEXT_L = 'MALE'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 3.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'FEMALE'.

X_FIELDCAT-SELTEXT_L = 'FEMALE'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 3.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = SY-REPID

IS_LAYOUT = L_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

it_events = it_events

TABLES

T_OUTTAB = ITAB

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

Rgds.,

subash

hi

below is my alv report , now i dont want 'REUSE_ALV_FIELDCATALOG_MERGE' but i directly want to update my fieldcatalogue and to print only with REUSE_ALV_GRID_DISPLAY'.

guide me

DATA: BEGIN OF w_result OCCURS 0 ,

lifnr LIKE lfa1-lifnr ,

fname LIKE cdpos-fname ,

username LIKE cdhdr-username ,

ddtext LIKE dd04t-ddtext ,

udate LIKE cdhdr-udate ,

value_new LIKE cdpos-value_new ,

value_old LIKE cdpos-value_old ,

END OF w_result .

....

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

i_program_name = i_repid

i_internal_tabname = 'W_RESULT'

i_inclname = i_repid

CHANGING

ct_fieldcat = int_fcat

EXCEPTIONS

inconsistent_interface = 1

program_error = 2

OTHERS = 3.

IF sy-subrc EQ 0

AND int_fcat[] IS NOT INITIAL .

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = i_repid

i_callback_user_command = 'DOUBLE_CLIC'

it_fieldcat = int_fcat

i_save = 'A'

TABLES

t_outtab = w_result

EXCEPTIONS

program_error = 1

OTHERS = 2.

IF sy-subrc <> 0 .

WRITE: / 'Returncode',

sy-subrc,

'from FUNCTION REUSE_ALV_LIST_DISPLAY'.

ENDIF .

ENDIF .

5 REPLIES 5
Read only

Former Member
0 Likes
650

hi

DATA: X_FIELDCAT TYPE SLIS_FIELDCAT_ALV,

IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,

X_FIELDCAT-FIELDNAME = 'VBELN'.

X_FIELDCAT-SELTEXT_L = 'VBELN'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 1.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'POSNR'.

X_FIELDCAT-SELTEXT_L = 'POSNR'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 2.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'MALE'.

X_FIELDCAT-SELTEXT_L = 'MALE'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 3.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'FEMALE'.

X_FIELDCAT-SELTEXT_L = 'FEMALE'.

X_FIELDCAT-TABNAME = 'ITAB'.

X_FIELDCAT-COL_POS = 3.

APPEND X_FIELDCAT TO IT_FIELDCAT.

CLEAR X_FIELDCAT.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = SY-REPID

IS_LAYOUT = L_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

it_events = it_events

TABLES

T_OUTTAB = ITAB

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

Rgds.,

subash

Read only

Former Member
0 Likes
649

define structure with slis_t_fieldcatalog_alv and wa slis_fieldcatalog_alv.

define each field catalog and append to table.

finally pass this fieldcatalog internal table in reuse_alv_grid_display.

Read only

Former Member
0 Likes
649

hi,

first define a structure of type slis_fieldcat_alv, and a work area, and update manually the required fields (the required set of fileds can be obtained by navgating into the structure).

then pass this field catalog structure in the reuse_alv_list_display or reuse-alv-grid-display.

we generally use fieldcat_merge when we use all the fields of a table/structure.

cheers!!

gautam

Read only

Former Member
0 Likes
649

hi,

first define a structure of type slis_fieldcat_alv, and a work area, and update manually the required fields (the required set of fileds can be obtained by navgating into the structure).

then pass this field catalog structure in the reuse_alv_list_display or reuse-alv-grid-display.

we generally use fieldcat_merge when we use all the fields of a table/structure.

cheers!!

gautam

Read only

0 Likes
649

thnk u for ur suggestions

i got my solution ,

i created a structure for my internal table like zxk03

and directly used in

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = i_repid

I_STRUCTURE_NAME = 'ZXK03'

i_callback_user_command = 'DOUBLE_CLIC'

  • it_fieldcat = int_fcat

i_save = 'A'

TABLES

t_outtab = w_result

EXCEPTIONS

program_error = 1

OTHERS = 2.

IF sy-subrc <> 0 .

WRITE: / 'Returncode',

sy-subrc,

'from FUNCTION REUSE_ALV_LIST_DISPLAY'.

ENDIF .