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

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 20.01.2009, 13:54   #1  
grif is offline
grif
Участник
Аватар для grif
 
236 / 10 (1) +
Регистрация: 31.08.2006
Инвойсы в данном случае это лишь данные в файле, которые должны импортироваться в соответствующие таблицы. Для переменной типа Record есть метод CHANGECOMPANY, позволяющий работать с записями соответствующей таблицы, но для любой другой фирмы того же сервера.
С учётом чуть сложнее. Тут нужно будет зайти в каждую фирму и вызвать механизм автоучёта для импортированных в неё инвойсов.
Старый 20.01.2009, 17:24   #2  
RedFox is offline
RedFox
Участник
 
1,441 / 10 (0) +
Регистрация: 28.12.2004
Адрес: Киев
Цитата:
Сообщение от grif Посмотреть сообщение
Инвойсы в данном случае это лишь данные в файле, которые должны импортироваться в соответствующие таблицы. Для переменной типа Record есть метод CHANGECOMPANY, позволяющий работать с записями соответствующей таблицы, но для любой другой фирмы того же сервера.
Не забываем про Permission к таблицам и для компаний
Цитата:
С учётом чуть сложнее. Тут нужно будет зайти в каждую фирму и вызвать механизм автоучёта для импортированных в неё инвойсов.
Или написать CU, который будет это делать и гасить все запросы с помощью, например GUIALLOWED (ведь реально нажатие на кнопку это вызов кода..)
Старый 04.02.2009, 15:59   #3  
RedFox is offline
RedFox
Участник
 
1,441 / 10 (0) +
Регистрация: 28.12.2004
Адрес: Киев
Цитата:
Сообщение от RedFox Посмотреть сообщение
Не забываем про Permission к таблицам и для компаний
Почти спам - сегодня случайно наткнулся на 406 кодеюнит и строки:
Код:
CASE TableID OF DATABASE::"Reason Code":
	WITH ReasonCode DO
	  IF CopyTable THEN BEGIN
		CHANGECOMPANY(NewCompanyName);
		IF FIND('-') THEN
		  REPEAT
			CHANGECOMPANY(COMPANYNAME);
			INSERT(TRUE);
			CHANGECOMPANY(NewCompanyName);
		  UNTIL NEXT = 0;
	  END;
...
  DATABASE::Family:
	WITH Family DO
	  IF CopyTable THEN BEGIN
		CHANGECOMPANY(NewCompanyName);
		IF FIND('-') THEN
		  REPEAT
			CHANGECOMPANY(COMPANYNAME);
			INSERT(TRUE);
			CHANGECOMPANY(NewCompanyName);
		  UNTIL NEXT = 0;
	  END;
Я бы просто переделал перенос по какому-то правилу, чтобы с NAS-ами не возиться
 


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

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

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