0
dddonnn
21.06.13
✎
09:59
|
Пишу Регистратор = Документы.КорректировкаРегистров.НайтиПоНомеру("00-00000001",ТекущаяДата());
НаборЗаписей = РегистрыНакопления.ВыручкаИСебестоимостьПродаж.СоздатьНаборЗаписей();
//НаборЗаписей.Отбор.ДисконтнаяКарта.Установить(СсылкаКарты); //
НаборЗаписей.Отбор.Регистратор.Установить(Регистратор); //
НаборЗаписей.Прочитать();
Запись = НаборЗаписей.Добавить();
Запись.Период = КонецГода(НачалоГода(ТекущаяДата())-100000);
Запись.Активность = Истина;
Запись.ТипЗапасов = Перечисления.ТипыЗапасов.Товар;
Запись.АналитикаУчетаПоПартнерам = КлючПарт;
Запись.АналитикаУчетаНоменклатуры = КлючНомен;
Запись.Количество = 1;
Запись.СуммаВыручкиБезНДС = Сумма;
Запись.Подразделение = Справочники.СтруктураПредприятия.НайтиПоНаименованию("Основное");
Запись.Регистратор = Регистратор;
Запись.СуммаВыручки = Сумма;
Запись.СуммаВыручкиРегл = Сумма;
//Реквизиты
Запись.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияКлиенту;
Запись.НалогообложениеНДС = Перечисления.ТипыНалогообложенияНДС.ПродажаНеОблагаетсяНДС;
НаборЗаписей.Записать();
Открываю форму списка регистра, а организации там нет. И реквизита такого нет, как тогда программно проставить организацию?
|
|