powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблема с Pack
24 сообщений из 24, страница 1 из 1
Проблема с Pack
    #33328507
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
4 таблицы:
use chet in 1 excl
use mes in 2 excl
use raschet in 3 excl
use raschet2 in 4 excl

потом селектом выбирается нужная, проводятся какие либо действия...
И вот мне надо удалить записи из таблицы raschet2

sele raschet2
thisform.grid1.recordsource=""
dele
pack
thisform.grid1.recordsource="raschet2"
thisform.refresh()

ну примерно так.
Иногда работает без проблем, а иногда пишет что ...file open in another work area.

А я select() делаю, смотрю - 4. Какая же "another"?!
Подскажите, в чем дело.
Спасибо.
...
Рейтинг: 0 / 0
Проблема с Pack
    #33329235
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Откажитесь от циферок и используйте осмысленные имена для ALIAS.

Можно попробовать команды Delete FROM, PACK IN (это для 9 версии VFP).

Кроме того - упаковка записей не очень удачный вариант, проще создавать временные курсоры для расчетов, потом их закрывать и создавать снова...

Кстати, какая у Вас форма - модальная?
...
Рейтинг: 0 / 0
Проблема с Pack
    #33332978
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Форма модадьная и как топ левел.
А что значит отказаться от циферок?
И вообще, почему так происходит? Судя по всему, открывается-то именно нужная рабочая область....
Спасибо
...
Рейтинг: 0 / 0
Проблема с Pack
    #33332984
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Укажите Вашу версию FoxPro
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333254
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JimyФорма модадьная и как топ левел.
As Top-Level форма по определению не может быть модальной. Хотя, к проблеме это отношение не имеет

JimyА что значит отказаться от циферок?
И вообще, почему так происходит? Судя по всему, открывается-то именно нужная рабочая область....
Это значит, что переключаться в нужную рабочую область надо не по ее номеру, а по алиасу таблицы, открытой в этой рабочей области.

Номер рабочей области ничего не говорит о том, какая именно таблица в ней открыта. Может вообще не быть никакой таблицы!

Код: plaintext
1.
2.
3.
4.
5.
6.
use chet in  0  excl
use mes in  0  excl
use raschet in  0  excl
use raschet2 in  0  excl

select raschet2

Чтобы посмотреть, что же именно открыто в текущей рабочей области используйте функции

?ALIAS() - алиас таблицы, открытой в текущей рабочей области
?DBF() - полный путь и имя файла DBF, открытого в текущей рабочей области
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333290
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
to Jimy:

Кстати, сочетание:

dele
pack

аналогично - всего одной команде:

ZAP
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333300
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Crispyto Jimy:

Кстати, сочетание:

dele
pack

аналогично - всего одной команде:

ZAP
научишь щаз Скоп у DELETE - тока одна запись а вот при удалении ALL - сограсен
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333314
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
кода в проге вижу пак или зап
ругаюсь грязно и кусаюсь от злости

а ровненько пописать никак???
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333326
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sorry!
прочитал:
>И вот мне надо удалить записи из таблицы

и решил - что все
само собой - такое - только если DELE ALL.
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333396
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Фокс восьмой.
Удалить нужно не все, а выбранную запись.
А я так и обращаюсь - select raschet2, без всяких цифр...
Все равно ругается...
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333409
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А не пробовала - закрыть-переоткрыть заново? Что получается?
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333426
Peisov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Удалить запись - дело святое. Вопрос в другом - зачем делать PACK сразу после DELETE ? Если - чтобы не отображаласьб запись - может лучше SET DELETED ON (или off - все время путаю...)?

А паковать (PACK) таблицы перед закрытием программы.
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333462
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А хотелось бы их (записи) сразу выбрасывать....
Проверка alias() - raschet2
Проверка dbf() - c:\gbook\raschet2
Тут спрашивали про модальные формы. Записи в raschet2 попадают именно из полей модальной формы. А вот удаляю я их из формы верхнего уровня. Может, где то здесь собака порылась? Хотя есть почти такая же таблица raschet, заполняется также но там нет проблем с удалением...
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333505
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Jimy? во уперся.

как ты думаешь , чего при паке происходит??
и логично ли кажный раз переписывать файл

пакани пожалуйста таблу размеров метров в 500 и в сети
и расшарь ее
как??

а если б комп живым был, он тебя поколотил бы или нет
за то, что ты его так пахать заставляешь??
тебе винта не жалко???
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333593
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да какая мне , блин , разница (имеется в виду размер таблицы)
У меня то вопрос конкретный, как я написала.
Почему так происходит и как победить?
Спасибо!!!
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333600
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
на свои же грабельки и наступаешь!
пиши ровненько и будет чудо!
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333605
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
оното и проблема , что пишешь меленько,
а если б поняла и увидела, чего творишь,
тадыб и писать научилась и не кочевряжилась
кады советы дают
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333614
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JimyДа какая мне , блин , разница (имеется в виду размер таблицы)
У меня то вопрос конкретный, как я написала.
Почему так происходит и как победить?
Спасибо!!!
Вроде бы проблем быть не должно, если ты ничего не пропустила. Вероятно, о чем-то все-таки умолчала.

Что указано в

Grid.RecordSourceType

Должно быть 1 - Alias
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333665
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Там на форме 2 грида. У обоих стоит 1-alias
Нет проблем с первым где raschet
Но при попытке удалить запись из второго - file open in another....
Где она эта эназе?! 4 там стоит, как и должно быть. (use raschet2 in 4 excl ) !!!
Вот блин грабли-то, Господи прости...

Alex11100 ! Спасибо за чудные, и главное, полезные советы
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333674
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JimyТам на форме 2 грида. У обоих стоит 1-alias
Нет проблем с первым где raschet
Но при попытке удалить запись из второго - file open in another....
Где она эта эназе?! 4 там стоит, как и должно быть. (use raschet2 in 4 excl ) !!!

Ну, ты так и не сказала, какая настройка RecordSourceType. Т.е. какой тип источника данных для Grid используется. Обычно подобные глюки наблюдаются, если установлен 0 - Table. Правильно надо устновить 1 - Alias
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333691
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Извиняюсь, не разглядел, что указано 1-Alias

Читаем сообщение об ошибке

HELP VFP3File is open in another work area (Error 1708)
[Файл открыт в другой рабочей области]

Команды, для которых требуется режим монопольного пользования таблицей (PACK, MODIFY STRUCTURE, ZAP и т.д.), нельзя выдавать для таблицы, открытой в нескольких рабочих областях командой USE AGAIN.

Т.е. таблица открыта дважды (возможно с другим алиасом). Если версия FoxPro 7 или выше, то перед командой PACK дай команду

=AUSED(laUsedTable)

И посмотри какие же таблицы и где открыты.

Возможно, таблица Raschet2 была открыта ранее в какой-то другой рабочей области.
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333754
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
код немного изменился - проблема осталась

use chet in 1 excl
use mes in 2 excl
use raschet in 3 excl
use raschet2 in 4 excl
use pmes in 5
use years in 6
*********
........
..........
=aused(laused)
?aused(laused)
pack

............
результат работы ?aused() - 7 !!!!!
Откуда в седьмой-то?
...
Рейтинг: 0 / 0
Проблема с Pack
    #33333779
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну, так посмотри содержимое массива laUsed !!!

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

Код: plaintext
1.
2.
3.
CLOSE TABLES ALL
USE ...
USE ...

или так

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
USE IN SELECT("chet")
USE chet IN  1  EXCL
USE IN SELECT("mes")
USE mes IN  2  EXCL
USE IN SELECT("raschet")
USE raschet IN  3  EXCL
USE IN SELECT("raschet2")
USE raschet2 IN  4  EXCL

Некоторые команды FoxPro автоматически открывают таблицы, если они не были до этого открыты. Например, Select-SQL сначала откроет все таблицы-источники и только потом выполнит запрос. По окончании выполнения запроса открытые таблицы так и остануться открытыми.
...
Рейтинг: 0 / 0
Проблема с Pack
    #33334325
Andrey Ts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А нет ли случаем контейнера базы и какого-нибудь триггера на DELETE, который заново открывает таблицу?
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблема с Pack
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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