Вставка строки в сортированную таблицу

BaBuin

Мне кажется я сошёл с ума. Но следующий код падает в дамп как будто вставляют дубликаты в сортированную таблицу. Причём (дальше идет бред) это происходит только если lc1 начинается на букву S. Другие комбинации дампа не дают. Что я не так делаю?

Code:

REPORT MYREPORT.

DATA:
      lt TYPE lvc_t_styl,
      ls TYPE lvc_s_styl.

CONSTANTS:
           lc1 TYPE text30 VALUE 'SFIELD1',
           lc2 TYPE text30 VALUE 'FIELD2'.

  DELETE lt WHERE fieldname = lc1.
  CLEAR ls.
  ls-fieldname = lc1.
  APPEND ls TO lt.

  DELETE lt WHERE fieldname = lc2.
  CLEAR ls.
  ls-fieldname = lc2.
  APPEND ls TO lt.

8051core

Вы будете смеяться, но lvc_t_styl это действительно тип для сортированной таблицы. Посмотрите через SE11.
Ключом как раз и является FIELDNAME

P.S. Так что вызов людей в белых халатах можно пока отложить

BaBuin

Не буду смеяться - я уже плачу

То что это сортированная таблица - итак понятно. Но я то ведь не вставляю дубли!

ghost

нарушаете порядок сортировки, т.к. тип таблицы - сортированная таблица. используйте insert
p.s.: сомневаюсь что дамп был все таки про дубликаты

BaBuin

ghost написал:

нарушаете порядок сортировки, т.к. тип таблицы - сортированная таблица. используйте insert

мда уж.... пасиб большое.

Про сортировку в сортированной таблице я даже не подумал :-D

8051core

Как раз хотел написать, что APPEND для сортированных таблиц нехорошо делать
Если сначала вставлять lc2, то работает, но лучше INSERT делать все равно.
Вот так работает

Code:

REPORT myreport.

DATA:
      lt TYPE lvc_t_styl,
      ls TYPE lvc_s_styl.

CONSTANTS:
           lc1 TYPE text30 VALUE 'SFIELD1',
           lc2 TYPE text30 VALUE 'FIELD2'.

DELETE LT WHERE fieldname = lc1.
CLEAR ls.
ls-fieldname = lc1.
INSERT ls INTO TABLE lt.

DELETE LT WHERE fieldname = lc2.
CLEAR ls.
ls-fieldname = lc2.
INSERT ls INTO TABLE lt.
WRITE / 'ok'.

Правила форума

Вставка строки в сортированную таблицу

Кто сейчас на конференции