Создание проводок.

09.06.2009, 12:02. **Показов** 22047. **Ответов** 5

Студворк — интернет-сервис помощи студентам

Доброго времени суток всем.
Пытаюсь создать проводку программно.
Док = Документы.ОперацияБух.СоздатьДокумент();
Док.Дата = ТекущаяДата();
Док.Организация = Организация;
НовПроводка = Док.Движения.Хозрасчетный.Добавить();
НовПроводка.Период = Док.Дата;
НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("01 3");
НовПроводка.СубконтоДт.Вставить(ПланыВид овХарактеристик.ВидыСубконтоХозрасчетные
["Материалы"],спр.Затрата);
Пишет поле материал не наденно.Если смотреть в режиме пользователя, то такое субконто как "материалы" есть, через конфигуратор его не видно.Может это из за того что это субконто было нами созданно.Если да, то как сделать так что бы его было видно через конфигуратор.

@kyr · 09.06.2009, 12:22

вообще-то по хорошему стоит в конфигураторе делать различные правки для плана счетов...

09.06.2009, 12:42

Это я уже понял.Но поздно.Что теперь можно сделать?Как записать субконто?

@kyr · 09.06.2009, 13:10

по идее нада сделать обработку которая все остатки с 13го счета с определенным субконто спишет на какой-нить другой счет. потом создать субконто по человекчески (в конфигураторе) и написать подправить обработку, которая уже с этого какого-нить другого счета остатки повесит куда нужно. процесс геморный и возможно с точки зрения ведения учета не совсем верный, но другой в голову пока не приходит

@umkmowm181538 · 09.06.2009, 22:25

Док = Документы.ОперацияБух.СоздатьДокумент();
Док.Дата = ТекущаяДата();
НовПроводка = Док.Движения.Хозрасчетный.Добавить();
НовПроводка.Период = Док.Дата;
НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("01 3");
НовПроводка.СубконтоДт.Вставить(ПланыВид овХарактеристик.ВидыСубконтоХозрасчетные
.НайтиПоНаименованию("Материалы"),Спр.За трата);

10.06.2009, 08:38

Сообщение от unknown181538

Док = Документы.ОперацияБух.СоздатьДокумент();
Док.Дата = ТекущаяДата();
НовПроводка = Док.Движения.Хозрасчетный.Добавить();
НовПроводка.Период = Док.Дата;
НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("01 3");
НовПроводка.СубконтоДт.Вставить(ПланыВид овХарактеристик.ВидыСубконтоХозрасчетные
.НайтиПоНаименованию("Материалы"),Спр.За трата);

Большое спасибо!!!!!!!Сработало.

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

Vyttyor

	Создание проводок. 09.06.2009, 12:02. Показов 22047. Ответов 5 Метки нет (Все метки) Доброго времени суток всем. Пытаюсь создать проводку программно. Док = Документы.ОперацияБух.СоздатьДокумент(); Док.Дата = ТекущаяДата(); Док.Организация = Организация; НовПроводка = Док.Движения.Хозрасчетный.Добавить(); НовПроводка.Период = Док.Дата; НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("01 3"); НовПроводка.СубконтоДт.Вставить(ПланыВид овХарактеристик.ВидыСубконтоХозрасчетные ["Материалы"],спр.Затрата); Пишет поле материал не наденно.Если смотреть в режиме пользователя, то такое субконто как "материалы" есть, через конфигуратор его не видно.Может это из за того что это субконто было нами созданно.Если да, то как сделать так что бы его было видно через конфигуратор.

@kyr 1 / 1 / 0 Регистрация: 04.12.2005 Сообщений: 1,588
	09.06.2009, 12:22
	вообще-то по хорошему стоит в конфигураторе делать различные правки для плана счетов... 0

Vyttyor
	09.06.2009, 12:42
	Это я уже понял.Но поздно.Что теперь можно сделать?Как записать субконто?

@kyr 1 / 1 / 0 Регистрация: 04.12.2005 Сообщений: 1,588
	09.06.2009, 13:10
	по идее нада сделать обработку которая все остатки с 13го счета с определенным субконто спишет на какой-нить другой счет. потом создать субконто по человекчески (в конфигураторе) и написать подправить обработку, которая уже с этого какого-нить другого счета остатки повесит куда нужно. процесс геморный и возможно с точки зрения ведения учета не совсем верный, но другой в голову пока не приходит 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	09.06.2009, 22:25
	Док = Документы.ОперацияБух.СоздатьДокумент(); Док.Дата = ТекущаяДата(); НовПроводка = Док.Движения.Хозрасчетный.Добавить(); НовПроводка.Период = Док.Дата; НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("01 3"); НовПроводка.СубконтоДт.Вставить(ПланыВид овХарактеристик.ВидыСубконтоХозрасчетные .НайтиПоНаименованию("Материалы"),Спр.За трата); 0