FoxClub Forums > Visual Foxpro, Foxpro for DOS > Правильно ли я перегоняю файл в другой файл построчно? ::

• Войти

Страницы: 1 2 3 4

Re: Правильно ли я перегоняю файл в другой файл построчно?
Sawradym Сообщений: 2244 Откуда: Винница Дата регистрации: 15.05.2007	Sawradym 12.01.19 09:03:41 Глядя на Ваш код, очень интересно посмотреть как Вы оформили изменяющееся условие, потому как 50 секунд для 40тыс строк это ооооооооочень долго. Кстати, Вы бы все-таки озвучили какую версию фокса Вы используете. А пока позволю себе немного подправить Ваш вариант. SELECT 0 USE src COPY STRUCTURE TO dst USE dst IN 0 SELECT src SCAN ? RECNO() &&считаем очередную строку SCATTER NAME temp_obj &&создадим в файле dst пустую запись &&и туда перегоним содержание INSERT INTO dst FROM NAME temp_obj ENDSCAN Use in src Use in dst Можно попробовать зайти с "черного хода", скопировать все, потом удалить лишнее. SELECT 0 Use scr Copy to dst USE dst SCAN IF NOT _ваше_условие_ DELETE ENDIF ENDSCAN Use in dst Исправлено 2 раз(а). Последнее : Sawradym, 12.01.19 11:57

Re: Правильно ли я перегоняю файл в другой файл построчно?

Sawradym

Сообщений: 2244
Откуда: Винница
Дата регистрации: 15.05.2007

Sawradym

12.01.19 09:03:41

Глядя на Ваш код, очень интересно посмотреть как Вы оформили изменяющееся условие, потому как 50 секунд для 40тыс строк это ооооооооочень долго.
Кстати, Вы бы все-таки озвучили какую версию фокса Вы используете.
А пока позволю себе немного подправить Ваш вариант.


SELECT 0
USE src   
        
COPY STRUCTURE TO dst    

USE dst IN 0    

SELECT src
SCAN
       ? RECNO()   

       &&считаем очередную строку
       SCATTER NAME temp_obj

       &&создадим в файле dst пустую запись     
       &&и туда перегоним содержание
    INSERT INTO dst FROM NAME temp_obj
ENDSCAN    
Use in src
Use in dst

Можно попробовать зайти с "черного хода", скопировать все, потом удалить лишнее.


SELECT 0
Use scr
Copy to dst

USE dst
SCAN
    IF NOT _ваше_условие_
        DELETE
    ENDIF
ENDSCAN
Use in dst

Исправлено 2 раз(а). Последнее : Sawradym, 12.01.19 11:57

Re: Правильно ли я перегоняю файл в другой файл построчно?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 12.01.19 09:17:28 Именного так. Только в предложении scatter убрать TO Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка. Но мы же копируемм в объект. Ну и комменты подправить массив-обьект. Исправлено 1 раз(а). Последнее : Taran, 12.01.19 09:44

Re: Правильно ли я перегоняю файл в другой файл построчно?

Taran

Сообщений: 13625
Откуда: Красноярск
Дата регистрации: 16.01.2008

Taran

12.01.19 09:17:28

Именного так.
Только в предложении scatter убрать TO
Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка.
Но мы же копируемм в объект.
Ну и комменты подправить массив-обьект.

Исправлено 1 раз(а). Последнее : Taran, 12.01.19 09:44

Re: Правильно ли я перегоняю файл в другой файл построчно?
Crispy Сообщений: 18571 Дата регистрации: 16.05.2005	Crispy 12.01.19 10:45:49 Мда. Это все или шутка чья-то, ли уж не знаю что. 40000 записей даже на 286 процессоре в FPD обрабатывались за доли секунды. ------------------ В действительности все иначе, чем на самом деле. (Антуан де Сент-Экзюпери)

Re: Правильно ли я перегоняю файл в другой файл построчно?
Sawradym Сообщений: 2244 Откуда: Винница Дата регистрации: 15.05.2007	Sawradym 12.01.19 11:56:57 Taran Именного так. Только в предложении scatter убрать TO Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка. Но мы же копируемм в объект. Ну и комменты подправить массив-обьект. Чукча не читатель... Поправил. ------------------

Re: Правильно ли я перегоняю файл в другой файл построчно?

Sawradym

Сообщений: 2244
Откуда: Винница
Дата регистрации: 15.05.2007

Sawradym

12.01.19 11:56:57

Taran
Именного так.
Только в предложении scatter убрать TO
Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка.
Но мы же копируемм в объект.
Ну и комменты подправить массив-обьект.

Чукча не читатель...

Поправил.

------------------

Re: Правильно ли я перегоняю файл в другой файл построчно?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 12.01.19 12:01:19 Sawradym Taran Именного так. Только в предложении scatter убрать TO Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка. Но мы же копируемм в объект. Ну и комменты подправить массив-обьект. Чукча не читатель... Поправил. Да я вижу. Спасибо. Ты мне очень помог. ;)

Re: Правильно ли я перегоняю файл в другой файл построчно?

Taran

Сообщений: 13625
Откуда: Красноярск
Дата регистрации: 16.01.2008

Taran

12.01.19 12:01:19

Sawradym
Taran
Именного так.
Только в предложении scatter убрать TO
Иначе фокс ~~считает что name - это поле и копируем в массив~~ будет ошибка.
Но мы же копируемм в объект.
Ну и комменты подправить массив-обьект.

Чукча не читатель...
Поправил.

Да я вижу. Спасибо. Ты мне очень помог. ;)

Re: Правильно ли я перегоняю файл в другой файл построчно?
негерой Автор Сообщений: 17 Дата регистрации: 11.05.2018	негерой 12.01.19 12:47:04 Crispy Это все или шутка чья-то, ли уж не знаю что. Это не шутка. Это просто подсчитывать время работы нужно без вывода номеров строк. Странно, что вы не заметили этой моей ошибки- код-то перед глазами. В общем, убираем вывод номеров строк и код построчного перегоняния 40-тысячногострочного файла срабатывает за секунду-другую. У меня Microsoft Visual FoxPro 9.0 +++++++++++++++++++++++++++++++++++++ Тут ещё о чём можно говорить- я просто не знал способа построчного копирования файла. Весь интернет перерыл, нашёл только вот это. forum.codenet.ru А способа, предложенного Sawradym я не знал просто-напросто. Плохо искал, видать. Исправлено 1 раз(а). Последнее : негерой, 12.01.19 12:50

Re: Правильно ли я перегоняю файл в другой файл построчно?

негерой
Автор

Сообщений: 17
Дата регистрации: 11.05.2018

негерой

12.01.19 12:47:04

Crispy
Это все или шутка чья-то, ли уж не знаю что.

Это не шутка. Это просто подсчитывать время работы нужно без вывода номеров строк. Странно, что вы не заметили этой моей ошибки- код-то перед глазами.
В общем, убираем вывод номеров строк и код построчного перегоняния 40-тысячногострочного файла срабатывает за секунду-другую.

У меня Microsoft Visual FoxPro 9.0

+++++++++++++++++++++++++++++++++++++

Тут ещё о чём можно говорить- я просто не знал способа построчного копирования файла. Весь интернет перерыл, нашёл только вот это.
forum.codenet.ru

А способа, предложенного Sawradym я не знал просто-напросто. Плохо искал, видать.

Исправлено 1 раз(а). Последнее : негерой, 12.01.19 12:50

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 13:26:47 негерой А способа, предложенного Sawradym я не знал просто-напросто. Плохо искал, видать. Так Sawradym просто собрал в кучу и оптимизировал всё то, что вам советовали. SCAN...ENDSCAN - Taran, переход по рабочим областям открытых таблиц - Симпле777 вам разжевал, INSERT - я предложила...Немного подумав над советами вы и сами могли бы всё это реализовать ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается... Исправлено 1 раз(а). Последнее : Божья_коровка, 12.01.19 13:27

Re: Правильно ли я перегоняю файл в другой файл построчно?

Божья_коровка

Сообщений: 25731
Дата регистрации: 23.08.2001

Божья_коровка

12.01.19 13:26:47

негерой
А способа, предложенного Sawradym я не знал просто-напросто. Плохо искал, видать.

Так Sawradym просто собрал в кучу и оптимизировал всё то, что вам советовали. SCAN...ENDSCAN - Taran, переход по рабочим областям открытых таблиц - Симпле777 вам разжевал, INSERT - я предложила...Немного подумав над советами вы и сами могли бы всё это реализовать

------------------
Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Исправлено 1 раз(а). Последнее : Божья_коровка, 12.01.19 13:27

Re: Правильно ли я перегоняю файл в другой файл построчно?
негерой Автор Сообщений: 17 Дата регистрации: 11.05.2018	негерой 12.01.19 13:45:14 Ну, положим, scan ...endscan, мне даром не нужен, Simple777 я уже поблагодарил, а ваше INSERT INTO dbf_name [(FieldName1 [, FieldName2, ...])] SELECT SELECTClauses [UNION UnionClause SELECT SELECTClauses ...] для человека, который негерой В FoxPro не шарю совсем звучит издёвкой. ++++++++++++++++++++++++++++++++++++++ А тут всё понятно. Что откуда и куда. Без всяких страшних слов, объединений, троеточий, имён полей и квадратных скобок. &&считаем очередную строку SCATTER NAME temp_obj &&создадим в файле dst пустую запись &&и туда перегоним содержание INSERT INTO dst FROM NAME temp_obj

Re: Правильно ли я перегоняю файл в другой файл построчно?

негерой
Автор

Сообщений: 17
Дата регистрации: 11.05.2018

негерой

12.01.19 13:45:14

Ну, положим, scan ...endscan, мне даром не нужен, Simple777 я уже поблагодарил, а ваше


INSERT INTO dbf_name [(FieldName1 [, FieldName2, ...])]   SELECT SELECTClauses [UNION UnionClause SELECT SELECTClauses ...]

для человека, который

негерой
В FoxPro не шарю совсем

звучит издёвкой.
++++++++++++++++++++++++++++++++++++++

А тут всё понятно. Что откуда и куда. Без всяких страшних слов, объединений, троеточий, имён полей и квадратных скобок.


         &&считаем очередную строку  
         SCATTER NAME temp_obj  
    
         &&создадим в файле dst пустую запись       
         &&и туда перегоним содержание  
      INSERT INTO dst FROM NAME temp_obj

Re: Правильно ли я перегоняю файл в другой файл построчно?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 12.01.19 13:50:38 Даже немного жаль, что еще IK не прокомментировал...

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 13:53:01 Вы считаете чтение хелпа - издёвкой? Вам же привели команду из хелпа и пример ее использования был приведён А где еще люди не шариющие в FoxPro должны черпать информацию? Хелп самое первое, что надо изучать. Тем более вы уже взяли в руки фокс, а раз так, то надо хоть немного с ним подружиться. Мы рады, что у вас получилось реализовать, то что было задумано с приемлемой скоростью обработки данных. PS: негерой Ну, положим, scan ...endscan, мне даром не нужен, Это вы зря ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается... Исправлено 2 раз(а). Последнее : Божья_коровка, 12.01.19 13:55

Re: Правильно ли я перегоняю файл в другой файл построчно?

Божья_коровка

Сообщений: 25731
Дата регистрации: 23.08.2001

Божья_коровка

12.01.19 13:53:01

Вы считаете чтение хелпа - издёвкой?

Вам же привели команду из хелпа и пример ее использования был приведён

А где еще люди не шариющие в FoxPro должны черпать информацию? Хелп самое первое, что надо изучать. Тем более вы уже взяли в руки фокс, а раз так, то надо хоть немного с ним подружиться.

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

PS:

негерой
Ну, положим, scan ...endscan, мне даром не нужен,

Это вы зря

------------------
Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Исправлено 2 раз(а). Последнее : Божья_коровка, 12.01.19 13:55

Re: Правильно ли я перегоняю файл в другой файл построчно?
негерой Автор Сообщений: 17 Дата регистрации: 11.05.2018	негерой 12.01.19 13:58:27 Божья_коровка Вы считаете чтение хелпа - издёвкой? я считаю издёвкой, когда прошу яблоко, а мне предлагают грушу. Вот понял же Simple777 что мне нужно и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. У меня пригорает, что я файлы постоянно закрываю-открываю, а вы мне insert...

Re: Правильно ли я перегоняю файл в другой файл построчно?

негерой
Автор

Сообщений: 17
Дата регистрации: 11.05.2018

негерой

12.01.19 13:58:27

Божья_коровка
Вы считаете чтение хелпа - издёвкой?

я считаю издёвкой, когда прошу яблоко, а мне предлагают грушу. Вот понял же Simple777 что мне нужно и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. У меня пригорает, что я файлы постоянно закрываю-открываю, а вы мне insert...

Re: Правильно ли я перегоняю файл в другой файл построчно?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 12.01.19 14:01:32 Эх, и ssa днем с огнем не сыскать...

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 14:05:23 Simple777 Эх, и ssa днем с огнем не сыскать... ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Re: Правильно ли я перегоняю файл в другой файл построчно?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 12.01.19 14:06:34 негерой и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. Ну это нормально. И на том спасибо. ;)

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 14:07:16 негерой Божья_коровка Вы считаете чтение хелпа - издёвкой? я считаю издёвкой, когда прошу яблоко, а мне предлагают грушу. Вот понял же Simple777 что мне нужно и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. У меня пригорает, что я файлы постоянно закрываю-открываю, а вы мне insert... Имея под рукой VFP9 вам не нужен scan, не нужен insert....Всё ахтунг "Правильно" юзайте циклы DO WHILE... ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается... Исправлено 1 раз(а). Последнее : Божья_коровка, 12.01.19 14:09

Re: Правильно ли я перегоняю файл в другой файл построчно?

Божья_коровка

Сообщений: 25731
Дата регистрации: 23.08.2001

Божья_коровка

12.01.19 14:07:16

негерой
Божья_коровка
Вы считаете чтение хелпа - издёвкой?
я считаю издёвкой, когда прошу яблоко, а мне предлагают грушу. Вот понял же Simple777 что мне нужно и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. У меня пригорает, что я файлы постоянно закрываю-открываю, а вы мне insert...

Имея под рукой VFP9 вам не нужен scan, не нужен insert....Всё ахтунг

"Правильно" юзайте циклы DO WHILE...

------------------
Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Исправлено 1 раз(а). Последнее : Божья_коровка, 12.01.19 14:09

Re: Правильно ли я перегоняю файл в другой файл построчно?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 12.01.19 14:08:57 Божья_коровка Simple777 Эх, и ssa днем с огнем не сыскать... Уж не с парашюта ли прыгает?

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 14:10:56 Simple777 Уж не с парашюта ли прыгает? Всяко может быть, депрессия она такая штука, всех может накрыть... ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Re: Правильно ли я перегоняю файл в другой файл построчно?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 12.01.19 14:12:55 Вот же волкИ (и я в том числе) набросились на Парнишку. Негерой. Ты не обижайся на нас. Все путём.

Re: Правильно ли я перегоняю файл в другой файл построчно?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 12.01.19 14:17:54 Taran негерой и Taran понял. Пусть не сразу, после моих объяснений, но всё таки. Ну это нормально. И на том спасибо. ;) Цитата: - Вот же именно его вчера при мне и зарезало трамваем на Патриарших, причем этот самый загадочный гражданин… – Знакомый Понтия Пилата? – спросил Стравинский, очевидно отличавшийся большой понятливостью.

Re: Правильно ли я перегоняю файл в другой файл построчно?

Simple777

Сообщений: 33855
Дата регистрации: 05.11.2006

Simple777

12.01.19 14:17:54

Taran
негерой
и Taran понял. Пусть не сразу, после моих объяснений, но всё таки.

Ну это нормально. И на том спасибо. ;)

Цитата:
- Вот же именно его вчера при мне и зарезало трамваем на Патриарших, причем этот самый загадочный гражданин…

– Знакомый Понтия Пилата? – спросил Стравинский, очевидно отличавшийся большой понятливостью.

Re: Правильно ли я перегоняю файл в другой файл построчно?
Божья_коровка Сообщений: 25731 Дата регистрации: 23.08.2001	Божья_коровка 12.01.19 14:18:04 Taran Вот же волкИ (и я в том числе) набросились на Парнишку. Тяжело в ученье - легко в бою! Мы ж по-свойски, любя так сказать. Sawradym вообще молодчина! ------------------ Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Re: Правильно ли я перегоняю файл в другой файл построчно?

Божья_коровка

Сообщений: 25731
Дата регистрации: 23.08.2001

Божья_коровка

12.01.19 14:18:04

Taran
Вот же волкИ (и я в том числе) набросились на Парнишку.

Тяжело в ученье - легко в бою! Мы ж по-свойски, любя так сказать.

Sawradym вообще молодчина!

------------------
Жись, она как зёбра, полоса белая, полоса черная, а мне всегда задница достается...

Страницы: 1 2 3 4

:: Список Форумов•Список тем•Поиск•Войти

Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 20 (Гостей: 20)