Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8545

Re: How to sort internal table by field length?

$
0
0

Hi Rama Swamy What is Your exact requirement whether to get output or to use only the field that you mentioned please check this code if helps

 

 

TYPES:BEGIN OF FS_STRING,
       STR TYPE STRING,
       END OF FS_STRING,
       BEGIN OF FS,
       V1 TYPE CHAR1,
       V2 TYPE STRING,
       LENGTH TYPE I,
       END OF FS.
DATA:LS_STRING TYPE FS_STRING,
      LT_STRING TYPE TABLE OF FS_STRING.
DATA:LS TYPE FS,
       LT TYPE TABLE OF FS.
LS_STRING-STR = 'A-A'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'A-AAC'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'A-ABC'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'B-BC'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'B-ACDE'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'C-A'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'C-EDS'.
APPEND LS_STRING TO LT_STRING.
LS_STRING-STR = 'D-AA'.
APPEND LS_STRING TO LT_STRING.

LOOP AT LT_STRING INTO LS_STRING.
  LS-LENGTH = STRLEN( LS_STRING-STR ).
  SPLIT LS_STRING-STR AT '-' INTO LS-V1 LS-V2.
   APPEND LS TO LT.
CLEAR: LS_STRING,LS.
ENDLOOP.
SORT LT BY LENGTH.
REFRESH LT_STRING.
LOOP AT LT INTO LS.
   CONCATENATE LS-V1 LS-V2 INTO LS_STRING-STR SEPARATED BY '-'.
   APPEND LS_STRING TO LT_STRING.
ENDLOOP.


Viewing all articles
Browse latest Browse all 8545

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>