Заполнение ТЧ из другого документа.

Форум Программирование Общие вопросы программирования (Dev)

1С:Бухгалтерия 3.0 8.3.14 1С Программист

1. kog 39 25.04.24 11:59 Сейчас в теме

1с Бухгалтерия 3.0 Нужно заполнить табличную часть документа ОтчетПроизводстваЗаСмену из ТЧ ПоступлениеТоваровУслуг. Нюанс в том, что номенклатура должна вставать как субконто.
Делаю через расширение.

Прикрепленные файлы:

По теме из базы знаний

Найденные решения

13. nomad_irk 76 27.04.24 07:11 Сейчас в теме

(11)наймите программиста

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. nomad_irk 76 25.04.24 12:10 Сейчас в теме

(1)и в чем проблемы назвать колонку "номенклатура" колонкой "Субконто" в запросе или сделать

СтрокаТЧ.Субконто = СтрокаПоступления.Номенклатура

3. kog 39 25.04.24 12:21 Сейчас в теме

(2) Будьте добры, можно подробнее сам модуль. Я дохожу до выбора документа поступления и при выборе все закрывается.

4. nomad_irk 76 25.04.24 12:22 Сейчас в теме

(3)свой код показывайте

14. independ 1521 27.04.24 09:49 Сейчас в теме

(1) можно без расширения, внешняя обработка заполнения с формой, в реквизиты формы добавить реквизит с типом ссылка ДокументСсылка.ПоступлениеТоваров. Если вызывать в форме документа, то заполнение ТЧ Услуги делать через обращение через ВладелецФормы, примерно
Модуль объекта внешней обработки пример

Функция СведенияОВнешнейОбработке() Экспорт
	
	РегистрационныеДанные = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке("1.0.0.0");
	РегистрационныеДанные.Назначение.Добавить("Документ.ОтчетПроизводстваЗаСмену");
	РегистрационныеДанные.Версия = "1.0";
	РегистрационныеДанные.Вид = "ЗаполнениеОбъекта";
	
	НовКоманда = РегистрационныеДанные.Команды.Добавить();
	НовКоманда.Использование = "ОткрытиеФормы";
	НовКоманда.Идентификатор = "Заполнить из поступления";
	НовКоманда.Представление = НовКоманда.Идентификатор;
	
	Возврат РегистрационныеДанные;

КонецФункции

Показать

Модуль формы внешней обработки пример, нужные поля и их названия определить

&НаКлиенте
Процедура ЗаполнитьДанные(Команда)

	Если ВладелецФормы=Неопределено Тогда
		Возврат;
	КонецЕсли;

	Если НЕ ЗначениеЗаполнено(ДокументПоступление) Тогда
		Возврат;
	КонецЕсли;	
	Массив=ПолучитьМассивСтрокТЧ(ДокументПоступление);
	ВладелецФормы.Объект.Услуги.Очистить();
	Для каждого Эл из Массив Цикл
		НовСтр=ВладелецФормы.Объект.Услуги.Добавить();
		ЗаполнитьЗначенияСвойств(НовСтр,Эл);
	КонецЦикла;	
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПолучитьМассивСтрокТЧ(ДокументПоступление)
	Запрос=Новый Запрос;
	Запрос.УстановитьПараметр("Ссылка",ДокументПоступление);
	Запрос.Текст="ВЫБРАТЬ
	             |	ПоступлениеТоваровТовары.Номенклатура КАК Субконто,
	             |	ПоступлениеТоваровТовары.Количество КАК Количество,
	             |	ПоступлениеТоваровТовары.Цена КАК Цена,
	             |	ПоступлениеТоваровТовары.Сумма КАК Сумма
	             |ИЗ
	             |	Документ.ПоступлениеТоваров.Товары КАК ПоступлениеТоваровТовары";
	Массив=ОбщегоНазначения.ТаблицаЗначенийВМассив(Запрос.Выполнить().Выгрузить();
	Возврат Массив;
КонецФункции

Показать

Прикрепленные файлы:

5. kog 39 25.04.24 12:24 Сейчас в теме

я со психу все стер :( использовал из подобной процедуре заполнения счета из прихода.

6. nomad_irk 76 25.04.24 12:26 Сейчас в теме

(5)подождем, пока восстановите

7. kog 39 25.04.24 12:51 Сейчас в теме

Для гуру 1С это несколько строчек модуля. Я к сожалению к ним не отношусь, поэтому и прошу помочь.

8. user1880116 25.04.24 12:54 Сейчас в теме

(7)

Я к сожалению к ним не отношусь,

Но ты же что-то такое уже написал. То самое, что потом стер. Из подобной процедуре заполнения счета из прихода.

Или же всё было не так?

9. kog 39 26.04.24 10:33 Сейчас в теме

10. Vlan 36 26.04.24 14:07 Сейчас в теме

Лайфхак: попросите бухгалтера сделать все вручную и запишите, откуда и что он(а) берет. Потом все то же самое сделайте программно.

11. kog 39 27.04.24 05:57 Сейчас в теме

Бухгалтер попросил скрестить овцу с быком, чтобы был овцебык. )) Иначе говоря связать два дока, ПоступлениеТоваровУслуг и ОтчетПроизводстваЗаСмену. Мало того, это все надо сделать не нарушая стандартную конфу, т.е сделать расширение. Все мои знания в 8-ке позволили дойти до этого места

&НаСервере
Процедура Расш1_ЗаполнитьПриходПослеНаСервере()
// Вставить содержимое обработчика.
Открытьформу("Документ.ПоступлениеТоваровУслуг.ФормаВыбора");
КонецПроцедуры

&НаКлиенте
Процедура Расш1_ЗаполнитьПриходПосле(Команда)
Расш1_ЗаполнитьПриходПослеНаСервере();
КонецПроцедуры

.......и я уже здесь завис :-( А надо чтобы, из поступления ТЧ подгрузилось. Ну ребята, помогите уже третий день голову ломаю. Не кидайте в меня тапками, я понимаю, что пока не догоняю, но срок бух поставил.

13. nomad_irk 76 27.04.24 07:11 Сейчас в теме

(11)наймите программиста

12. kog 39 27.04.24 06:00 Сейчас в теме

ошибка:
{Расширение1 Документ.ОтчетПроизводстваЗаСмену.Форма.ФормаДокументаОтчетПроизводстваЗаСмену.Форма(5,2)}: Процедура или функция с указанным именем не определена (Открытьформу)

Оставьте свое сообщение

E-mail: