Форум программистов, компьютерный форум, киберфорум
1С: Собственные программы
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.68/40: Рейтинг темы: голосов - 40, средняя оценка - 4.68
0 / 0 / 0
Регистрация: 30.04.2016
Сообщений: 11
1
1C 8.x

Как добавить ссылку на документ-основание в другой документ?

17.05.2019, 19:29. Показов 7807. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте! У меня учебная задача, делаю свою легонькую конфигурацию.
Есть документ "Индивидуальный заказ" с тч "Заказ". При этом на документе есть кнопка, при нажатии на которую, создается другой документ "Конкретное изделие в заказе". Сколько строк в тч, столько и создаю документов "Конкретное изделие в заказе". Для удобства добавляю ссылки на них вручную (см. изображение). Как ссылку подставить автоматически?
Вот код создания документов "Конкретное изделие" из Формы дока "Индивидуальный заказ"
1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
&НаКлиенте
Процедура КонкретноеИзделие(Команда)
    ТекДанные = Элементы.Заказ.ТекущиеДанные;    
    Форма = ПолучитьФорму("Документ.КонкретноеИзделиеВЗаказе.ФормаОбъекта");
    ДанныеФормы = Форма.Объект;
    НовДок = СоздатьДокументНаСервере(ДанныеФормы,ТекДанные.ПолучитьИдентификатор());
    КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
    Форма.Открыть();
КонецПроцедуры
 
 
&НаСервере 
Функция СоздатьДокументНаСервере(ДанныеФормы, Идентификатор)
    НовДок = Документы.КонкретноеИзделиеВЗаказе.СоздатьДокумент();
    НовДок.Дата = ТекущаяДата();
    НовДок.КодЗаказа = Объект.Номер;
ТекДанные = Объект.Заказ.НайтиПоИдентификатору(Идентификатор);
    НовДок.КодИзделияВЗаказе = ТекДанные.КодИзделия;
    НовДок.НаименованиеИзделия = ТекДанные.НаименованиеИзделия;   
    РазИзд = НовДок.ОсновноеИзделие.добавить();  
    РазИзд.Размер = ТекДанные.Размер;
    ТекДанные.СсылкаИзд = НовДок.Ссылка;
    ЗначениеВДанныеФормы(НовДок,ДанныеФормы);
КонецФункции
Таким образом не получается ТекДанные.СсылкаИзд = НовДок.Ссылка; Как это сделать правильно?
Миниатюры
Как добавить ссылку на документ-основание в другой документ?  
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.05.2019, 19:29
Ответы с готовыми решениями:

Конвертация. добавить документ основание
Обмен УНФ 1.6 БП 3.0 Источник - акт выполненных работ, приемник - реализация услуг. в акте есть...

подчиненность документов (Документ основание не типовый)
Доброго времени суток Форумчане! Создал свой документ "МойДокумент". На кнопку этого документа...

Программно указать документ-основание в восьмерке
Не подскажете? А то я не нашел в документации. Или может плохо искал?

Как сравнить "этот" документ и документ Док
В модуле формы документа делаем вот такой код Док=СоздатьОбъект("Документ.РасчетНалоговПолн");...

1
13 / 13 / 1
Регистрация: 22.12.2011
Сообщений: 110
24.05.2019, 16:58 2
Если новый документ еще не записан, то ссылка на него пустая. Нужно сначало записать документ, после будет ссылка. Либо можно сначала сформировать уникальный идентификатор для документа, записать его в ТекДанные.СсылкаИзд и установить этот идентификатор для нового документа.
0
24.05.2019, 16:58
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.05.2019, 16:58
Помогаю со студенческими работами здесь

Как указать в структуре подчиненности другой документ?
Нужно программно установить подчинить один Документ другому документу.

Добавить В Документ Строку С Номенклатурой
Добрый день! В документ Отчет ККМ, нужно добавить новую строку, программно задав кол-во, сумму, и...

Добавить в список выбора документ
нужно добавить в окно выбора вида документа при вводе на основании еще один документ - приходный...

Добавить конкретную номенклатуру в документ
Здравствуйте! подскажите, как по кнопке обработать , добавить номенклатуру , название её берется из...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru