Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Module pool - Table Control

Former Member
0 Likes
431

The thing is and i hope i can be clear enough

is that i only need 1 line to be selected that is why in te properties the radio button selected is single select /(NO muiltiselect line)

situation 1. i check 1 line, and then another one if there are both focus. first line is dismark and the second one is mark... CORRECT.

situation 2 i check 1 line and then i scrool down in order to make out of focus the marked line. and then i check another line. if i s crooll again to first line this one still mark.. so i have 2 lines mark.

is this clear?. if not let me know and ill see to make more clear..

thks.

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
405

Diego,

To clarify further, in the PAI module - do something like this:

PROCESS AFTER INPUT.

loop at Tc1.

module MoveChosen.

endloop.

MODULE USER_COMMAND_0100.

******************

MODULE MOVECHOSEN INPUT.

if Tc1-chosen = 'X'.

Tc1-chosen = 'X'.

else.

clear Tc1-chosen.

endif.

modify Tc1 index tablecontrol1-current_line.

ENDMODULE. " MOVECHOSEN INPUT

MODULE USER_COMMAND_0100 INPUT.

case sy-ucomm.

when 'ORDER'. " Go to the selected Order

clear sy-ucomm.

Proceed = 'N'.

Perform CheckTc1.

if Proceed = 'N'.

message i000 with 'Please select one line only.'.

exit.

endif.

**************************

  • In a FORMS Include.

Form checktc1.

thecntr = 0.

loop at tc1.

if tc1-chosen = 'X'.

thecntr = thecntr + 1.

endif.

endloop.

if thecntr = 0

or thecntr = 1.

proceed = 'Y'.

endif.

endform. "CheckTc1

3 REPLIES 3
Read only

Former Member
0 Likes
405

Please refer to NOTE 588284

Read only

Former Member
0 Likes
406

Diego,

To clarify further, in the PAI module - do something like this:

PROCESS AFTER INPUT.

loop at Tc1.

module MoveChosen.

endloop.

MODULE USER_COMMAND_0100.

******************

MODULE MOVECHOSEN INPUT.

if Tc1-chosen = 'X'.

Tc1-chosen = 'X'.

else.

clear Tc1-chosen.

endif.

modify Tc1 index tablecontrol1-current_line.

ENDMODULE. " MOVECHOSEN INPUT

MODULE USER_COMMAND_0100 INPUT.

case sy-ucomm.

when 'ORDER'. " Go to the selected Order

clear sy-ucomm.

Proceed = 'N'.

Perform CheckTc1.

if Proceed = 'N'.

message i000 with 'Please select one line only.'.

exit.

endif.

**************************

  • In a FORMS Include.

Form checktc1.

thecntr = 0.

loop at tc1.

if tc1-chosen = 'X'.

thecntr = thecntr + 1.

endif.

endloop.

if thecntr = 0

or thecntr = 1.

proceed = 'Y'.

endif.

endform. "CheckTc1

Read only

0 Likes
405

Diego,

Have you resolved your issue?

If so, please reward points accordingly. If not, please clarify your issue further.

Thanks.