Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: При вводе на основании перезаполнить реквизит введенного документа
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.3
l2d808
1С:Підприємство 8.3 (8.3.12.1440)
Доброго дня шановне товариство !
Конфігурація самописна . У мене є два документи.В документах роблю реквізит "Документ"- ДокументСсилка. І моя головна задача при вводі на підставі другого документа в реквізиті "Документ" щоб підтягувалось документ який "виступає підставою для", тобто в документі1 ми додаємо на підставі документ2 і в реквізиті "документ" в документі 2 нам підтягується що це Документ1 000000001 від дати.
Робив так в документі2 який вводиться на підставі :
Процедура ОбработкаЗаполнения(ДанныеЗаполнения, ТекстЗаполнения, СтандартнаяОбработка)
        Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ВведенняВиведенняТранспортногоЗасобуНаПідприємство") Тогда
      Документ = ДанныеЗаполнения.Документ.Ссылка;    
      ТранспортнийЗасіб = ДанныеЗаполнения.ТранспортнийЗасіб;
         КонецЕсли;
КонецПроцедуры


+ В цьому документі2 реквізит "Документ "-Заповнювати з даних заповнення.
А далі в документі1 прописав:
Процедура ПослеЗаписи(ПараметрыЗаписи)
    Объект.Документ =  Объект.Ссылка;
КонецПроцедуры

Результат :Коли створюю в документ1 та заповнюю рекізити пишу "записати" 2 рази і тоді при вводі на підставі документ2 все працює .Якщо один раз записати то нічого не передається в форму документа2 при виклику на підставі документ2 реквізит "Документ" пустий.
Дуже прошу Вашої допомоги!




ed.kharkov
l2d808 @ Сегодня, 11:12 необходимо зарегистрироваться для просмотра ссылки ,
Добрый день.

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

Процедура ОбработкаЗаполнения(ДанныеЗаполнения, ТекстЗаполнения, СтандартнаяОбработка)
        Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ВведенняВиведенняТранспортногоЗасобуНаПідприємство") Тогда
              Документ = ДанныеЗаполнения;    
              ТранспортнийЗасіб = ДанныеЗаполнения.ТранспортнийЗасіб;
        КонецЕсли;
КонецПроцедуры


В процедура ПослеЗаписи() вобще не нужна в данном случае.
l2d808
ed.kharkov @ Сегодня, 11:33 необходимо зарегистрироваться для просмотра ссылки ,
Велике дякую! Все працює.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.