Skip to Content
author's profile photo Former Member
Former Member

MOVE_TO_LIT_NOTALLOWED_NODATA -- DUMP ERROR

Hi All,

AFTER OPEN THE REPORT WHEN I PUSH ANY BUTTON OR DOUBLE-CLICK TO REPORT ITS TORN BACT TO DUMP. I DIDNT FIND MY MISTAKE

ANYBODY KNOW WHY ?

Category ABAP Programming Error

Runtime Errors MOVE_TO_LIT_NOTALLOWED_NODATA

ABAP Program SAPLSLVC_FULLSCREEN

Application Component BC-SRV-ALV

Date and Time 18.03.2014 08:29:55

Short text

Error at assignment: Overwritten protected field.

What happened?

Error in the ABAP Application Program

The current ABAP program "SAPLSLVC_FULLSCREEN" had to be terminated because it

has

come across a statement that unfortunately cannot be executed.

HERE IS MY FIELDCATALOG AND DISPLAY FUNCTIONS.

FORM build_fieldcat.

ls_fieldcat-fieldname = 'COLM1'.

ls_fieldcat-seltext_m = 'Ins Lot No'.

ls_fieldcat-col_pos = 1.

* ls_fieldcat-outputlen = 15.

* ls_fieldcat-emphasize = 'C600'.

* ls_fieldcat-key = 'X'.

* ls_fieldcat-datatype = 'CHAR'.

* ls_fieldcat-edit = 'X'.

* ls_fieldcat-no_zero = 'X'.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM2'.

ls_fieldcat-seltext_m = 'Material Number'.

ls_fieldcat-col_pos = 2.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM3'.

ls_fieldcat-seltext_m = 'Material Description'.

ls_fieldcat-col_pos = 3.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM4'.

ls_fieldcat-seltext_m = 'Plant'.

ls_fieldcat-col_pos = 4.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM5'.

ls_fieldcat-seltext_m = 'Ins. Type'.

ls_fieldcat-col_pos = 5.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM6'.

ls_fieldcat-seltext_m = 'Ins. Plan No'.

ls_fieldcat-col_pos = 6.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM7'.

ls_fieldcat-seltext_m = 'Ins. Date'.

ls_fieldcat-col_pos = 7.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM8'.

* ls_fieldcat-seltext_m = 'Ins. Type2'.

ls_fieldcat-col_pos = 8.

ls_fieldcat-outputlen = 9.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM9'.

* ls_fieldcat-seltext_m = 'Ins. Type3'.

ls_fieldcat-col_pos = 9.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM10'.

* ls_fieldcat-seltext_m = 'Ins. Type5'.

ls_fieldcat-col_pos = 10.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ls_fieldcat-fieldname = 'COLM11'.

* ls_fieldcat-seltext_m = 'Ins. Type6'.

ls_fieldcat-col_pos = 11.

APPEND ls_fieldcat TO lt_fieldcat.

CLEAR ls_fieldcat.

ENDFORM. "build_fieldcat

*&---------------------------------------------------------------------*

*& Form layout

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

FORM layout.

gd_layout-colwidth_optimize = 'X'.

gd_layout-zebra = 'X'.

gd_layout-box_fieldname = 'SELE'.

gd_layout-coltab_fieldname = 'COLOUR'.

ENDFORM. "layout

*&---------------------------------------------------------------------*

*& Form change_color

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

FORM change_color.

LOOP AT lt_report INTO wa_report.

lv_index = sy-tabix.

* Set colour of EBELN field to various colors based on sy-tabix value

wa_cellcolor-fname = 'COLM1'.

wa_cellcolor-color-col = 1. "color code 1-7, if outside rage defaults to 7

wa_cellcolor-color-int = '1'. "1 = Intensified on, 0 = Intensified off

wa_cellcolor-color-inv = '1'. "1 = text colour, 0 = background colour

APPEND wa_cellcolor TO wa_report-colour.

MODIFY lt_report FROM wa_report INDEX lv_index TRANSPORTING colour.

* Set colour of NETPR field to color 4 if gt 0

* IF lt_report-pruelfos IS NOT INITIAL.

wa_cellcolor-fname = 'COLM2'.

wa_cellcolor-color-col = 2. "color code 1-7, if outside rage defaults to 7

wa_cellcolor-color-int = '1'. "1 = Intensified on, 0 = Intensified off

wa_cellcolor-color-inv = '1'. "1 = text colour, 0 = background colour

APPEND wa_cellcolor TO wa_report-colour.

MODIFY lt_report FROM wa_report INDEX lv_index TRANSPORTING colour.

* ENDIF.

* Set colour of AEDAT field text to red(6)

wa_cellcolor-fname = 'COLM3'.

wa_cellcolor-color-col = 3. "color code 1-7, if outside rage defaults to 7

wa_cellcolor-color-int = '1'. "1 = Intensified on, 0 = Intensified off

wa_cellcolor-color-inv = '1'. "1 = text colour, 0 = background colour

APPEND wa_cellcolor TO wa_report-colour.

MODIFY lt_report FROM wa_report INDEX lv_index TRANSPORTING colour.

ENDLOOP.

ENDFORM. "change_color

*&---------------------------------------------------------------------*

*& Form user_command

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

* -->R_UCOMM text

* -->RS_SELFIELD text

*----------------------------------------------------------------------*

FORM user_command USING r_ucomm LIKE sy-ucomm

rs_selfield TYPE slis_selfield.

CASE r_ucomm.

* WHEN'&IC1'.

* CASE rs_selfield-fieldname.

*

* ENDCASE.

* ENDCASE.

* CASE sy-ucomm.

WHEN 'BACK'.

SET SCREEN 0. LEAVE SCREEN.

WHEN 'CANC'.

SET SCREEN 0. LEAVE SCREEN.

WHEN 'EXIT'.

LEAVE PROGRAM.

WHEN 'DETA'.

PERFORM write_detail.

* WHEN 'HIST'.

* PERFORM histogram.

* WHEN 'GRPH'.

* PERFORM run_chart.

ENDCASE.

ENDFORM. "user_command

*&---------------------------------------------------------------------*

*& Form display_alv

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

FORM display_alv.

gd_repid = sy-repid.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

I_PROGRAM_NAME = gd_repid

* I_INTERNAL_TABNAME = 'LT_REPORT'

I_STRUCTURE_NAME = 'WA_REPORT'

* I_CLIENT_NEVER_DISPLAY = 'X'

I_INCLNAME = gd_repid

* I_BYPASSING_BUFFER =

* I_BUFFER_ACTIVE =

CHANGING

ct_fieldcat = lt_fieldcat[]

EXCEPTIONS

INCONSISTENT_INTERFACE = 1

PROGRAM_ERROR = 2

OTHERS = 3.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_bypassing_buffer = 'X'

i_callback_program = gd_repid

i_callback_pf_status_set = 'PFSTATUS'

i_callback_user_command = 'USER_COMMAND'

is_layout = gd_layout

it_fieldcat = lt_fieldcat[]

i_save = 'X'

TABLES

t_outtab = lt_report

EXCEPTIONS

program_error = 1

OTHERS = 2.

IF sy-subrc <> 0.

* Implement suitable error handling here

ENDIF.

ENDFORM. "display_alv

*&---------------------------------------------------------------------*

*& Form detail_fcatalog

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

FORM detail_fcatalog.

ds_fieldcat-fieldname = 'COLM1'.

ds_fieldcat-seltext_m = 'Material Number'.

ds_fieldcat-col_pos = 1.

* ds_fieldcat-outputlen = 15.

* ds_fieldcat-emphasize = 'C600'.

* ds_fieldcat-key = 'X'.

* ds_fieldcat-datatype = 'CHAR'.

* ds_fieldcat-edit = 'X'.

* ds_fieldcat-no_zero = 'X'.

APPEND ds_fieldcat TO dt_fieldcat.

CLEAR ds_fieldcat.

ds_fieldcat-fieldname = 'COLM2'.

ds_fieldcat-seltext_m = 'Material Description'.

ds_fieldcat-col_pos = 2.

APPEND ds_fieldcat TO dt_fieldcat.

CLEAR ds_fieldcat.

ds_fieldcat-fieldname = 'COLM3'.

ds_fieldcat-seltext_m = 'Chr.No'.

ds_fieldcat-col_pos = 3.

APPEND ds_fieldcat TO lt_fieldcat.

CLEAR ds_fieldcat.

ds_fieldcat-fieldname = 'COLM4'.

ds_fieldcat-seltext_m = 'Chr.Desc.'.

ds_fieldcat-col_pos = 4.

APPEND ds_fieldcat TO dt_fieldcat.

CLEAR ds_fieldcat.

ENDFORM. "detail_fcatalog

*&---------------------------------------------------------------------*

*& Form display_detail_alv

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

FORM display_detail_alv.

gd_repid = sy-repid.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_bypassing_buffer = 'X'

i_callback_program = gd_repid

i_callback_user_command = 'USER_COMMAND'

i_callback_pf_status_set = 'DETA_STATUS'

is_layout = gd_layout

it_fieldcat = dt_fieldcat[]

i_save = 'X'

TABLES

t_outtab = lt_detail

EXCEPTIONS

program_error = 1

OTHERS = 2.

IF sy-subrc <> 0.

* Implement suitable error handling here

ENDIF.

ENDFORM. "display_alv

*&---------------------------------------------------------------------*

*& Form pfstatus

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

* -->UT_EXTAB text

*----------------------------------------------------------------------*

*FORM pfstatus USING p_status.

FORM pfstatus USING ut_extab TYPE slis_t_extab.

SET PF-STATUS 'PF01'.

ENDFORM. "pfstatus

*&---------------------------------------------------------------------*

*& Form deta_status

*&---------------------------------------------------------------------*

* text

*----------------------------------------------------------------------*

* -->UT_EXTAB text

*----------------------------------------------------------------------*

*FORM deta_status USING p_status.

FORM deta_status USING ut_extab TYPE slis_t_extab.

SET PF-STATUS 'PF02'.

ENDFORM. "deta_status



THANKS ALL FOR SUPPORT !!!

Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

6 Answers

  • author's profile photo Former Member
    Former Member
    Posted on Mar 18, 2014 at 09:12 AM

    Hi Erman,

    Create SELE as a field in your internal table which you are passing to the ALV function.

    Regards,
    Giri

    Add a comment
    10|10000 characters needed characters exceeded

  • Posted on Mar 18, 2014 at 09:24 AM

    In the dump, it will tell you exactly where in the source code the error happened. Perhaps you'd share that with us?

    Add a comment
    10|10000 characters needed characters exceeded

  • Posted on Mar 18, 2014 at 09:49 AM

    This message was moderated.

    Add a comment
    10|10000 characters needed characters exceeded

  • Posted on Mar 18, 2014 at 11:17 AM

    If ALV is displayed, could you execute the Consistency Check ?

    Also I noticed (among others) the "I_STRUCTURE_NAME = 'WA_REPORT'" did you actually create a structure "WA_REPORT" in ddic/SE11 ?

    Regards,

    Raymond

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Mar 28, 2014 at 02:58 PM

    Thank you all

    problem solved !!

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Dec 09, 2014 at 03:54 PM

    Hello;

    I have the same problem. How did you solve the dump?.

    Thanks and best regards.

    Cristian R.

    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.