Группа: Пользователи
Сообщений: 42
Спасибо сказали: 0 раз
Рейтинг: 0
Подскажите пожалуйста как лутше организовать объединение двух списков относительно дати????? Суть токова "Список_1" имеет поля "ДатаСп_1" и "Значение_1", а "Список_2" свои поля "ДатаСп_2" и "Значение_2" в результате объединения должен выйти "СписокРезультат" с полями "Дата", "Значение_1","Значение_2" при этом всем список надо упорядочить по дате возростания тоесть для ниже приведенных случаях должно получится:
Группа: Пользователи
Сообщений: 42
Спасибо сказали: 0 раз
Рейтинг: 0
Цитата(sava1 @ 29.03.17, 11:06)
Списки в ТЗ, потом (свернуть) отсортировать.
сори но я вас не понял можете черкануть пару строчек кода чтобы было понятней
leo10k10 @ Сегодня, 11:12
,
Я так понимаю нада зделать цикл по строкам Списка_1, потом вложенный цикл по Списку_2 с заполнением колонок значения, а потом какимто методом упорядочить все это по дате но токо начинаю писать получаэтся бред .
Для Н = 1 По НомСп_2 Цикл Список_2.ПолучитьСтрокуПоНомеру(Н); Сообщить(Шаблон("[Список_2.ДатаСп_2] Х [Список_2.Значение_2]")); КонецЦикла; //-------------ЧТО ЗДЕСЬ НЕ ТАК --------------- СписокРезультат = СоздатьОбъект("ТаблицаЗначений"); СписокРезультат.НоваяКолонка("Дата", "Дата"); СписокРезультат.НоваяКолонка ("Значение_1", "Строка"); СписокРезультат.НоваяКолонка ("Значение_2", "Строка"); СписокРезультат.Заполнить(Список_1, 1, 2, "Дата, Значение_1"); СписокРезультат.Заполнить(Список_2, 3, 4, "Дата, Значение_2");
Для Н = 1 По 4 Цикл СписокРезультат.ПолучитьСтрокуПоНомеру(Н); Сообщить(Шаблон("[СписокРезультат.Дата] Х [СписокРезультат.Значение_1] Х [СписокРезультат.Значение_2]")); КонецЦикла;
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 1 раз
Рейтинг: 0
leo10k10 @ Сегодня, 13:18
,
Список_1.ВыбратьСтроки(); Пока Список_1.ПолучитьСтроку()=1 Цикл СписокРезультат.НоваяСтрока(); СписокРезультат.Дата=Список_1.ДатаСп_1; СписокРезультат.Значение_1=Список_1.Значение_1; СписокРезультат.Значение_2=""; КонецЦикла;
Список_2.ВыбратьСтроки(); Пока Список_2.ПолучитьСтроку()=1 Цикл СписокРезультат.НоваяСтрока(); СписокРезультат.Дата=Список_2.ДатаСп_2; СписокРезультат.Значение_2=Список_2.Значение_2; СписокРезультат.Значение_1=""; КонецЦикла;
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!