Список форумов Акцент Акцент
официальный форум разработчика программы Акцент
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

список макросов Акцент
На страницу Пред.  1, 2, 3, 4, 5, 6, 7, 8  След.
 
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0
Предыдущая тема :: Следующая тема  
Автор Сообщение
cветлана
Гость





СообщениеДобавлено: Вт Дек 04, 2012 4:12 pm    Заголовок сообщения: Ответить с цитатой

да в шаблоне, захожу в разное там много позиций
мне нужно чтобы одна позиция разного во второй проводке наследовалась из первой проводки
в разном я нахожу нужную строку и в ячейке значения ставлю =М1
не дает сохранить, пишет не найдено значение
не воспринимает как формулу, а ищет такое значение в разном
Вернуться к началу
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Ср Дек 05, 2012 12:12 am    Заголовок сообщения: Ответить с цитатой

cветлана писал(а):
да в шаблоне, захожу в разное там много позиций
мне нужно чтобы одна позиция разного во второй проводке наследовалась из первой проводки
в разном я нахожу нужную строку и в ячейке значения ставлю =М1
не дает сохранить, пишет не найдено значение
не воспринимает как формулу, а ищет такое значение в разном

Макрос работает только в Акцент 7.4
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 8:39 am    Заголовок сообщения: Ответить с цитатой

может как-то в программу шаблона можно записать
или только руками теперь в каждую проводку дублировать?
Вернуться к началу
nikman



Зарегистрирован: 10.03.2005
Сообщения: 786
Откуда: Украина, Донецк

СообщениеДобавлено: Ср Дек 05, 2012 9:25 am    Заголовок сообщения: Ответить с цитатой

cветлана писал(а):
может как-то в программу шаблона можно записать
или только руками теперь в каждую проводку дублировать?

Да пожалуйста, например можете дописать в программу шаблона:
Код:
Op.TransList(2).SetMisc MiscNo, Op.Trans(1).MiscID(MiscNo)
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail AIM Address MSN Messenger
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Ср Дек 05, 2012 9:34 am    Заголовок сообщения: Ответить с цитатой

nikman писал(а):
cветлана писал(а):
может как-то в программу шаблона можно записать
или только руками теперь в каждую проводку дублировать?

Да пожалуйста, например можете дописать в программу шаблона:
Код:
Op.TransList(2).SetMisc MiscNo, Op.Trans(1).MiscID(MiscNo)

Только размещайте код за "скобками"
'{{ BEGIN_RECALC
'}} END_RECALC

чтобы изменения шаблона из интерфейса не убивали код.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 9:39 am    Заголовок сообщения: Ответить с цитатой

спасибо, сейчас попробую
а не нужно указывать номер строки разного после SetMisc MiscNo?
Вернуться к началу
kris



Зарегистрирован: 12.01.2006
Сообщения: 371

СообщениеДобавлено: Ср Дек 05, 2012 9:52 am    Заголовок сообщения: Ответить с цитатой

cветлана писал(а):
спасибо, сейчас попробую
а не нужно указывать номер строки разного после SetMisc MiscNo?

MiscNo - это и есть номер аналитики, заменяете его на нужный вам.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 9:53 am    Заголовок сообщения: Ответить с цитатой

вместо No номер и вместо ID тоже номер, правильно?
Вернуться к началу
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 10:00 am    Заголовок сообщения: Ответить с цитатой

Sub Template_OnRecalc(op)
'{{ BEGIN_RECALC
'--Объекты учета--
op.CopyEntities 2, 1
op.CopyEntities 6, 1
'--Корреспонденты--
op.CopyAgents 2, False, 1, False
op.CopyAgents 2, True, 1, True
op.CopyAgents 3, False, 1, False
op.CopyAgents 3, True, 1, True
op.CopyAgents 4, False, 1, False, True
op.CopyAgents 4, True, 1, True, True
op.CopyAgents 5, False, 1, False
op.CopyAgents 5, True, 1, True
op.CopyAgents 6, True, 1, True
'--Количества--
op.TransList(6).CalcQty "=-Q1"
'--Суммы--
op.TransList(6).CalcSum "=-T1"
op.TransList(6).SetMisc Misc 9, Op.Trans(1).MiscID(Misc 9)

'}} END_RECALC

End Sub
пишет предполагает наличие завершения инструкции
Вернуться к началу
nikman



Зарегистрирован: 10.03.2005
Сообщения: 786
Откуда: Украина, Донецк

СообщениеДобавлено: Ср Дек 05, 2012 10:16 am    Заголовок сообщения: Ответить с цитатой

Если 9 -- это номер разного, то так:
Код:
op.TransList(6).SetMisc 9, Op.Trans(1).MiscID(9)

и
olimp писал(а):

Только размещайте код за "скобками"
'{{ BEGIN_RECALC
'}} END_RECALC
чтобы изменения шаблона из интерфейса не убивали код.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail AIM Address MSN Messenger
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 10:27 am    Заголовок сообщения: Ответить с цитатой

не получилось, а после id почему тоже 9, может там не номер строки, а номер id
хотя так тоже не работает
Вернуться к началу
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Ср Дек 05, 2012 10:40 am    Заголовок сообщения: Ответить с цитатой

cветлана писал(а):
не получилось, а после id почему тоже 9, может там не номер строки, а номер id
хотя так тоже не работает


Sub Template_OnRecalc(op)
'{{ BEGIN_RECALC
'--Объекты учета--
op.CopyEntities 2, 1
op.CopyEntities 6, 1
'--Корреспонденты--
op.CopyAgents 2, False, 1, False
op.CopyAgents 2, True, 1, True
op.CopyAgents 3, False, 1, False
op.CopyAgents 3, True, 1, True
op.CopyAgents 4, False, 1, False, True
op.CopyAgents 4, True, 1, True, True
op.CopyAgents 5, False, 1, False
op.CopyAgents 5, True, 1, True
op.CopyAgents 6, True, 1, True
'--Количества--
op.TransList(6).CalcQty "=-Q1"
'--Суммы--
op.TransList(6).CalcSum "=-T1"
'}} END_RECALC

op.TransList(6).SetMisc 9, Op.Trans(1).MiscID(9)

end sub
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 10:48 am    Заголовок сообщения: Ответить с цитатой

я так пробовала не получается, не копирует разное
Вернуться к началу
nikman



Зарегистрирован: 10.03.2005
Сообщения: 786
Откуда: Украина, Донецк

СообщениеДобавлено: Ср Дек 05, 2012 10:58 am    Заголовок сообщения: Ответить с цитатой

Проверьте, что 9 -- это номер разного, а не ID разного.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail AIM Address MSN Messenger
cветлана
Гость





СообщениеДобавлено: Ср Дек 05, 2012 11:00 am    Заголовок сообщения: Ответить с цитатой

в проводке я захожу в разное и по строке девять разное, которое мне нужно наследовать
id этого разного 83
Вернуться к началу
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0 Часовой пояс: GMT + 2
На страницу Пред.  1, 2, 3, 4, 5, 6, 7, 8  След.
Страница 2 из 8

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group