topic Re: Sorting in Table Control in Application Development and Automation Discussions

Sorting in Table Control

Former Member — Sun, 26 Jan 2014 23:19:49 GMT

Hello All,

I have table control & I added sort button with code ..

in top program ..

data: fld_list LIKE TBL_CTRL-cols,

wa_fld_list LIKE LINE OF fld_list.

in PAI..

when 'SORTU'.

READ TABLE TBL_CTRL-cols INTO wa_fld_list WITH KEY selected = 'X'.

IF sy-subrc = 0.

SORT IT_ZPRODUCT_T STABLE BY (wa_fld_list-SCREEN-name+14) ASCENDING. "

wa_fld_list-selected = ' '.

MODIFY TBL_CTRL-cols FROM wa_fld_list INDEX sy-tabix.

ENDIF.

I am facing this problem :

when i select any column and click on sort button nothing happen..... why ?!

regards ,

zakyaih

Re: Sorting in Table Control

Arun_Prabhu_K — Mon, 27 Jan 2014 02:51:54 GMT

Hello Zakyiah Tuwaylib.

Code seems to be correct.

Check if the data is already sorted or not?

Try with DESCENDING sort option.

Regards.

Re: Sorting in Table Control

Former Member — Mon, 27 Jan 2014 03:09:11 GMT

Hi,

Just try like standard way!

when 'SORTU'.

data: fldname(100),help(100).

READ TABLE TBL_CTRL-cols INTO wa_fld_list WITH KEY selected = 'X'.

if sy-subrc = 0.

read table table_control-cols into col with key selected = 'X'.
split col-screen-name at '-' into help fldname.
sort IT_ZPRODUCT_T by (fldname) DESCENDING ( field names).

wa_cols-selected = ' '.

MODIFY TBL_CTRL-cols FROM wa_fld_list INDEX sy-tabix.

Re: Sorting in Table Control

Former Member — Mon, 27 Jan 2014 14:07:09 GMT

thanks for response

i tried both way DESCENDING and ASCENDING

same issue

Re: Sorting in Table Control

Former Member — Mon, 27 Jan 2014 14:21:14 GMT

thanks for response

i tried standard way same issue

regards,

zakyiah

Re: Sorting in Table Control

nabheetscn — Mon, 27 Jan 2014 15:36:17 GMT

If you put a break point at sort statement do you see your internal table getting sorted in debugging if yes then check in debugging whether ypu are doing some data selection again which may be overwritting this sort. Please paste your PBO sample code

Nabheet

Re: Sorting in Table Control

Former Member — Mon, 27 Jan 2014 16:38:46 GMT

HI,

i am not friendly with breakpoints

where i should but it ?

Re: Sorting in Table Control

nabheetscn — Mon, 27 Jan 2014 16:48:35 GMT

Being an ABAPER if you want to you should be. Put a break point in PAI on sort and then in PBO

Re: Sorting in Table Control

Former Member — Mon, 27 Jan 2014 17:08:45 GMT

yes i am beginner .. i am working with ABAP just from 1 month

where is it exactly ?

Re: Sorting in Table Control

Arun_Prabhu_K — Tue, 28 Jan 2014 03:06:05 GMT

Zakyiah Tuwaylib,

Just debug and see.

TYPE /h in the command prompt and then click SORT button.

It will help you understand how program execution takes place.

Regards.

Re: Sorting in Table Control

former_member209120 — Tue, 28 Jan 2014 05:14:29 GMT

Hi zakyiah Tuwaylib

Then see this demo program DEMO_DYNPRO_TABCONT_LOOP_AT.

report demo_dynpro_tabcont_loop_at.

controls flights type tableview using screen 100.
data: cols like line of flights-cols,
       lines type i.

data: ok_code type sy-ucomm,
       save_ok type sy-ucomm.

data: itab type table of demo_conn.
tables demo_conn.

select * from spfli into corresponding fields of table itab.

loop at flights-cols into cols where index gt 2.
   cols-screen-input = '0'.
   modify flights-cols from cols index sy-tabix.
endloop.

call screen 100.

module status_0100 output.
   set pf-status 'SCREEN_100'.
   describe table itab lines lines.
   flights-lines = lines.
endmodule.

module cancel input.
   leave program.
endmodule.

module read_table_control input.
   modify itab from demo_conn index flights-current_line.
endmodule.

module user_command_0100 input.
   save_ok = ok_code.
   clear ok_code.
   case save_ok.
     when 'TOGGLE'.
       loop at flights-cols into cols where index gt 2.
         if cols-screen-input = '0'.
           cols-screen-input = '1'.
         elseif cols-screen-input = '1'.
           cols-screen-input = '0'.
         endif.
         modify flights-cols from cols index sy-tabix.
       endloop.
     when 'SORT_UP'.
       read table flights-cols into cols with key selected = 'X'.
       if sy-subrc = 0.
         sort itab stable by (cols-screen-name+10) ascending.
         cols-selected = ' '.
         modify flights-cols from cols index sy-tabix.
       endif.
     when 'SORT_DOWN'.
       read table flights-cols into cols with key selected = 'X'.
       if sy-subrc = 0.
         sort itab stable by (cols-screen-name+10) descending.
         cols-selected = ' '.
         modify flights-cols from cols index sy-tabix.
       endif.
     when 'DELETE'.
       read table flights-cols into cols with key screen-input = '1'.
       if sy-subrc = 0.
         loop at itab into demo_conn where mark = 'X'.
           delete itab.
         endloop.
       endif.
   endcase.
endmodule.

Re: Sorting in Table Control

Former Member — Tue, 28 Jan 2014 16:24:25 GMT

Re: Sorting in Table Control

K.Arun Prabhu

many thanks for help

i get this

Re: Sorting in Table Control

Former Member — Tue, 28 Jan 2014 16:36:59 GMT

i think that same as i did

thank you

Re: Sorting in Table Control

Former Member — Tue, 28 Jan 2014 16:49:02 GMT

Hi,

You can seach SAP examples on table control in SE38. Search with DEMO*DYNPRO*TAB* and press F4. There is one demo program by SAP which explain sorting functionality as well. Also you may find example in ABAPDOCU transaction.

Regards

Nishant.

Re: Sorting in Table Control

Former Member — Tue, 28 Jan 2014 17:52:45 GMT

sorry .. i get this

even in internal table no data sorted

Re: Sorting in Table Control

Former Member — Tue, 28 Jan 2014 17:57:54 GMT

even in internal table no data sorted

Re: Sorting in Table Control

Arun_Prabhu_K — Wed, 29 Jan 2014 03:20:12 GMT

Have you mentioned the correct table control name?


READ TABLE TBL_CTRL-cols INTO wa_fld_list WITH KEY selected = 'X'.


MODIFY TBL_CTRL-cols FROM wa_fld_list INDEX sy-tabix.

What is the sy-tabix value before this statement gets executed?

What is the sy-subrc value after this statement's execution?

Re: Sorting in Table Control

Former Member — Wed, 29 Jan 2014 04:29:00 GMT

Hi,

Can you pls let me know how you arrived at offset - 14 in your below code ?

SORT IT_ZPRODUCT_T STABLE BY (wa_fld_list-SCREEN-name+14) ASCENDING.

This should be dependent of your screen field. Just double click in screen painter on any of the field of table control and check the name .Lets us say your 1st screen field name is WA_PRODUCT-PRODUCT_ID. Then if you want to sort it via PRODUCT_ID then you should choose offset 11 (count number of chars till '-', count characters in string WA_PRODUCT-, which is 11 ) and write as follows:

SORT IT_ZPRODUCT_T STABLE BY (wa_fld_list-SCREEN-name+11) ASCENDING. I hope it helps.

So, just find correct offset.

Regards

Nishant

Re: Sorting in Table Control

AniketB — Wed, 29 Jan 2014 04:43:01 GMT

Hi Zakiyah,

I am sure you must have gone through this link.

Table Controls: Examples with Modifications (SAP Library - ABAP Programming (BC-ABA))

The screen field name seems to be the issue.Can you share the screen shot of the flow logic of the screen?Also just check whether the number of characters before the screen field name are correct, in your case they are '14'.

Regards,

Re: Sorting in Table Control

Former Member — Wed, 29 Jan 2014 18:06:41 GMT

yes,

before

after

I will print screen what i did from the scratch .