Заполнение Z-таблицы из internal table

irik

Добрый день!

Такая проблема: в SE11 сделана Z-таблица, которая можем заполняться через SM30 (это работает, но мне это не надо).
В Z-программе считывается CSV файл и создается internal table с данными из этого файла. Теперь все строки из itab надо передать в Z-таблицу. Пробую разными способами (modify, insert, update, append), но ничего не передается.
Видимо, есть какой-то нюанс при создании Z-таблицы.
Может, у кого-то реализовано такое заполнение таблицы, поделитесь, пожалуйста, знаниями.

Заранее спасибо.

Кодер

Покажите ваш код, чтобы стало понятно, что же именно вы делаете не так

irik

но я думаю, что дело не в коде, а в каких-то настройках при создании таблицы

Code:

...
TABLES: zenergo.
...

data: begin of record_zenergo_sum occurs 0,
           rnum type zenergo-rnum,
           numi type zenergo-numi,
           zadrese type zenergo-zadrese,
           PAPILD1NFO type zenergo-PAPILD1NFO,
           pakalp type zenergo-pakalp,
           menge type zenergo-menge,
           netpr type zenergo-netpr,
           wrbtr type zenergo-wrbtr,
           merv type zenergo-merv,
           eic type zenergo-eic,
           gads type zenergo-gads,
           periods type zenergo-periods,
       end of record_zenergo_sum.
      
data: wa_record_zenergo_sum like record_zenergo_sum.

…
…
append record_zenergo_sum.

и дальше были такие варианты:

insert zenergo from table record_zenergo_sum.

или

loop at record_zenergo_sum into wa_record_zenergo_sum.
 UPDATE zenergo from wa_record_zenergo_sum.
 COMMIT WORK.
endloop.

или

modify zenergo from record_zenergo_sum.

или

loop at record_zenergo_sum into wa_record_zenergo_sum.

 zenergo-rnum = wa_record_zenergo_sum-rnum.
 zenergo-numi = wa_record_zenergo_sum-numi.
 zenergo-zadrese = wa_record_zenergo_sum-zadrese.
 zenergo-papild1nfo = wa_record_zenergo_sum-papild1nfo.
 zenergo-pakalp = wa_record_zenergo_sum-pakalp.
 zenergo-menge = wa_record_zenergo_sum-menge.
 zenergo-netpr = wa_record_zenergo_sum-netpr.
 zenergo-wrbtr = wa_record_zenergo_sum-wrbtr.
 zenergo-merv = wa_record_zenergo_sum-merv.
 zenergo-eic = wa_record_zenergo_sum-eic.
 zenergo-gads = wa_record_zenergo_sum-gads.
 zenergo-periods = wa_record_zenergo_sum-periods.
 INSERT zenergo.

endloop.

Kuranov.Dmitry

Используйте форматирование кода на форуме

Могу предположить вы не все поля определили при перечислении в record_zenergo_sum
или записи с такими ключами уже есть в таблице.

Code:

DATA: gt_record_zenergo_sum TYPE TABLE OF zenergo,
          gs_record_zenergo_sum LIKE LINE OF gt_record_zenergo_sum.
** наполняем gt_record_zenergo_sum.

INSERT zenergo FROM TABLE gt_record_zenergo_sum.

irik

Kuranov.Dmitry написал(а):

Используйте форматирование кода на форуме

Могу предположить вы не все поля определили при перечислении в record_zenergo_sum
или записи с такими ключами уже есть в таблице.

Code:

DATA: gt_record_zenergo_sum TYPE TABLE OF zenergo,
          gs_record_zenergo_sum LIKE LINE OF gt_record_zenergo_sum.
** наполняем gt_record_zenergo_sum.

INSERT zenergo FROM TABLE gt_record_zenergo_sum.

так тоже не работает

Кодер

Как предположил коллега Kuranov.Dmitry - скорее всего, в загружаемом файле есть и новые и уже существующие в таблице записи.
Надо определиться, что следует делать в случае, если запись уже есть в табле.
Варианты
1) писать протокол ошибок, прерывать работу, если есть хотя бы 1 такая запись
2) писать протокол ошибок, сохранять корректные записи
3) писать сообщения об обнаруженных записях, существующие записи обновлять, новые - вставлять

для случая 3 обновление самое простое

Code:

DATA: gt_record_zenergo_sum TYPE TABLE OF zenergo,
          gs_record_zenergo_sum LIKE LINE OF gt_record_zenergo_sum.
loop at gt_record_zenergo_sum into gs_record_zenergo_sum.
  modify zenergo from gs_record_zenergo_sum.
endloop.

commit work.

irik

Кодер написал(а):

Как предположил коллега Kuranov.Dmitry - скорее всего, в загружаемом файле есть и новые и уже существующие в таблице записи.
Надо определиться, что следует делать в случае, если запись уже есть в табле.
Варианты
1) писать протокол ошибок, прерывать работу, если есть хотя бы 1 такая запись
2) писать протокол ошибок, сохранять корректные записи
3) писать сообщения об обнаруженных записях, существующие записи обновлять, новые - вставлять

для случая 3 обновление самое простое

Code:

DATA: gt_record_zenergo_sum TYPE TABLE OF zenergo,
          gs_record_zenergo_sum LIKE LINE OF gt_record_zenergo_sum.
loop at gt_record_zenergo_sum into gs_record_zenergo_sum.
  modify zenergo from gs_record_zenergo_sum.
endloop.

commit work.

Таблица ZENERGO записей не содержит, пустая

Кодер

Цитата:

Таблица ZENERGO записей не содержит, пустая

Проверьте файл тогда. Возможно он содержит дублирующиеся по ключу таблицы ZENERGO записи

Kuranov.Dmitry

Кодер написал(а):

Цитата:

Таблица ZENERGO записей не содержит, пустая

Проверьте файл тогда. Возможно он содержит дублирующиеся по ключу таблицы ZENERGO записи

а модифай разве не будет обновлять дубликаты?

Кодер

Kuranov.Dmitry написал(а):

а модифай разве не будет обновлять дубликаты?

Конечно будет. Просто вопрос дубликатов (как их обрабатывать), как мне кажется, надо решать до разработки. И уже имея представление, что же именно нужно - писать программу

LKU

irik написал(а):

Таблица ZENERGO записей не содержит, пустая

Обратите внимание, что в примере который вам привели есть commit work, а в вашем нет.
Вы в итоге commit work у себя в программе написали?

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

Заполнение Z-таблицы из internal table

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