sibrin написал:
vga написал(а):
Ну да, если программу не я разрабатывал, стараюсь структуру не изменять...как бы чего не зацепить, а сохраняю заменяемые звездочкой поля в своих переменных.
AT (и вытекающие из него звёздочки) тут можно запросто не использовать:
LOOP ... ASSIGNING <...>.
COLLECT ...
ENDLOOP.
Так будет будет намного короче.
Но если в исходном примере второе суммирование (COLLECT) убрать, то тоже нормально (при условии правильного задания структуры таблицы).
Тут дело вкуса. Кто C++ ещё не забыл, тот конструкции типа AT. SUM., конечно, недолюбливает.
+1. Соглашусь. COLLECT хорошая штука. Можно вобще организовать динамическую подсуммировку таблицы с заранее неизвестной структурой.
Code:
FIELD-SYMBOLS:
<fs_wa> TYPE any,
<fs_itab> TYPE table,
<fs_itab1> TYPE table.
*здесь получаем значение указателя на таблицу <fs_itab> и <fs_itab1> - это могут быть динамически созданные внутрение таблицы
*DATA: r_data TYPE REF TO DATA.
*CREATE DATA r_data LIKE it_table[].
*ASSIGN r_data TO <fs_itab1>.
...
...
*затем подсуммируем
LOOP AT <fs_itab> ASSIGNING <fs_wa>.
COLLECT <fs_wa> INTO <fs_itab1>.
ENDLOOP.
ABAP распознает динамический тип полей неструктурированной переменной <fs_wa> и таблицы без типа и правильно выполняет подсуммировку.
У меня на основе этой технологии написан универсальный модуль подсуммировки. Отдаешь ему таблицу и каталог полей (указаны ключи и числовые поля), он возвращает ссылку на таблицу с итоговыми суммами
Вход
Регистрация
FAQ пользователя
Поиск
