12-14-2007 10:41 AM
Hello to all,
We have a dump MOVE_TO_LIT_NOTALLOWED_NODATA
The current ABAP/4 program "SAPLSLVC_FULLSCREEN " had to
one of the statements could not be executed.
This is probably due to an error in the ABAP/4 program.
When trying to save data.
Here is the source code extract:
005660 if not gt_grid-s_layout-box_fieldname is initial.
005670 call method gt_grid-grid->get_selected_rows
005680 importing
005690 et_index_rows = lt_rows.
005700 delete lt_rows where rowtype ne ' '.
005710 sort lt_rows by index.
005720 assign component gt_grid-s_layout-box_fieldname
005730 of structure t_outtab
005740 to <l_box>.
005750 data: l_sel_lines type i.
005760 data: l_tab_lines type i.
005770 data: ls_rows type lvc_s_row.
005780 * check
005790 if r_ucomm = '&SAL' or r_ucomm = '&ALL'.
005800 l_ucomm = r_ucomm.
005810 else.
005820 describe table lt_rows lines l_sel_lines.
005830 describe table t_outtab lines l_tab_lines.
005840 if l_sel_lines = 0.
005850 l_ucomm = '&SAL'.
005860 endif.
005870 if l_sel_lines = l_tab_lines.
005880 l_ucomm = '&ALL'.
005890 endif.
005900 endif.
005910 * set/unset <box> of all items
005920 if l_ucomm eq '&SAL' or l_ucomm eq '&ALL'.
005930 if l_ucomm eq '&SAL'.
005940 loop at t_outtab.
005950 l_tabix = l_tabix + 1.
> <l_box> = ' '.
005970 modify t_outtab index l_tabix.
005980 endloop.
005990 endif.
006000 if l_ucomm eq '&ALL'.
006010 loop at t_outtab.
006020 l_tabix = l_tabix + 1.
006030 <l_box> = 'X'.
006040 modify t_outtab index l_tabix.
006050 endloop.
006060 endif.
006070 else.
006080 *delete all existing marks of <box>
006090 loop at t_outtab.
006100 l_tabix = l_tabix + 1.
006110 <l_box> = ' '.
006120 modify t_outtab index l_tabix.
006130 endloop.
006140 *insert new marks in <box>
006150 loop at lt_rows into ls_rows.
please help as to where should be the correction needed. thanks.
12-18-2007 4:40 PM
problem is in the layout field, check the value of the field layout-box_fieldname is 'SEL' or not.