KEEP_ALIVE
Pentru a evita erorile de tip ABAP-RUNTIME ERROR cauzate de depasirea timpului de executie a unui raport:
form get_values.
 data: ls_sold_recon like gt_sold_recon.
 data: ls_sold_cmspec like gt_sold_cmspec.
 data: lsubrc like sy-subrc.
 data: lcomp(19).
 data: lins like sy-tabix.
 data: lproc type i.
 data: lprocprev type i.
 field-symbols: 
describe table gt_rec_acc lines lins.
  loop at gt_rec_acc.
     lproc = sy-tabix * 100 / lins.
     if lproc <> lprocprev. 
       call function 'SAPGUI_PROGRESS_INDICATOR'  
                                         exporting          percentage = lproc  
                                                                    text       = 'Prelucrare pozitii...'.   
                                                                    lprocprev = lproc.
      endif.
.
.
.
endloop.


0 Comments:
Post a Comment
<< Home