Форум на Kuban.ru (http://forums.kuban.ru/)
-   Территория 1С (http://forums.kuban.ru/f1040/)
-   -   Подскажите, Как в общий модуль УчетНДС вставить РежимДиалогаВопрос.ДаНет (http://forums.kuban.ru/f1040/podskazhite_kak_v_obshij_modul-_uchetnds_vstavit-_rezhimdialogavopros_danet-7919912.html)

amv79 27.07.2016 14:25

Подскажите, Как в общий модуль УчетНДС вставить РежимДиалогаВопрос.ДаНет
 
вот в этот код нужно вставить РежимДиалогаВопрос.ДаНет

Если ДанныеДляПечати.Дата >= '20160701'
И Строчка.СтавкаНДС = Перечисления.СтавкиНДС.НДС0
И ЗначениеЗаполнено(Строчка.ТоварКодТНВЭД) Тогда
// Дополняем наименование товара информацией о коде ТН ВЭД
Строчка.ТоварНаименование = Строчка.ТоварНаименование + ", код ТН ВЭД " + СокрЛП(Строчка.ТоварКодТНВЭД);
КонецЕсли;

подскажите, как это сделать

amv79 27.07.2016 14:53

Обычное приложение

bma1 27.07.2016 16:10

если модуль не привилегированный
Если Вопрос("Все текущие изменения в таблицах документа будут утеряны", РежимДиалогаВопрос.ДаНет) = КодВозвратаДиалога.Да Тогда

bma1 27.07.2016 16:11

И проверить, где исполняется процедура - на клиенте или на сервере

amv79 27.07.2016 16:16

идут ошибки при вызове Вопрос(), выполняется на сервере

amv79 27.07.2016 16:17

используем только толстый клиент

bma1 27.07.2016 16:43

Так разумеется. Вопрос - это клиентская процедура, а ее запускают на сервере. Серверу не отобразить экранную форму, вот он и удивляется.

VZ 27.07.2016 21:06

Вообще-то, не [em][b]Вопрос()[/b][/em], а [em][b]ПоказатьВопрос()[/b][/em]
Пора, пора привыкать ;)

amv79 28.07.2016 04:58

[quote=bma1;42612002] Так разумеется. Вопрос - это клиентская процедура, а ее запускают на сервере. Серверу не отобразить экранную форму, вот он и удивляется. [/quote]
Это понятно.
Поэтому и спрашиваю, как в общем модуле УчетНДС, вызвать Вопрос() или ПоказатьВопрос() в этом коде

Если ДанныеДляПечати.Дата >= '20160701'
И Строчка.СтавкаНДС = Перечисления.СтавкиНДС.НДС0
И ЗначениеЗаполнено(Строчка.ТоварКодТНВЭД) Тогда
// Дополняем наименование товара информацией о коде ТН ВЭД
Строчка.ТоварНаименование = Строчка.ТоварНаименование + ", код ТН ВЭД " + СокрЛП(Строчка.ТоварКодТНВЭД);
КонецЕсли;

Климов Сергей 28.07.2016 09:23

Ответ простой: если модуль выполняется на сервере, то никак.
Если вам надо как-то хитро формировать печатную форму - делайте дополнительную внешнюю форму. В ней - форму (извиняюсь за тавтологию, но никак иначе), в которой вводить все необходимые данные и задавать вопросы. Полученные ответы передавать серверной процедуре печати.

bma1 28.07.2016 09:39

[quote=VZ;42613603]Пора, пора привыкать ;)[/quote] тут на обычных формах, а не на необычных...

VZ 28.07.2016 09:57

10-bma1 > Вообще-то, УФ - [b]уже[/b] обычные. Как ты мог заметить, платформа 8.2 прекратила развитие в прошлом году, а все конфы, ориентированные изначально на 8.3 (т.е., на тонкого клиента) в том же году (где-то летом) избавились от модальных окон.
Так что УФ - необратимая тенденция.
Если только не считать самописки (и пропущенные через мясорубку старые конфы) обычными, а типовые от 2015 и позже - редкой экзотикой.

bma1 28.07.2016 10:07

[quote=VZ;42615793]Так что УФ - необратимая тенденция.[/quote]Что-нибудь новое придумают...


Текущее время: 13:16. Часовой пояс GMT +3.