ReSQL.ru
     
powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Добавление записей в таблицы через главную и подчиненную форму
8 сообщений из 8, страница 1 из 1
Добавление записей в таблицы через главную и подчиненную форму
    #39085443
On Point
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
On Point
Гость
Доброго времени суток, уважаемые!

Возникла необходимость учета приходных накладных в базе.
Что сделано:
Таблицы:
таб. Товары
Id_TovarId_NakId_KatId_SprQtyPrice_TovКодТовара(счетчик) КодНакладной(числовой)КодКатегории(числовой)КодСправочника(числовой)Кол-во(числовой) Цена(числовой)
таб. Накладные
Id_NakladnayaDate_NakKontragentOsnovaniePrice_NakКодНакладной(счетчик) ДатаНакладной(дата)КодКонтрагента(числовой)Основание накладной(текст) ЦенаНакладной(числовой)
таб. КатегорииТовара
Id_KategoryKategory_NameКодКатегори(счетчик) НазваниеКатегории
таб. Контрагнеты
Id_KontragentName_KontAdressPhoneКодКонтрагента(счетчик)ФИО(текст)Адрес(текст)Телефон(текст)
и таб. Справочник
Id_SprId_KategoryNomenklaturaКодСправочника(счетчик)КодКатегории(числовой)Номенклатура(текст)

Далее создал форму "Накладные", где источником данных служит таблица Накладные. Поле "Контрагент" было преобразовано в поле со списком. так же в форму добавил под.форму с источником данных - "таб. Товары" в ней, я так же преобразовал поля : Категория и Номенклатура в поля со списком
Код: plsql
1.
2.
SELECT DISTINCT Spr_Tovary.Id_Spr, Spr_Tovary.Nomenklatura
FROM Spr_Tovary;


и
Код: plsql
1.
2.
3.
SELECT Kategory.Id_Kategory, Kategory.Kategory_Name
FROM Kategory
ORDER BY Kategory.[Kategory_Name];



А теперь собственно с чем мне пришлось столкнуться. Когда я начинаю заполнять новые строки в дочерней форме, 1 - выбираю категорию товара, 2-выбираю номенклатуру согласно категории товара, у меня вылазит сообщение что мол "Введенный текст не соответствует ни одному из элементов списка". Ранее "вешал" запрос на источник строк списка "Номенклатура"
Код: plsql
1.
2.
3.
SELECT DISTINCT Spr_Tovary.Id_Spr, Spr_Tovary.Nomenklatura, Spr_Tovary.Id_Kategory
FROM Spr_Tovary
WHERE (((Spr_Tovary.Id_Kategory)=[Формы]![frm_Nakladnaya]![sf_Tovary].[Form]![Id_Kat]));


но и там у меня не получалось заполнить записи в таблице(

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

Прошу знатоков разобраться в моем случае, не могу определить косяк. Тестовую версию базы прилагаю.
...
Рейтинг: 0 / 0
24.10.2015, 01:09
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085490
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
почитайте это и сделайте свою БД взяв за образец, что написано в ссылке
...
Рейтинг: 0 / 0
24.10.2015, 11:05
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085491
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
вдогонку-а как закрывать формы?
...
Рейтинг: 0 / 0
24.10.2015, 11:06
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085523
On Point
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
On Point
Гость
sdkuвдогонку-а как закрывать формы?

Формы сырые, еще не сделал обработку ошибок... Закрыть можно через правую кнопку.

Вот моя схема данных, разве она сильно отличается от предложенных?
...
Рейтинг: 0 / 0
24.10.2015, 12:33
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085527
On Point
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
On Point
Гость
Вопрос, как правильно организовать выбор категории и номенклатуры в подчиненной форме? Так же забыл указать, что главная и подчиненная форма связаны между собой по Id_Nak(по номеру накладной).
...
Рейтинг: 0 / 0
24.10.2015, 12:38
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085668
On Point
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
On Point
Гость
Походу дела никто не понял сути вопроса...

Решение нашлось,
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
Private Sub Id_Spr_NotInList(NewData As String, Response As Integer)
    'Îáðàáîòêà ïîçèöèé îòñóòñâóþùèõ â ñïèñêå
    Dim bytResponse As Byte
    Dim cnn As ADODB.Connection
    Dim rst As ADODB.Recordset
    On Error GoTo HandleErr
    bytResponse = MsgBox("Âû õîòèòå äîáàâèòü " _
    & NewData & "â ñïèñîê?", vbYesNo)
    
    Set cnn = CurrentProject.Connection
    Set rst = New ADODB.Recordset
        With rst
            .Open "Spr_Tovary", cnn, adOpenDynamic, adLockOptimistic
            If bytResponse = vbYes Then
            .AddNew "Nomenklatura", NewData
            .Fields("Id_kategory") = Me.Id_Kat
            .Update
            Response = acDataErrAdded
            ElseIf bytResponse = vbNo Then
            Response = acDataErrContinue
            Id_Spr.Undo
            GoTo ExitHere
            End If
        End With
        
ExitHere:
        rst.Close
        Set rst = Nothing
        cnn.Close
        Set cnn = Nothing
        Exit Sub
HandleErr:
        MsgBox "" & Err.Number & ": " & _
        Err.Description, vbOKOnly
        Resume ExitHere
        
End Sub



Пожелание пользователя базы было таковым, что при заполнении множественных записей в таблице, в поле "Номенклатура" искало уже существующие(ранее введенные) наименования товара. Вот к сожалению, с выборкой по категории у меня ничего не вышло, теперь ищет по всем записям справочника товары. Капаю дальше...
...
Рейтинг: 0 / 0
24.10.2015, 20:56
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085679
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
On Point,
Добавьте связь: kategory.ID_kategory>>>tovary.ID_kat
(после обновления tovary.ID_kat менять источник поляСоСписком tovary.ID_spr типа:"SELECT ID_spr,nomenklatura FROM Spr_tovary WHERE ID_kategory=" & me.formTovary
...
Рейтинг: 0 / 0
24.10.2015, 21:48
| Ответить | Цитировать | Написать  
Добавление записей в таблицы через главную и подчиненную форму
    #39085684
On Point
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
On Point
Гость
sdku,
Спасибо, то что нужно!
...
Рейтинг: 0 / 0
24.10.2015, 22:12
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Добавление записей в таблицы через главную и подчиненную форму
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39085491&tid=1614381]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 47ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 58ms
get tp. blocked users:
 2ms
others: 332ms
total:  483ms
созд. / загр.: 483ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]