Issue with selecting a line on table control

Question

Hello Experts,
We have a table control and using w/ SelColumn for selecting the highlighted line on a table control. It's working fine sometimes but not working in other cases. It's really wierd.
On this screen, under the Table Control, we have provided Bottons do some functionality.
When the users select a row and click on this push button, it has to call another pop-up screen.
We have the code like this:
PROCESS BEFORE OUTPUT.
  MODULE INIT_0600.
  LOOP AT T_qacomp_prt INTO qacomp_prt WITH CONTROL TC_qacomp_prt.
    module fill_part_number.
    MODULE Gray_Parts.
    FIELD T_qacomp_prt-MARK.
    module highlight_lines.
    MODULE LINES_0600.
  ENDLOOP.
PROCESS AFTER INPUT.
  MODULE CANCEL_600 AT EXIT-COMMAND.
  LOOP AT T_qacomp_prt.
    FIELD T_qacomp_prt-MARK.
    MODULE READ_TABLE_CONTROL_600.
  ENDLOOP.
  MODULE USER_COMMAND_0600.
In User-Command the code is like this:
MODULE USER_COMMAND_0600 INPUT.
  when 'ADD'.
   if t_qacomp_prt-mark = 'X'.
    get cursor line lin.
  call screen 0615 starting at 30 15.
else.
   message i999(zxx) with 'Please select a line'.
endif.
For eg, When there are 5 lines on the table control, If I select the 2nd line and click on "ADD", it is calling the pop-up correctly.
However, If I select the 4th line and click on "ADD" button, it is giving the message "Please select the line".
PS: PBO, PAI code already exists, I only added the "USER-COMMAND" code.
Can you please let me know what went wrong? I greatly appreciate your help.
Thanks.

Answer 1

Hi,
Provide a Check box for that table control. Declare that Check box field as Type c in Main program. Go to screen PAI module write code for deleting that lines by clicking one button using sy-ucomm. Delete it where is_chk = 'X'..like try