SAP R/3 форум ABAP консультантов
Russian ABAP Developer's Club

Home - FAQ - Search - Memberlist - Usergroups - Profile - Log in to check your private messages - Register - Log in - English
Blogs - Weblogs News

Количество символов



 
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP
View previous topic :: View next topic  
Author Message
peleken
Специалист
Специалист



Joined: 17 Jan 2011
Posts: 61
PostPosted: Sat Jun 18, 2011 2:54 pm    Post subject: Количество символов Reply with quote
Здравствуйте, уважаемые эксперты.

Подскажите, каким образом можно подсчитать кол-во одинаковых символов в столбце (не в тексте).
Есть например символы I и RT - "маркеры" которыми помечаются некие действия (транзакции) в таблице и прописываются в самой таблице..

Пробовал переводить их в цифру CHAR_NUMC_CONVERSION, а потом умножить на кол-во строк, но результат получается 0.
Кажется должно быть простое решение - посчитать кол-во букв I.

Где то я что то неправильно делаю.
Back to top
View user's profile Send private message
XXX_:)
Аналитик
Аналитик


Age: 40
Joined: 01 Feb 2008
Posts: 387
Location: Воронеж
PostPosted: Sat Jun 18, 2011 4:37 pm    Post subject: Reply with quote
Если количество заранее известных символов, то find in table должно подойти, а вот если вообще все возможные повторения, то думаю такого нет.
_________________
Hормальные люди делают вещи намного более безумные чем всё, что делают сумасшедшие (c) С.Лем
Back to top
View user's profile Send private message Blog
peleken
Специалист
Специалист



Joined: 17 Jan 2011
Posts: 61
PostPosted: Sun Jun 19, 2011 12:50 pm    Post subject: Reply with quote
XXX_:) wrote:
Если количество заранее известных символов, то find in table должно подойти, а вот если вообще все возможные повторения, то думаю такого нет.


Жаль, придется ограничится. Мне как раз надо посчитать кол-во I и кол-во RT одновременно и вывести в отчет.

Но в любом случае - спасибо за ответ!
Back to top
View user's profile Send private message
Удав
Гуру
Гуру


Age: 48
Joined: 25 Jan 2008
Posts: 580
Location: Москва
PostPosted: Tue Jun 21, 2011 11:14 am    Post subject: Reply with quote
Code:
DATA: tabix1 TYPE sy-tabix,
      tabix2 TYPE sy-tabix.
SORT table BY oper.

READ TABLE gt_table WITH KEY oper = 'RT'
  BINARY SEARCH.
IF sy-subrc = 0.
  tabix1 = sy-tabix.
*"Следующий символ после T
  READ TABLE gt_table WITH KEY oper = 'RU'
    BINARY SEARCH.
  tabix2 = sy-tabix - tabix1.
ENDIF.

Для 'I' можно сделать также Wink
_________________
С уважением,
Удав.
Back to top
View user's profile Send private message
peleken
Специалист
Специалист



Joined: 17 Jan 2011
Posts: 61
PostPosted: Wed Jun 22, 2011 5:09 pm    Post subject: Reply with quote
Удав wrote:
Code:
DATA: tabix1 TYPE sy-tabix,
      tabix2 TYPE sy-tabix.
SORT table BY oper.

READ TABLE gt_table WITH KEY oper = 'RT'
  BINARY SEARCH.
IF sy-subrc = 0.
  tabix1 = sy-tabix.
*"Следующий символ после T
  READ TABLE gt_table WITH KEY oper = 'RU'
    BINARY SEARCH.
  tabix2 = sy-tabix - tabix1.
ENDIF.

Для 'I' можно сделать также Wink


Вот же! Я же предполагал что как то можно. Ну не бывает безвыходных положений.
Спасибо!
Back to top
View user's profile Send private message
YuriT
Участник
Участник



Joined: 03 Nov 2008
Posts: 35
PostPosted: Sat Jun 25, 2011 5:00 pm    Post subject: Reply with quote
lines( itab ).
SORT itab.
DELETE ADJUSTENT DUPLICATES FROM itab.
lines( itab ).

?
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP All times are GMT + 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


All product names are trademarks of their respective companies. SAPNET.RU websites are in no way affiliated with SAP AG.
SAP, SAP R/3, R/3 software, mySAP, ABAP, BAPI, xApps, SAP NetWeaver and any other are registered trademarks of SAP AG.
Every effort is made to ensure content integrity. Use information on this site at your own risk.