Список = СоздатьОбъект("СписокЗначений");
Список.Установить("Процент",100);
Сообщить(Список.РазмерСписка()); //1 элемент - значение с представлением "Процент" - добавлено
Список.Установить("Процент");
Сообщить(Список.РазмерСписка()); //0 - значение с представлением "Процент" было найдено и удалено
Список.Установить("Процент");
Сообщить(Список.РазмерСписка()); //1 - значение с представлением "Процент" не было найдено и поэтому добавлено
Цитата: amo|obs от 16 ноября 2025, 17:22Не добавляется в список значений значение неопределенного типа данных!Действительно, ДобавитьЗначение и ВставитьЗначение ничего не делают с пустотой.
Список = СоздатьОбъект("СписокЗначений");
Список.ДобавитьЗначение("займём местчеко");
Список.УстановитьЗначение(Список.РазмерСписка,);
Сообщить(ЗначениеВСтрокуВнутр(Список));//список из одного пустого элемента
Цитата: SnakePlisskin от 09 декабря 2025, 15:32А что есть ВидДеятельности - справочника такого я не нашел.ВидНоменклатуры - это ж пример.
Цитата: Харлампий Дымба от 08 декабря 2025, 21:36Если самописка на базе типовой, то:ТЗ_НДС = СоздатьОбъект("ТаблицаЗначений"); ТЗ_НДС.НоваяКолонка("ВидДеятельности"); ТЗ_НДС.НоваяКолонка("СтавкаНДС"); ТЗ_НДС.НоваяКолонка("НДС","Число"); // по каждой строке документа заполняешь НДС по ставкам по видам деятельности //... ТЗ_НДС.Свернуть("ВидДеятельности,СтавкаНДС","НДС"); ТЗ_НДС.ВЫбратьСтроки(); Пока ТЗ_НДС.ПолучитьСтроку() = 1 Цикл Если ТЗ_НДС.НДС <> 0 Тогда Операция.НоваяПроводка(); Операция.ПервичныйДокумент = глПредставлениеПервичногоДокумента(Контекст); Операция.НомерЖурнала = "ТВ"; Операция.СодержаниеПроводки = "Начислен НДС"; Операция.Дебет.Счет = СчетПоКоду("90.3"); Операция.Дебет.Субконто(1, ТЗ_НДС.ВидДеятельности); Операция.Дебет.Субконто(2, ТЗ_НДС.СтавкаНДС); Операция.Кредит.Счет = СчетПоКоду("68.2"); Операция.Кредит.ВидыПлатежейВБюджет = Перечисление.ВидыПлатежейВБюджет.Налог; Операция.Сумма = ТЗ_НДС.НДС; КонецЕсли; КонецЦикла;Цитата: Злоп от 08 декабря 2025, 17:40как у них 90.3 по кредиту закроется...Ну и опять же - если документ вкорячен в типовую Бухию, то "ЗакрытиеМесяца" всё сделает чётко.
Цитата: Харлампий Дымба от 08 декабря 2025, 21:36Если самописка на базе типовой, то:ТЗ_НДС = СоздатьОбъект("ТаблицаЗначений"); ТЗ_НДС.НоваяКолонка("ВидДеятельности"); ТЗ_НДС.НоваяКолонка("СтавкаНДС"); ТЗ_НДС.НоваяКолонка("НДС","Число"); // по каждой строке документа заполняешь НДС по ставкам по видам деятельности //... ТЗ_НДС.Свернуть("ВидДеятельности,СтавкаНДС","НДС"); ТЗ_НДС.ВЫбратьСтроки(); Пока ТЗ_НДС.ПолучитьСтроку() = 1 Цикл Если ТЗ_НДС.НДС <> 0 Тогда Операция.НоваяПроводка(); Операция.ПервичныйДокумент = глПредставлениеПервичногоДокумента(Контекст); Операция.НомерЖурнала = "ТВ"; Операция.СодержаниеПроводки = "Начислен НДС"; Операция.Дебет.Счет = СчетПоКоду("90.3"); Операция.Дебет.Субконто(1, ТЗ_НДС.ВидДеятельности); Операция.Дебет.Субконто(2, ТЗ_НДС.СтавкаНДС); Операция.Кредит.Счет = СчетПоКоду("68.2"); Операция.Кредит.ВидыПлатежейВБюджет = Перечисление.ВидыПлатежейВБюджет.Налог; Операция.Сумма = ТЗ_НДС.НДС; КонецЕсли; КонецЦикла;Цитата: Злоп от 08 декабря 2025, 17:40как у них 90.3 по кредиту закроется...Ну и опять же - если документ вкорячен в типовую Бухию, то "ЗакрытиеМесяца" всё сделает чётко.