v7: Копирование всех реквизитов из старого документа во вновьсозданный #772502

Добрый вечер волшебники. Вопрос собственно такой: Программно Создаётся документ, надо в него скопировать абсолютно все реквизиты включая табличные из (текущего/другого) документа того же типа. Есть ли способ сделать это автоматом, или обязательно надо приравнивать каждый реквизит нового документа к аналогичному реквизиту старого документа?

Реквизиты шапки можно через метаданные перечислить и скопировать через ПолучитьАтрибут/УстановитьАтрибут. Табличную часть проще всего через Выгрузить/ЗагрузитьТабличнуюЧасть.

Если я верно понял, то получить атрибут работает только с одним конкретным атрибутом, то-есть все равно придётся перечислять все атрибуты по одному.

Сериализуй объект в джейсон и поменяй там УИД, потом получи объект обратно.

не сношай мозг Открой типовую тис и найди в ней процедуру СкопироватьРеквизитыШапки А тч копируется тремя операторами

зачем перечислять можно обойти циклом через метаданные - будет работать универсально.

К сожалению это не типовая тис, такой процедуры не значится. Конфигурация судя по всему банковская или ломбардная. С ампутированными ногами и велосипедом вместо одной из них и костылём вместо другой. Посему решение вижу только в использовании родных методов платформы а не конфигурации. А вот как тч скопировать тремя операторами это уже интересно, сейчас поищу.

Нашёл такое решение для ТЧ НовыйЗБ.ТабличнаяЧасть.Загрузить(ТекущийЗБ.ТабличнаяЧасть.Выгрузить) однако ошибка: Поле агрегатного объекта не обнаружено (ТабличнаяЧасть)

Открой для себя Синтакс-помощник....

а кто не даёт позаимствовать идею из типовой?

отсутсвие типовой :-)

Типовую надо искать/качать/покупать вот в чем бида.

Хорошо решение для ТЧ с помощью тычков прикладом в спину с вашей стороны нашёл: Теперь подобное решение для остальных реквизитов было бы просто замечато.

вот тут справка по работе с метаданными в 77

перебор циклом через общие реквизиты, затем через реквизиты шапки документа. не забыть про тип и вид для неопределенных типов.

способ есть! два цикла + загрузить/выгрузить ТЧ

так назрел вопрос: "общие реквизиты документа" чем отличаются от "реквизитов шапки"?

Тем, что они общие для всех документов. в дереве метаданных они находятся в другом месте. физически общие реквизиты без отбора почти ничем.  Общие реквизиты с отбором сидят в тапблице 1сджорн.

общие относятся ко ВСЕМ документам и их не будет в переборе реквизитов шапки конкретного вида документа через метаданные

для этого и нужен второй цикл...

Document newDoc = oldDoc.clone

а в 7-ке нет у документа метода Скопировать?

{Документ.ВозвратСсуды.Форма.Модуль}: Поле агрегатного объекта не обнаружено (clone) Не нашел такого

советую прислушаться к ...

Скопировать - нет.

в синтаксис помощнике как раз таки и не нашел метод Скопировать, clone в синтаксис помощьнике как метод документа тоже отсутствует.

если ты их там не нашел, зачем тогда рожал ?

Вот тебе процедура из типовой ТиС, если поможет: Процедура СкопироватьРеквизитыШапки(ДокОткуда, ДокКуда)

+27, а да! забыл про старт! типа так:

Ну это не тонкий намёк уже и даже не толстый :). Однако благодарю сейчас буду мастырить.

Блин вроде с реквизитами разобрался, теперь ТЧ. при тесте этого: 1с вылетает с ошибкой. Если закомментить последнюю строчку то не вылетает.

реквизиты все совпадают?

Почему бы документы одного типа, НовыйЗБ вообще пустой.

ммм.. отбой моему вопросу..

а как хоть вылетает? по-подробнее чуть...

Прекращена работа программы "1С:V7 starter program (for SQL)" Windows может произвести поиск способа устранения этой ошибки в интернете... Сигнатура проблемы:   Имя события проблемы:    APPCRASH   Версия приложения:    7.70.0.18   Отметка времени приложения:    3ba747d9   Имя модуля с ошибкой:    BkEnd.dll   Версия модуля с ошибкой:    7.70.0.27   Отметка времени модуля с ошибкой:    4573f811   Дополнительные сведения 1:    0a9e   Дополнительные сведения 2:    0a9e372d3b4ad19135b953a78882e789   Дополнительные сведения 3:    0a9e   Дополнительные сведения 4:    0a9e372d3b4ad19135b953a78882e789 Ознакомьтесь с заявлением о конфиденциальности в Интернете:    Если заявление о конфиденциальности в Интернете недоступно, ознакомьтесь с его локальным вариантом:   C:Windowssystem32 u-RUerofflps.txt

хосспадя. ну сделай через обход метаданных. Там добавить-то три строчки...

ДокументОбъект.<Имя документа> (DocumentObject.<Имя документа>) Скопировать (Copy) Синтаксис: Скопировать Возвращаемое значение: Тип: ДокументОбъект. Описание: Создает новый документ копированием существующего. Доступность: Сервер, толстый клиент, внешнее соединение. Примечание: Использование метода не приводит к записи созданного объекта в базу данных. Пример: См. также: ДокументОбъект, событие ПриКопировании

Это 7.7 причем чистая.

А че, там такого нет? Как так? Восьмерка же сырая еще, а семерка уже обкатанная.

ну, у меня в семерке такого можно сделать, не проблема. а вот у него нельзя. да и ненужно... Хватает имеющихся методов

НовыйЗБ = ТекущийЗБ.Скопировать; {Документ.ВозвратСсуды.Форма.Модуль}: Поле агрегатного объекта не обнаружено (Скопировать)

у тебя не установлен openconf? Если нет - рекомендую, в нём после точки выскакивает список допустимых параметров/аргументов, по крайней мере увидишь, можно или нет подставлять твоё ..Скопировать

А народ жалуется, что в восьмерке кода писать больше приходится...   Переходи в нашу веру, чувак.

+  "XBASE.Методы.Скопировать" - в синтакспомощнике. Никак этот метод не подходит для копирования документов или еще чего.

Во имя СКД, Клиента и Сервера!

18 релиз ???? Ну вы блин даете.... (с)

зато у него установлен 18 релиз...

Да, грустно это всё..

И эта, поставь 27 релиз обязательно!

+ к Реквизиты там попутал. ТекущийЗБ.ВыгрузитьТабличнуюЧасть(ТабличнаяЧастьНаЭкспорт); заменить на И вот этот код твой лишний, можно работать прямо с реквизитом "Основание", если ты его не меняешь: ТекущийЗБ = СоздатьОбъект("Документ.ЗалоговыйБилет");   ТекущийЗБ.НайтиДокумент(Основание);

сейчас качну 27 релиз платформы, попробую.

Загляни в свою почту.

тупой, да? читать не умеешь? я про ТВОЮ нетиповую конфигурацию не говорил. еще раз: не сношай мозг Открой типовую тис и найди в ней процедуру СкопироватьРеквизитыШапки

Друже, у него, похоже нет типовой

+ в личке "Бишкек, Кыргызстан", есть там франчайзи, или нет - не знаю, но, думаю точно есть. Кто-то поставил 1С на комп, и сказал: "работайте, другого ничего нет"

оказываю услуги по семерке. удаленно. народ не жаловался. оказывал в тч и с среднеазиатские. лишь бы коннект был. ихние типовые похожи на россиняские либо с изменениячми либо на основе старых релизов/редакций.

Всех благодарю за участие, процедура помогла даже слишком, оказалось всех полей более чем нужно. Всеравно перенос данных пришлось организовывать простым присвоением. Но с ТЧ всё отлично, на релизе 27 работает без ошибок. Процедурку изучил, приму к сведению в следующий раз.

Почему "СоздатьОбъект", а не "тз = Новый Таблица значений". Есть же специальные функции...

Потому что 77

Потому что бюджет ограничен :)

На 1с-ника.