Обновление зависимых списков в табличной форме

@Michael_B · Регистрация: 23.10.2015

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

Здравствуйте!

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

@ltv_1953 · 02.05.2024, 00:18

Вариант для ввода новой записи в табличной форме во вложении (изучайте код).

Вложение

@Michael_B · 02.05.2024, 11:46 **[ТС]**

Сообщение от ltv_1953

Вариант для ввода новой записи в табличной форме во вложении (изучайте код).

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

@ltv_1953 · 02.05.2024, 12:33

Сообщение от ltv_1953

Вариант для ввода новой записи в табличной форме во вложении (изучайте код).

Сообщение от Michael_B

Если я в верхней строке в поле первого столбца меняю значение

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

@ltv_1953 · 02.05.2024, 12:40

Если нужен не только для новой, то ... .

@Michael_B · 02.05.2024, 17:20 **[ТС]**

Сообщение от ltv_1953

Если нужен не только для новой, то ...

Спасибо!
Забавное решение...
Есть идеи по поводу его модернизации, если получится, обязательно сюда напишу.

@alvk · 03.05.2024, 04:23

Сообщение от Michael_B

Увы, вариант не удачный.

Неудачно в табличной форме править данные напрямую, а не в отдельной одиночной для редактирования.
Которую удобно повесить на событие двойного щелчка по полю. А ещё такие поля подсветить цветом.

@АЕ · 03.05.2024, 09:19

Сообщение от Michael_B

но обновление происходит не в отдельно взятой строке, а во всём столбце.

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

@Michael_B · 03.05.2024, 17:02 **[ТС]**

Сообщение от alvk

Неудачно в табличной форме править данные напрямую

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

Добавлено через 1 минуту

Сообщение от АЕ

Обычно наоборот, просят как обновить, чтобы новую позицию было видно во всех списках.

А Вы, пожалуйста, посмотрите пример, который выложен Ltv_1953, и станет очевидно, что во всех строках обновление не нужно.

Добавлено через 4 минуты

Сообщение от ltv_1953

Если нужен не только для новой, то ...

Ещё раз, спасибо за интересное решение.
Работает не абсолютно так, как хотелось бы, но намного ближе к этому, чем любые мои попытки приблизиться.

Как и обещал, выкладываю небольшое изменение, которое, на мой взгляд, сделало Ваше решение чуть интересней.
Изменил запрос "Товары_Фирмы_Список1_" таким образом:

SQL

SELECT DISTINCT IIf([Выбран]=0,[Товар_Код],"") AS Выражение1, Товары_Фирмы_Список1.Выбран, IIf([Выбран]=0,[Товар_Обозначение],"") AS Выражение2
FROM Товары_Фирмы_Список1
WHERE (((Товары_Фирмы_Список1.Выбран)=0))
ORDER BY Товары_Фирмы_Список1.Выбран, IIf([Выбран]=0,[Товар_Обозначение],"");

@АЕ · 03.05.2024, 20:11

Michael_B, много эмоций, свою базу засекретили, цель не объяснена, претензий много, совершенствуете примеры помогающих... я вас не трону и меня не поминайте в суе.

@alvk · 04.05.2024, 15:07

Сообщение от Michael_B

Пытаюсь сделать так, как мне кажется удобней

Мне кажется удобней штаны через голову надевать.

Сообщение от Michael_B

Понятия "удачно" или "неудачно", в такой ситуации, не самые подходящие.

Как раз в случае удачного одевания я не сломаю шею. Так что подходящие.

@Michael_B · 04.05.2024, 16:27 **[ТС]**

Сообщение от ltv_1953

Если нужен не только для новой, то ...

Подскажите, пожалуйста, не могу разобраться, в чём смысл запроса на объединение?
Убираю его, подставляю обычный на выборку, всё работает, как и работало... Что я упускаю из виду?

@Capi · 04.05.2024, 16:45

Сообщение от Michael_B

выкладываю небольшое изменение, которое, на мой взгляд, сделало Ваше решение чуть интересней

SQL

SELECT DISTINCT IIf([Выбран]=0,[Товар_Код],"") AS Выражение1, Товары_Фирмы_Список1.Выбран, IIf([Выбран]=0,[Товар_Обозначение],"") AS Выражение2
FROM Товары_Фирмы_Список1
WHERE (((Товары_Фирмы_Список1.Выбран)=0))
ORDER BY Товары_Фирмы_Список1.Выбран, IIf([Выбран]=0,[Товар_Обозначение],"");

???

Зачем здесь вот это всё?

IIf([Выбран]=0,...., IIf([Выбран]=0,....ORDER BY Товары_Фирмы_Список1.Выбран, IIf([Выбран]=0,...

Ведь условие WHERE (((Товары_Фирмы_Список1.Выбран)=0)) уже отбирает только "невыбранные" записи.

@Capi · 04.05.2024, 17:17

Сообщение от ltv_1953

Если нужен не только для новой, то ...

При смене Фирмы в уже заполненной записи в поле Товар остается прежнее значение, относящееся к прежнему значению поля Фирма.
Если Товар не трогать, он таким и останется - неверно привязанным к Фирме.

@SDKU · 04.05.2024, 19:41

Такой вариант. Предусмотреть обновление поля город перед обновлением улицы (для сохраненных записей. Если этого не сделать в поле улица может оказаться та,которой в этом городе нет-как это обеспечить-решение разработчика.):

@SDKU · 04.05.2024, 19:53

Capi об этом и говорила

@ltv_1953 · 04.05.2024, 20:18

Сообщение от Capi

При смене Фирмы в уже заполненной записи в поле Товар остается прежнее значение, относящееся к прежнему значению поля Фирма.
Если Товар не трогать, он таким и останется - неверно привязанным к Фирме.

Вроде бы нет

@Capi · 04.05.2024, 20:29

Сообщение от ltv_1953

Вроде бы нет

Это Вы стали как бы менять товар, выбирая то же самое значение.
Да, так и будет, выдаст такое сообщение.

Но после сброса этого MsgBox (хоть Escape'ом, хоть кнопкой OK) значение так и останется неизменным, то есть, не увязанным с Фирмой.
И можно просто уйти на другую запись без последствий.

А если после смены Фирмы вообще просто перейти на другую запись, то и сообщения этого не появится.

Сообщение от Capi

Если Товар не трогать, он таким и останется - неверно привязанным к Фирме.

@ltv_1953 · 04.05.2024, 20:45

А, понятно. Выложенная версия немного устарела. Попробуйте добавить в нее

Visual Basic

Private Sub Form_BeforeUpdate(Cancel As Integer)
    If Me.Товар_Код.Column(1) <> 0 Then
        Call MsgBox("Выбранный товар не является товаром выбранной фирмы." _
               & vbCr & "Ввод отменен." _
            , vbOKOnly + vbExclamation, Me.Caption)
        Cancel = True
        Me.Undo
    End If
End Sub

@Capi · 04.05.2024, 20:56

Хорошо, попробую.
Но попозже.
Я сейчас не у компьютера.

@Capi Модератор 6027 / 2852 / 695 Регистрация: 12.06.2016 Сообщений: 7,694
	04.05.2024, 17:17	14
	Сообщение от ltv_1953 Если нужен не только для новой, то ... При смене Фирмы в уже заполненной записи в поле Товар остается прежнее значение, относящееся к прежнему значению поля Фирма. Если Товар не трогать, он таким и останется - неверно привязанным к Фирме. 0

@Michael_B 1 / 1 / 0 Регистрация: 23.10.2015 Сообщений: 86
		1
	Обновление зависимых списков в табличной форме 01.05.2024, 22:54. Показов 1205. Ответов 25 Метки нет (Все метки) Здравствуйте! Смотрел тему Как правильно обновить данные поля со списком при переходе по записям?. Похожая задача, надеюсь кто-то сможет помочь. В табличной форме есть два поля со списками. После изменения одного поля, по событию "после обновления", обновляется список данных другого поля, построенного на основе запроса с фильтром по первому полю. И всё бы хорошо, но обновление происходит не в отдельно взятой строке, а во всём столбце. Подскажите, пожалуйста, как обновить поле только в одной строке? 0

@Michael_B 1 / 1 / 0 Регистрация: 23.10.2015 Сообщений: 86
	02.05.2024, 11:46 [ТС]	3
	Сообщение от ltv_1953 Вариант для ввода новой записи в табличной форме во вложении (изучайте код). Увы, вариант не удачный. Если я в верхней строке в поле первого столбца меняю значение, списки значений поля второго столбца обновляются во всех строках, а не в одной, только в той, где менялось значение. 0

@ltv_1953 17501 / 7260 / 1654 Регистрация: 21.06.2012 Сообщений: 13,899
	02.05.2024, 12:33	4
	Сообщение от ltv_1953 Вариант для ввода новой записи в табличной форме во вложении (изучайте код). Сообщение от Michael_B Если я в верхней строке в поле первого столбца меняю значение Причем здесь первая строка - написано же - для ввода новой записи. 0

@Michael_B 1 / 1 / 0 Регистрация: 23.10.2015 Сообщений: 86
	02.05.2024, 17:20 [ТС]	6
	Сообщение от ltv_1953 Если нужен не только для новой, то ... Спасибо! Забавное решение... Есть идеи по поводу его модернизации, если получится, обязательно сюда напишу. 0

@alvk 7408 / 4544 / 295 Регистрация: 12.08.2011 Сообщений: 14,072
	03.05.2024, 04:23	7
	Сообщение от Michael_B Увы, вариант не удачный. Неудачно в табличной форме править данные напрямую, а не в отдельной одиночной для редактирования. Которую удобно повесить на событие двойного щелчка по полю. А ещё такие поля подсветить цветом. 0

@АЕ ᴁ® 3669 / 2022 / 429 Регистрация: 13.12.2016 Сообщений: 6,965 Записей в блоге: 5
	03.05.2024, 09:19	8
	Сообщение от Michael_B но обновление происходит не в отдельно взятой строке, а во всём столбце. очень странная хотелка. Добавить в список позицию, но чтобы она не применялась. Обычно наоборот, просят как обновить, чтобы новую позицию было видно во всех списках. 0

@АЕ ᴁ® 3669 / 2022 / 429 Регистрация: 13.12.2016 Сообщений: 6,965 Записей в блоге: 5
	03.05.2024, 20:11	10
	Michael_B, много эмоций, свою базу засекретили, цель не объяснена, претензий много, совершенствуете примеры помогающих... я вас не трону и меня не поминайте в суе. 0

@alvk 7408 / 4544 / 295 Регистрация: 12.08.2011 Сообщений: 14,072
	04.05.2024, 15:07	11
	Сообщение от Michael_B Пытаюсь сделать так, как мне кажется удобней Мне кажется удобней штаны через голову надевать. Сообщение от Michael_B Понятия "удачно" или "неудачно", в такой ситуации, не самые подходящие. Как раз в случае удачного одевания я не сломаю шею. Так что подходящие. 0

@Michael_B 1 / 1 / 0 Регистрация: 23.10.2015 Сообщений: 86
	04.05.2024, 16:27 [ТС]	12
	Сообщение от ltv_1953 Если нужен не только для новой, то ... Подскажите, пожалуйста, не могу разобраться, в чём смысл запроса на объединение? Убираю его, подставляю обычный на выборку, всё работает, как и работало... Что я упускаю из виду? 0

@SDKU 436 / 388 / 50 Регистрация: 06.03.2022 Сообщений: 2,055
	04.05.2024, 19:53	16
	Capi об этом и говорила 0

@ltv_1953 17501 / 7260 / 1654 Регистрация: 21.06.2012 Сообщений: 13,899
	04.05.2024, 20:18	17
	Сообщение от Capi При смене Фирмы в уже заполненной записи в поле Товар остается прежнее значение, относящееся к прежнему значению поля Фирма. Если Товар не трогать, он таким и останется - неверно привязанным к Фирме. Вроде бы нет Миниатюры 0

@Capi Модератор 6027 / 2852 / 695 Регистрация: 12.06.2016 Сообщений: 7,694
	04.05.2024, 20:29	18
	Сообщение от ltv_1953 Вроде бы нет Это Вы стали как бы менять товар, выбирая то же самое значение. Да, так и будет, выдаст такое сообщение. Но после сброса этого MsgBox (хоть Escape'ом, хоть кнопкой OK) значение так и останется неизменным, то есть, не увязанным с Фирмой. И можно просто уйти на другую запись без последствий. А если после смены Фирмы вообще просто перейти на другую запись, то и сообщения этого не появится. Сообщение от Capi Если Товар не трогать, он таким и останется - неверно привязанным к Фирме. 0

@Capi Модератор 6027 / 2852 / 695 Регистрация: 12.06.2016 Сообщений: 7,694
	04.05.2024, 20:56	20
	Хорошо, попробую. Но попозже. Я сейчас не у компьютера. 0

Обновление зависимых списков в табличной форме

Решение