1с 7.7 ,бухгалтерия. Расходная накладная не дает выбрать вариант расчета НДС - НДС в сумме, как исправить?
1с 7.7 ,бухгалтерия. Расходная накладная не дает выбрать вариант расчета НДС - НДС в сумме, как исправить?
дает, дает.
С уважением, Рустам.
"Пишите письма мелким почерком" :-). Ответ ГАРАНТИРОВАН
Если у вас такой вариант на заведен в справочнике «Варианты расчета налогов».
Анютины глазки
Там в модуле чуть подправить надо, что бы выводилось!
Анютины глазки, идете в Справочники->Налоги ->Варианты расчета налогов
Там добавляете новую запись и устанавливаете ее такой, как указано на рисунке.
Сейчас попытаюсь прикрепить.
С уважением, Рустам.
"Пишите письма мелким почерком" :-). Ответ ГАРАНТИРОВАН
А решается она так:
1. Было:
//*****************************************************************************
// Предопределенная процедура
//
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога,Флаг)
Если ЭлементДиалога = "ВариантРасчетаНалогов" Тогда
Флаг = 0;
СписокВариантов = СоздатьОбъект("СписокЗначений");
СпрВариант = СоздатьОбъект("Справочник.ВариантыРасчетаНалогов");
СпрВариант.ВыбратьЭлементы();
Пока СпрВариант.ПолучитьЭлемент() = 1 Цикл
Если (СпрВариант.СтавкаНП.Ставка = 0) и
(СпрВариант.СтавкаНДС.Ставка = 0) Тогда
СписокВариантов.ДобавитьЗначение(СпрВариант.ТекущийЭлемент());
КонецЕсли;
КонецЦикла;
Значение = ВариантРасчетаНалогов;
Если СписокВариантов.ВыбратьЗначение(Значение, , , , 2) = 0 Тогда
Возврат;
КонецЕсли;
ВариантРасчетаНалогов = Значение;
ПриВыбореВариантаРасчетаНалогов();
КонецЕсли;
КонецПроцедуры // ПриНачалеВыбораЗначения()
2. Исправили, стало:
//*****************************************************************************
// Предопределенная процедура
//
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога,Флаг)
Если ЭлементДиалога = "ВариантРасчетаНалогов" Тогда
Флаг = 0;
СписокВариантов = СоздатьОбъект("СписокЗначений");
СпрВариант = СоздатьОбъект("Справочник.ВариантыРасчетаНалогов");
СпрВариант.ВыбратьЭлементы();
Пока СпрВариант.ПолучитьЭлемент() = 1 Цикл
//Если (СпрВариант.СтавкаНП.Ставка = 0) и
// (СпрВариант.СтавкаНДС.Ставка = 0) Тогда
СписокВариантов.ДобавитьЗначение(СпрВариант.ТекущийЭлемент());
//КонецЕсли;
КонецЦикла;
Значение = ВариантРасчетаНалогов;
Если СписокВариантов.ВыбратьЗначение(Значение, , , , 2) = 0 Тогда
Возврат;
КонецЕсли;
ВариантРасчетаНалогов = Значение;
ПриВыбореВариантаРасчетаНалогов();
КонецЕсли;
КонецПроцедуры // ПриНачалеВыбораЗначения()
Это все в модуле формы документа "Расходная Накладная".
А может есть варианты проще ???
Aquad , ну и почему не пройдет если вы не попробывали?
Вы сначала попробуйте(именно так как я говорю), а потом уже опровергайте. У вас на картинке то моего варианта нет.
С уважением, Рустам.
"Пишите письма мелким почерком" :-). Ответ ГАРАНТИРОВАН
А для документа "оказание услуг" код тот же?
training1C по твоему не получается к сожалению!
Демидова Татьяна
training1C сорри, все получилось по твоему!
Демидова Татьяна
:-). Очень рад.
С уважением, Рустам.
"Пишите письма мелким почерком" :-). Ответ ГАРАНТИРОВАН
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)