Как очистить базу данных?

[Аватар]

Удалить все записи из таблицы в реальной базе из программы? 99% база спроектирована не правильно. 1% на то, что что-то не доганяю

[JUDAS]

хранимы процедур типа такого

то есть, если база данных сосоит из сотни таблиц и пары сотен свзяей между ними, Вы будете писать все варианты хранимых процедур и прописывать все связи?
п.с. Очень продвинутый подход к решению проблемы =)

1) Для одного можно ! и будеть работать быстрее чем цикл " while "

while not IsEmpty do Delete; - говно от JUDAS

Создал БД с двух таблиц mater и detail на PostgresSQL. Залил 1000000 (миллион) записей
Создал примочку c TPSQLQuery наполненным SELECT * FROM detail WHERE masterid=1
В TDBGridEh - 200 000 записей , остальные с masterid равными 2 3 4 и 5

Удалил своим способом - 8 секунд
Удалил способом уважаемого собеседника с Кавказа - 0.6 секунд, в результате чего были удалены все записи с таблицы detail, включая те, которые имели masterid = 2 3 4 и 5
Вопрос - Вы обучаете коллег убивать информацию или удалять то, что нужно удалить?
--------------

Удалить все записи из таблицы в реальной базе из программы?

Аватар
Вернёмся к основному вопросу автора темы - "Как удалить все данные с TAdoQuery"
для информации
В отличии от TAdoTable в TAdoQuery может быть выборка из одной таблицы, а может быть выборка с нескольких таблиц.
Товарищ собеседник из кавказа, советует человеку валить все записи таблицы одной командой "DELETE FOM таблица" не задумываяс о том что
1) в скрипте TAdoQuery.SQL.Text может быть две или три таблицы
2) скрипт может содержать (и как правило содержит) фрагментированный набор данных из таблицы (SELECT * FROM города WHERE область=Калужская)
3) скрипт может содержать вообще не удаляемые данные - выборку с вьюшки (VIEW - представление)

99% база спроектирована не правильно

Аватар, как правило неправильно проектируют не базу данных, а запросы в тех самых TAdoQuery =)

[Stilet]

Стилет, речь идёт об этои

Ну так надо было так и написать, мол, лишние строки кода не комильфо, чтоб ф0щизды вроде меня затыкались на первой букве.
Сам же и баламутишь народ.

у нас на роботе, некоторые специалисты пишут вообще вот так

А тут что не так? Не все провы умеют выполнять многокомандный запрос. Я тоже так пишу множественные запросы, только использую цикл, и что теперь?

Для многотабличные данных! если это требуетсия на стороне программу который для операторов-users напишу хранимы процедур типа такого

Для начала при таких условия. нужно выяснить, поддерживается ли каскадная операция в СУБД. Если да, то ХП не требуется. Если нет, а бывает и такое, или код пишется с расчетом совместимости со старьем - да. ХП почти на каждый случай очистки. Но как правильно заметил Аватар - "четападазрительна". В БД очищать все целесообразно только для временных таблиц. Автору однозначно стоит прояснить ситуацию подробнее, если он хочет по настоящему качественных ответов.

[JUDAS]

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

Я тоже так пишу множественные запросы, только использую цикл, и что теперь?

не поверю чтобы именно вот так

With ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Lines.Add('DELETE FROM Имя_таблиц' ');
  Execute;

  SQL.Clear;
  SQL.Lines.Add('commit');
  Execute;

  SQL.Clear;
  Open;
end;

а не так

With ADOQuery1 do
begin
  Close;
  SQL.text :='DELETE FROM Имя_таблиц';
  Execute;
  Connection.CommitTrans;
  Open;
end;

Stilet. Разве Вы не заметили быдлокод (выделил красным)

[Stilet]

У нас разные понятия быдлокода. И кстати: Connection.CommitTrans; использовать не рекомендуется. Я не буду обьяснять почему, об этом писано достаточно в книгах по работе с СУБД. Так что быдлокод я сейчас увидел у тебя.

[xxbesoxx]

JUDAS то есть, если база данных сосоит из сотни таблиц и пары сотен свзяей между ними, Вы будете писать все варианты хранимых процедур и прописывать все связи?

Обязательно напишу так with ADOQuery1 do begin Open; DisableControls; while not IsEmpty do Delete;

+дополнил
и ещё, рекомендую перед началом удаления записей вызывать методы DisableControls; а после окончания EnableControls

Да , да понятно

[JUDAS]

Stilet, тогда поясни всем присуствующим зачем вообще придумали Connection.CommitTrans; раз все пишут правильно?
Судя по твоим словам - быдлокодеры все разработчики компонент и самого Делфи, а те, кто пишет как я показал выше - боги программирования?

xxbesoxx
Я тебе выше показал как работает твой код, почему не коммментируешь?
Удалило миллион записей вместо 200 000 .

если не заметил повторю

Создал БД с двух таблиц mater и detail на PostgresSQL. Залил 1000000 (миллион) записей
Создал примочку c TPSQLQuery наполненным SELECT * FROM detail WHERE masterid=1
В TDBGridEh - 200 000 записей , остальные с masterid равными 2 3 4 и 5

Удалил своим способом - 8 секунд
Удалил способом уважаемого собеседника с Кавказа - 0.6 секунд, в результате чего были удалены все записи с таблицы detail, включая те, которые имели masterid = 2 3 4 и 5
Вопрос - Вы обучаете коллег убивать информацию или удалять то, что нужно удалить?

[xxbesoxx]

тогда поясни всем присуствующим зачем вообще придумали Connection.CommitTrans;

Древни подход как ваши

with ADOQuery1 do
begin
  Open;
  DisableControls; //++
  while not IsEmpty do
    Delete;
  EnableControls;//++
  Close;
end;

Не применям , такий код ....

xxbesoxx
Я тебе выше показал как работает твой код, почему не коммментируешь?
Удалило миллион записей вместо 200 000 .

Уже не читаю ваши пост . потому что все ваши совети будеть "Тормазить и Глучить" пожалуйста не отвлекайте .

не поверю чтобы именно вот так

Код:


With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Lines.Add('DELETE FROM Имя_таблиц' ');
Execute;

SQL.Clear;
SQL.Lines.Add('commit');
Execute;

SQL.Clear;
Open;
end;

а не так

А что мешаеть писать так ?

With ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('DELETE FROM Имя_таблиц commit);
  Execute;
  Open;
end;

Зачем SQL.Lines.Add А что SQL.Add - без Lines нельзя ? или вы Lines тоже рекомендуйте как EnableControls ?

[JUDAS]

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

Уже не читаю ваши пост . потому что все ваши совети будеть "Тормазить и Глучить" пожалуйста не отвлекайте .

Естественно что не читаешь. Понасоветовал человеку ахинеи и слился.
Одним словом, прежде чем советовать, проверяй результат
Удачи тебе

Зачем SQL.Lines.Add А что SQL.Add - без Lines нельзя ? или вы Lines тоже рекомендуйте как EnableControls ?

Рекомендую подучить матчасть и не писать на форуме ахинею.

SQL.Add('DELETE FROM Имя_таблиц commit);

Постарайся найти ошибку.

[xxbesoxx]

прежде чем советовать, проверяй результат

О_оо обязательно проверю
1) while not IsEmpty do Delete;
2) SQL.Lines.Add
3) DisableControls; EnableControls
молодец JUDAS