Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Обработка Проведения не переносятся товары!
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.3
MOTOPARTNER
Доброй ночи! Хочу при проведения документа реализация хочу создать автоматом документ счет на оплату, но как только нажимаю ОК в документе реализация 1С зависает
проблема начинается после

Для Каждого ТекСтрокаТовары Из Товары Цикл

если убрать перенос товаров то все нормально в документ счет все переносится, а вот как переносятся товары 1С зависает что не так?

    докСчет = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
    докСчет.Дата                        = ТекущаяДата();
    докСчет.Контрагент                    = Ссылка.Контрагент;
    докСчет.ДоговорКонтрагента            = Ссылка.ДоговорКонтрагента;
    докСчет.КратностьВзаиморасчетов        = Ссылка.КратностьВзаиморасчетов;
    докСчет.Организация                    = Ссылка.Организация;
    докСчет.ВалютаДокумента                = Ссылка.ВалютаДокумента;
    докСчет.СтруктурнаяЕдиница          = Ссылка.Сделка.СтруктурнаяЕдиница;
    докСчет.Реализация                    = Ссылка;
    докСчет.ЗаказПокупателя                = Ссылка.Сделка;
    докСчет.Склад                        = Ссылка.Склад;
    
    Для Каждого ТекСтрокаТовары Из Товары Цикл
            НоваяСтрока = Товары.Добавить();
            НоваяСтрока.ЕдиницаИзмерения             = ТекСтрокаТовары.ЕдиницаИзмерения;
            НоваяСтрока.Количество                     = ТекСтрокаТовары.Количество;
            НоваяСтрока.Номенклатура                 = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Цена                        = ТекСтрокаТовары.Цена;
            НоваяСтрока.Сумма                        = ТекСтрокаТовары.Сумма;
            НоваяСтрока.ХарактеристикаНоменклатуры  = ТекСтрокаТовары.ХарактеристикаНоменклатуры;
            НоваяСтрока.Коэффициент                 = ТекСтрокаТовары.Коэффициент;
    КонецЦикла;
    
    
    докСчет.Записать(РежимЗаписиДокумента.Запись);
Alegzander
Цитата(MOTOPARTNER @ 07.10.20, 0:55) необходимо зарегистрироваться для просмотра ссылки
Для Каждого ТекСтрокаТовары Из Товары Цикл
НоваяСтрока = Товары.Добавить();

НоваяСтрока = докСчет.Товары.Добавить();
MOTOPARTNER
Alegzander @ Сегодня, 8:11 необходимо зарегистрироваться для просмотра ссылки ,
Спасибо попробую

Alegzander @ Сегодня, 8:11 необходимо зарегистрироваться для просмотра ссылки ,
Вообще теперь не создается документ((((
sava1
конфигурация ?
Alegzander
MOTOPARTNER @ Сегодня, 10:18 необходимо зарегистрироваться для просмотра ссылки ,
Цитата(MOTOPARTNER @ 07.10.20, 10:18) необходимо зарегистрироваться для просмотра ссылки
Вообще теперь не создается документ((((


какая ошибка?
MOTOPARTNER
Alegzander @ Сегодня, 10:39 необходимо зарегистрироваться для просмотра ссылки ,
нет ошибок тупо провожу документ реализация и все но док счет не создается



sava1 @ Сегодня, 10:38 необходимо зарегистрироваться для просмотра ссылки ,
УТ для укр. 2.3
Vofka
Напишите после
докСчет.Записать(РежимЗаписиДокумента.Запись);


Сообщить(докСчет.Номер);
sava1
попробуйте

докСчет = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
докСчет.Заполнить(Ссылка);

докСчет.ПолучитьФорму().Открыть();
MOTOPARTNER
Vofka @ Сегодня, 10:46 необходимо зарегистрироваться для просмотра ссылки ,
не сообщает ((( странно...

sava1 @ Сегодня, 10:53 необходимо зарегистрироваться для просмотра ссылки ,
Тоже не создает(((
sava1
права на документ есть ?
MOTOPARTNER
sava1 @ Сегодня, 11:54 необходимо зарегистрироваться для просмотра ссылки ,
Есть

sava1 @ Сегодня, 11:54 необходимо зарегистрироваться для просмотра ссылки ,
СмотриТЕ
Если так то документ создается
    докСчет = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
    докСчет.Дата                        = ТекущаяДата();
    докСчет.Контрагент                    = Ссылка.Контрагент;
    докСчет.ДоговорКонтрагента            = Ссылка.ДоговорКонтрагента;
    докСчет.КратностьВзаиморасчетов        = Ссылка.КратностьВзаиморасчетов;
    докСчет.Организация                    = Ссылка.Организация;
    докСчет.ВалютаДокумента                = Ссылка.ВалютаДокумента;
    докСчет.СтруктурнаяЕдиница          = Ссылка.Сделка.СтруктурнаяЕдиница;
    докСчет.Реализация                    = Ссылка;
    докСчет.ЗаказПокупателя                = Ссылка.Сделка;
    докСчет.Склад                        = Ссылка.Склад;

    докСчет.Записать(РежимЗаписиДокумента.Запись);


Как только добавляю перенос товаров, все провожу док реализации проводится нет ошибок но и счет не создает

    докСчет = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
    докСчет.Дата                        = ТекущаяДата();
    докСчет.Контрагент                    = Ссылка.Контрагент;
    докСчет.ДоговорКонтрагента            = Ссылка.ДоговорКонтрагента;
    докСчет.КратностьВзаиморасчетов        = Ссылка.КратностьВзаиморасчетов;
    докСчет.Организация                    = Ссылка.Организация;
    докСчет.ВалютаДокумента                = Ссылка.ВалютаДокумента;
    докСчет.СтруктурнаяЕдиница          = Ссылка.Сделка.СтруктурнаяЕдиница;
    докСчет.Реализация                    = Ссылка;
    докСчет.ЗаказПокупателя                = Ссылка.Сделка;
    докСчет.Склад                        = Ссылка.Склад;
    
    Для Каждого ТекСтрокаТовары Из Товары Цикл
            НоваяСтрока = докСчет.Товары.Добавить();
            НоваяСтрока.ЕдиницаИзмерения             = ТекСтрокаТовары.ЕдиницаИзмерения;
            НоваяСтрока.Количество                     = ТекСтрокаТовары.Количество;
            НоваяСтрока.Номенклатура                 = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Цена                        = ТекСтрокаТовары.Цена;
            НоваяСтрока.Сумма                        = ТекСтрокаТовары.Сумма;
            НоваяСтрока.ХарактеристикаНоменклатуры  = ТекСтрокаТовары.ХарактеристикаНоменклатуры;
            НоваяСтрока.Коэффициент                 = ТекСтрокаТовары.Коэффициент;
    КонецЦикла;
    
    
    докСчет.Записать(РежимЗаписиДокумента.Запись);


Что-то с товаром не так... и странно что нет ошибок.


 ! 

необходимо зарегистрироваться для просмотра ссылки: 1
 
sava1
Вы пробовали создать документ тем кодом, что я привел ?
только тем - свой закомментируйте.
заполнение Товары - Вам писали - оно некорректно. Вы постоянно добавляете в Реализацию строки - практически это бесконечный цикл.

кстати - цены в пределах разрешенных ?

попробуйте перед

докСчет.Записать(РежимЗаписиДокумента.Запись);


вставить
докСчет.ОбменДанными.Загрузка = истина;
MOTOPARTNER
sava1 @ Сегодня, 12:35 необходимо зарегистрироваться для просмотра ссылки ,
сделал как написано результата нет

sava1 @ Сегодня, 12:38 необходимо зарегистрироваться для просмотра ссылки ,
всем большое спасибо работает проблема была в другом еще один документ создавало и код был написан перед этим и до создания счета не доходило. еще раз спасибо
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.