Code: Alles auswählen.
TYPES: gyt_cdpos TYPE STANDARD TABLE OF cdpos.Code: Alles auswählen.
...EXPORTING aend_tab TYPE gyt_cdpos.Code: Alles auswählen.
... exporting aend_tab type y_tabtyp_cdpos Code: Alles auswählen.
call method me->refresh_table_display.
Code: Alles auswählen.
022200 loop at rt_fieldcat assigning <ls_fieldcat> where tech ne 'X' and
022210 no_out ne 'X'.
022220
022230 if gflg_invisible = 'X'.
022240 if <ls_fieldcat>-do_sum is initial.
022250 clear gflg_invisible.
022260 continue.
022270 else.
022280 clear g_col_counter.
022290 clear gflg_invisible.
022300 endif.
022310 endif.
022320
022330 clear gs_lvc_data.
022340 clear g_style.
022350
022360 assign component
022370 <ls_fieldcat>-fieldname of structure rt_data to <g_field>
022380 if sy-subrc ne 0.
> message x000(0k).
022400 endif.
022410
022420 g_col_counter = g_col_counter + 1.
022430
022440 gs_lvc_data-row_pos = r_row_counter.
022450 gs_lvc_data-col_pos = g_col_counter.