» Access VBA

dneprcomp
Вот спасибо! Я уже начинаю немного въезжать). Еще вопрос: данные в основную таблицу подгружаются из текстовых файлов, где каждому договору уже присвоены регион и подрегион. Нужно ли создавать таблицы "Регион" и "Подрегион", если они уже есть у каждого договора? Сам думаю что нет, но все-таки?

aidomars
Что такое "Регион" и "Подрегион"?
Дайте пример информации как она выглядит в текстовом файле.

Вот так:
Регион Подрегион ФИО Номер дог. Дата дог. Сумма дог. Долг на сегодня

videolamer_V
Вот держи, сделал наверное как тебе нужно. (изменились оба запроса)
http://webfile.ru/5436852
Пароль 123

aidomars
Видя структуру данных, я бы добавил поле DogovorNo в таблицу "Договора" и его сделал бы связующим полем в "Результаты звонка". Т.е. заменил бы в "Результаты звонка" поле DogovorID на DogovorNo.
В теории, можно было бы сделать еще 2 таблицы - " Регион" и "Подрегион"

Правда это может несколько усложнить для вас как начинающего работу с данными.
В добавок, еще и ваше примечание
Цитата:

Текстовые файлы выгружаются ежедневно.
Все поля кроме "Долг на сегодня" никогда не меняются.
Если у клиента нет долга то его нет и в файле.

вызывает вопросы.
1.Для чего в сущности предназначена данная база
2.Какие действия будут осуществлятся с данными
3.Каков источник текстового файла и как/кто этот файл производят
4.Если " у клиента нет долга то его нет и в файле", то что должно произойти с рекордом
из предыдущего файла, когда у клиента долг был.
Т.е., так и будет висеть с долгом?
5.Производное от 4, 1 и 2
Собираетесь ли каждый раз полностью очищать таблицу "Результаты звонка" перед
добавлением данных из файла.

Было бы не лишним услышать ваше видение процесса работы с данными

Базу проектируют под задачу, под необходимось. Пока задача не определена, невозможно дальнейшее обсуждение структуры базы

PrWork1
Спасибо! А можно исправить в "Итоговом запросе по чекам" колонка с "Погашено1" переименовать в "погашено" у меня не получилось, ошибка цикличесской ссылки. И в запросе списание в непогашеном чеке колонка "погашено" можно вывести 0,00 или она будет пуста? И ещё я никак не мог найти в Аксесе формат доллара...

dneprcomp
А зачем менять DogovorID на DogovorNo, или в чем разница между ними?
1. База нужна для занесения результатов обзвона должников.
2. Результат звонка записывается в таблицу "Результаты звонка" с указанием фио сотрудника, даты звонка и даты обещания оплаты, которая нужна для повторного звонка, если задолженность не была погашена.
3. Источник текстового файла - филиалы. Выгружаем ежедневно сами через телнет. В настоящий момент ведем базу в excel 2003. Есть макрос, преобразует текстовые файлы в отдельную книгу, а оттуда уже в рабочую. В ней и пишем результаты звонков. Уже за 10000 строк перевалило), еще чутка и писать некуда будет.
4. Если строка не нашлась в файле, считается что клиент погасил долг, добавляется дата гашения (в таблице строка остается), и суммы обнуляются. Забыл написать, что есть еще дата начала долга.
5. Нет, таблица не очищается. В том то и дело, что нужны все данные, что были введены. Для отчетов и статистики.
Краткая суть:
а) Сотрудник открывает файл, т.е. основную таблицу (Регионы, ФИО, номер, дата начала долга, дата обещания, сотрудник).
б) Выбирает строку, щелкает на ней, появляется форма для записи с основными данными (ФИО, Номер, долг и т.д.). Вводит текст и сохраняет запись.
в) При желании может посмотреть предыдущие записи по этому клиенту.
Ну и много еще чего. Повторюсь, это все сделано мной в excel + vba, но думаю правильней будет в access перевести, да и самому интересно.

aidomars
1.Просто более наглядно в SELECT и в таблице выглядит.
Не придется постояно подставлять. Это если номер договора действительно является
уникальным. Если да, то номер договора точно так же может служить полем связи.

3.Судя по описанию, количество регионов и подрегионов величина более-менее
постоянная. Надеюсь, что и названия тоже постоянно используют стандартные.
И не печатают вручную, а выбирают из списка
Если все так, то тогда можно в дополнение создать эти 2 таблицы.
Я так понимаю, что один и тот же подрегион не может принадлежать двум регионам.
Принимая такое условие

"Регион"
RegionID(autoincriment), название, + по потребности

"Подрегион"
PodRegID(autoincriment), название, RegionID, + по потребности

Связь "Регион" и "Подрегион" через поле RegionID.
Связь "Подрегион" и "Результаты звонка" через поле PodRegID

Вариант связи:
Один рекорд в "Подрегион", многие в "Результаты звонка"
Один рекорд в "Регионы", многие в "Подрегион"

RegionID добавлять в "Результаты звонка" не надо. Имя региона можно найти через RegionID в "Подрегион"

dneprcomp
Спасибо за подсказки! Сегодня я научился из формы другую форму вызывать, с подставлением данных из выделенной строки первой. Завтра буду учиться из второй напечатанный текст заполнять в таблицу звонков. Осталось еще со сравнением таблиц поработать и можно будет менять Excel на Access.
p.s. По поводу регионов: их не выбирают и не печатают, они уже есть в строке, текстовый файл это как бы отчет полный, там все есть, только суммы задолженностей меняются.

videolamer_V
Поставь в запросе Итоговый..
в выражении IIf(IsNull([Списание].[погашено]);0;[Списание].[погашено])
и исправь название на Погашено

aidomars

Цитата:

По поводу регионов: их не выбирают и не печатают, они уже есть в строке

Но в эту строку они как-то попадают? Да?
Вот если источником для этой строки является печатание юзера на клавиатуре, то возможы опечатки и найти что-либо в базе будет проблематично. А если юзер только выбирает из списка, тогда все 100% совпадет с таблицами "Регион" и "Подрегион"

PrWork1
Спасибо добрый человек!!!!! Получилось.

videolamer_V
Я рад, если что пиши.

dneprcomp

Цитата:

Но в эту строку они как-то попадают? Да?
Вот если источником для этой строки является печатание юзера на клавиатуре, то возможы опечатки и найти что-либо в базе будет проблематично. А если юзер только выбирает из списка, тогда все 100% совпадет с таблицами "Регион" и "Подрегион"

Та нее, юзерам по барабану регионы, их задача выбрать строку, позвонить и занести результат разговора в базу. Регионы нужны для статистики, типа сколько за месяц платежей по конкретному региону, сколько звонков было таким то юзером и т.п.
Все данные уже есть в исходниках, моя задача обновлять таблицу (сравнивать с новыми исходниками, менять суммы долга) и заносить мероприятия (звонки) в таблицу "Результаты обзвона".

aidomars
Ну, смотри Тебе виднее
Просто кгда будешь делать связь "Регион" и "Подрегион" или
"Результаты звонка" и "Подрегион" могут быть проблемы если значения полей в "Подрегион" не совпадут со значением из файла.
Но если не создавать таблицы "Регион" и "Подрегион", тогда об этом можно не задумываться.

Подскажите можно ли как то связать базу Аксесс через интернет, имеется база в которой работаю, например в городе Н, нужно чтобы человек мог смотреть отчеты по базе и так же добавлять или изменять сохранять но в городе Б?

videolamer_V
А просто по RDP работать не подойдет?

videolamer_V
ms access internet

dneprcomp
Спасибо, до этого гуглил без результата, вернее результат был но не то что бы хотелось.

PrWork1
Это единственный вариант.

videolamer_V
Но может проще сделать такую программку на Delphi, например?
Базу можно использовать и accessa.

Сколько будет стоить? И как это будет работать?

videolamer_V
Я думал сам напишешь , но можно обсудить в ПМ

Существует БД на MS Access в формате Access 2000. Работаем в MS Access 2003.

База используется много лет. С недавних пор при добавлении новой записи или при выполнении запроса, который в новую запись копирует данные из записи предыдущего периода стали происходить странные вещи.

При попытке сохранении записи (перехода на другую запись) или удалении записи выдается сообщение "Ключ поиска не найден ни в одной записи".

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

Удалить запись не получается.

После выполнени "Сжать и восстановить БД" запись можно удалить обычным способом.

В базе около 5000 записей. Работают одновременно до 6 человек.

В чем может быть причина ошибки? Как определить из-за чего это происходит?

Спасибо!

PrWork1
Написал в ПМ

dmention
Опиши подробно по шагам, что делает программа при этой операции. Так не разобраться. Записей очень мало соотв-но проблемы в программе.

dmention
Если эти ошибка вылезают в чистом акссесе (не в пользовательских формах), можно попробовать вручную перенести всю структуру и данные в новую чистую базу
Если ошибка вылезают в форме(формах) то возможно это прораммные ошибки, можно исправить в исходном коде

Есть форма содержащая поле со списком (сотрудники) и список в виде таблицы, куда подтягиваются данные из запроса.
Надо чтобы при выборе в поле сотрудника, в таблице оставались только те строки, которые содержат в столбце(8) этого сотрудника.
Пробовал в событии изменения поля прописать Me.Filter = "Список5.Column(8) = " & ФильтрОтв, не получается.
Подскажите как сделать.

aidomars

Цитата:

Me.Filter = "Список5.Column(8) = " & ФильтрОтв, не получается.

Фильтр действует на запрос который подтягивает данные. В него нужно записать дополнительное условие WHERE предложения, например
СОТРУДНИК = "ИВАНОВ"

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

aidomars
Если таблица с данными сделана как подчиненная форма(ПФ) можно по событию изменения списка модифицировать источник данных ПФ, либо через поле на форме связать основную и ПФ