1С Предприятие

@Wandalin · Регистрация: 11.11.2014

Студворк — интернет-сервис помощи студентам

Есть Документ "Прием_товаров" с формой, на которой 3 табличной части(Заказанное, Пришедшее, Недост_Лишнее). "Заказанное" и "Пришедшее" заполняется данными(Наименование, Количество). Необходимо найти разницу между табличными частями и записывать результат в таблицу "Недост_Лишнее".

@Yulunga · 31.01.2020, 12:55

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

@Wandalin · 31.01.2020, 15:18 **[ТС]**

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

@Yulunga · 31.01.2020, 16:49

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

@polax · 31.01.2020, 17:09

Wandalin, Не знаю что на меня нашло

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Для каждого СтрЗаказанное Из Объект.Заказанное  Цикл
СтрПришедшее = Объект.Пришедшее.Найти(СтрЗаказанное.Номенклатура, "Номенклатура"); // Проверяем пришел ли вообще такой товар
Если СтрПришедшее = Неопределено Тогда  // если не пришел, то добавляем в третью таб с минусовым количеством
СтрРазличие = Объект.Недост_Лишн.Добавить();
ЗаполнитьЗначенияСвойств(СтрРазличие,СтрЗаказанное);
СтрРазличие.Количество = 0 - СтрЗаказанное.Количество;
Продолжить;
Иначе
Если СтрЗаказанное.Количество = СтрПришедшее.Количество Тогда //если товар пришел и в нужном количестве - игнорируем строку
Продолжить;
Иначе    // если количество в первых двух ТЧ не совпадает, добавляем в третью с минусом, если товара не хватает и с плюсом если его больше
СтрРазличие = Объект.Недост_Лишн.Добавить();
ЗаполнитьЗначенияСвойств(СтрРазличие,СтрЗаказанное);
СтрРазличие.Количество = СтрПришедшее.Количество - СтрЗаказанное.Количество;
КонецЕсли; 
КонецЕсли; 
КонецЦикла;

@Wandalin · 31.01.2020, 18:42 **[ТС]**

{Документ.Прием_товаров.Форма.ФормаДокум ента.Форма(30)}: Метод объекта не обнаружен (Найти)
СтрПришедшее = Объект.Пришедшее.Найти(СтрЗаказанное.Наи менование, "Наименование"); // Проверяем пришел ли вообще такой товар

@polax · 31.01.2020, 20:54

Wandalin, Конфигурация и Платформа? Обычные формы или управляемые?

Добавлено через 17 минут
Кажется понял. Найти() работает на сервере

Добавлено через 22 минуты
Wandalin, Очень странно, но.... проверил, не работает. Переделай:

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Для каждого СтрЗаказанное Из Объект.Заказанное  Цикл
        НашОбъект = РеквизитФормыВЗначение("Объект" );
СтрПришедшее = НашОбъект.Пришедшее.Найти(СтрЗаказанное.Номенклатура, "Номенклатура"); // Проверяем пришел ли вообще такой товар
Если СтрПришедшее = Неопределено Тогда  // если не пришел, то добавляем в третью таб с минусовым количеством
СтрРазличие = Объект.Недост_Лишн.Добавить();
ЗаполнитьЗначенияСвойств(СтрРазличие,СтрЗаказанное);
СтрРазличие.Количество = 0 - СтрЗаказанное.Количество;
Продолжить;
Иначе
Если СтрЗаказанное.Количество = СтрПришедшее.Количество Тогда //если товар пришел и в нужном количестве - игнорируем строку
Продолжить;
Иначе    // если количество в первых двух ТЧ не совпадает, добавляем в третью с минусом, если товара не хватает и с плюсом если его больше
СтрРазличие = Объект.Недост_Лишн.Добавить();
ЗаполнитьЗначенияСвойств(СтрРазличие,СтрЗаказанное);
СтрРазличие.Количество = СтрПришедшее.Количество - СтрЗаказанное.Количество;
КонецЕсли; 
КонецЕсли; 
КонецЦикла;

Все это НаСервере и для управляемых форм

@polax · 31.01.2020, 21:00

Теперь работает, проверил Обработка с примером

@Wandalin · 01.02.2020, 12:58 **[ТС]**

Спасибо большое. Нажал вам все доступные мне плюсики. Чуть поковырялся и всё заработало.

+100 вам к карме

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 19.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .

@Wandalin 0 / 0 / 1 Регистрация: 11.11.2014 Сообщений: 34

	1C 8.x 1С Предприятие 31.01.2020, 11:45. Показов 1574. Ответов 8 Метки запрос, табличная часть (Все метки) Есть Документ "Прием_товаров" с формой, на которой 3 табличной части(Заказанное, Пришедшее, Недост_Лишнее). "Заказанное" и "Пришедшее" заполняется данными(Наименование, Количество). Необходимо найти разницу между табличными частями и записывать результат в таблицу "Недост_Лишнее". 0

@Yulunga Модератор 4137 / 944 / 265 Регистрация: 22.04.2013 Сообщений: 6,588 Записей в блоге: 1
	31.01.2020, 12:55
	определитесь, что такое "разница между табличными частями" и делайте себе цыкл "для каждого стр из тч1 цыкл...." 0

@Wandalin 0 / 0 / 1 Регистрация: 11.11.2014 Сообщений: 34
	31.01.2020, 15:18 [ТС]
	В каждой из таблиц есть товар с количеством этого товара. Нужно найти совпадающие товары первой таблицы со второй и найти разницу в их количестве, и записать результат в третью таблицу. 0

@Yulunga Модератор 4137 / 944 / 265 Регистрация: 22.04.2013 Сообщений: 6,588 Записей в блоге: 1
	31.01.2020, 16:49
	для каждого стр из тч1 цыкл для каждого ст из тч2 цикл если ст.номенклатура = ср.номенклатура тогда сложить что-то с чем-то в третьей тч уонецесли конеццыкла конеццыкла 0

@Wandalin 0 / 0 / 1 Регистрация: 11.11.2014 Сообщений: 34
	31.01.2020, 18:42 [ТС]
	{Документ.Прием_товаров.Форма.ФормаДокум ента.Форма(30)}: Метод объекта не обнаружен (Найти) СтрПришедшее = Объект.Пришедшее.Найти(СтрЗаказанное.Наи менование, "Наименование"); // Проверяем пришел ли вообще такой товар 0

@Wandalin 0 / 0 / 1 Регистрация: 11.11.2014 Сообщений: 34
	01.02.2020, 12:58 [ТС]
	Спасибо большое. Нажал вам все доступные мне плюсики. Чуть поковырялся и всё заработало. +100 вам к карме 0

1С Предприятие

Решение