Coding Dump-Analyse

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.                            

Code: Alles auswählen.

  <ls_fieldcat>-fieldname of structure rt_data to <g_field> 
              if sy-subrc ne 0.                                                
                  message x000(0k).                                              
              endif.