AXForum  
Вернуться   AXForum > Microsoft Dynamics NAV > NAV: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 20.02.2013, 20:19   #1  
nikshev is offline
nikshev
Участник
 
54 / 10 (1) +
Регистрация: 11.12.2010
В общем кому интересно то решилось это созданием отчета На базе таблицы Item:
DataItemTable=Table27;
OnPreDataItem=BEGIN
Item.SETRANGE("No.",OldItemCode1);
END;

OnAfterGetRecord=VAR
ItemLocal@1101970000 : Record 27;
BEGIN
IF (OldItemCode1 <> '') AND (NewItemCode <> '') THEN
WITH Item DO BEGIN
ItemLocal.GET(NewItemCode);
TempItem.INIT;
TempItem.TRANSFERFIELDS(ItemLocal);
ItemLocal.DELETE;


BinContent.RESET;
BinContent.SETRANGE("Item No.",OldItemCode1);
BinContent.DELETEALL;

ItemUnitOfMeasure.RESET;
ItemUnitOfMeasure.SETRANGE("Item No.",OldItemCode1);
ItemUnitOfMeasure.DELETEALL;

AvgCostAdjmtEntryPoint.RESET;
AvgCostAdjmtEntryPoint.SETRANGE("Item No.",OldItemCode1);
AvgCostAdjmtEntryPoint.DELETEALL;

SalesPrice.RESET;
SalesPrice.SETRANGE("Item No.",OldItemCode1);
SalesPrice.DELETEALL;

ItemItemGroup.RESET;
ItemItemGroup.SETRANGE("Item No.",OldItemCode1);
ItemItemGroup.DELETEALL;

IF RENAME(NewItemCode) THEN BEGIN
TRANSFERFIELDS(TempItem);
MODIFY;
END ELSE BEGIN
TempItem.INSERT;
END;
END;
END;

}
Некоторые таблицы не из стандартной конфигурации (Sales price, ItemItemGroup). Но работает отлично и вроде корректно. Соединяет товары вместе с операциями.
Всем спасибо за ответы.
 

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 13:59.