Помогите пожалуйста с внешней обработкой

[veicheln]

огромное спасибо, дальше попытаюсь сама до ума довести!

[progmikon]

пожалуйста .
Тему пока не закрываю. Если будут вопросы - пишите.

[veicheln]

ок... спасибо

[veicheln]

написала код

Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   Запрос = Новый Запрос ("ВЫБРАТЬ
                          |   ХозрасчетныйОстатки.Счет КАК Счет,
                          |   ХозрасчетныйОстатки.Субконто1 КАК Контрагент,
                          |   ХозрасчетныйОстатки.СуммаОстатокКт КАК СуммаОстаток
                          |ИЗ
                          |   РегистрБухгалтерии.Хозрасчетный.Остатки(&НаДату, Счет = ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.РасчетыСПокупателями), , Организация = &Организация) КАК ХозрасчетныйОстатки
                          |ГДЕ
                          |   ХозрасчетныйОстатки.КоличествоОстатокКт > 0");
                   
   Запрос.УстановитьПараметр("НаДату",КонецМесяца(ДобавитьМесяц(ТекущаяДата(), -1)));
   Запрос.УстановитьПараметр("Организация", Справочники.Организации.НайтиПоКоду("000000001"));
   Результат = Запрос.Выполнить().Выбрать();
   Пока Результат.Следующий() Цикл
      Сообщить(Результат.Счет);
      Сообщить(Результат.Контрагент);
      Сообщить(Результат.СуммаОстаток);
      Реализация = Документы.РеализацияТоваровУслуг.СоздатьДокумент();
      Реализация.Дата = КонецМесяца(ТекущаяДата());
      Реализация.Контрагент = Результат.Контрагент;
      Реализация.Комментарий = "Создан с помощью внешней обработки";
      ТекСтрока = Реализация.Услуги.Добавить();
      ТекСтрока.Номенклатура = Справочники.Номенклатура.НайтиПоКоду("00000000156");
      ТекСтрока.Содержание = "Диспетчерские услуги";
      ТекСтрока.Количество = 1;
      ТекСтрока.Цена = Результат.СуммаОстаток;

    КонецЦикла;

Но документ реализация все равно не создается, в чем могут быть ошибки?

[Lexius]

А записывать новый объект кто будет, Нуралиев?

[veicheln]

Эмм... мда.. тупанула...