Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 4, свеженьких 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Обработка Проведения не переносятся товары! , при провидении документа не переносятся товары в другой документ          
MOTOPARTNER Подменю пользователя
сообщение 06.10.20, 23:55
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

Доброй ночи! Хочу при проведения документа реализация хочу создать автоматом документ счет на оплату, но как только нажимаю ОК в документе реализация 1С зависает
проблема начинается после

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

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

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

Alegzander Подменю пользователя
сообщение 07.10.20, 7:11
Сообщение #2

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 6 раз
Рейтинг: 6

Цитата(MOTOPARTNER @ 07.10.20, 0:55) *
Для Каждого ТекСтрокаТовары Из Товары Цикл
НоваяСтрока = Товары.Добавить();

НоваяСтрока = докСчет.Товары.Добавить();

Спасибо сказали: MOTOPARTNER,

MOTOPARTNER Подменю пользователя
сообщение 07.10.20, 9:18
Сообщение #3

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

Alegzander @ Сегодня, 8:11 * ,
Спасибо попробую

Alegzander @ Сегодня, 8:11 * ,
Вообще теперь не создается документ((((

sava1 Подменю пользователя
сообщение 07.10.20, 9:38
Сообщение #4

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2352
Из: Проскуров
Спасибо сказали: 566 раз
Рейтинг: 550

конфигурация ?

Alegzander Подменю пользователя
сообщение 07.10.20, 9:39
Сообщение #5

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 6 раз
Рейтинг: 6

MOTOPARTNER @ Сегодня, 10:18 * ,
Цитата(MOTOPARTNER @ 07.10.20, 10:18) *
Вообще теперь не создается документ((((


какая ошибка?

MOTOPARTNER Подменю пользователя
сообщение 07.10.20, 9:45
Сообщение #6

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

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



sava1 @ Сегодня, 10:38 * ,
УТ для укр. 2.3

Vofka Подменю пользователя
сообщение 07.10.20, 9:46
Сообщение #7

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13361
Из: Киев
Спасибо сказали: 4116 раз
Рейтинг: 3257.4

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


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

sava1 Подменю пользователя
сообщение 07.10.20, 9:53
Сообщение #8

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2352
Из: Проскуров
Спасибо сказали: 566 раз
Рейтинг: 550

попробуйте

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

докСчет.ПолучитьФорму().Открыть();

MOTOPARTNER Подменю пользователя
сообщение 07.10.20, 10:22
Сообщение #9

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

Vofka @ Сегодня, 10:46 * ,
не сообщает ((( странно...

sava1 @ Сегодня, 10:53 * ,
Тоже не создает(((

sava1 Подменю пользователя
сообщение 07.10.20, 10:54
Сообщение #10

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2352
Из: Проскуров
Спасибо сказали: 566 раз
Рейтинг: 550

права на документ есть ?

MOTOPARTNER Подменю пользователя
сообщение 07.10.20, 11:19
Сообщение #11

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

sava1 @ Сегодня, 11:54 * ,
Есть

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

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


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

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


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


 ! 

Правила: 1
 


Сообщение отредактировал Vofka - 07.10.20, 11:37

sava1 Подменю пользователя
сообщение 07.10.20, 11:38
Сообщение #12

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2352
Из: Проскуров
Спасибо сказали: 566 раз
Рейтинг: 550

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

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

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

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


вставить
докСчет.ОбменДанными.Загрузка = истина;

Спасибо сказали: MOTOPARTNER,

MOTOPARTNER Подменю пользователя
сообщение 07.10.20, 11:54
Сообщение #13

Общительный
**
Группа: Пользователи
Сообщений: 32
Из: Харьков
Спасибо сказали: 1 раз
Рейтинг: 1

sava1 @ Сегодня, 12:35 * ,
сделал как написано результата нет

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

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 22.10.20, 23:10
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!